R/details_check_presence.R

Defines functions check_presence

check_presence<-function(u){
  conn<- adminKraken::con_mysql()
  qry_str<-paste0('select DISTINCT(sn) from mvdata where Lot="',u,'";')
  qry<-dbSendQuery(conn,qry_str)
  qry_res<-dbFetch(qry)
  dbDisconnect(conn)
  qry_res$Lot<-u
  qry_res
}
JARS3N/details documentation built on April 26, 2020, 9:16 p.m.