#' Does the schema exist
#'
#' Kontrollime kas andmebaasis antud schema eksisteerib.
#' @param schema	str Database schema name.
#' @keywords database, schema
#' @export
#' @examples
#' db_is_shema_exist(schema = "public")
db_is_shema_exist <- function(schema = NULL) {
  if (schema %in% ruut::db_all_schemas()) {
    TRUE
  } else {
    FALSE
  }
}