1 The SAS System 09:51 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.62 seconds cpu time 0.90 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: cdisc103.sas * 3 * Description: Case #103. Study Format Codelist For IE domains, this identifies 3 ! records where value* 4 * for [I/E Criterion Result in Std Format] is not found in Codelist 4 ! [YESNO], * 5 * limited to records where [I/E Criterion Result in Std Format is not 5 ! null].* 6 * By: Sy Truong, 10/14/2009 * 7 *-------------------------------------------------------------*/ 8 9 libname templib '../data'; NOTE: Libref TEMPLIB was successfully assigned as follows: Engine: V9 Physical Name: C:\apache\htdocs\cdiscbuilder\data 10 option nofmterr; 11 *** Create some data to be selected ***; 12 data templib.IE(label="Inclusion/Exclusion Criteria Not Met"); 13 attrib STUDYID label="Study IdentifIEr" length=$100; 14 attrib DOMAIN label="Domain Abbreviation" length=$100; 15 attrib USUBJID label="Unique Subject IdentifIEr" length=$100; 16 attrib IESEQ label="Sequence Number" length=8; 17 attrib IEGRPID label="Group ID" length=$100; 18 attrib IESPID label="Sponsor-Defined IdentifIEr" length=$100; 19 attrib IETESTCD label="Question Short Name" length=$100; 20 attrib IETEST label="Question Name" length=$100; 21 attrib IECAT label="Category of Question" length=$100; 22 attrib IESCAT label="Subcategory for Question" length=$100; 23 attrib IEORRES label="I/E Criterion Original Result" length=$100; 24 attrib IESTRESC label="I/E Criterion Result in Std Format" format=$YN. length=$100; ____ ____ ____ 484 484 484 2 The SAS System 09:51 Wednesday, October 21, 2009 NOTE 484-185: Format $YN was not found or could not be loaded. 25 attrib VISITNUM label="Visit Number" length=8; 26 attrib VISIT label="Visit Name" length=$100; 27 attrib VISITDY label="Planned Study Day of Visit" length=8; 28 attrib IEDTC label="Date/Time of Finding" length=$100; 29 attrib IEDY label="Study Day of Finding" length=8; 30 31 STUDYID = 'test';DOMAIN = 'test';USUBJID = '123';IESEQ = 1;IEGRPID = 'test';IESPID = 31 ! 'test';IETESTCD = 'test';IETEST = 'test';IECAT = 'test';IESCAT = 'test'; 32 IESTRESC = ''; 33 output; 34 STUDYID = 'test';DOMAIN = 'test';USUBJID = '123';IESEQ = 1;IEGRPID = 'test';IESPID = 34 ! 'test';IETESTCD = 'test';IETEST = 'test';IECAT = 'test';IESCAT = 'test'; 35 IESTRESC = 'Y'; 36 output; 37 STUDYID = 'test';DOMAIN = 'test';USUBJID = '456';IESEQ = 1;IEGRPID = 'test';IESPID = 37 ! 'test';IETESTCD = 'test';IETEST = 'test';IECAT = 'test';IESCAT = 'test'; 38 IESTRESC = 'TEST'; 39 output; 40 STUDYID = 'test';DOMAIN = 'test';USUBJID = '456';IESEQ = 1;IEGRPID = 'test';IESPID = 40 ! 'test';IETESTCD = 'test';IETEST = 'test';IECAT = 'test';IESCAT = 'test'; 41 IESTRESC = 'U'; 42 output; 43 STUDYID = 'test';DOMAIN = 'test';USUBJID = '789';IESEQ = 1;IEGRPID = 'test';IESPID = 43 ! 'test';IETESTCD = 'test';IETEST = 'test';IECAT = 'test';IESCAT = 'test'; 44 IESTRESC = 'N'; 45 output; 46 STUDYID = 'test';DOMAIN = 'test';USUBJID = '789';IESEQ = 1;IEGRPID = 'test';IESPID = 46 ! 'test';IETESTCD = 'test';IETEST = 'test';IECAT = 'test';IESCAT = 'test'; 47 IESTRESC = 'NA'; 48 output; 49 run; NOTE: Variable IEORRES is uninitialized. NOTE: Variable VISITNUM is uninitialized. NOTE: Variable VISIT is uninitialized. NOTE: Variable VISITDY is uninitialized. NOTE: Variable IEDTC is uninitialized. NOTE: Variable IEDY is uninitialized. NOTE: The data set TEMPLIB.IE has 6 observations and 17 variables. NOTE: DATA statement used (Total process time): real time 0.04 seconds cpu time 0.04 seconds 50 %cdisc(datlib=templib,datname=IE); 51 data misobs(keep=obsnum); 52 retain obsnum 0; 53 set templib.ie(keep=STUDYID); 54 obsnum=obsnum+1; 55 if missing(STUDYID) then 3 The SAS System 09:51 Wednesday, October 21, 2009 56 output; 57 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. 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 58 data misobs(keep=obsnum); 59 retain obsnum 0; 60 set templib.ie(keep=DOMAIN); 61 obsnum=obsnum+1; 62 if missing(DOMAIN) then 63 output; 64 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. 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 65 data misobs(keep=obsnum); 66 retain obsnum 0; 67 set templib.ie(keep=USUBJID); 68 obsnum=obsnum+1; 69 if missing(USUBJID) then 70 output; 71 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. 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 72 data misobs(keep=obsnum); 73 retain obsnum 0; 74 set templib.ie(keep=IESEQ); 75 obsnum=obsnum+1; 76 if missing(IESEQ) then 77 output; 78 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. 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 4 The SAS System 09:51 Wednesday, October 21, 2009 79 data misobs(keep=obsnum); 80 retain obsnum 0; 81 set templib.ie(keep=IETESTCD); 82 obsnum=obsnum+1; 83 if missing(IETESTCD) then 84 output; 85 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. 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 86 data misobs(keep=obsnum); 87 retain obsnum 0; 88 set templib.ie(keep=IETEST); 89 obsnum=obsnum+1; 90 if missing(IETEST) then 91 output; 92 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. 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 93 data misobs(keep=obsnum); 94 retain obsnum 0; 95 set templib.ie(keep=IECAT); 96 obsnum=obsnum+1; 97 if missing(IECAT) then 98 output; 99 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. 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 100 data misobs(keep=obsnum); 101 retain obsnum 0; 102 set templib.ie(keep=IEORRES); 103 obsnum=obsnum+1; 104 if missing(IEORRES) then 105 output; 5 The SAS System 09:51 Wednesday, October 21, 2009 106 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. NOTE: The data set WORK.MISOBS has 6 observations and 1 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 107 data misobs(keep=obsnum); 108 retain obsnum 0; 109 set templib.ie(keep=IESTRESC); 110 obsnum=obsnum+1; 111 if missing(IESTRESC) then 112 output; 113 run; NOTE: Format $YN was not found or could not be loaded. NOTE: There were 6 observations read from the data set TEMPLIB.IE. NOTE: The data set WORK.MISOBS has 1 observations and 1 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 114 data _26; 115 retain obsnum 0; 116 set templib.ie(keep=VISITNUM); 117 obsnum = obsnum + 1; 118 attrib visitnumc length=$50; 119 visitnumc = compress(visitnum); 120 if index(visitnumc,'.') gt 0 then visitnumc = compress(scan(visitnumc,2,'.')); 121 if length(compress(visitnumc))>2 then output; 122 run; NOTE: Numeric values have been converted to character values at the places given by: (Line):(Column). 119:22 NOTE: There were 6 observations read from the data set TEMPLIB.IE. NOTE: The data set WORK._26 has 0 observations and 3 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 123 data _42; 124 retain obsnum 0; 125 set templib.ie(keep=IETEST); 126 obsnum = obsnum + 1; 127 if length(trim(left(IETEST))) > 40 then output; 128 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. 6 The SAS System 09:51 Wednesday, October 21, 2009 NOTE: The data set WORK._42 has 0 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 129 data _43(keep= obsnum IETESTCD status); 130 retain obsnum 0; 131 set templib.ie(keep=IETESTCD); 132 obsnum = obsnum + 1; 133 attrib status length=$50; 134 if length(trim(left(IETESTCD))) > 8 then do; 135 status = 'greater than 8 characters.'; 136 output; 137 end; 138 if substr(IETESTCD,1,1) in ('1','2','3','4','5','6','7','8','9','0') then do; 139 status = 'starts with a number.'; 140 output; 141 end; 142 spec = '~`@#$%^&*()-+={}|\][:";<>?,./'; 143 if index(IETESTCD,"'") gt 0 then do; 144 status = 'contains special character(s).'; 145 output; 146 end; 147 else do; 148 do i=1 to length(trim(left(IETESTCD))); 149 if index(spec,substr(IETESTCD,i,1)) gt 0 then do; 150 status = 'contains special character(s).'; 151 output; 152 end; 153 end; 154 end; 155 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. NOTE: The data set WORK._43 has 0 observations and 3 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 156 proc sort data=templib.ie out=ie nodupkey; 157 by usubjid; 158 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. NOTE: 3 observations with duplicate key values were deleted. NOTE: The data set WORK.IE has 3 observations and 17 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 7 The SAS System 09:51 Wednesday, October 21, 2009 NOTE: Table WORK._72 created, with 3 rows and 1 columns. 159 proc sort data=templib.ie out=ie nodupkey; 160 by usubjid visitnum visit; 161 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. NOTE: 3 observations with duplicate key values were deleted. NOTE: The data set WORK.IE has 3 observations and 17 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 162 data ie; 163 attrib total length=$100; 164 set ie; 165 total = trim(left(usubjid))||'+'||compress(visitnum)||'+'||trim(left(visit)); 166 put total=; 167 keep total; 168 run; NOTE: Numeric values have been converted to character values at the places given by: (Line):(Column). 165:44 NOTE: Format $YN was not found or could not be loaded. total=123+.+ total=456+.+ total=789+.+ NOTE: There were 3 observations read from the data set WORK.IE. NOTE: The data set WORK.IE has 3 observations and 1 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 169 data sv; 170 attrib total length=$100; 171 set templib.SV; 172 total = trim(left(usubjid))||'+'||compress(visitnum)||'+'||trim(left(visit)); 173 put total=; 174 keep total; 175 run; NOTE: Numeric values have been converted to character values at the places given by: (Line):(Column). 172:44 total=101+1+SCREEN total=101+2+DAY 1 total=101+2+WEEK 1 total=101+4+WEEK 2 total=101+4.1+ total=101+8+FOLLOW-UP 8 The SAS System 09:51 Wednesday, October 21, 2009 NOTE: There were 6 observations read from the data set TEMPLIB.SV. NOTE: The data set WORK.SV has 6 observations and 1 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds NOTE: Table WORK._73 created, with 3 rows and 1 columns. 176 proc sort data=templib.ie out=ie nodupkey; 177 by IETESTCD; 178 run; NOTE: There were 6 observations read from the data set TEMPLIB.IE. NOTE: 5 observations with duplicate key values were deleted. NOTE: The data set WORK.IE has 1 observations and 17 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 179 proc sort data=templib.TI out=ti nodupkey; 180 by IETESTCD; 181 run; NOTE: There were 1 observations read from the data set TEMPLIB.TI. NOTE: 0 observations with duplicate key values were deleted. NOTE: The data set WORK.TI has 1 observations and 8 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.04 seconds cpu time 0.04 seconds NOTE: Table WORK._76 created, with 1 rows and 1 columns. 182 data _103; 183 retain obsnum 0; 184 set templib.ie; 185 obsnum = obsnum + 1; 186 if IESTRESC not in ('N','Y','NA','U') and IESTRESC ne '' then do; 187 output; 188 end; 189 run; NOTE: Format $YN was not found or could not be loaded. NOTE: There were 6 observations read from the data set TEMPLIB.IE. NOTE: The data set WORK._103 has 1 observations and 18 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 190 data _104; 9 The SAS System 09:51 Wednesday, October 21, 2009 191 retain obsnum 0; 192 set templib.ie; 193 obsnum = obsnum + 1; 194 if IEORRES ne IESTRESC then do; 195 output; 196 end; 197 run; NOTE: Format $YN was not found or could not be loaded. NOTE: There were 6 observations read from the data set TEMPLIB.IE. NOTE: The data set WORK._104 has 5 observations and 18 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 198 proc sort data=cdisc nodupkey; 199 by libname datname datlab variable length label type case comment; 200 run; NOTE: There were 34 observations read from the data set WORK.CDISC. NOTE: 0 observations with duplicate key values were deleted. NOTE: The data set WORK.CDISC has 34 observations and 11 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 201 proc sort data = work.cdisc; 202 by libname datname datlab variable case; 203 run; NOTE: There were 34 observations read from the data set WORK.CDISC. NOTE: The data set WORK.CDISC has 34 observations and 11 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 204 205 proc format; 206 *** Generate the comments for the CDISC evaluation case number ***; 207 value $casefmt 208 '1' = '1' 209 '2' = '2' 210 '3' = '3' 211 '4' = '4' 212 '5' = '5' 213 '6' = '6' 214 '7' = '7' 215 '8' = '8' 216 '9' = '9' 217 '10' = '10' 10 The SAS System 09:51 Wednesday, October 21, 2009 218 '11' = '11' 219 '12' = '12' 220 '13' = '13' 221 '14' = '14' 222 '15' = '15' 223 '16' = '16' 224 '17' = '17' 225 '18' = '18' 226 '19' = '19' 227 '20' = '20' 228 '21' = '21' 229 '22' = '22' 230 '23' = '23' 231 '24' = '24' 232 '25' = '25' 233 '26' = '26' 234 '27' = '27' 235 '28' = '28' 236 '29' = '29' 237 '30' = '30' 238 '31' = '31' 239 '32' = '32' 240 '33' = '33' 241 '34' = '34' 242 '35' = '35' 243 '36' = '36' 244 '37' = '37' 245 '38' = '38' 246 '39' = '39' 247 '40' = '40' 248 '41' = '41' 249 '42' = '42' 250 '43' = '43' 251 '44' = '44' 252 '45' = '45' 253 '46' = '46' 254 '47' = '47' 255 '48' = '48' 256 '49' = '49' 257 '50' = '50' 258 '51' = '51' 259 '52' = '52' 260 '53' = '53' 261 '54' = '54' 262 '55' = '55' 263 '56' = '56' 264 '57' = '57' 265 '58' = '58' 266 '59' = '59' 267 '60' = '60' 268 '61' = '61' 269 '62' = '62' 270 '63' = '63' 11 The SAS System 09:51 Wednesday, October 21, 2009 271 '64' = '64' 272 '65' = '65' 273 '66' = '66' 274 '67' = '67' 275 '68' = '68' 276 '69' = '69' 277 '70' = '70' 278 '71' = '71' 279 '72' = '72' 280 '73' = '73' 281 '74' = '74' 282 '75' = '75' 283 '76' = '76' 284 '77' = '77' 285 '78' = '78' 286 '79' = '79' 287 '80' = '80' 288 '81' = '81' 289 '82' = '82' 290 '83' = '83' 291 '84' = '84' 292 '85' = '85' 293 '86' = '86' 294 '87' = '87' 295 '88' = '88' 296 '89' = '89' 297 '90' = '90' 298 '91' = '91' 299 '92' = '92' 300 '93' = '93' 301 '94' = '94' 302 '95' = '95' 303 '96' = '96' 304 '97' = '97' 305 '98' = '98' 306 '99' = '99' 307 '100' = '100' 308 '101' = '101' 309 '102' = '102' 310 '103' = '103' 311 '104' = '104' 312 '105' = '105' 313 '106' = '106' 314 '107' = '107' 315 '108' = '108' 316 '109' = '109' 317 '110' = '110' 318 '111' = '111' 319 '112' = '112' 320 '113' = '113'; NOTE: Format $CASEFMT has been output. 321 322 12 The SAS System 09:51 Wednesday, October 21, 2009 323 324 *** Generate the format for the bookmark of variables ***; 325 value $bookfmt 326 "ie.studyid" = 'ie.studyid' 327 "ie.domain" = 'ie.domain' 328 "ie.usubjid" = 'ie.usubjid' 329 "ie.ieseq" = 'ie.ieseq' 330 "ie.iegrpid" = 'ie.iegrpid' 331 "ie.iespid" = 'ie.iespid' 332 "ie.ietestcd" = 'ie.ietestcd' 333 "ie.ietest" = 'ie.ietest' 334 "ie.iecat" = 'ie.iecat' 335 "ie.iescat" = 'ie.iescat' 336 "ie.ieorres" = 'ie.ieorres' 337 "ie.iestresc" = 'ie.iestresc' 338 "ie.visitnum" = 'ie.visitnum' 339 "ie.visit" = 'ie.visit' 340 "ie.visitdy" = 'ie.visitdy' 341 "ie.iedtc" = 'ie.iedtc' 342 "ie.iedy" = 'ie.iedy' 343 ; NOTE: Format $BOOKFMT has been output. 344 345 *** Generate the format for dataset linking ***; 346 value $datfmt 347 "ae" = 'ae
' 348 "ae3a" = 'ae3a
' 349 "cdisc10" = 'cdisc10
' 350 "cdisc11" = 'cdisc11
' 351 "cdisc14" = 'cdisc14
' 352 "cdisc15" = 'cdisc15
' 353 "cdisc18" = 'cdisc18
' 354 "cdisc2" = 'cdisc2
' 355 "cdisc21" = 'cdisc21
' 356 "cdisc2b_1" = 'cdisc2b_1
' 357 "cdisc2b_2" = 'cdisc2b_2
' 358 "cdisc2b_3" = 'cdisc2b_3
' 359 "cdisc2_b" = 'cdisc2_b
' 360 "cdisc2_c" = 'cdisc2_c
' 361 "cdisc4" = 'cdisc4
' 362 "cdisc5" = 'cdisc5
' 363 "cdisc6" = 'cdisc6
' 364 "cdisc7" = 'cdisc7
' 365 "cdisc8" = 'cdisc8
' 366 "cdisc9" = 'cdisc9
' 367 "ce" = 'ce
' 368 "cm" = 'cm
' 369 "co" = 'co
' 370 "da" = 'da
' 371 "dm" = 'dm
' 372 "ds" = 'ds
' 373 "dv" = 'dv
' 374 "eg" = 'eg
' 13 The SAS System 09:51 Wednesday, October 21, 2009 375 "ex" = 'ex
' 376 "fa" = 'fa
' 377 "ie" = 'ie
' 378 "lb" = 'lb
' 379 "mb" = 'mb
' 380 "mh" = 'mh
' 381 "ms" = 'ms
' 382 "notdm" = 'notdm
' 383 "pc" = 'pc
' 384 "pe" = 'pe
' 385 "pp" = 'pp
' 386 "qs" = 'qs
' 387 "relrec" = 'relrec
' 388 "sc" = 'sc
' 389 "se" = 'se
' 390 "su" = 'su
' 391 "supmh" = 'supmh
' 392 "suppae" = 'suppae
' 393 "suppp" = 'suppp
' 394 "supte" = 'supte
' 395 "supvs" = 'supvs
' 396 "sv" = 'sv
' 397 "ta" = 'ta
' 398 "te" = 'te
' 399 "ti" = 'ti
' 400 "ts" = 'ts
' 401 "tv" = 'tv
' 402 "vs" = 'vs
' 403 ; NOTE: Format $DATFMT has been output. 404 run; NOTE: PROCEDURE FORMAT used (Total process time): real time 0.06 seconds cpu time 0.00 seconds 405 406 data work.cdisc; 407 set work.cdisc; 408 by libname datname datlab variable case; 409 410 attrib datvar label="Dataset and Variable" length=$100 format=$bookfmt.; 411 if variable ne '' then 412 datvar = compress(lowcase(datname) || "." || lowcase(variable)); 413 else datvar = lowcase(datname); 414 /*format case casefmt.;*/ 415 attrib charcase label = "Case Number" length = $10; 416 charcase = trim(left(put(case, best.))); 417 format charcase $casefmt.; 418 *format datname $datfmt.; 419 run; 14 The SAS System 09:51 Wednesday, October 21, 2009 NOTE: There were 34 observations read from the data set WORK.CDISC. NOTE: The data set WORK.CDISC has 34 observations and 13 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 420 421 *** Remove The Special Characters ******; 422 proc template; 423 define style styles.test/store=work.test; 424 parent=styles.default; 425 style byline from titlesandfooters / 426 protectspecialchars=off; 427 end; NOTE: STYLE 'Styles.Test' has been saved to: WORK.TEST 428 run; NOTE: PROCEDURE TEMPLATE used (Total process time): real time 0.07 seconds cpu time 0.03 seconds 429 430 proc sort data = work.cdisc; 431 by libname datname datlab variable case; 432 run; NOTE: There were 34 observations read from the data set WORK.CDISC. NOTE: The data set WORK.CDISC has 34 observations and 13 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 433 434 ods listing close; 435 ods html file='cdisc103.html' style=styles.mxistyle; NOTE: Writing HTML Body file: cdisc103.html 436 data work.ie (drop=usrname datetime); 437 set work.cdisc; 438 where lowcase(datname)=lowcase("ie"); 439 run; NOTE: There were 34 observations read from the data set WORK.CDISC. WHERE LOWCASE(datname)='ie'; NOTE: The data set WORK.IE has 34 observations and 11 variables. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds 440 data ie(drop=xxx); 441 set ie; 15 The SAS System 09:51 Wednesday, October 21, 2009 442 retain xxx 0; 443 if xxx = 2 then xxx = 1; 444 else xxx = xxx + 1; 445 yyy = compress(put(xxx,best.)); 446 run; NOTE: There were 34 observations read from the data set WORK.IE. NOTE: The data set WORK.IE has 34 observations and 12 variables. NOTE: DATA statement used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 447 448 %let newlab = %nrbquote(Inclusion/Exclusion Criteria Not Met); 449 title1 height=2 ' Findings from CDISC Evaluation'; 450 title2 height=2 "Data Table Name = ie Data Table Label=&newlab"; 451 footnote1 height=2 "Generated on: 10/21/2009, 9:51:07 am, Administrator"; 452 footnote2 height=2 "Located at: C:\apache\htdocs\cdiscbuilder\data"; 453 proc report data = work.ie nowindows; 454 column obs libname datvar label type length charcase comment yyy; 455 define obs/computed 'Obs'; 456 define libname/width=20; 457 define datvar/width=50; 458 define label/width=50; 459 define type/width=20; 460 define length/width=50; 461 define comment/width=50; 462 define charcase/width=50; 463 define yyy/ noprint; 464 465 compute yyy; 466 if yyy = "2" then do; 467 call define (_row_,'style','STYLE=[BACKGROUND=cxFFFFCC]'); 468 end; 469 endcompute; 470 471 compute charcase; 472 if charcase='1' then call define 472 ! ('charcase','style','STYLE=[BACKGROUND=CXccffcc JUST=CENTER]'); 473 if charcase='2' then call define 473 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0030 JUST=CENTER]'); 474 if charcase='3' then call define 474 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0094 JUST=CENTER]'); 475 if charcase='4' then call define 475 ! ('charcase','style','STYLE=[BACKGROUND=CXcd00f8 JUST=CENTER]'); 476 if charcase='5' then call define 476 ! ('charcase','style','STYLE=[BACKGROUND=CXcd015c JUST=CENTER]'); 477 if charcase='6' then call define 477 ! ('charcase','style','STYLE=[BACKGROUND=CXcd01c0 JUST=CENTER]'); 478 if charcase='7' then call define 478 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0224 JUST=CENTER]'); 479 if charcase='8' then call define 16 The SAS System 09:51 Wednesday, October 21, 2009 479 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0288 JUST=CENTER]'); 480 if charcase='9' then call define 480 ! ('charcase','style','STYLE=[BACKGROUND=CXcd02ec JUST=CENTER]'); 481 if charcase='10' then call define 481 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0350 JUST=CENTER]'); 482 if charcase='11' then call define 482 ! ('charcase','style','STYLE=[BACKGROUND=CXcd03b4 JUST=CENTER]'); 483 if charcase='12' then call define 483 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0418 JUST=CENTER]'); 484 if charcase='13' then call define 484 ! ('charcase','style','STYLE=[BACKGROUND=CXcd047c JUST=CENTER]'); 485 if charcase='14' then call define 485 ! ('charcase','style','STYLE=[BACKGROUND=CXcd04e0 JUST=CENTER]'); 486 if charcase='15' then call define 486 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0544 JUST=CENTER]'); 487 if charcase='16' then call define 487 ! ('charcase','style','STYLE=[BACKGROUND=CXcd05a8 JUST=CENTER]'); 488 if charcase='17' then call define 488 ! ('charcase','style','STYLE=[BACKGROUND=CXcd060c JUST=CENTER]'); 489 if charcase='18' then call define 489 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0670 JUST=CENTER]'); 490 if charcase='19' then call define 490 ! ('charcase','style','STYLE=[BACKGROUND=CXcd06d4 JUST=CENTER]'); 491 if charcase='20' then call define 491 ! ('charcase','style','STYLE=[BACKGROUND=CXffffcc JUST=CENTER]'); 492 if charcase='21' then call define 492 ! ('charcase','style','STYLE=[BACKGROUND=CX398C54 JUST=CENTER]'); 493 if charcase='22' then call define 493 ! ('charcase','style','STYLE=[BACKGROUND=CX398d1c JUST=CENTER]'); 494 if charcase='23' then call define 494 ! ('charcase','style','STYLE=[BACKGROUND=CX398d80 JUST=CENTER]'); 495 if charcase='24' then call define 495 ! ('charcase','style','STYLE=[BACKGROUND=CX398de4 JUST=CENTER]'); 496 if charcase='25' then call define 496 ! ('charcase','style','STYLE=[BACKGROUND=CX398e48 JUST=CENTER]'); 497 if charcase='26' then call define 497 ! ('charcase','style','STYLE=[BACKGROUND=CX398eac JUST=CENTER]'); 498 if charcase='27' then call define 498 ! ('charcase','style','STYLE=[BACKGROUND=CX398f10 JUST=CENTER]'); 499 if charcase='28' then call define 499 ! ('charcase','style','STYLE=[BACKGROUND=CX398f74 JUST=CENTER]'); 500 if charcase='29' then call define 500 ! ('charcase','style','STYLE=[BACKGROUND=CX398fd8 JUST=CENTER]'); 501 if charcase='30' then call define 501 ! ('charcase','style','STYLE=[BACKGROUND=CX39903c JUST=CENTER]'); 502 if charcase='31' then call define 502 ! ('charcase','style','STYLE=[BACKGROUND=CX3990a0 JUST=CENTER]'); 503 if charcase='32' then call define 503 ! ('charcase','style','STYLE=[BACKGROUND=CX399104 JUST=CENTER]'); 504 if charcase='33' then call define 504 ! ('charcase','style','STYLE=[BACKGROUND=CX399168 JUST=CENTER]'); 505 if charcase='34' then call define 505 ! ('charcase','style','STYLE=[BACKGROUND=CX3991cc JUST=CENTER]'); 17 The SAS System 09:51 Wednesday, October 21, 2009 506 if charcase='35' then call define 506 ! ('charcase','style','STYLE=[BACKGROUND=CX399230 JUST=CENTER]'); 507 if charcase='36' then call define 507 ! ('charcase','style','STYLE=[BACKGROUND=CX399294 JUST=CENTER]'); 508 if charcase='37' then call define 508 ! ('charcase','style','STYLE=[BACKGROUND=CX3992f8 JUST=CENTER]'); 509 if charcase='38' then call define 509 ! ('charcase','style','STYLE=[BACKGROUND=CX39935c JUST=CENTER]'); 510 if charcase='39' then call define 510 ! ('charcase','style','STYLE=[BACKGROUND=CXffcccc JUST=CENTER]'); 511 if charcase='40' then call define 511 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd30 JUST=CENTER]'); 512 if charcase='41' then call define 512 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd94 JUST=CENTER]'); 513 if charcase='42' then call define 513 ! ('charcase','style','STYLE=[BACKGROUND=CXffcdf8 JUST=CENTER]'); 514 if charcase='43' then call define 514 ! ('charcase','style','STYLE=[BACKGROUND=CXffce5c JUST=CENTER]'); 515 if charcase='44' then call define 515 ! ('charcase','style','STYLE=[BACKGROUND=CXffcec0 JUST=CENTER]'); 516 if charcase='45' then call define 516 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf24 JUST=CENTER]'); 517 if charcase='46' then call define 517 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf88 JUST=CENTER]'); 518 if charcase='47' then call define 518 ! ('charcase','style','STYLE=[BACKGROUND=CXffcfec JUST=CENTER]'); 519 if charcase='48' then call define 519 ! ('charcase','style','STYLE=[BACKGROUND=CXffd050 JUST=CENTER]'); 520 if charcase='49' then call define 520 ! ('charcase','style','STYLE=[BACKGROUND=CXffd0b4 JUST=CENTER]'); 521 if charcase='50' then call define 521 ! ('charcase','style','STYLE=[BACKGROUND=CXffd118 JUST=CENTER]'); 522 if charcase='51' then call define 522 ! ('charcase','style','STYLE=[BACKGROUND=CXffd17c JUST=CENTER]'); 523 if charcase='52' then call define 523 ! ('charcase','style','STYLE=[BACKGROUND=CXffd1e0 JUST=CENTER]'); 524 if charcase='53' then call define 524 ! ('charcase','style','STYLE=[BACKGROUND=CXffd244 JUST=CENTER]'); 525 if charcase='54' then call define 525 ! ('charcase','style','STYLE=[BACKGROUND=CXffd2a8 JUST=CENTER]'); 526 if charcase='55' then call define 526 ! ('charcase','style','STYLE=[BACKGROUND=CXffd30c JUST=CENTER]'); 527 if charcase='56' then call define 527 ! ('charcase','style','STYLE=[BACKGROUND=CXffd370 JUST=CENTER]'); 528 if charcase='57' then call define 528 ! ('charcase','style','STYLE=[BACKGROUND=CXffd3d4 JUST=CENTER]'); 529 if charcase='58' then call define 529 ! ('charcase','style','STYLE=[BACKGROUND=CXccccff JUST=CENTER]'); 530 if charcase='59' then call define 530 ! ('charcase','style','STYLE=[BACKGROUND=CXcccd63 JUST=CENTER]'); 531 if charcase='60' then call define 531 ! ('charcase','style','STYLE=[BACKGROUND=CXcccdc7 JUST=CENTER]'); 532 if charcase='61' then call define 18 The SAS System 09:51 Wednesday, October 21, 2009 532 ! ('charcase','style','STYLE=[BACKGROUND=CXccce2b JUST=CENTER]'); 533 if charcase='62' then call define 533 ! ('charcase','style','STYLE=[BACKGROUND=CXccce8f JUST=CENTER]'); 534 if charcase='63' then call define 534 ! ('charcase','style','STYLE=[BACKGROUND=CXcccef3 JUST=CENTER]'); 535 if charcase='64' then call define 535 ! ('charcase','style','STYLE=[BACKGROUND=CXcccf57 JUST=CENTER]'); 536 if charcase='65' then call define 536 ! ('charcase','style','STYLE=[BACKGROUND=CXcccfbb JUST=CENTER]'); 537 if charcase='66' then call define 537 ! ('charcase','style','STYLE=[BACKGROUND=CXccd01f JUST=CENTER]'); 538 if charcase='67' then call define 538 ! ('charcase','style','STYLE=[BACKGROUND=CXccd083 JUST=CENTER]'); 539 if charcase='68' then call define 539 ! ('charcase','style','STYLE=[BACKGROUND=CXccd0e7 JUST=CENTER]'); 540 if charcase='69' then call define 540 ! ('charcase','style','STYLE=[BACKGROUND=CXccd14b JUST=CENTER]'); 541 if charcase='70' then call define 541 ! ('charcase','style','STYLE=[BACKGROUND=CXccd1af JUST=CENTER]'); 542 if charcase='71' then call define 542 ! ('charcase','style','STYLE=[BACKGROUND=CXccd213 JUST=CENTER]'); 543 if charcase='72' then call define 543 ! ('charcase','style','STYLE=[BACKGROUND=CXccd277 JUST=CENTER]'); 544 if charcase='73' then call define 544 ! ('charcase','style','STYLE=[BACKGROUND=CXccd2db JUST=CENTER]'); 545 if charcase='74' then call define 545 ! ('charcase','style','STYLE=[BACKGROUND=CXccd33f JUST=CENTER]'); 546 if charcase='75' then call define 546 ! ('charcase','style','STYLE=[BACKGROUND=CXccd3a3 JUST=CENTER]'); 547 if charcase='76' then call define 547 ! ('charcase','style','STYLE=[BACKGROUND=CXccd407 JUST=CENTER]'); 548 if charcase='77' then call define 548 ! ('charcase','style','STYLE=[BACKGROUND=CX99ccff JUST=CENTER]'); 549 if charcase='78' then call define 549 ! ('charcase','style','STYLE=[BACKGROUND=CX99cd63 JUST=CENTER]'); 550 if charcase='79' then call define 550 ! ('charcase','style','STYLE=[BACKGROUND=CX99cdc7 JUST=CENTER]'); 551 if charcase='80' then call define 551 ! ('charcase','style','STYLE=[BACKGROUND=CX99ce2b JUST=CENTER]'); 552 if charcase='81' then call define 552 ! ('charcase','style','STYLE=[BACKGROUND=CX99ce8f JUST=CENTER]'); 553 if charcase='82' then call define 553 ! ('charcase','style','STYLE=[BACKGROUND=CX99cef3 JUST=CENTER]'); 554 if charcase='83' then call define 554 ! ('charcase','style','STYLE=[BACKGROUND=CX99cf57 JUST=CENTER]'); 555 if charcase='84' then call define 555 ! ('charcase','style','STYLE=[BACKGROUND=CX99cfbb JUST=CENTER]'); 556 if charcase='85' then call define 556 ! ('charcase','style','STYLE=[BACKGROUND=CX99d01f JUST=CENTER]'); 557 if charcase='86' then call define 557 ! ('charcase','style','STYLE=[BACKGROUND=CX99d083 JUST=CENTER]'); 558 if charcase='87' then call define 558 ! ('charcase','style','STYLE=[BACKGROUND=CX99d0e7 JUST=CENTER]'); 19 The SAS System 09:51 Wednesday, October 21, 2009 559 if charcase='88' then call define 559 ! ('charcase','style','STYLE=[BACKGROUND=CX99d14b JUST=CENTER]'); 560 if charcase='89' then call define 560 ! ('charcase','style','STYLE=[BACKGROUND=CX99d1af JUST=CENTER]'); 561 if charcase='90' then call define 561 ! ('charcase','style','STYLE=[BACKGROUND=CX99d213 JUST=CENTER]'); 562 if charcase='91' then call define 562 ! ('charcase','style','STYLE=[BACKGROUND=CX99d277 JUST=CENTER]'); 563 if charcase='92' then call define 563 ! ('charcase','style','STYLE=[BACKGROUND=CX99d2db JUST=CENTER]'); 564 if charcase='93' then call define 564 ! ('charcase','style','STYLE=[BACKGROUND=CX99d33f JUST=CENTER]'); 565 if charcase='94' then call define 565 ! ('charcase','style','STYLE=[BACKGROUND=CX99d3a3 JUST=CENTER]'); 566 if charcase='95' then call define 566 ! ('charcase','style','STYLE=[BACKGROUND=CX99d407 JUST=CENTER]'); 567 if charcase='96' then call define 567 ! ('charcase','style','STYLE=[BACKGROUND=CXffcc99 JUST=CENTER]'); 568 if charcase='97' then call define 568 ! ('charcase','style','STYLE=[BACKGROUND=CXffccfd JUST=CENTER]'); 569 if charcase='98' then call define 569 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd61 JUST=CENTER]'); 570 if charcase='99' then call define 570 ! ('charcase','style','STYLE=[BACKGROUND=CXffcdc5 JUST=CENTER]'); 571 if charcase='100' then call define 571 ! ('charcase','style','STYLE=[BACKGROUND=CXffce29 JUST=CENTER]'); 572 if charcase='101' then call define 572 ! ('charcase','style','STYLE=[BACKGROUND=CXffce8d JUST=CENTER]'); 573 if charcase='102' then call define 573 ! ('charcase','style','STYLE=[BACKGROUND=CXffcef1 JUST=CENTER]'); 574 if charcase='103' then call define 574 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf55 JUST=CENTER]'); 575 if charcase='104' then call define 575 ! ('charcase','style','STYLE=[BACKGROUND=CXffcfb9 JUST=CENTER]'); 576 if charcase='105' then call define 576 ! ('charcase','style','STYLE=[BACKGROUND=CXffd01d JUST=CENTER]'); 577 if charcase='106' then call define 577 ! ('charcase','style','STYLE=[BACKGROUND=CXffd081 JUST=CENTER]'); 578 if charcase='107' then call define 578 ! ('charcase','style','STYLE=[BACKGROUND=CXffd0e5 JUST=CENTER]'); 579 if charcase='108' then call define 579 ! ('charcase','style','STYLE=[BACKGROUND=CXffd149 JUST=CENTER]'); 580 if charcase='109' then call define 580 ! ('charcase','style','STYLE=[BACKGROUND=CXffd1ad JUST=CENTER]'); 581 if charcase='110' then call define 581 ! ('charcase','style','STYLE=[BACKGROUND=CXffd211 JUST=CENTER]'); 582 if charcase='111' then call define 582 ! ('charcase','style','STYLE=[BACKGROUND=CXffd275 JUST=CENTER]'); 583 if charcase='112' then call define 583 ! ('charcase','style','STYLE=[BACKGROUND=CXffd2d9 JUST=CENTER]'); 584 if charcase='113' then call define 584 ! ('charcase','style','STYLE=[BACKGROUND=CXffd33d JUST=CENTER]'); 585 endcomp; 20 The SAS System 09:51 Wednesday, October 21, 2009 586 587 compute obs; 588 dobs + 1; 589 obs = dobs; 590 endcompute; 591 run; NOTE: There were 34 observations read from the data set WORK.IE. NOTE: PROCEDURE REPORT used (Total process time): real time 0.26 seconds cpu time 0.06 seconds 592 run; 593 ods html close; 594 ods listing; NOTE: PROCEDURE DISPLAY used (Total process time): real time 3.57 seconds cpu time 2.95 seconds NOTE: SAS Institute Inc., SAS Campus Drive, Cary, NC USA 27513-2414 NOTE: The SAS System used: real time 4.32 seconds cpu time 3.95 seconds