ruut/R/db_is_shema_exist.R

#' Does the schema exist
#'
#' Kontrollime kas andmebaasi schema eksisteerib.
#' @param schema	str A database schema name.
#' @return TRUE/FALSE.
#' @seealso [ruut::db_connect()], [ruut::get_config()], [ruut::db_all_schemas()]
#' @keywords database, schema
#' @export
#' @examples
#' ## Not run:
#' ##
#' ## db_is_shema_exist(schema = "public")
#' ##
#' ## End(**Not run**)
db_is_shema_exist <- function(schema = NULL) {
  if (schema %in% ruut::db_all_schemas()) {
    TRUE
  } else {
    FALSE
  }
}