R/product-change-listings.R

In tweed1e/statcanopener: An R wrapper for Statistics Canada's Web Data Service

# Product Change Listings

#' Get list of changed series
#'
#' Users can choose to ask for what series have changed today. This can be
#' invoked at any time of day and will reflect the list of series that have
#' been updated at 8:30am EST on a given release up until midnight that same day.
#' Users can also query what has changed at the table/cube level on a specific
#' day by adding an ISO date to the end of the URL. This date can be any
#' date from today into the past.
#'
#' @export
#' @return An httr response object
#' @examples
#' \donttest{
#' getChangedSeriesList()
#' }
getChangedSeriesList <- function() {
  get("getChangedSeriesList")
}


#' Get list of changed cubes/tables
#'
#' Users can choose to ask for what series have changed today. This can be
#' invoked at any time of day and will reflect the list of series that have
#' been updated at 8:30am EST on a given release up until midnight that same day.
#' Users can also query what has changed at the table/cube level on a specific
#' day by adding an ISO date to the end of the URL. This date can be any
#' date from today into the past.
#'
#'
#' @param date Date in format YYYY-MM-DD
#' @export
#' @return An httr response object
#' @examples
#' \donttest{
#' getChangedCubeList("2019-01-01")
#' }
getChangedCubeList <- function(date) {
  # check date format is YYYY-MM-DD
  # right now probably won't work if date not specified?
  get(paste0("getChangedCubeList/", date))
}