Skip to contents

Add Agency

add_agency.Rd

add_agency() adds a new agency to the agency lookup table

Usage

add_agency(con, agency)

Arguments

con

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

agency

A valid agency dataframe with the following:

  1. code character A short code for the agency

  2. agency_name character The agency's proper name

See also

Other agency functions: delete_agency(), get_agencies(), update_agency(), update_agency_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?

new_agency <- data.frame(code = "USFWS",
                         agency_name = "United States Fish and Wildlife Service")
add_agency(con, new_agency)
#> Error in h(simpleError(msg, call)): error in evaluating the argument 'dbObj' in selecting a method for function 'dbIsValid': object 'con' not found