This code should be run on HFR submission prior to loading into DDC/s3. Currently, DDC cannot handle two issues - (1) tabs with only one row of data and (2) tabs not ordered from least to greatest This code resolves the first by creating a second row of data with the first value and the second by reordering tabs using openxlsx.
ddcpv_check(filepath)path to HFR submission
print out of checks and
if (FALSE) {
files <- list.files("ou_submissions/", "xlsx", full.names = TRUE)
ddcpv_check(files[1])
purrr::walk(files, ddcpv_check) }