Delete Status Code

delete_status_code() deletes an existing status code in the status code lookup table

Usage

delete_status_code(con, status_code_id)

Arguments

con

A DBI connection object obtained from DBI::dbConnect()

status_code_id

A numeric ID for the targeted status code get_status_codes Note: If a status code has been associated with a sample, then the database restricts deleting this status code. You must first update those records with a new status code before reattempting to delete the status code. Consider using the update_status_code_status function if you are wanting to retire an status code while retaining its value for historic records.

See also

Other status code functions: add_status_code(), get_sample_status(), get_status_codes(), set_sample_status(), update_status_code(), update_status_code_status()

Examples

# example database connection
cfg <- config::get()
con <- DBI::dbConnect(RPostgres::Postgres(),
                      dbname = cfg$dbname,
                      host = cfg$host,
                      port = cfg$port,
                      user = cfg$username,
                      password = cfg$password)
#> Error: connection to server at "localhost" (::1), port 5432 failed: Connection refused (0x0000274D/10061)
#> 	Is the server running on that host and accepting TCP/IP connections?
#> connection to server at "localhost" (127.0.0.1), port 5432 failed: Connection refused (0x0000274D/10061)
#> 	Is the server running on that host and accepting TCP/IP connections?

all_status_codes <- get_status_codes(con)
#> Error in h(simpleError(msg, call)): error in evaluating the argument 'dbObj' in selecting a method for function 'dbIsValid': object 'con' not found
View(all_status_codes) # to view the ID of the status code needing deletion
#> Error in eval(expr, envir, enclos): object 'all_status_codes' not found

delete_status_code(con, 1)
#> Error in h(simpleError(msg, call)): error in evaluating the argument 'dbObj' in selecting a method for function 'dbIsValid': object 'con' not found