1 The SAS System 09:45 Wednesday, October 21, 2009 NOTE: Copyright (c) 2002-2003 by SAS Institute Inc., Cary, NC, USA. NOTE: SAS (r) 9.1 (TS1M3) Licensed to SY TRUONG, Site 0051884001. NOTE: This session is executing on the XP_PRO platform. NOTE: (E9BX04) SAS 9.1.3 SP 4 NOTE: SAS initialization used: real time 0.65 seconds cpu time 0.64 seconds NOTE: AUTOEXEC processing beginning; file is C:\apache\htdocs\cdiscbuilder\saspgm\autoexec.sas. NOTE: Libref _CDISC_ was successfully assigned as follows: Engine: V9 Physical Name: C:\apache\htdocs\cdiscbuilder\saspgm NOTE: AUTOEXEC processing completed. 1 /*------------------------------------------------------------* 2 * program: cdisc72.sas * 3 * Description: Case #72. DM Sequence For All domains, this identifies non-Sequence* 4 * Number domain subjects not found in the Demographics domain.* 5 * By: Sy Truong, 10/14/2009 * 6 *-------------------------------------------------------------*/ 7 8 libname templib '../data'; NOTE: Libref TEMPLIB was successfully assigned as follows: Engine: V9 Physical Name: C:\apache\htdocs\cdiscbuilder\data 9 10 *** Create some data to be selected ***; 11 data templib.dm(label="Demographics"); 12 attrib STUDYID label="Study Identifier" length=$100; 13 attrib DOMAIN label="Domain Abbreviation" length=$100; 14 attrib USUBJID label="Unique Subject Identifier" length=$100; 15 attrib SUBJID label="Subject Identifier for the Study" length=$100; 16 attrib RFSTDTC label="Subject Reference Start Date/Time" length=$100; 17 attrib RFENDTC label="Subject Reference End Date/Time" length=$100; 18 attrib SITEID label="Study Site Identifier" length=$100; 19 attrib INVID label="Investigator Identifier" length=$100; 20 attrib INVNAM label="Investigator Name" length=$100; 21 attrib BRTHDTC label="Date/Time of Birth" length=$100; 22 attrib AGE label="Age" length=8; 23 attrib AGEU label="Age Units" length=$100; 24 attrib SEX label="Sex" length=$100; 25 attrib RACE label="Race" length=$100; 26 attrib ETHNIC label="Ethnicity" length=$100; 27 attrib ARMCD label="Planned Arm Code" length=$100; 28 attrib ARM label="Description of Planned Arm" length=$100; 2 The SAS System 09:45 Wednesday, October 21, 2009 29 attrib COUNTRY label="Country" length=$100; 30 attrib DMDTC label="Date/Time of Collection" length=$100; 31 attrib DMDY label="Study Day of Collection" length=8; 32 STUDYID ='test'; 33 DOMAIN='test';USUBJID='101'; SUBJID ='test';RFSTDTC ='test';RFENDTC ='test';SITEID 33 ! ='test';INVID ='test';INVNAM ='test';BRTHDTC ='test';AGE =50; 34 AGEU ='test';SEX ='test';RACE ='test';ETHNIC ='test';ARMCD ='P';ARM ='Placebo'; 34 ! COUNTRY ='test';DMDTC ='test';DMDY =123; 35 output; 36 STUDYID ='test'; 37 DOMAIN='test';USUBJID='102'; SUBJID ='test';RFSTDTC ='test';RFENDTC ='test';SITEID 37 ! ='test';INVID ='test';INVNAM ='test';BRTHDTC ='test';AGE =50; 38 AGEU ='test';SEX ='test';RACE ='test';ETHNIC ='test';ARMCD ='';ARM ='';COUNTRY 38 ! ='test';DMDTC ='test';DMDY =123; 39 output; 40 STUDYID ='test'; 41 DOMAIN='test';USUBJID='103'; SUBJID ='test';RFSTDTC ='test';RFENDTC ='test';SITEID 41 ! ='test';INVID ='test';INVNAM ='test';BRTHDTC ='test';AGE =50; 42 AGEU ='test';SEX ='test';RACE ='test';ETHNIC ='test';ARMCD ='test';ARM ='test'; 42 ! COUNTRY ='test';DMDTC ='test';DMDY =123; 43 output; 44 STUDYID ='test'; 45 DOMAIN='test';USUBJID='104'; SUBJID ='test';RFSTDTC ='test';RFENDTC ='test';SITEID 45 ! ='test';INVID ='test';INVNAM ='test';BRTHDTC ='test';AGE =50; 46 AGEU ='test';SEX ='test';RACE ='test';ETHNIC ='test';ARMCD ='P';ARM ='Placebo'; 46 ! COUNTRY ='test';DMDTC ='test';DMDY =123; 47 output; 48 STUDYID ='test'; 49 DOMAIN='test';USUBJID='105'; SUBJID ='test';RFSTDTC ='test';RFENDTC ='test';SITEID 49 ! ='test';INVID ='test';INVNAM ='test';BRTHDTC ='test';AGE =50; 50 AGEU ='test';SEX ='test';RACE ='test';ETHNIC ='test';ARMCD ='B';ARM ='B';COUNTRY 50 ! ='test';DMDTC ='test';DMDY =123; 51 output; 52 STUDYID ='test'; 53 DOMAIN='test';USUBJID='106'; SUBJID ='test';RFSTDTC ='test';RFENDTC ='test';SITEID 53 ! ='test';INVID ='test';INVNAM ='test';BRTHDTC ='test';AGE =50; 54 AGEU ='test';SEX ='test';RACE ='test';ETHNIC ='test';ARMCD ='A';ARM ='A';COUNTRY 54 ! ='test';DMDTC ='test';DMDY =123; 55 output; 56 run; NOTE: The data set TEMPLIB.DM has 6 observations and 20 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 57 58 data templib.ae(label="Adverse Events"); 59 attrib STUDYID label="Study Identifier" length=$100; 60 attrib DOMAIN label="Domain Abbreviation" length=$100; 61 attrib USUBJID label="Unique Subject Identifier" length=$100; 62 attrib AESEQ label="Sequence Number" length=8; 3 The SAS System 09:45 Wednesday, October 21, 2009 63 attrib AEGRPID label="Group ID" length=$100; 64 attrib AEREFID label="Reference ID" length=$100; 65 attrib AESPID label="Sponsor-Defined Identifier" length=$100; 66 attrib AETERM label="Reported Term for the Adverse Event" length=$100; 67 attrib AEMODIFY label="Modified Reported Term" length=$100; 68 attrib AEDECOD label="Dictionary-Derived Term" length=$100; 69 attrib AESER label="Serious Event" length=$1; 70 attrib AESCAN label="Involves Cancer" length=$1; 71 attrib AESCONG label="Congenital Anomaly or Birth Defect" length=$1; 72 attrib AESDISAB label="Persist or Signif Disability/Incapacity" length=$1; 73 attrib AESDTH label="Results in Death" length=$1; 74 attrib AESHOSP label="Requires or Prolongs Hospitalization" length=$1; 75 attrib AESLIFE label="Is Life Threatening" length=$1; 76 attrib AESOD label="Occurred with Overdose" length=$1; 77 attrib AESMIE label="Other Medically Important Serious Event" length=$1; 78 79 80 STUDYID='test';DOMAIN='test';USUBJID='101';AESEQ=1;AEGRPID='test';AEREFID='test'; 80 ! AESPID='test';AETERM='term1';AEMODIFY='test';AEDECOD='decode1'; 81 AESER = 'Y';AESCAN = 'Y';AESCONG = 'Y';AESDISAB = 'Y';AESDTH = 'N';AESHOSP = 'Y'; 81 ! AESLIFE = 'Y';AESOD = 'N';AESMIE = 'Y'; 82 output; 83 STUDYID='test';DOMAIN='test';USUBJID='102';AESEQ=1;AEGRPID='test';AEREFID='test'; 83 ! AESPID='test';AETERM='term2';AEMODIFY='test';AEDECOD='decode2'; 84 AESER = 'Y';AESCAN = 'Y';AESCONG = 'Y';AESDISAB = 'Y';AESDTH = 'Y';AESHOSP = 'N'; 84 ! AESLIFE = 'Y';AESOD = 'Y';AESMIE = 'Y'; 85 output; 86 STUDYID='test';DOMAIN='test';USUBJID='101';AESEQ=1;AEGRPID='test';AEREFID='test'; 86 ! AESPID='test';AETERM='term3';AEMODIFY='test';AEDECOD='decode3'; 87 AESER = 'Y';AESCAN = 'Y';AESCONG = 'Y';AESDISAB = 'Y';AESDTH = 'Y';AESHOSP = 'Y'; 87 ! AESLIFE = 'Y';AESOD = 'N';AESMIE = 'N'; 88 output; 89 STUDYID='test';DOMAIN='test';USUBJID='106';AESEQ=1;AEGRPID='test';AEREFID='test'; 89 ! AESPID='test';AETERM='term4';AEMODIFY='test';AEDECOD='decode4'; 90 AESER = 'N';AESCAN = 'N';AESCONG = 'N';AESDISAB = 'N';AESDTH = 'N';AESHOSP = 'N'; 90 ! AESLIFE = 'N';AESOD = 'N';AESMIE = 'N'; 91 output; 92 STUDYID='test';DOMAIN='test';USUBJID='102';AESEQ=1;AEGRPID='test';AEREFID='test'; 92 ! AESPID='test';AETERM='term5';AEMODIFY='test';AEDECOD='decode5'; 93 AESER = 'Y';AESCAN = 'N';AESCONG = 'N';AESDISAB = 'N';AESDTH = 'Y';AESHOSP = 'N'; 93 ! AESLIFE = 'N';AESOD = 'N';AESMIE = 'N'; 94 output; 95 STUDYID='test';DOMAIN='test';USUBJID='111';AESEQ=1;AEGRPID='test';AEREFID='test'; 95 ! AESPID='test';AETERM='term6';AEMODIFY='test';AEDECOD='decode5'; 96 AESER = 'Y';AESCAN = 'Y';AESCONG = 'Y';AESDISAB = 'Y';AESDTH = 'Y';AESHOSP = 'Y'; 96 ! AESLIFE = 'Y';AESOD = 'N';AESMIE = 'N'; 97 output; 98 STUDYID='test';DOMAIN='test';USUBJID='103';AESEQ=1;AEGRPID='test';AEREFID='test'; 98 ! AESPID='test';AETERM='term7';AEMODIFY='test';AEDECOD='decode6'; 99 AESER = 'Y';AESCAN = 'Y';AESCONG = 'Y';AESDISAB = 'Y';AESDTH = 'Y';AESHOSP = 'Y'; 99 ! AESLIFE = 'Y';AESOD = 'N';AESMIE = 'N'; 100 output; 101 STUDYID='test';DOMAIN='test';USUBJID='111';AESEQ=1;AEGRPID='test';AEREFID='test'; 4 The SAS System 09:45 Wednesday, October 21, 2009 101 ! AESPID='test';AETERM='term8';AEMODIFY='test';AEDECOD='decode7'; 102 AESER = 'Y';AESCAN = 'Y';AESCONG = 'Y';AESDISAB = 'Y';AESDTH = 'Y';AESHOSP = 'N'; 102 ! AESLIFE = 'Y';AESOD = 'N';AESMIE = 'N'; 103 output; 104 STUDYID='test';DOMAIN='test';USUBJID='104';AESEQ=1;AEGRPID='test';AEREFID='test'; 104 ! AESPID='test';AETERM='term9';AEMODIFY='test';AEDECOD='decode8'; 105 AESER = 'Y';AESCAN = 'Y';AESCONG = 'Y';AESDISAB = 'Y';AESDTH = 'Y';AESHOSP = 'N'; 105 ! AESLIFE = 'Y';AESOD = 'Y';AESMIE = 'N'; 106 output; 107 STUDYID='test';DOMAIN='test';USUBJID='102';AESEQ=1;AEGRPID='test';AEREFID='test'; 107 ! AESPID='test';AETERM='term10';AEMODIFY='test';AEDECOD='decode5'; 108 AESER = 'Y';AESCAN = 'Y';AESCONG = 'Y';AESDISAB = 'Y';AESDTH = 'Y';AESHOSP = 'N'; 108 ! AESLIFE = 'Y';AESOD = 'N';AESMIE = 'N'; 109 output; 110 STUDYID='test';DOMAIN='test';USUBJID='103';AESEQ=1;AEGRPID='test';AEREFID='test'; 110 ! AESPID='test';AETERM='term11';AEMODIFY='test';AEDECOD='decode5'; 111 AESER = 'Y';AESCAN = 'N';AESCONG = 'N';AESDISAB = 'N';AESDTH = 'N';AESHOSP = 'Y'; 111 ! AESLIFE = 'N';AESOD = 'N';AESMIE = 'N'; 112 output; 113 run; NOTE: The data set TEMPLIB.AE has 11 observations and 19 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 114 115 %cdisc(datlib=templib,datname=ae); 116 data misobs(keep=obsnum); 117 retain obsnum 0; 118 set templib.ae(keep=STUDYID); 119 obsnum=obsnum+1; 120 if missing(STUDYID) then 121 output; 122 run; NOTE: There were 11 observations read from the data set TEMPLIB.AE. NOTE: The data set WORK.MISOBS has 0 observations and 1 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 123 data misobs(keep=obsnum); 124 retain obsnum 0; 125 set templib.ae(keep=DOMAIN); 126 obsnum=obsnum+1; 127 if missing(DOMAIN) then 128 output; 129 run; 5 The SAS System 09:45 Wednesday, October 21, 2009 NOTE: There were 11 observations read from the data set TEMPLIB.AE. NOTE: The data set WORK.MISOBS has 0 observations and 1 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 130 data misobs(keep=obsnum); 131 retain obsnum 0; 132 set templib.ae(keep=USUBJID); 133 obsnum=obsnum+1; 134 if missing(USUBJID) then 135 output; 136 run; NOTE: There were 11 observations read from the data set TEMPLIB.AE. NOTE: The data set WORK.MISOBS has 0 observations and 1 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 137 data misobs(keep=obsnum); 138 retain obsnum 0; 139 set templib.ae(keep=AESEQ); 140 obsnum=obsnum+1; 141 if missing(AESEQ) then 142 output; 143 run; NOTE: There were 11 observations read from the data set TEMPLIB.AE. NOTE: The data set WORK.MISOBS has 0 observations and 1 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 144 data misobs(keep=obsnum); 145 retain obsnum 0; 146 set templib.ae(keep=AETERM); 147 obsnum=obsnum+1; 148 if missing(AETERM) then 149 output; 150 run; NOTE: There were 11 observations read from the data set TEMPLIB.AE. NOTE: The data set WORK.MISOBS has 0 observations and 1 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 151 data misobs(keep=obsnum); 6 The SAS System 09:45 Wednesday, October 21, 2009 152 retain obsnum 0; 153 set templib.ae(keep=AEDECOD); 154 obsnum=obsnum+1; 155 if missing(AEDECOD) then 156 output; 157 run; NOTE: There were 11 observations read from the data set TEMPLIB.AE. NOTE: The data set WORK.MISOBS has 0 observations and 1 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 158 data _23; 159 retain obsnum 0; 160 set templib.ae(keep=AETERM AEDECOD); 161 obsnum = obsnum + 1; 162 if AETERM ne '' and AEDECOD= '' then output; 163 run; NOTE: There were 11 observations read from the data set TEMPLIB.AE. NOTE: The data set WORK._23 has 0 observations and 3 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 164 data noser; 165 retain obsnum 0; 166 set templib.ae(keep=AESER AESCAN AESCONG AESDISAB AESDTH AESHOSP AESLIFE AESOD AESMIE) 166 ! ; 167 obsnum = obsnum + 1; 168 if AESER = 'Y' and AESCAN = 'N' and AESCONG = 'N' and AESDISAB = 'N' and AESDTH = 'N' 168 ! and AESHOSP = 'N' and AESLIFE = 'N' and AESOD = 'N' and AESMIE = 'N' then output; 169 run; NOTE: There were 11 observations read from the data set TEMPLIB.AE. NOTE: The data set WORK.NOSER has 0 observations and 10 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 170 proc sort data=templib.ae out=ae nodupkey; 171 by usubjid; 172 run; NOTE: There were 11 observations read from the data set TEMPLIB.AE. NOTE: 5 observations with duplicate key values were deleted. NOTE: The data set WORK.AE has 6 observations and 19 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.04 seconds 7 The SAS System 09:45 Wednesday, October 21, 2009 cpu time 0.04 seconds NOTE: Table WORK._72 created, with 1 rows and 1 columns. 173 data _109; 174 retain obsnum 0; 175 set templib.ae; 176 obsnum = obsnum + 1; 177 if AESDTH ne 'Y' and AEOUT = 'FATAL' then do; 178 output; 179 end; 180 run; NOTE: Variable AEOUT is uninitialized. NOTE: There were 11 observations read from the data set TEMPLIB.AE. NOTE: The data set WORK._109 has 0 observations and 21 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 181 proc sort data=cdisc nodupkey; 182 by libname datname datlab variable length label type case comment; 183 run; NOTE: There were 6 observations read from the data set WORK.CDISC. NOTE: 0 observations with duplicate key values were deleted. NOTE: The data set WORK.CDISC has 6 observations and 11 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.04 seconds cpu time 0.04 seconds 184 proc sort data = work.cdisc; 185 by libname datname datlab variable case; 186 run; NOTE: There were 6 observations read from the data set WORK.CDISC. NOTE: The data set WORK.CDISC has 6 observations and 11 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 187 188 proc format; 189 *** Generate the comments for the CDISC evaluation case number ***; 190 value $casefmt 191 '1' = '1' 192 '2' = '2' 193 '3' = '3' 194 '4' = '4' 8 The SAS System 09:45 Wednesday, October 21, 2009 195 '5' = '5' 196 '6' = '6' 197 '7' = '7' 198 '8' = '8' 199 '9' = '9' 200 '10' = '10' 201 '11' = '11' 202 '12' = '12' 203 '13' = '13' 204 '14' = '14' 205 '15' = '15' 206 '16' = '16' 207 '17' = '17' 208 '18' = '18' 209 '19' = '19' 210 '20' = '20' 211 '21' = '21' 212 '22' = '22' 213 '23' = '23' 214 '24' = '24' 215 '25' = '25' 216 '26' = '26' 217 '27' = '27' 218 '28' = '28' 219 '29' = '29' 220 '30' = '30' 221 '31' = '31' 222 '32' = '32' 223 '33' = '33' 224 '34' = '34' 225 '35' = '35' 226 '36' = '36' 227 '37' = '37' 228 '38' = '38' 229 '39' = '39' 230 '40' = '40' 231 '41' = '41' 232 '42' = '42' 233 '43' = '43' 234 '44' = '44' 235 '45' = '45' 236 '46' = '46' 237 '47' = '47' 238 '48' = '48' 239 '49' = '49' 240 '50' = '50' 241 '51' = '51' 242 '52' = '52' 243 '53' = '53' 244 '54' = '54' 245 '55' = '55' 246 '56' = '56' 247 '57' = '57' 9 The SAS System 09:45 Wednesday, October 21, 2009 248 '58' = '58' 249 '59' = '59' 250 '60' = '60' 251 '61' = '61' 252 '62' = '62' 253 '63' = '63' 254 '64' = '64' 255 '65' = '65' 256 '66' = '66' 257 '67' = '67' 258 '68' = '68' 259 '69' = '69' 260 '70' = '70' 261 '71' = '71' 262 '72' = '72' 263 '73' = '73' 264 '74' = '74' 265 '75' = '75' 266 '76' = '76' 267 '77' = '77' 268 '78' = '78' 269 '79' = '79' 270 '80' = '80' 271 '81' = '81' 272 '82' = '82' 273 '83' = '83' 274 '84' = '84' 275 '85' = '85' 276 '86' = '86' 277 '87' = '87' 278 '88' = '88' 279 '89' = '89' 280 '90' = '90' 281 '91' = '91' 282 '92' = '92' 283 '93' = '93' 284 '94' = '94' 285 '95' = '95' 286 '96' = '96' 287 '97' = '97' 288 '98' = '98' 289 '99' = '99' 290 '100' = '100' 291 '101' = '101' 292 '102' = '102' 293 '103' = '103' 294 '104' = '104' 295 '105' = '105' 296 '106' = '106' 297 '107' = '107' 298 '108' = '108' 299 '109' = '109' 300 '110' = '110' 10 The SAS System 09:45 Wednesday, October 21, 2009 301 '111' = '111' 302 '112' = '112' 303 '113' = '113'; NOTE: Format $CASEFMT has been output. 304 305 306 307 *** Generate the format for the bookmark of variables ***; 308 value $bookfmt 309 "ae.studyid" = 'ae.studyid' 310 "ae.domain" = 'ae.domain' 311 "ae.usubjid" = 'ae.usubjid' 312 "ae.aeseq" = 'ae.aeseq' 313 "ae.aegrpid" = 'ae.aegrpid' 314 "ae.aerefid" = 'ae.aerefid' 315 "ae.aespid" = 'ae.aespid' 316 "ae.aeterm" = 'ae.aeterm' 317 "ae.aemodify" = 'ae.aemodify' 318 "ae.aedecod" = 'ae.aedecod' 319 "ae.aeser" = 'ae.aeser' 320 "ae.aescan" = 'ae.aescan' 321 "ae.aescong" = 'ae.aescong' 322 "ae.aesdisab" = 'ae.aesdisab' 323 "ae.aesdth" = 'ae.aesdth' 324 "ae.aeshosp" = 'ae.aeshosp' 325 "ae.aeslife" = 'ae.aeslife' 326 "ae.aesod" = 'ae.aesod' 327 "ae.aesmie" = 'ae.aesmie' 328 ; NOTE: Format $BOOKFMT has been output. 329 330 *** Generate the format for dataset linking ***; 331 value $datfmt 332 "ae" = 'ae
' 333 "ae3a" = 'ae3a
' 334 "cdisc10" = 'cdisc10
' 335 "cdisc11" = 'cdisc11
' 336 "cdisc14" = 'cdisc14
' 337 "cdisc15" = 'cdisc15
' 338 "cdisc18" = 'cdisc18
' 339 "cdisc2" = 'cdisc2
' 340 "cdisc21" = 'cdisc21
' 341 "cdisc2b_1" = 'cdisc2b_1
' 342 "cdisc2b_2" = 'cdisc2b_2
' 343 "cdisc2b_3" = 'cdisc2b_3
' 344 "cdisc2_b" = 'cdisc2_b
' 345 "cdisc2_c" = 'cdisc2_c
' 346 "cdisc4" = 'cdisc4
' 347 "cdisc5" = 'cdisc5
' 348 "cdisc6" = 'cdisc6
' 349 "cdisc7" = 'cdisc7
' 350 "cdisc8" = 'cdisc8
' 351 "cdisc9" = 'cdisc9
' 11 The SAS System 09:45 Wednesday, October 21, 2009 352 "ce" = 'ce
' 353 "cm" = 'cm
' 354 "co" = 'co
' 355 "da" = 'da
' 356 "dm" = 'dm
' 357 "ds" = 'ds
' 358 "dv" = 'dv
' 359 "eg" = 'eg
' 360 "ex" = 'ex
' 361 "fa" = 'fa
' 362 "ie" = 'ie
' 363 "lb" = 'lb
' 364 "mb" = 'mb
' 365 "mh" = 'mh
' 366 "ms" = 'ms
' 367 "notdm" = 'notdm
' 368 "pc" = 'pc
' 369 "pe" = 'pe
' 370 "pp" = 'pp
' 371 "qs" = 'qs
' 372 "relrec" = 'relrec
' 373 "sc" = 'sc
' 374 "se" = 'se
' 375 "su" = 'su
' 376 "supmh" = 'supmh
' 377 "suppae" = 'suppae
' 378 "suppp" = 'suppp
' 379 "supte" = 'supte
' 380 "supvs" = 'supvs
' 381 "sv" = 'sv
' 382 "ta" = 'ta
' 383 "te" = 'te
' 384 "ti" = 'ti
' 385 "ts" = 'ts
' 386 "tv" = 'tv
' 387 "vs" = 'vs
' 388 ; NOTE: Format $DATFMT has been output. 389 run; NOTE: PROCEDURE FORMAT used (Total process time): real time 0.07 seconds cpu time 0.03 seconds 390 391 data work.cdisc; 392 set work.cdisc; 393 by libname datname datlab variable case; 394 395 attrib datvar label="Dataset and Variable" length=$100 format=$bookfmt.; 396 if variable ne '' then 397 datvar = compress(lowcase(datname) || "." || lowcase(variable)); 12 The SAS System 09:45 Wednesday, October 21, 2009 398 else datvar = lowcase(datname); 399 /*format case casefmt.;*/ 400 attrib charcase label = "Case Number" length = $10; 401 charcase = trim(left(put(case, best.))); 402 format charcase $casefmt.; 403 *format datname $datfmt.; 404 run; NOTE: There were 6 observations read from the data set WORK.CDISC. NOTE: The data set WORK.CDISC has 6 observations and 13 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 405 406 *** Remove The Special Characters ******; 407 proc template; 408 define style styles.test/store=work.test; 409 parent=styles.default; 410 style byline from titlesandfooters / 411 protectspecialchars=off; 412 end; NOTE: STYLE 'Styles.Test' has been saved to: WORK.TEST 413 run; NOTE: PROCEDURE TEMPLATE used (Total process time): real time 0.37 seconds cpu time 0.18 seconds 414 415 proc sort data = work.cdisc; 416 by libname datname datlab variable case; 417 run; NOTE: There were 6 observations read from the data set WORK.CDISC. NOTE: The data set WORK.CDISC has 6 observations and 13 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.04 seconds cpu time 0.04 seconds 418 419 ods listing close; 420 ods html file='cdisc72.html' style=styles.mxistyle; NOTE: Writing HTML Body file: cdisc72.html 421 data work.ae (drop=usrname datetime); 422 set work.cdisc; 423 where lowcase(datname)=lowcase("ae"); 424 run; NOTE: There were 6 observations read from the data set WORK.CDISC. WHERE LOWCASE(datname)='ae'; 13 The SAS System 09:45 Wednesday, October 21, 2009 NOTE: The data set WORK.AE has 6 observations and 11 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 425 data ae(drop=xxx); 426 set ae; 427 retain xxx 0; 428 if xxx = 2 then xxx = 1; 429 else xxx = xxx + 1; 430 yyy = compress(put(xxx,best.)); 431 run; NOTE: There were 6 observations read from the data set WORK.AE. NOTE: The data set WORK.AE has 6 observations and 12 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 432 433 %let newlab = %nrbquote(Adverse Events); 434 title1 height=2 ' Findings from CDISC Evaluation'; 435 title2 height=2 "Data Table Name = ae Data Table Label=&newlab"; 436 footnote1 height=2 "Generated on: 10/21/2009, 9:45:15 am, Administrator"; 437 footnote2 height=2 "Located at: C:\apache\htdocs\cdiscbuilder\data"; 438 proc report data = work.ae nowindows; 439 column obs libname datvar label type length charcase comment yyy; 440 define obs/computed 'Obs'; 441 define libname/width=20; 442 define datvar/width=50; 443 define label/width=50; 444 define type/width=20; 445 define length/width=50; 446 define comment/width=50; 447 define charcase/width=50; 448 define yyy/ noprint; 449 450 compute yyy; 451 if yyy = "2" then do; 452 call define (_row_,'style','STYLE=[BACKGROUND=cxFFFFCC]'); 453 end; 454 endcompute; 455 456 compute charcase; 457 if charcase='1' then call define 457 ! ('charcase','style','STYLE=[BACKGROUND=CXccffcc JUST=CENTER]'); 458 if charcase='2' then call define 458 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0030 JUST=CENTER]'); 459 if charcase='3' then call define 459 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0094 JUST=CENTER]'); 460 if charcase='4' then call define 14 The SAS System 09:45 Wednesday, October 21, 2009 460 ! ('charcase','style','STYLE=[BACKGROUND=CXcd00f8 JUST=CENTER]'); 461 if charcase='5' then call define 461 ! ('charcase','style','STYLE=[BACKGROUND=CXcd015c JUST=CENTER]'); 462 if charcase='6' then call define 462 ! ('charcase','style','STYLE=[BACKGROUND=CXcd01c0 JUST=CENTER]'); 463 if charcase='7' then call define 463 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0224 JUST=CENTER]'); 464 if charcase='8' then call define 464 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0288 JUST=CENTER]'); 465 if charcase='9' then call define 465 ! ('charcase','style','STYLE=[BACKGROUND=CXcd02ec JUST=CENTER]'); 466 if charcase='10' then call define 466 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0350 JUST=CENTER]'); 467 if charcase='11' then call define 467 ! ('charcase','style','STYLE=[BACKGROUND=CXcd03b4 JUST=CENTER]'); 468 if charcase='12' then call define 468 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0418 JUST=CENTER]'); 469 if charcase='13' then call define 469 ! ('charcase','style','STYLE=[BACKGROUND=CXcd047c JUST=CENTER]'); 470 if charcase='14' then call define 470 ! ('charcase','style','STYLE=[BACKGROUND=CXcd04e0 JUST=CENTER]'); 471 if charcase='15' then call define 471 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0544 JUST=CENTER]'); 472 if charcase='16' then call define 472 ! ('charcase','style','STYLE=[BACKGROUND=CXcd05a8 JUST=CENTER]'); 473 if charcase='17' then call define 473 ! ('charcase','style','STYLE=[BACKGROUND=CXcd060c JUST=CENTER]'); 474 if charcase='18' then call define 474 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0670 JUST=CENTER]'); 475 if charcase='19' then call define 475 ! ('charcase','style','STYLE=[BACKGROUND=CXcd06d4 JUST=CENTER]'); 476 if charcase='20' then call define 476 ! ('charcase','style','STYLE=[BACKGROUND=CXffffcc JUST=CENTER]'); 477 if charcase='21' then call define 477 ! ('charcase','style','STYLE=[BACKGROUND=CX398C54 JUST=CENTER]'); 478 if charcase='22' then call define 478 ! ('charcase','style','STYLE=[BACKGROUND=CX398d1c JUST=CENTER]'); 479 if charcase='23' then call define 479 ! ('charcase','style','STYLE=[BACKGROUND=CX398d80 JUST=CENTER]'); 480 if charcase='24' then call define 480 ! ('charcase','style','STYLE=[BACKGROUND=CX398de4 JUST=CENTER]'); 481 if charcase='25' then call define 481 ! ('charcase','style','STYLE=[BACKGROUND=CX398e48 JUST=CENTER]'); 482 if charcase='26' then call define 482 ! ('charcase','style','STYLE=[BACKGROUND=CX398eac JUST=CENTER]'); 483 if charcase='27' then call define 483 ! ('charcase','style','STYLE=[BACKGROUND=CX398f10 JUST=CENTER]'); 484 if charcase='28' then call define 484 ! ('charcase','style','STYLE=[BACKGROUND=CX398f74 JUST=CENTER]'); 485 if charcase='29' then call define 485 ! ('charcase','style','STYLE=[BACKGROUND=CX398fd8 JUST=CENTER]'); 486 if charcase='30' then call define 486 ! ('charcase','style','STYLE=[BACKGROUND=CX39903c JUST=CENTER]'); 15 The SAS System 09:45 Wednesday, October 21, 2009 487 if charcase='31' then call define 487 ! ('charcase','style','STYLE=[BACKGROUND=CX3990a0 JUST=CENTER]'); 488 if charcase='32' then call define 488 ! ('charcase','style','STYLE=[BACKGROUND=CX399104 JUST=CENTER]'); 489 if charcase='33' then call define 489 ! ('charcase','style','STYLE=[BACKGROUND=CX399168 JUST=CENTER]'); 490 if charcase='34' then call define 490 ! ('charcase','style','STYLE=[BACKGROUND=CX3991cc JUST=CENTER]'); 491 if charcase='35' then call define 491 ! ('charcase','style','STYLE=[BACKGROUND=CX399230 JUST=CENTER]'); 492 if charcase='36' then call define 492 ! ('charcase','style','STYLE=[BACKGROUND=CX399294 JUST=CENTER]'); 493 if charcase='37' then call define 493 ! ('charcase','style','STYLE=[BACKGROUND=CX3992f8 JUST=CENTER]'); 494 if charcase='38' then call define 494 ! ('charcase','style','STYLE=[BACKGROUND=CX39935c JUST=CENTER]'); 495 if charcase='39' then call define 495 ! ('charcase','style','STYLE=[BACKGROUND=CXffcccc JUST=CENTER]'); 496 if charcase='40' then call define 496 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd30 JUST=CENTER]'); 497 if charcase='41' then call define 497 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd94 JUST=CENTER]'); 498 if charcase='42' then call define 498 ! ('charcase','style','STYLE=[BACKGROUND=CXffcdf8 JUST=CENTER]'); 499 if charcase='43' then call define 499 ! ('charcase','style','STYLE=[BACKGROUND=CXffce5c JUST=CENTER]'); 500 if charcase='44' then call define 500 ! ('charcase','style','STYLE=[BACKGROUND=CXffcec0 JUST=CENTER]'); 501 if charcase='45' then call define 501 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf24 JUST=CENTER]'); 502 if charcase='46' then call define 502 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf88 JUST=CENTER]'); 503 if charcase='47' then call define 503 ! ('charcase','style','STYLE=[BACKGROUND=CXffcfec JUST=CENTER]'); 504 if charcase='48' then call define 504 ! ('charcase','style','STYLE=[BACKGROUND=CXffd050 JUST=CENTER]'); 505 if charcase='49' then call define 505 ! ('charcase','style','STYLE=[BACKGROUND=CXffd0b4 JUST=CENTER]'); 506 if charcase='50' then call define 506 ! ('charcase','style','STYLE=[BACKGROUND=CXffd118 JUST=CENTER]'); 507 if charcase='51' then call define 507 ! ('charcase','style','STYLE=[BACKGROUND=CXffd17c JUST=CENTER]'); 508 if charcase='52' then call define 508 ! ('charcase','style','STYLE=[BACKGROUND=CXffd1e0 JUST=CENTER]'); 509 if charcase='53' then call define 509 ! ('charcase','style','STYLE=[BACKGROUND=CXffd244 JUST=CENTER]'); 510 if charcase='54' then call define 510 ! ('charcase','style','STYLE=[BACKGROUND=CXffd2a8 JUST=CENTER]'); 511 if charcase='55' then call define 511 ! ('charcase','style','STYLE=[BACKGROUND=CXffd30c JUST=CENTER]'); 512 if charcase='56' then call define 512 ! ('charcase','style','STYLE=[BACKGROUND=CXffd370 JUST=CENTER]'); 513 if charcase='57' then call define 16 The SAS System 09:45 Wednesday, October 21, 2009 513 ! ('charcase','style','STYLE=[BACKGROUND=CXffd3d4 JUST=CENTER]'); 514 if charcase='58' then call define 514 ! ('charcase','style','STYLE=[BACKGROUND=CXccccff JUST=CENTER]'); 515 if charcase='59' then call define 515 ! ('charcase','style','STYLE=[BACKGROUND=CXcccd63 JUST=CENTER]'); 516 if charcase='60' then call define 516 ! ('charcase','style','STYLE=[BACKGROUND=CXcccdc7 JUST=CENTER]'); 517 if charcase='61' then call define 517 ! ('charcase','style','STYLE=[BACKGROUND=CXccce2b JUST=CENTER]'); 518 if charcase='62' then call define 518 ! ('charcase','style','STYLE=[BACKGROUND=CXccce8f JUST=CENTER]'); 519 if charcase='63' then call define 519 ! ('charcase','style','STYLE=[BACKGROUND=CXcccef3 JUST=CENTER]'); 520 if charcase='64' then call define 520 ! ('charcase','style','STYLE=[BACKGROUND=CXcccf57 JUST=CENTER]'); 521 if charcase='65' then call define 521 ! ('charcase','style','STYLE=[BACKGROUND=CXcccfbb JUST=CENTER]'); 522 if charcase='66' then call define 522 ! ('charcase','style','STYLE=[BACKGROUND=CXccd01f JUST=CENTER]'); 523 if charcase='67' then call define 523 ! ('charcase','style','STYLE=[BACKGROUND=CXccd083 JUST=CENTER]'); 524 if charcase='68' then call define 524 ! ('charcase','style','STYLE=[BACKGROUND=CXccd0e7 JUST=CENTER]'); 525 if charcase='69' then call define 525 ! ('charcase','style','STYLE=[BACKGROUND=CXccd14b JUST=CENTER]'); 526 if charcase='70' then call define 526 ! ('charcase','style','STYLE=[BACKGROUND=CXccd1af JUST=CENTER]'); 527 if charcase='71' then call define 527 ! ('charcase','style','STYLE=[BACKGROUND=CXccd213 JUST=CENTER]'); 528 if charcase='72' then call define 528 ! ('charcase','style','STYLE=[BACKGROUND=CXccd277 JUST=CENTER]'); 529 if charcase='73' then call define 529 ! ('charcase','style','STYLE=[BACKGROUND=CXccd2db JUST=CENTER]'); 530 if charcase='74' then call define 530 ! ('charcase','style','STYLE=[BACKGROUND=CXccd33f JUST=CENTER]'); 531 if charcase='75' then call define 531 ! ('charcase','style','STYLE=[BACKGROUND=CXccd3a3 JUST=CENTER]'); 532 if charcase='76' then call define 532 ! ('charcase','style','STYLE=[BACKGROUND=CXccd407 JUST=CENTER]'); 533 if charcase='77' then call define 533 ! ('charcase','style','STYLE=[BACKGROUND=CX99ccff JUST=CENTER]'); 534 if charcase='78' then call define 534 ! ('charcase','style','STYLE=[BACKGROUND=CX99cd63 JUST=CENTER]'); 535 if charcase='79' then call define 535 ! ('charcase','style','STYLE=[BACKGROUND=CX99cdc7 JUST=CENTER]'); 536 if charcase='80' then call define 536 ! ('charcase','style','STYLE=[BACKGROUND=CX99ce2b JUST=CENTER]'); 537 if charcase='81' then call define 537 ! ('charcase','style','STYLE=[BACKGROUND=CX99ce8f JUST=CENTER]'); 538 if charcase='82' then call define 538 ! ('charcase','style','STYLE=[BACKGROUND=CX99cef3 JUST=CENTER]'); 539 if charcase='83' then call define 539 ! ('charcase','style','STYLE=[BACKGROUND=CX99cf57 JUST=CENTER]'); 17 The SAS System 09:45 Wednesday, October 21, 2009 540 if charcase='84' then call define 540 ! ('charcase','style','STYLE=[BACKGROUND=CX99cfbb JUST=CENTER]'); 541 if charcase='85' then call define 541 ! ('charcase','style','STYLE=[BACKGROUND=CX99d01f JUST=CENTER]'); 542 if charcase='86' then call define 542 ! ('charcase','style','STYLE=[BACKGROUND=CX99d083 JUST=CENTER]'); 543 if charcase='87' then call define 543 ! ('charcase','style','STYLE=[BACKGROUND=CX99d0e7 JUST=CENTER]'); 544 if charcase='88' then call define 544 ! ('charcase','style','STYLE=[BACKGROUND=CX99d14b JUST=CENTER]'); 545 if charcase='89' then call define 545 ! ('charcase','style','STYLE=[BACKGROUND=CX99d1af JUST=CENTER]'); 546 if charcase='90' then call define 546 ! ('charcase','style','STYLE=[BACKGROUND=CX99d213 JUST=CENTER]'); 547 if charcase='91' then call define 547 ! ('charcase','style','STYLE=[BACKGROUND=CX99d277 JUST=CENTER]'); 548 if charcase='92' then call define 548 ! ('charcase','style','STYLE=[BACKGROUND=CX99d2db JUST=CENTER]'); 549 if charcase='93' then call define 549 ! ('charcase','style','STYLE=[BACKGROUND=CX99d33f JUST=CENTER]'); 550 if charcase='94' then call define 550 ! ('charcase','style','STYLE=[BACKGROUND=CX99d3a3 JUST=CENTER]'); 551 if charcase='95' then call define 551 ! ('charcase','style','STYLE=[BACKGROUND=CX99d407 JUST=CENTER]'); 552 if charcase='96' then call define 552 ! ('charcase','style','STYLE=[BACKGROUND=CXffcc99 JUST=CENTER]'); 553 if charcase='97' then call define 553 ! ('charcase','style','STYLE=[BACKGROUND=CXffccfd JUST=CENTER]'); 554 if charcase='98' then call define 554 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd61 JUST=CENTER]'); 555 if charcase='99' then call define 555 ! ('charcase','style','STYLE=[BACKGROUND=CXffcdc5 JUST=CENTER]'); 556 if charcase='100' then call define 556 ! ('charcase','style','STYLE=[BACKGROUND=CXffce29 JUST=CENTER]'); 557 if charcase='101' then call define 557 ! ('charcase','style','STYLE=[BACKGROUND=CXffce8d JUST=CENTER]'); 558 if charcase='102' then call define 558 ! ('charcase','style','STYLE=[BACKGROUND=CXffcef1 JUST=CENTER]'); 559 if charcase='103' then call define 559 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf55 JUST=CENTER]'); 560 if charcase='104' then call define 560 ! ('charcase','style','STYLE=[BACKGROUND=CXffcfb9 JUST=CENTER]'); 561 if charcase='105' then call define 561 ! ('charcase','style','STYLE=[BACKGROUND=CXffd01d JUST=CENTER]'); 562 if charcase='106' then call define 562 ! ('charcase','style','STYLE=[BACKGROUND=CXffd081 JUST=CENTER]'); 563 if charcase='107' then call define 563 ! ('charcase','style','STYLE=[BACKGROUND=CXffd0e5 JUST=CENTER]'); 564 if charcase='108' then call define 564 ! ('charcase','style','STYLE=[BACKGROUND=CXffd149 JUST=CENTER]'); 565 if charcase='109' then call define 565 ! ('charcase','style','STYLE=[BACKGROUND=CXffd1ad JUST=CENTER]'); 566 if charcase='110' then call define 18 The SAS System 09:45 Wednesday, October 21, 2009 566 ! ('charcase','style','STYLE=[BACKGROUND=CXffd211 JUST=CENTER]'); 567 if charcase='111' then call define 567 ! ('charcase','style','STYLE=[BACKGROUND=CXffd275 JUST=CENTER]'); 568 if charcase='112' then call define 568 ! ('charcase','style','STYLE=[BACKGROUND=CXffd2d9 JUST=CENTER]'); 569 if charcase='113' then call define 569 ! ('charcase','style','STYLE=[BACKGROUND=CXffd33d JUST=CENTER]'); 570 endcomp; 571 572 compute obs; 573 dobs + 1; 574 obs = dobs; 575 endcompute; 576 run; NOTE: There were 6 observations read from the data set WORK.AE. NOTE: PROCEDURE REPORT used (Total process time): real time 0.40 seconds cpu time 0.14 seconds 577 run; 578 ods html close; 579 ods listing; NOTE: PROCEDURE DISPLAY used (Total process time): real time 4.60 seconds cpu time 3.71 seconds NOTE: SAS Institute Inc., SAS Campus Drive, Cary, NC USA 27513-2414 NOTE: The SAS System used: real time 5.37 seconds cpu time 4.43 seconds