aadouglass

df.sqlInsert <- function(dataframe) {
	count <- 1
	query_start <- "INSERT INTO EpicorReports.db_ddladmin.TempVP ("
	
	while (count <= ncol(dataframe)) {
		if (ncol(dataframe) > count) {
			query_start <- paste0(query_start, colnames(dataframe[count]), ", ")
		}
		if (ncol(dataframe) == count) {
			query_start <- paste0(query_start, colnames(dataframe[count]), ") VALUES (")

aadouglass

input = list(open("C:\\Users\\andrewd\\Source\\Repos\\adoc\\d5.txt").read())
print("Initial length of input:", len(input))
set_deleted = 0
del_count = 0
while set_deleted < 1:
    del_check = 0
    for x in range(len(input)-1):
        if abs(ord(input[x]) - ord(input[x+1])) == 32:
            input.remove(input[x])
            input.remove(input[x])

aadouglass

   KIT1048
KIT1049
KIT1050
KIT1051
KIT1052
KIT1053
KIT1054
KIT1055
KIT1056
KIT1057

aadouglass

#!/bin/bash


bashSource="data/blah.txt"

if [ -e bashSource ]; then
	echo "File exists"
else 
	echo "File does not exists"
fi