check_ex_exoccur_mis_exdose_nonmis {sdtmchecks}

Check for missing EXOCCUR but EXDOSE not missing

Description

Checks for exposure records with missing EXOCCUR but EXDOSE not missing

Usage

check_ex_exoccur_mis_exdose_nonmis(EX)

Arguments

EX

Exposure dataframe with variables USUBJID, EXTRT, EXDOSE, EXOCCUR, EXSTDTC

Value

boolean value if check failed or passed with 'msg' attribute if the test failed

Author(s)

Iris Zhao

Examples

 EX <- data.frame(
 USUBJID = 1:10,
 EXTRT = rep(1,10),
 EXOCCUR = c(rep(1,2),rep(NA,4),rep(2,4)),
 EXDOSE = c(rep(NA,4),rep(1,6)),
 EXSTDTC = 1:10
)

EX$EXOCCUR[6]="NA"
EX$EXOCCUR[7]=""
EX$EXOCCUR[8]=NA

check_ex_exoccur_mis_exdose_nonmis(EX)