/*------------------------------------------------------------* 
* program:     cdisc63.sas                                    * 
* Description: Case #63. Dose Unit Null For Interventions domains, this identifies records that violate the *
*              condition [Dose Units is not null], limited to records where [Dose is not null].* 
* By:          Sy Truong, 10/14/2009                          *
*-------------------------------------------------------------*/
libname templib '../data';
data templib.cm(label="Concomitant Medications");
attrib STUDYID length=$7 label="Study Identifier";
attrib DOMAIN length=$2 label="Domain Abbreviation";
attrib USUBJID length=$14 label="Unique Subject Identifier";
attrib CMSEQ length=8 label="Sequence Number";
attrib CMTRT length=$23 label="Reported Name of Drug, Med, or Therapy";
attrib CMMODIFY length=$23 label="Modified Reported Name";
attrib CMDECOD length=$30 label="Standardized Medication Name";
attrib CMCAT length=$36 label="Category for Medication";
attrib CMINDC length=$27 label="Indication";
attrib CMCLAS length=$45 label="Medication Class";
attrib CMCLASCD length=$3 label="Medication Class Code";
attrib CMDOSTXT length=$4 label="Dose Description";
attrib CMDOSU length=$6 label="Dose Units";
attrib CMDOSE length=$6 label="Dose Units";
attrib CMDOSFRQ length=$5 label="Dosing Frequency Per Interval";
attrib CMROUTE length=$12 label="Route of Administration";
attrib CMSTDTC length=$10 label="Start Date/Time of Medication";
attrib CMENDTC length=$10 label="End Date/Time of Medication";
attrib CMSTDY length=8 label="Study Day of Start of Medication";
attrib CMENDY length=8 label="Study Day of End of Medication";
attrib CMENRF length=$6 label="End Relative to Reference Period";
STUDYID="CDISC01";
DOMAIN="CM";
USUBJID="CDISC01.100008";
CMSEQ=1;
CMTRT="ACCUPRIL";
CMMODIFY="";
CMDECOD="QUINAPRIL HYDROCHLORIDE";
CMCAT="Concomitant Medications";
CMINDC="HYPERTENSION";
CMCLAS="AGENTS ACTING ON THE RENIN-ANGIOTENSIN SYSTEM";
CMCLASCD="C09";
CMDOSTXT="20";
CMDOSU="mg";
CMDOSE="2";
CMDOSFRQ="Q24H";
CMROUTE="ORAL";
CMSTDTC="1995";
CMENDTC="";
CMSTDY=-2676;
CMENDY=.;
CMENRF="AFTER";
output;
STUDYID="CDISC01";
DOMAIN="CM";
USUBJID="CDISC01.100008";
CMSEQ=2;
CMTRT="ASPIRIN";
CMMODIFY="";
CMDECOD="ACETYLSALICYLIC ACID";
CMCAT="Concomitant Medications";
CMINDC="PREVENTATIVE";
CMCLAS="ANALGESICS";
CMCLASCD="N02";
CMDOSTXT="81";
CMDOSU="";
CMDOSE="2";
CMDOSFRQ="Q24H";
CMROUTE="ORAL";
CMSTDTC="2000-10";
CMENDTC="";
CMSTDY=-910;
CMENDY=.;
CMENRF="AFTER";
output;
STUDYID="CDISC01";
DOMAIN="CM";
USUBJID="CDISC01.100008";
CMSEQ=3;
CMTRT="CALCIUM";
CMMODIFY="";
CMDECOD="CALCIUM";
CMCAT="Concomitant Medications";
CMINDC="SUPPLEMENT";
CMCLAS="MINERAL SUPPLEMENTS";
CMCLASCD="A12";
CMDOSTXT="600";
CMDOSU="mg";
CMDOSFRQ="Q24H";
CMROUTE="ORAL";
CMSTDTC="1995";
CMENDTC="";
CMSTDY=-2676;
CMENDY=.;
CMENRF="AFTER";
output;
STUDYID="CDISC01";
DOMAIN="CM";
USUBJID="CDISC01.100008";
CMSEQ=4;
CMTRT="GLUCOPHAGE";
CMMODIFY="";
CMDECOD="METFORMIN HYDROCHLORIDE";
CMCAT="Concomitant Medications";
CMINDC="DIABETES";
CMCLAS="DRUGS USED IN DIABETES";
CMCLASCD="A10";
CMDOSTXT="1000";
CMDOSU="mg";
CMDOSFRQ="Q24H";
CMROUTE="ORAL";
CMSTDTC="1995";
CMENDTC="";
CMSTDY=-2676;
CMENDY=.;
CMENRF="AFTER";
output;
run;
%cdisc(datlib=templib,datname=cm);