R/get_cc_instruments.R

Defines functions get_cc_instruments

get_cc_instruments<-function(u){
require(RMySQL)
db<-adminKraken::con_mysql()
query_string<-gsub("%tbl%",u,'SELECT DISTINCT(INST) as insts from %tbl%;')
query_sent<-RMySQL::dbSendQuery(db,query_string)
x<-RMySQL::dbFetch(query_sent)
RMySQL::dbClearResult(query_sent)
RMySQL::dbDisconnect(db)
x$insts
}
JARS3N/LiveLongAndProsper documentation built on June 21, 2020, 12:49 p.m.