MH <- data.frame(USUBJID = LETTERS[1:5],
MHTERM = LETTERS[5:1],
MHSTDTC = c("2014", NA, "2014-01", "", "2014---02"),
stringsAsFactors = FALSE)
check_mh_missing_month(MH)
MH$MHSPID= "FORMNAME-R:2/L:2XXXX"
check_mh_missing_month(MH,preproc=roche_derive_rave_row)
Run the code above in your browser using DataLab