1 The SAS System 09:50 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.63 seconds cpu time 0.63 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: cdisc99.sas * 3 * Description1: Case #99. Cancer Codelist For AE domains, this identifies records 3 ! where value for [Involves Cancer] * 4 * is not found in Codelist [YESNO], limited to records where [Involves 4 ! Cancer is not null].* 5 * Description2: For AE domains, this identifies records where value for [Other 5 ! Medically Important Serious Event]* 6 * is not found in Codelist [YESNO], limited to records where* 7 * [Other Medically Important Serious Event is not null].* 8 * By: Sy Truong, 10/14/2009 * 9 *-------------------------------------------------------------*/ 10 11 libname datalib '../data'; NOTE: Libref DATALIB was successfully assigned as follows: Engine: V9 Physical Name: C:\apache\htdocs\cdiscbuilder\data 12 options nofmterr; 13 14 data datalib.AE (label="Adverse Events"); 15 attrib STUDYID label="Study Identifier" length=$100; 16 attrib DOMAIN label="Domain Abbreviation" length=$100; 17 attrib USUBJID label="Unique Subject Identifier" length=$100; 18 attrib AESEQ label="Sequence Number" length=8; 19 attrib AEGRPID label="Group ID" length=$100; 20 attrib AEREFID label="Reference ID " length=$100; 21 attrib AESPID label="Sponsor-Defined Identifier" length=$100; 22 attrib AETERM label="Reported Term for the Adverse Event" length=$100; 23 attrib AEMODIFY label="Modified Reported Term" length=$100; 24 attrib AEDECOD label="Dictionary-Derived Term" length=$100; 25 attrib AECAT label="Category for Adverse Event" length=$100; 2 The SAS System 09:50 Wednesday, October 21, 2009 26 attrib AESCAT label="Subcategory for Adverse Event" length=$100; 27 attrib AEOCCUR label="Adverse Event Occurrence" length=$100; 28 attrib AEBODSYS label="Body System or Organ Class" length=$100; 29 attrib AELOC label="Location of the Reaction" length=$100; 30 attrib AESEV label="Severity/Intensity" length=$100; 31 attrib AESER label="Serious Event" length=$100 format=$NY.; ____ ____ ____ 484 484 484 NOTE 484-185: Format $NY was not found or could not be loaded. 32 attrib AEACN label="Action Taken with Study Treatment" length=$100; 33 attrib AEACNOTH label="Other Action Taken" length=$100; 34 attrib AEREL label="Causality" length=$100; 35 attrib AERELNST label="Relationship to Non-Study Treatment" length=$100; 36 attrib AEPATT label="Pattern of Adverse Event" length=$100; 37 attrib AEOUT label="Outcome of Adverse Event" length=$100; 38 attrib AESCAN label="Involves Cancer" length=$100 format=$NY.; ____ ____ ____ 484 484 484 NOTE 484-185: Format $NY was not found or could not be loaded. 39 attrib AESCONG label="Congenital Anomaly or Birth Defect" length=$100; 40 attrib AESDISAB label="Persist or Signif Disability/Incapacity" length=$100 ; 41 attrib AESDTH label="Results in Death" length=$100 ; 42 attrib AESHOSP label="Requires or Prolongs Hospitalization" length=$100 ; 43 attrib AESLIFE label="Is Life Threatening" length=$100 ; 44 attrib AESOD label="Occurred with Overdose" length=$100; 45 attrib AESMIE label="Other Medically Important Serious Event" length=$100; 46 attrib AECONTRT label="Concomitant or Additional Trtmnt Given" length=$100 ; 47 attrib AETOXGR label="Standard Toxicity Grade" length=$100; 48 attrib AESTDTC label="Start Date/Time of Adverse Event" length=$100; 49 attrib AEENDTC label="End Date/Time of Adverse Event" length=$100; 50 attrib AESTDY label="Study Day of Start of Adverse Event" length=8; 51 attrib AEENDY label="Study Day of End of Adverse Event" length=8; 52 attrib AEDUR label="Duration of Adverse Event" length=$100; 53 attrib AEENRF label="End Relative to Reference Period" length=$100; 54 55 STUDYID ="001"; 56 DOMAIN ="001"; 57 USUBJID ="001"; 58 AESEQ =1; 59 AEGRPID ="001"; 60 AEREFID ="001"; 61 AESPID ="001"; 62 AETERM ="001"; 63 AEMODIFY="001"; 64 AEDECOD ="001"; 65 AECAT ="001"; 66 AESCAT ="001"; 67 AEOCCUR ="001"; 68 AEBODSYS="001"; 69 AELOC ="001"; 70 AESEV ="001"; 71 AESER ="Y"; 72 AEACN ="001"; 3 The SAS System 09:50 Wednesday, October 21, 2009 73 AEACNOTH="001"; 74 AEREL ="001"; 75 AERELNST="001"; 76 AEPATT ="001"; 77 AEOUT ="001"; 78 AESCAN ="001"; 79 AESCONG ="001"; 80 AESDISAB="YN"; 81 AESDTH ="001"; 82 AESHOSP ="001"; 83 AESLIFE ="001"; 84 AESOD ="001"; 85 AESMIE ="001"; 86 AECONTRT="001"; 87 AETOXGR ="001"; 88 AESTDTC ="001"; 89 AEENDTC ="001"; 90 AESTDY ="001"; 91 AEENDY =8; 92 AEDUR ="001"; 93 AEENRF ="001"; 94 95 run; NOTE: Character values have been converted to numeric values at the places given by: (Line):(Column). 90:12 NOTE: The data set DATALIB.AE has 1 observations and 39 variables. NOTE: DATA statement used (Total process time): real time 0.04 seconds cpu time 0.04 seconds 96 /*----------------------------------------------------* 97 * Program: cdisc.sas 98 * Path: C:\Program Files\SAS 9.2\SASFoundation\9.2 99 * Description: Verify SAS datasets against CDISC standards 100 * By: Jeanny Huynhh, %cdisc, 10/05/2009, 2:55:15 pm 101 *-----------------------------------------------------*/ 102 *** Apply the CDISC check ***; 103 %cdisc (datlib=datalib, 104 datname= AE); 105 data misobs(keep=obsnum); 106 retain obsnum 0; 107 set datalib.ae(keep=STUDYID); 108 obsnum=obsnum+1; 109 if missing(STUDYID) then 110 output; 111 run; NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK.MISOBS has 0 observations and 1 variables. 4 The SAS System 09:50 Wednesday, October 21, 2009 NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 112 data misobs(keep=obsnum); 113 retain obsnum 0; 114 set datalib.ae(keep=DOMAIN); 115 obsnum=obsnum+1; 116 if missing(DOMAIN) then 117 output; 118 run; NOTE: There were 1 observations read from the data set DATALIB.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 119 data misobs(keep=obsnum); 120 retain obsnum 0; 121 set datalib.ae(keep=USUBJID); 122 obsnum=obsnum+1; 123 if missing(USUBJID) then 124 output; 125 run; NOTE: There were 1 observations read from the data set DATALIB.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 126 data misobs(keep=obsnum); 127 retain obsnum 0; 128 set datalib.ae(keep=AESEQ); 129 obsnum=obsnum+1; 130 if missing(AESEQ) then 131 output; 132 run; NOTE: There were 1 observations read from the data set DATALIB.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 133 data misobs(keep=obsnum); 134 retain obsnum 0; 135 set datalib.ae(keep=AETERM); 5 The SAS System 09:50 Wednesday, October 21, 2009 136 obsnum=obsnum+1; 137 if missing(AETERM) then 138 output; 139 run; NOTE: There were 1 observations read from the data set DATALIB.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 140 data misobs(keep=obsnum); 141 retain obsnum 0; 142 set datalib.ae(keep=AEDECOD); 143 obsnum=obsnum+1; 144 if missing(AEDECOD) then 145 output; 146 run; NOTE: There were 1 observations read from the data set DATALIB.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 147 data _23; 148 retain obsnum 0; 149 set datalib.ae(keep=AETERM AEDECOD); 150 obsnum = obsnum + 1; 151 if AETERM ne '' and AEDECOD= '' then output; 152 run; NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK._23 has 0 observations and 3 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 153 data noser; 154 retain obsnum 0; 155 set datalib.ae(keep=AESER AESCAN AESCONG AESDISAB AESDTH AESHOSP AESLIFE AESOD AESMIE) 155 ! ; 156 obsnum = obsnum + 1; 157 if AESER = 'Y' and AESCAN = 'N' and AESCONG = 'N' and AESDISAB = 'N' and AESDTH = 'N' 157 ! and AESHOSP = 'N' and AESLIFE = 'N' and AESOD = 'N' and AESMIE = 'N' then output; 158 run; NOTE: Format $NY was not found or could not be loaded. NOTE: Format $NY was not found or could not be loaded. NOTE: There were 1 observations read from the data set DATALIB.AE. 6 The SAS System 09:50 Wednesday, October 21, 2009 NOTE: The data set WORK.NOSER has 0 observations and 10 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 159 data _29; 160 retain obsnum 0; 161 set datalib.ae(keep=AESTDY AEENDY); 162 obsnum = obsnum + 1; 163 if AESTDY ne . and AEENDY ne . and AESTDY gt AEENDY then output; 164 run; NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK._29 has 0 observations and 3 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 165 data _30; 166 retain obsnum 0; 167 set datalib.ae(keep=AESTDTC AEENDTC); 168 obsnum = obsnum + 1; 169 run; NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK._30 has 1 observations and 3 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 170 data _30; 171 set _30; 172 if AESTDTC ne "" and AEENDTC ne "" and input(AESTDTC,is8601da.) gt 172 ! input(AEENDTC,is8601da.) then output; 173 run; NOTE: There were 0 observations read from the data set WORK._30. NOTE: The data set WORK._30 has 0 observations and 3 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 174 data _33; 175 retain obsnum 0; 176 set datalib.ae(keep=AEENRF); 177 obsnum = obsnum + 1; 178 if AEENRF ne '' and upcase(AEENRF) not in 178 ! ('','BEFORE','DURING','AFTER','DURING/AFTER','U') then output; 179 run; 7 The SAS System 09:50 Wednesday, October 21, 2009 NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK._33 has 1 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 180 data _35; 181 retain obsnum 0; 182 set datalib.ae(keep=AEOCCUR); 183 obsnum = obsnum + 1; 184 if AEOCCUR ne '' and upcase(AEOCCUR) not in ('','Y','N') then output; 185 run; NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK._35 has 1 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 186 data _39; 187 retain obsnum 0; 188 set datalib.ae(keep=AEDUR); 189 obsnum = obsnum + 1; 190 if compress(AEDUR) ne '' then if substr(AEDUR,1,1)='-' then output; 191 run; NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK._39 has 0 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 192 data _46; 193 retain obsnum 0; 194 set datalib.ae(keep=AEENDTC AEENRF ); 195 obsnum = obsnum + 1; 196 if AEENDTC = '' and AEENRF = '' then output; 197 run; NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK._46 has 0 observations and 3 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 198 proc sort data=datalib.ae out=ae nodupkey; 199 by usubjid; 200 run; 8 The SAS System 09:50 Wednesday, October 21, 2009 NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: 0 observations with duplicate key values were deleted. NOTE: The data set WORK.AE has 1 observations and 39 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.04 seconds cpu time 0.04 seconds NOTE: Table WORK._72 created, with 0 rows and 1 columns. 201 data _91; 202 retain obsnum 0; 203 set datalib.ae; 204 obsnum = obsnum + 1; 205 if AESER not in ("Y", "N", "U", "NA") then do; 206 output; 207 end; 208 run; NOTE: Format $NY was not found or could not be loaded. NOTE: Format $NY was not found or could not be loaded. NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK._91 has 0 observations and 40 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 209 data _99; 210 retain obsnum 0; 211 set datalib.ae; 212 obsnum = obsnum + 1; 213 if AESCAN ne "" and AESCAN not in ("Y", "N", "U", "NA") then do; 214 output; 215 end; 216 run; NOTE: Format $NY was not found or could not be loaded. NOTE: Format $NY was not found or could not be loaded. NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK._99 has 1 observations and 40 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 217 data _109; 218 retain obsnum 0; 219 set datalib.ae; 220 obsnum = obsnum + 1; 221 if AESDTH ne 'Y' and AEOUT = 'FATAL' then do; 222 output; 9 The SAS System 09:50 Wednesday, October 21, 2009 223 end; 224 run; NOTE: Format $NY was not found or could not be loaded. NOTE: Format $NY was not found or could not be loaded. NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK._109 has 0 observations and 40 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 225 data _110; 226 retain obsnum 0; 227 set datalib.ae; 228 obsnum = obsnum + 1; 229 if AEOUT ne 'FATAL' and AESDTH = 'Y' then do; 230 output; 231 end; 232 run; NOTE: Format $NY was not found or could not be loaded. NOTE: Format $NY was not found or could not be loaded. NOTE: There were 1 observations read from the data set DATALIB.AE. NOTE: The data set WORK._110 has 0 observations and 40 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 233 proc sort data=cdisc nodupkey; 234 by libname datname datlab variable length label type case comment; 235 run; NOTE: There were 4 observations read from the data set WORK.CDISC. NOTE: 0 observations with duplicate key values were deleted. NOTE: The data set WORK.CDISC has 4 observations and 11 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 236 proc sort data = work.cdisc; 237 by libname datname datlab variable case; 238 run; NOTE: There were 4 observations read from the data set WORK.CDISC. NOTE: The data set WORK.CDISC has 4 observations and 11 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 10 The SAS System 09:50 Wednesday, October 21, 2009 239 240 proc format; 241 *** Generate the comments for the CDISC evaluation case number ***; 242 value $casefmt 243 '1' = '1' 244 '2' = '2' 245 '3' = '3' 246 '4' = '4' 247 '5' = '5' 248 '6' = '6' 249 '7' = '7' 250 '8' = '8' 251 '9' = '9' 252 '10' = '10' 253 '11' = '11' 254 '12' = '12' 255 '13' = '13' 256 '14' = '14' 257 '15' = '15' 258 '16' = '16' 259 '17' = '17' 260 '18' = '18' 261 '19' = '19' 262 '20' = '20' 263 '21' = '21' 264 '22' = '22' 265 '23' = '23' 266 '24' = '24' 267 '25' = '25' 268 '26' = '26' 269 '27' = '27' 270 '28' = '28' 271 '29' = '29' 272 '30' = '30' 273 '31' = '31' 274 '32' = '32' 275 '33' = '33' 276 '34' = '34' 277 '35' = '35' 278 '36' = '36' 279 '37' = '37' 280 '38' = '38' 281 '39' = '39' 282 '40' = '40' 283 '41' = '41' 284 '42' = '42' 285 '43' = '43' 286 '44' = '44' 287 '45' = '45' 288 '46' = '46' 289 '47' = '47' 290 '48' = '48' 291 '49' = '49' 11 The SAS System 09:50 Wednesday, October 21, 2009 292 '50' = '50' 293 '51' = '51' 294 '52' = '52' 295 '53' = '53' 296 '54' = '54' 297 '55' = '55' 298 '56' = '56' 299 '57' = '57' 300 '58' = '58' 301 '59' = '59' 302 '60' = '60' 303 '61' = '61' 304 '62' = '62' 305 '63' = '63' 306 '64' = '64' 307 '65' = '65' 308 '66' = '66' 309 '67' = '67' 310 '68' = '68' 311 '69' = '69' 312 '70' = '70' 313 '71' = '71' 314 '72' = '72' 315 '73' = '73' 316 '74' = '74' 317 '75' = '75' 318 '76' = '76' 319 '77' = '77' 320 '78' = '78' 321 '79' = '79' 322 '80' = '80' 323 '81' = '81' 324 '82' = '82' 325 '83' = '83' 326 '84' = '84' 327 '85' = '85' 328 '86' = '86' 329 '87' = '87' 330 '88' = '88' 331 '89' = '89' 332 '90' = '90' 333 '91' = '91' 334 '92' = '92' 335 '93' = '93' 336 '94' = '94' 337 '95' = '95' 338 '96' = '96' 339 '97' = '97' 340 '98' = '98' 341 '99' = '99' 342 '100' = '100' 343 '101' = '101' 344 '102' = '102' 12 The SAS System 09:50 Wednesday, October 21, 2009 345 '103' = '103' 346 '104' = '104' 347 '105' = '105' 348 '106' = '106' 349 '107' = '107' 350 '108' = '108' 351 '109' = '109' 352 '110' = '110' 353 '111' = '111' 354 '112' = '112' 355 '113' = '113'; NOTE: Format $CASEFMT has been output. 356 357 358 359 *** Generate the format for the bookmark of variables ***; 360 value $bookfmt 361 "ae.studyid" = 'ae.studyid' 362 "ae.domain" = 'ae.domain' 363 "ae.usubjid" = 'ae.usubjid' 364 "ae.aeseq" = 'ae.aeseq' 365 "ae.aegrpid" = 'ae.aegrpid' 366 "ae.aerefid" = 'ae.aerefid' 367 "ae.aespid" = 'ae.aespid' 368 "ae.aeterm" = 'ae.aeterm' 369 "ae.aemodify" = 'ae.aemodify' 370 "ae.aedecod" = 'ae.aedecod' 371 "ae.aecat" = 'ae.aecat' 372 "ae.aescat" = 'ae.aescat' 373 "ae.aeoccur" = 'ae.aeoccur' 374 "ae.aebodsys" = 'ae.aebodsys' 375 "ae.aeloc" = 'ae.aeloc' 376 "ae.aesev" = 'ae.aesev' 377 "ae.aeser" = 'ae.aeser' 378 "ae.aeacn" = 'ae.aeacn' 379 "ae.aeacnoth" = 'ae.aeacnoth' 380 "ae.aerel" = 'ae.aerel' 381 "ae.aerelnst" = 'ae.aerelnst' 382 "ae.aepatt" = 'ae.aepatt' 383 "ae.aeout" = 'ae.aeout' 384 "ae.aescan" = 'ae.aescan' 385 "ae.aescong" = 'ae.aescong' 386 "ae.aesdisab" = 'ae.aesdisab' 387 "ae.aesdth" = 'ae.aesdth' 388 "ae.aeshosp" = 'ae.aeshosp' 389 "ae.aeslife" = 'ae.aeslife' 390 "ae.aesod" = 'ae.aesod' 391 "ae.aesmie" = 'ae.aesmie' 392 "ae.aecontrt" = 'ae.aecontrt' 393 "ae.aetoxgr" = 'ae.aetoxgr' 394 "ae.aestdtc" = 'ae.aestdtc' 395 "ae.aeendtc" = 'ae.aeendtc' 396 "ae.aestdy" = 'ae.aestdy' 13 The SAS System 09:50 Wednesday, October 21, 2009 397 "ae.aeendy" = 'ae.aeendy' 398 "ae.aedur" = 'ae.aedur' 399 "ae.aeenrf" = 'ae.aeenrf' 400 ; NOTE: Format $BOOKFMT has been output. 401 402 *** Generate the format for dataset linking ***; 403 value $datfmt 404 "ae" = 'ae
' 405 "ae3a" = 'ae3a
' 406 "cdisc10" = 'cdisc10
' 407 "cdisc11" = 'cdisc11
' 408 "cdisc14" = 'cdisc14
' 409 "cdisc15" = 'cdisc15
' 410 "cdisc18" = 'cdisc18
' 411 "cdisc2" = 'cdisc2
' 412 "cdisc21" = 'cdisc21
' 413 "cdisc2b_1" = 'cdisc2b_1
' 414 "cdisc2b_2" = 'cdisc2b_2
' 415 "cdisc2b_3" = 'cdisc2b_3
' 416 "cdisc2_b" = 'cdisc2_b
' 417 "cdisc2_c" = 'cdisc2_c
' 418 "cdisc4" = 'cdisc4
' 419 "cdisc5" = 'cdisc5
' 420 "cdisc6" = 'cdisc6
' 421 "cdisc7" = 'cdisc7
' 422 "cdisc8" = 'cdisc8
' 423 "cdisc9" = 'cdisc9
' 424 "ce" = 'ce
' 425 "cm" = 'cm
' 426 "co" = 'co
' 427 "da" = 'da
' 428 "dm" = 'dm
' 429 "ds" = 'ds
' 430 "dv" = 'dv
' 431 "eg" = 'eg
' 432 "ex" = 'ex
' 433 "fa" = 'fa
' 434 "ie" = 'ie
' 435 "lb" = 'lb
' 436 "mb" = 'mb
' 437 "mh" = 'mh
' 438 "ms" = 'ms
' 439 "notdm" = 'notdm
' 440 "pc" = 'pc
' 441 "pe" = 'pe
' 442 "pp" = 'pp
' 443 "qs" = 'qs
' 444 "relrec" = 'relrec
' 445 "sc" = 'sc
' 446 "se" = 'se
' 447 "su" = 'su
' 448 "supmh" = 'supmh
' 14 The SAS System 09:50 Wednesday, October 21, 2009 449 "suppae" = 'suppae
' 450 "suppp" = 'suppp
' 451 "supte" = 'supte
' 452 "supvs" = 'supvs
' 453 "sv" = 'sv
' 454 "ta" = 'ta
' 455 "te" = 'te
' 456 "ti" = 'ti
' 457 "ts" = 'ts
' 458 "tv" = 'tv
' 459 "vs" = 'vs
' 460 ; NOTE: Format $DATFMT has been output. 461 run; NOTE: PROCEDURE FORMAT used (Total process time): real time 0.06 seconds cpu time 0.03 seconds 462 463 data work.cdisc; 464 set work.cdisc; 465 by libname datname datlab variable case; 466 467 attrib datvar label="Dataset and Variable" length=$100 format=$bookfmt.; 468 if variable ne '' then 469 datvar = compress(lowcase(datname) || "." || lowcase(variable)); 470 else datvar = lowcase(datname); 471 /*format case casefmt.;*/ 472 attrib charcase label = "Case Number" length = $10; 473 charcase = trim(left(put(case, best.))); 474 format charcase $casefmt.; 475 *format datname $datfmt.; 476 run; NOTE: There were 4 observations read from the data set WORK.CDISC. NOTE: The data set WORK.CDISC has 4 observations and 13 variables. NOTE: DATA statement used (Total process time): real time 0.04 seconds cpu time 0.04 seconds 477 478 *** Remove The Special Characters ******; 479 proc template; 480 define style styles.test/store=work.test; 481 parent=styles.default; 482 style byline from titlesandfooters / 483 protectspecialchars=off; 484 end; NOTE: STYLE 'Styles.Test' has been saved to: WORK.TEST 485 run; 15 The SAS System 09:50 Wednesday, October 21, 2009 NOTE: PROCEDURE TEMPLATE used (Total process time): real time 0.06 seconds cpu time 0.03 seconds 486 487 proc sort data = work.cdisc; 488 by libname datname datlab variable case; 489 run; NOTE: There were 4 observations read from the data set WORK.CDISC. NOTE: The data set WORK.CDISC has 4 observations and 13 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.04 seconds cpu time 0.01 seconds 490 491 ods listing close; 492 ods html file='cdisc99.html' style=styles.mxistyle; NOTE: Writing HTML Body file: cdisc99.html 493 data work.ae (drop=usrname datetime); 494 set work.cdisc; 495 where lowcase(datname)=lowcase("ae"); 496 run; NOTE: There were 4 observations read from the data set WORK.CDISC. WHERE LOWCASE(datname)='ae'; NOTE: The data set WORK.AE has 4 observations and 11 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 497 data ae(drop=xxx); 498 set ae; 499 retain xxx 0; 500 if xxx = 2 then xxx = 1; 501 else xxx = xxx + 1; 502 yyy = compress(put(xxx,best.)); 503 run; NOTE: There were 4 observations read from the data set WORK.AE. NOTE: The data set WORK.AE has 4 observations and 12 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 504 505 %let newlab = %nrbquote(Adverse Events); 506 title1 height=2 ' Findings from CDISC Evaluation'; 507 title2 height=2 "Data Table Name = ae Data Table Label=&newlab"; 16 The SAS System 09:50 Wednesday, October 21, 2009 508 footnote1 height=2 "Generated on: 10/21/2009, 9:50:30 am, Administrator"; 509 footnote2 height=2 "Located at: C:\apache\htdocs\cdiscbuilder\data"; 510 proc report data = work.ae nowindows; 511 column obs libname datvar label type length charcase comment yyy; 512 define obs/computed 'Obs'; 513 define libname/width=20; 514 define datvar/width=50; 515 define label/width=50; 516 define type/width=20; 517 define length/width=50; 518 define comment/width=50; 519 define charcase/width=50; 520 define yyy/ noprint; 521 522 compute yyy; 523 if yyy = "2" then do; 524 call define (_row_,'style','STYLE=[BACKGROUND=cxFFFFCC]'); 525 end; 526 endcompute; 527 528 compute charcase; 529 if charcase='1' then call define 529 ! ('charcase','style','STYLE=[BACKGROUND=CXccffcc JUST=CENTER]'); 530 if charcase='2' then call define 530 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0030 JUST=CENTER]'); 531 if charcase='3' then call define 531 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0094 JUST=CENTER]'); 532 if charcase='4' then call define 532 ! ('charcase','style','STYLE=[BACKGROUND=CXcd00f8 JUST=CENTER]'); 533 if charcase='5' then call define 533 ! ('charcase','style','STYLE=[BACKGROUND=CXcd015c JUST=CENTER]'); 534 if charcase='6' then call define 534 ! ('charcase','style','STYLE=[BACKGROUND=CXcd01c0 JUST=CENTER]'); 535 if charcase='7' then call define 535 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0224 JUST=CENTER]'); 536 if charcase='8' then call define 536 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0288 JUST=CENTER]'); 537 if charcase='9' then call define 537 ! ('charcase','style','STYLE=[BACKGROUND=CXcd02ec JUST=CENTER]'); 538 if charcase='10' then call define 538 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0350 JUST=CENTER]'); 539 if charcase='11' then call define 539 ! ('charcase','style','STYLE=[BACKGROUND=CXcd03b4 JUST=CENTER]'); 540 if charcase='12' then call define 540 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0418 JUST=CENTER]'); 541 if charcase='13' then call define 541 ! ('charcase','style','STYLE=[BACKGROUND=CXcd047c JUST=CENTER]'); 542 if charcase='14' then call define 542 ! ('charcase','style','STYLE=[BACKGROUND=CXcd04e0 JUST=CENTER]'); 543 if charcase='15' then call define 543 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0544 JUST=CENTER]'); 544 if charcase='16' then call define 544 ! ('charcase','style','STYLE=[BACKGROUND=CXcd05a8 JUST=CENTER]'); 17 The SAS System 09:50 Wednesday, October 21, 2009 545 if charcase='17' then call define 545 ! ('charcase','style','STYLE=[BACKGROUND=CXcd060c JUST=CENTER]'); 546 if charcase='18' then call define 546 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0670 JUST=CENTER]'); 547 if charcase='19' then call define 547 ! ('charcase','style','STYLE=[BACKGROUND=CXcd06d4 JUST=CENTER]'); 548 if charcase='20' then call define 548 ! ('charcase','style','STYLE=[BACKGROUND=CXffffcc JUST=CENTER]'); 549 if charcase='21' then call define 549 ! ('charcase','style','STYLE=[BACKGROUND=CX398C54 JUST=CENTER]'); 550 if charcase='22' then call define 550 ! ('charcase','style','STYLE=[BACKGROUND=CX398d1c JUST=CENTER]'); 551 if charcase='23' then call define 551 ! ('charcase','style','STYLE=[BACKGROUND=CX398d80 JUST=CENTER]'); 552 if charcase='24' then call define 552 ! ('charcase','style','STYLE=[BACKGROUND=CX398de4 JUST=CENTER]'); 553 if charcase='25' then call define 553 ! ('charcase','style','STYLE=[BACKGROUND=CX398e48 JUST=CENTER]'); 554 if charcase='26' then call define 554 ! ('charcase','style','STYLE=[BACKGROUND=CX398eac JUST=CENTER]'); 555 if charcase='27' then call define 555 ! ('charcase','style','STYLE=[BACKGROUND=CX398f10 JUST=CENTER]'); 556 if charcase='28' then call define 556 ! ('charcase','style','STYLE=[BACKGROUND=CX398f74 JUST=CENTER]'); 557 if charcase='29' then call define 557 ! ('charcase','style','STYLE=[BACKGROUND=CX398fd8 JUST=CENTER]'); 558 if charcase='30' then call define 558 ! ('charcase','style','STYLE=[BACKGROUND=CX39903c JUST=CENTER]'); 559 if charcase='31' then call define 559 ! ('charcase','style','STYLE=[BACKGROUND=CX3990a0 JUST=CENTER]'); 560 if charcase='32' then call define 560 ! ('charcase','style','STYLE=[BACKGROUND=CX399104 JUST=CENTER]'); 561 if charcase='33' then call define 561 ! ('charcase','style','STYLE=[BACKGROUND=CX399168 JUST=CENTER]'); 562 if charcase='34' then call define 562 ! ('charcase','style','STYLE=[BACKGROUND=CX3991cc JUST=CENTER]'); 563 if charcase='35' then call define 563 ! ('charcase','style','STYLE=[BACKGROUND=CX399230 JUST=CENTER]'); 564 if charcase='36' then call define 564 ! ('charcase','style','STYLE=[BACKGROUND=CX399294 JUST=CENTER]'); 565 if charcase='37' then call define 565 ! ('charcase','style','STYLE=[BACKGROUND=CX3992f8 JUST=CENTER]'); 566 if charcase='38' then call define 566 ! ('charcase','style','STYLE=[BACKGROUND=CX39935c JUST=CENTER]'); 567 if charcase='39' then call define 567 ! ('charcase','style','STYLE=[BACKGROUND=CXffcccc JUST=CENTER]'); 568 if charcase='40' then call define 568 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd30 JUST=CENTER]'); 569 if charcase='41' then call define 569 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd94 JUST=CENTER]'); 570 if charcase='42' then call define 570 ! ('charcase','style','STYLE=[BACKGROUND=CXffcdf8 JUST=CENTER]'); 571 if charcase='43' then call define 18 The SAS System 09:50 Wednesday, October 21, 2009 571 ! ('charcase','style','STYLE=[BACKGROUND=CXffce5c JUST=CENTER]'); 572 if charcase='44' then call define 572 ! ('charcase','style','STYLE=[BACKGROUND=CXffcec0 JUST=CENTER]'); 573 if charcase='45' then call define 573 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf24 JUST=CENTER]'); 574 if charcase='46' then call define 574 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf88 JUST=CENTER]'); 575 if charcase='47' then call define 575 ! ('charcase','style','STYLE=[BACKGROUND=CXffcfec JUST=CENTER]'); 576 if charcase='48' then call define 576 ! ('charcase','style','STYLE=[BACKGROUND=CXffd050 JUST=CENTER]'); 577 if charcase='49' then call define 577 ! ('charcase','style','STYLE=[BACKGROUND=CXffd0b4 JUST=CENTER]'); 578 if charcase='50' then call define 578 ! ('charcase','style','STYLE=[BACKGROUND=CXffd118 JUST=CENTER]'); 579 if charcase='51' then call define 579 ! ('charcase','style','STYLE=[BACKGROUND=CXffd17c JUST=CENTER]'); 580 if charcase='52' then call define 580 ! ('charcase','style','STYLE=[BACKGROUND=CXffd1e0 JUST=CENTER]'); 581 if charcase='53' then call define 581 ! ('charcase','style','STYLE=[BACKGROUND=CXffd244 JUST=CENTER]'); 582 if charcase='54' then call define 582 ! ('charcase','style','STYLE=[BACKGROUND=CXffd2a8 JUST=CENTER]'); 583 if charcase='55' then call define 583 ! ('charcase','style','STYLE=[BACKGROUND=CXffd30c JUST=CENTER]'); 584 if charcase='56' then call define 584 ! ('charcase','style','STYLE=[BACKGROUND=CXffd370 JUST=CENTER]'); 585 if charcase='57' then call define 585 ! ('charcase','style','STYLE=[BACKGROUND=CXffd3d4 JUST=CENTER]'); 586 if charcase='58' then call define 586 ! ('charcase','style','STYLE=[BACKGROUND=CXccccff JUST=CENTER]'); 587 if charcase='59' then call define 587 ! ('charcase','style','STYLE=[BACKGROUND=CXcccd63 JUST=CENTER]'); 588 if charcase='60' then call define 588 ! ('charcase','style','STYLE=[BACKGROUND=CXcccdc7 JUST=CENTER]'); 589 if charcase='61' then call define 589 ! ('charcase','style','STYLE=[BACKGROUND=CXccce2b JUST=CENTER]'); 590 if charcase='62' then call define 590 ! ('charcase','style','STYLE=[BACKGROUND=CXccce8f JUST=CENTER]'); 591 if charcase='63' then call define 591 ! ('charcase','style','STYLE=[BACKGROUND=CXcccef3 JUST=CENTER]'); 592 if charcase='64' then call define 592 ! ('charcase','style','STYLE=[BACKGROUND=CXcccf57 JUST=CENTER]'); 593 if charcase='65' then call define 593 ! ('charcase','style','STYLE=[BACKGROUND=CXcccfbb JUST=CENTER]'); 594 if charcase='66' then call define 594 ! ('charcase','style','STYLE=[BACKGROUND=CXccd01f JUST=CENTER]'); 595 if charcase='67' then call define 595 ! ('charcase','style','STYLE=[BACKGROUND=CXccd083 JUST=CENTER]'); 596 if charcase='68' then call define 596 ! ('charcase','style','STYLE=[BACKGROUND=CXccd0e7 JUST=CENTER]'); 597 if charcase='69' then call define 597 ! ('charcase','style','STYLE=[BACKGROUND=CXccd14b JUST=CENTER]'); 19 The SAS System 09:50 Wednesday, October 21, 2009 598 if charcase='70' then call define 598 ! ('charcase','style','STYLE=[BACKGROUND=CXccd1af JUST=CENTER]'); 599 if charcase='71' then call define 599 ! ('charcase','style','STYLE=[BACKGROUND=CXccd213 JUST=CENTER]'); 600 if charcase='72' then call define 600 ! ('charcase','style','STYLE=[BACKGROUND=CXccd277 JUST=CENTER]'); 601 if charcase='73' then call define 601 ! ('charcase','style','STYLE=[BACKGROUND=CXccd2db JUST=CENTER]'); 602 if charcase='74' then call define 602 ! ('charcase','style','STYLE=[BACKGROUND=CXccd33f JUST=CENTER]'); 603 if charcase='75' then call define 603 ! ('charcase','style','STYLE=[BACKGROUND=CXccd3a3 JUST=CENTER]'); 604 if charcase='76' then call define 604 ! ('charcase','style','STYLE=[BACKGROUND=CXccd407 JUST=CENTER]'); 605 if charcase='77' then call define 605 ! ('charcase','style','STYLE=[BACKGROUND=CX99ccff JUST=CENTER]'); 606 if charcase='78' then call define 606 ! ('charcase','style','STYLE=[BACKGROUND=CX99cd63 JUST=CENTER]'); 607 if charcase='79' then call define 607 ! ('charcase','style','STYLE=[BACKGROUND=CX99cdc7 JUST=CENTER]'); 608 if charcase='80' then call define 608 ! ('charcase','style','STYLE=[BACKGROUND=CX99ce2b JUST=CENTER]'); 609 if charcase='81' then call define 609 ! ('charcase','style','STYLE=[BACKGROUND=CX99ce8f JUST=CENTER]'); 610 if charcase='82' then call define 610 ! ('charcase','style','STYLE=[BACKGROUND=CX99cef3 JUST=CENTER]'); 611 if charcase='83' then call define 611 ! ('charcase','style','STYLE=[BACKGROUND=CX99cf57 JUST=CENTER]'); 612 if charcase='84' then call define 612 ! ('charcase','style','STYLE=[BACKGROUND=CX99cfbb JUST=CENTER]'); 613 if charcase='85' then call define 613 ! ('charcase','style','STYLE=[BACKGROUND=CX99d01f JUST=CENTER]'); 614 if charcase='86' then call define 614 ! ('charcase','style','STYLE=[BACKGROUND=CX99d083 JUST=CENTER]'); 615 if charcase='87' then call define 615 ! ('charcase','style','STYLE=[BACKGROUND=CX99d0e7 JUST=CENTER]'); 616 if charcase='88' then call define 616 ! ('charcase','style','STYLE=[BACKGROUND=CX99d14b JUST=CENTER]'); 617 if charcase='89' then call define 617 ! ('charcase','style','STYLE=[BACKGROUND=CX99d1af JUST=CENTER]'); 618 if charcase='90' then call define 618 ! ('charcase','style','STYLE=[BACKGROUND=CX99d213 JUST=CENTER]'); 619 if charcase='91' then call define 619 ! ('charcase','style','STYLE=[BACKGROUND=CX99d277 JUST=CENTER]'); 620 if charcase='92' then call define 620 ! ('charcase','style','STYLE=[BACKGROUND=CX99d2db JUST=CENTER]'); 621 if charcase='93' then call define 621 ! ('charcase','style','STYLE=[BACKGROUND=CX99d33f JUST=CENTER]'); 622 if charcase='94' then call define 622 ! ('charcase','style','STYLE=[BACKGROUND=CX99d3a3 JUST=CENTER]'); 623 if charcase='95' then call define 623 ! ('charcase','style','STYLE=[BACKGROUND=CX99d407 JUST=CENTER]'); 624 if charcase='96' then call define 20 The SAS System 09:50 Wednesday, October 21, 2009 624 ! ('charcase','style','STYLE=[BACKGROUND=CXffcc99 JUST=CENTER]'); 625 if charcase='97' then call define 625 ! ('charcase','style','STYLE=[BACKGROUND=CXffccfd JUST=CENTER]'); 626 if charcase='98' then call define 626 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd61 JUST=CENTER]'); 627 if charcase='99' then call define 627 ! ('charcase','style','STYLE=[BACKGROUND=CXffcdc5 JUST=CENTER]'); 628 if charcase='100' then call define 628 ! ('charcase','style','STYLE=[BACKGROUND=CXffce29 JUST=CENTER]'); 629 if charcase='101' then call define 629 ! ('charcase','style','STYLE=[BACKGROUND=CXffce8d JUST=CENTER]'); 630 if charcase='102' then call define 630 ! ('charcase','style','STYLE=[BACKGROUND=CXffcef1 JUST=CENTER]'); 631 if charcase='103' then call define 631 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf55 JUST=CENTER]'); 632 if charcase='104' then call define 632 ! ('charcase','style','STYLE=[BACKGROUND=CXffcfb9 JUST=CENTER]'); 633 if charcase='105' then call define 633 ! ('charcase','style','STYLE=[BACKGROUND=CXffd01d JUST=CENTER]'); 634 if charcase='106' then call define 634 ! ('charcase','style','STYLE=[BACKGROUND=CXffd081 JUST=CENTER]'); 635 if charcase='107' then call define 635 ! ('charcase','style','STYLE=[BACKGROUND=CXffd0e5 JUST=CENTER]'); 636 if charcase='108' then call define 636 ! ('charcase','style','STYLE=[BACKGROUND=CXffd149 JUST=CENTER]'); 637 if charcase='109' then call define 637 ! ('charcase','style','STYLE=[BACKGROUND=CXffd1ad JUST=CENTER]'); 638 if charcase='110' then call define 638 ! ('charcase','style','STYLE=[BACKGROUND=CXffd211 JUST=CENTER]'); 639 if charcase='111' then call define 639 ! ('charcase','style','STYLE=[BACKGROUND=CXffd275 JUST=CENTER]'); 640 if charcase='112' then call define 640 ! ('charcase','style','STYLE=[BACKGROUND=CXffd2d9 JUST=CENTER]'); 641 if charcase='113' then call define 641 ! ('charcase','style','STYLE=[BACKGROUND=CXffd33d JUST=CENTER]'); 642 endcomp; 643 644 compute obs; 645 dobs + 1; 646 obs = dobs; 647 endcompute; 648 run; NOTE: There were 4 observations read from the data set WORK.AE. NOTE: PROCEDURE REPORT used (Total process time): real time 0.12 seconds cpu time 0.03 seconds 649 run; 650 ods html close; 651 ods listing; NOTE: PROCEDURE DISPLAY used (Total process time): 21 The SAS System 09:50 Wednesday, October 21, 2009 real time 4.01 seconds cpu time 3.56 seconds NOTE: SAS Institute Inc., SAS Campus Drive, Cary, NC USA 27513-2414 NOTE: The SAS System used: real time 4.78 seconds cpu time 4.28 seconds