DBMSIO Class

This class is a DBMS I/O class created using the DatabaseConnector package.

DBMSIO

Arguments

server	Enter the server address to access (See http://ohdsi.github.io/DatabaseConnector/reference/connect.html)
user	Enter the user ID of the DBMS you want to access
pw	Enter the password for the DBMS you want to access.
dbms	Enter the DBMS type. ex: sql server, oracle

Format

An object of class R6ClassGenerator of length 24.

Examples

# NOT RUN {
############################# Example Code: Data frame transfer RDBMS.. #############################

# First, connect RDBMS
# I'm not recommend to input server information in programming code (Security issues)
# So, I recommend to use environment variables in operating system
dbms <- "sql server"
user <- Sys.getenv("user")
pw <- Sys.getenv("pw")
server <- Sys.getenv("dbServer")

# Choose Database name
databaseSchema <- 'Radiology_CDM_QUER.dbo'

# Using DatabaseConnector package
io <- DBMSIO$new(server = server, user = user, pw = pw, dbms = dbms)

# df is radiology Data frame,,
# The insertDB method checks the row in the data frame and automatically inserts the table name.
# If the data frame does not fit the R-CDM, an error occurs.
# You can also inherit the insertTable from the DatabaseConnector package to accept the options for that function.
# e.q dropTableIfExists etc.
io$insertDB(dbS = databaseSchema, df = df)

################################## Example Code: Get data for RDBMS.... #############################

# Using DBMSIO class in RadETL package
# table schema names are Radiology_Image and Radiology_Occurrence
tbSchema <- "Radiology_Occurrence"
df <- io$dbGetdtS(dbS = databaseSchema, tbS = tbSchema)

# include conditions....
df <- io$dbGetdtS(dbS = databaseSchema, tbS = tbSchema, condition = "Image_total_count < 20")
df$RADIOLOGY_OCCURRENCE_ID

# if want disconnect (required)
io$finalize()

######################################## Example Code: END ##########################################
# }