Browse Source

Adding dbtype in functions.

main
Costa 3 years ago
parent
commit
ec3a8328e7
1 changed files with 1 additions and 1 deletions
  1. +1
    -1
      sqlFunctions.R

+ 1
- 1
sqlFunctions.R

@ -26,7 +26,7 @@ sqlBackUp<-function(dbfile=file,bu.dir){
file.copy(dbfile, cp_bu) file.copy(dbfile, cp_bu)
} }
sqlShowSamples<-function(conn=dta, nhcs=nhc.test, verb=F){
sqlShowSamples<-function(conn=dta, nhcs=nhc.test, verb=F, dbtype){
if (isFALSE(verb)){ if (isFALSE(verb)){
sqlQuery(conn, "SELECT O.NHC,S.* sqlQuery(conn, "SELECT O.NHC,S.*
FROM SAMPLES S FROM SAMPLES S

Loading…
Cancel
Save