Nothing
#' Set the Transaction Isolation Level for a Connection
#'
#' @param levels One or more of `r odbc:::choices_rd(names(odbc:::transactionLevels()))`.
#' @inheritParams DBI::dbDisconnect
#' @seealso <https://docs.microsoft.com/en-us/sql/odbc/reference/develop-app/setting-the-transaction-isolation-level>
#' @export
#' @examples
#' \dontrun{
#' # Can use spaces or underscores in between words.
#' odbcSetTransactionIsolationLevel(con, "read uncommitted")
#'
#' # Can also use the full constant name.
#' odbcSetTransactionIsolationLevel(con, "SQL_TXN_READ_UNCOMMITTED")
#' }
odbcSetTransactionIsolationLevel <- function(conn, levels) {
arg_match(levels, values = names(transactionLevels()), multiple = TRUE)
# Convert to lowercase, spaces to underscores, remove sql_txn prefix
levels <- tolower(levels)
levels <- gsub(" ", "_", levels)
levels <- sub("sql_txn_", "", levels)
levels <- match.arg(tolower(levels), names(transactionLevels()), several.ok = TRUE)
set_transaction_isolation(conn@ptr, transactionLevels()[levels])
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.