diff --git a/NAMESPACE b/NAMESPACE index 0c2f7d9..c07ea4d 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -2,10 +2,6 @@ export(connect_to_rcc_billing_db) export(draft_communication_record_from_line_item) -export(fix_data_in_invoice_line_item) -export(fix_data_in_invoice_line_item_communication) -export(fix_data_in_redcap_projects) -export(fix_data_in_redcap_user_information) export(get_bad_emails_from_log) export(get_billable_candidates) export(get_creators) diff --git a/R/transform.R b/R/transform.R index a68caf3..37bd49b 100644 --- a/R/transform.R +++ b/R/transform.R @@ -59,122 +59,6 @@ invoice_line_item_df_from <- function(invoice_line_item_communications) { return(invoice_line_item) } -#' fix_data_in_invoice_line_item -#' -#' Fixes column data types that can vary between MySQL/MariaDB and SQLite3. -#' This allows testing in SQLite3 while production is MariaDB -#' -#' @param data - a dataframe with data from the invoice_line_item table -#' -#' @return The input dataframe with revised data types -#' @export -#' -#' @examples -#' \dontrun{ -#' fix_data_in_invoice_line_item(invoice_line_item_test_data) -#' } -#' @export -fix_data_in_invoice_line_item <- function(data) { - time_columns <- c( - "created", - "updated", - "je_posting_date", - "date_sent", - "date_received" - ) - - return(mutate_columns_to_posixct(data, time_columns)) -} - -#' fix_data_in_invoice_line_item_communication -#' -#' Fixes column data types that can vary between MySQL/MariaDB and SQLite3. -#' This allows testing in SQLite3 while production is MariaDB -#' -#' @param data - a dataframe with data from the invoice_line_item_communication table -#' -#' @return The input dataframe with revised data types -#' @export -#' -#' @examples -#' \dontrun{ -#' fix_data_in_invoice_line_item_communication(invoice_line_item_communication_test_data) -#' } -#' @export -fix_data_in_invoice_line_item_communication <- function(data) { - time_columns <- c( - "created", - "updated", - "je_posting_date", - "date_sent", - "date_received" - ) - - return(mutate_columns_to_posixct(data, time_columns)) -} - -#' fix_data_in_redcap_projects -#' -#' Fixes column data types that can vary between MySQL/MariaDB and SQLite3. -#' This allows testing in SQLite3 while production is MariaDB -#' -#' @param data - a dataframe with data from the redcap_projects table -#' -#' @return The input dataframe with revised data types -#' @export -#' -#' @examples -#' \dontrun{ -#' fix_data_in_redcap_projects(redcap_projects) -#' } -#' @export -fix_data_in_redcap_projects <- function(data) { - time_columns <- c( - "creation_time", - "production_time", - "inactive_time", - "completed_time", - "date_deleted", - "last_logged_event", - "datamart_cron_end_date", - "twilio_request_inspector_checked" - ) - - return(mutate_columns_to_posixct(data, time_columns)) -} - -#' fix_data_in_redcap_user_information -#' -#' Fixes column data types that can vary between MySQL/MariaDB and SQLite3. -#' This allows testing in SQLite3 while production is MariaDB -#' -#' @param data - a dataframe with data from the redcap_user_information table -#' -#' @return The input dataframe with revised data types -#' @export -#' -#' @examples -#' \dontrun{ -#' fix_data_in_redcap_user_information(redcap_user_information_test_data) -#' } -#' @export -fix_data_in_redcap_user_information <- function(data) { - time_columns <- c( - "user_creation", - "user_firstvisit", - "user_firstactivity", - "user_lastactivity", - "user_lastlogin", - "user_suspended_time", - "user_expiration", - "user_access_dashboard_view", - "messaging_email_ts", - "messaging_email_queue_time" - ) - - return(mutate_columns_to_posixct(data, time_columns)) -} - #' Renames columns of a dataframe from CTSIT format to CSBT format #' #' Excludes non-CSBT columns and renames CTSIT column names to the corresponding CSBT names. diff --git a/man/fix_data_in_invoice_line_item.Rd b/man/fix_data_in_invoice_line_item.Rd deleted file mode 100644 index 739b512..0000000 --- a/man/fix_data_in_invoice_line_item.Rd +++ /dev/null @@ -1,23 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/transform.R -\name{fix_data_in_invoice_line_item} -\alias{fix_data_in_invoice_line_item} -\title{fix_data_in_invoice_line_item} -\usage{ -fix_data_in_invoice_line_item(data) -} -\arguments{ -\item{data}{- a dataframe with data from the invoice_line_item table} -} -\value{ -The input dataframe with revised data types -} -\description{ -Fixes column data types that can vary between MySQL/MariaDB and SQLite3. -This allows testing in SQLite3 while production is MariaDB -} -\examples{ -\dontrun{ -fix_data_in_invoice_line_item(invoice_line_item_test_data) -} -} diff --git a/man/fix_data_in_invoice_line_item_communication.Rd b/man/fix_data_in_invoice_line_item_communication.Rd deleted file mode 100644 index b8fdfde..0000000 --- a/man/fix_data_in_invoice_line_item_communication.Rd +++ /dev/null @@ -1,23 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/transform.R -\name{fix_data_in_invoice_line_item_communication} -\alias{fix_data_in_invoice_line_item_communication} -\title{fix_data_in_invoice_line_item_communication} -\usage{ -fix_data_in_invoice_line_item_communication(data) -} -\arguments{ -\item{data}{- a dataframe with data from the invoice_line_item_communication table} -} -\value{ -The input dataframe with revised data types -} -\description{ -Fixes column data types that can vary between MySQL/MariaDB and SQLite3. -This allows testing in SQLite3 while production is MariaDB -} -\examples{ -\dontrun{ -fix_data_in_invoice_line_item_communication(invoice_line_item_communication_test_data) -} -} diff --git a/man/fix_data_in_redcap_projects.Rd b/man/fix_data_in_redcap_projects.Rd deleted file mode 100644 index fe34a78..0000000 --- a/man/fix_data_in_redcap_projects.Rd +++ /dev/null @@ -1,23 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/transform.R -\name{fix_data_in_redcap_projects} -\alias{fix_data_in_redcap_projects} -\title{fix_data_in_redcap_projects} -\usage{ -fix_data_in_redcap_projects(data) -} -\arguments{ -\item{data}{- a dataframe with data from the redcap_projects table} -} -\value{ -The input dataframe with revised data types -} -\description{ -Fixes column data types that can vary between MySQL/MariaDB and SQLite3. -This allows testing in SQLite3 while production is MariaDB -} -\examples{ -\dontrun{ -fix_data_in_redcap_projects(redcap_projects) -} -} diff --git a/man/fix_data_in_redcap_user_information.Rd b/man/fix_data_in_redcap_user_information.Rd deleted file mode 100644 index b164e27..0000000 --- a/man/fix_data_in_redcap_user_information.Rd +++ /dev/null @@ -1,23 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/transform.R -\name{fix_data_in_redcap_user_information} -\alias{fix_data_in_redcap_user_information} -\title{fix_data_in_redcap_user_information} -\usage{ -fix_data_in_redcap_user_information(data) -} -\arguments{ -\item{data}{- a dataframe with data from the redcap_user_information table} -} -\value{ -The input dataframe with revised data types -} -\description{ -Fixes column data types that can vary between MySQL/MariaDB and SQLite3. -This allows testing in SQLite3 while production is MariaDB -} -\examples{ -\dontrun{ -fix_data_in_redcap_user_information(redcap_user_information_test_data) -} -}