/*------------------------------------------------------------*
* program:     cdisc19.sas                                     *
* Description: Zero Rows Identifies domain table that has zero rows and therefore contains no data. Case #19*
* By:          Sy Truong, 10/14/2009                          *
*-------------------------------------------------------------*/
 
libname templib '../data';

*** Create some data to be selected ***;
data templib.dv(label="Protocol Deviations");
attrib STUDYID	label="Study Identifier" length=$100;
attrib DOMAIN	label="Domain Abbreviation"	length=$100;
attrib USUBJID	label="Unique Subject Identifier"	length=$100;
attrib DVSEQ	label="Sequence Number"	length=8;
attrib DVREFID	label="Reference ID"	length=$100;
attrib DVSPID	label="Sponsor-Defined Identifier"	length=$100;
attrib DVTERM	label="Protocol Deviation Term"	length=$100;
attrib DVDECOD	label="Protocol Deviation Coded Term"	length=$100;
attrib DVCAT	label="Category for Protocol Deviation"	length=$100;
attrib DVSCAT	label="Subcategory for Protocol Deviation"	length=$100;
attrib EPOCH	label="Epoch"	length=$100;
attrib DVSTDTC	label="Start Date/Time of Deviation"	length=$100;
attrib DVENDTC	label="End Date/Time of Deviation"	length=$100;
if (1=1) then delete;
run;
%cdisc(datlib=templib,datname=dv);