Get WQP service metadata

The information from this request is only available for a limited time after the original query from the WQP. In the readWQPdata and readWQPqw functions, the results from this function will be attached as an attribute to the data.

Usage

wqp_check_status(wqp_request_id)

Arguments

wqp_request_id

A character returned from the header of a WQP request.

Value

a list generated from the WQP describing what data was returned.

Examples

# \donttest{
rawPcode <- readWQPqw("USGS-01594440", "01075", 
                      ignore_attributes = TRUE, legacy = FALSE)
#> GET: https://www.waterqualitydata.us/wqx3/Result/search?siteid=USGS-01594440&pCode=01075&mimeType=csv&dataProfile=basicPhysChem
#> WQX3 services are in-development, use with caution.
headerInfo <- attr(rawPcode, "headerInfo")
wqp_request_id <- headerInfo$`wqp-request-id`
count_info <- wqp_check_status(wqp_request_id)
count_info[["dataProviders"]]
#>   name completedOk failed canceled sourceRowCount outputRowCount
#> 1  epa        TRUE  FALSE    FALSE              1              0
#> 2 usgs        TRUE  FALSE    FALSE             66             65
#>   firstResponseMillis completionSeconds longestLatencyMillis
#> 1                 299                 0                   NA
#> 2                 643                 0                  640
# }