1 The SAS System 09:41 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.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: cdisc47.sas *
3 * Description: Case #47. Start Period Null For All (Timing) variables, *
4 * this identifies records that violate the condition *
5 * [Start Relative to Reference Period is not null], *
6 * limited to records where [Start Date/Time of Observation is null].*
7 * By: Sy Truong, 10/14/2009 *
8 *-------------------------------------------------------------*/
9
10 libname templib '../data';
NOTE: Libref TEMPLIB was successfully assigned as follows:
Engine: V9
Physical Name: C:\apache\htdocs\cdiscbuilder\data
11
12 *** Create some data to be selected ***;
13 data templib.ce(label="Clinical Events");
14 attrib STUDYID label="Study Identifier" length=$100;
15 attrib DOMAIN label="Domain Abbreviation" length=$100;
16 attrib USUBJID label="Unique Subject Identifier" length=$100;
17 attrib CESEQ label="Sequence Number" length=8;
18 attrib CEGRPID label="Group ID" length=$100;
19 attrib CEREFID label="Reference ID" length=$100;
20 attrib CESPID label="Sponsor-Defined Identifier" length=$100;
21 attrib CETERM label="Reported Term for the Clinical Event" length=$100;
22 attrib CEDECOD label="Dictionary-Derived Term" length=$100;
23 attrib CECAT label="Category for Clinical Event" length=$100;
24 attrib CESCAT label="Subcategory for Clinical Event" length=$100;
25 attrib CEOCCUR label="Clinical Event Occurrence" length=$100;
26 attrib CESTDTC label="Start Date/Time of Clinical Event" length=$12;
27 attrib CEENDTC label="End Date/Time of Clinical Event" length=$12;
28 attrib CESTRF label="Start Relative to Reference Period" length=$20;
2 The SAS System 09:41 Wednesday, October 21, 2009
29 attrib CEENRF label="End Relative to Reference Period" length=$20;
30
31 STUDYID='test';DOMAIN='test';USUBJID='test';CESEQ=1;CEGRPID='test';CEREFID='test';
31 ! CESPID='test';CETERM='test';CEDECOD='test';CECAT='test';CESCAT='test';CEOCCUR='Y';
32 CEENDTC='2006-01-01';CEENRF='DURING';CESTDTC='2006-01-01';CESTRF='DURING';
33 output;
34 STUDYID='test';DOMAIN='test';USUBJID='test';CESEQ=1;CEGRPID='test';CEREFID='test';
34 ! CESPID='test';CETERM='test';CEDECOD='test';CECAT='test';CESCAT='test';CEOCCUR='N';
35 CEENDTC='2006-01-01';CEENRF='';CESTDTC='2006-01-01';CESTRF='DURING';
36 output;
37 STUDYID='test';DOMAIN='test';USUBJID='test';CESEQ=1;CEGRPID='test';CEREFID='test';
37 ! CESPID='test';CETERM='test';CEDECOD='test';CECAT='test';CESCAT='test';CEOCCUR='N';
38 CEENDTC='2006-01-01';CEENRF='DURING';CESTDTC='2006-01-01';CESTRF='DURING';
39 output;
40 STUDYID='test';DOMAIN='test';USUBJID='test';CESEQ=1;CEGRPID='test';CEREFID='test';
40 ! CESPID='test';CETERM='test';CEDECOD='test';CECAT='test';CESCAT='test';CEOCCUR='Y';
41 CEENDTC='';CEENRF='DURING';CESTDTC='2006-01-01';CESTRF='DURING';
42 output;
43 STUDYID='test';DOMAIN='test';USUBJID='test';CESEQ=1;CEGRPID='test';CEREFID='test';
43 ! CESPID='test';CETERM='test';CEDECOD='test';CECAT='test';CESCAT='test';CEOCCUR='';
44 CEENDTC='';CEENRF='AFTER';CESTDTC='';CESTRF='';
45 output;
46 run;
NOTE: The data set TEMPLIB.CE has 5 observations and 16 variables.
NOTE: DATA statement used (Total process time):
real time 0.03 seconds
cpu time 0.03 seconds
47 %cdisc(datlib=templib,datname=ce);
48 data misobs(keep=obsnum);
49 retain obsnum 0;
50 set templib.ce(keep=STUDYID);
51 obsnum=obsnum+1;
52 if missing(STUDYID) then
53 output;
54 run;
NOTE: There were 5 observations read from the data set TEMPLIB.CE.
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
55 data misobs(keep=obsnum);
56 retain obsnum 0;
57 set templib.ce(keep=DOMAIN);
58 obsnum=obsnum+1;
59 if missing(DOMAIN) then
60 output;
3 The SAS System 09:41 Wednesday, October 21, 2009
61 run;
NOTE: There were 5 observations read from the data set TEMPLIB.CE.
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
62 data misobs(keep=obsnum);
63 retain obsnum 0;
64 set templib.ce(keep=USUBJID);
65 obsnum=obsnum+1;
66 if missing(USUBJID) then
67 output;
68 run;
NOTE: There were 5 observations read from the data set TEMPLIB.CE.
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
69 data _30;
70 retain obsnum 0;
71 set templib.ce(keep=CESTDTC CEENDTC);
72 obsnum = obsnum + 1;
73 run;
NOTE: There were 5 observations read from the data set TEMPLIB.CE.
NOTE: The data set WORK._30 has 5 observations and 3 variables.
NOTE: DATA statement used (Total process time):
real time 0.01 seconds
cpu time 0.01 seconds
74 data _30;
75 set _30;
76 if CESTDTC ne "" and CEENDTC ne "" and input(CESTDTC,is8601da.) gt
76 ! input(CEENDTC,is8601da.) then output;
77 run;
NOTE: There were 5 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
78 data _33;
79 retain obsnum 0;
80 set templib.ce(keep=CEENRF);
4 The SAS System 09:41 Wednesday, October 21, 2009
81 obsnum = obsnum + 1;
82 if CEENRF ne '' and upcase(CEENRF) not in
82 ! ('','BEFORE','DURING','AFTER','DURING/AFTER','U') then output;
83 run;
NOTE: There were 5 observations read from the data set TEMPLIB.CE.
NOTE: The data set WORK._33 has 0 observations and 2 variables.
NOTE: DATA statement used (Total process time):
real time 0.01 seconds
cpu time 0.01 seconds
84 data _35;
85 retain obsnum 0;
86 set templib.ce(keep=CEOCCUR);
87 obsnum = obsnum + 1;
88 if CEOCCUR ne '' and upcase(CEOCCUR) not in ('','Y','N') then output;
89 run;
NOTE: There were 5 observations read from the data set TEMPLIB.CE.
NOTE: The data set WORK._35 has 0 observations and 2 variables.
NOTE: DATA statement used (Total process time):
real time 0.01 seconds
cpu time 0.01 seconds
90 data _37;
91 retain obsnum 0;
92 set templib.ce(keep=CESTRF);
93 obsnum = obsnum + 1;
94 if upcase(CESTRF) not in ('','BEFORE','DURING','AFTER') then output;
95 run;
NOTE: There were 5 observations read from the data set TEMPLIB.CE.
NOTE: The data set WORK._37 has 0 observations and 2 variables.
NOTE: DATA statement used (Total process time):
real time 0.01 seconds
cpu time 0.01 seconds
96 data _46;
97 retain obsnum 0;
98 set templib.ce(keep=CEENDTC CEENRF );
99 obsnum = obsnum + 1;
100 if CEENDTC = '' and CEENRF = '' then output;
101 run;
NOTE: There were 5 observations read from the data set TEMPLIB.CE.
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
5 The SAS System 09:41 Wednesday, October 21, 2009
102 data _47;
103 retain obsnum 0;
104 set templib.ce(keep=CESTDTC CESTRF );
105 obsnum = obsnum + 1;
106 if CESTDTC = '' and CESTRF = '' then output;
107 run;
NOTE: There were 5 observations read from the data set TEMPLIB.CE.
NOTE: The data set WORK._47 has 1 observations and 3 variables.
NOTE: DATA statement used (Total process time):
real time 0.01 seconds
cpu time 0.01 seconds
108 proc sort data=templib.ce out=ce nodupkey;
109 by usubjid;
110 run;
NOTE: There were 5 observations read from the data set TEMPLIB.CE.
NOTE: 4 observations with duplicate key values were deleted.
NOTE: The data set WORK.CE has 1 observations and 16 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.
111 proc sort data=cdisc nodupkey;
112 by libname datname datlab variable length label type case comment;
113 run;
NOTE: There were 16 observations read from the data set WORK.CDISC.
NOTE: 0 observations with duplicate key values were deleted.
NOTE: The data set WORK.CDISC has 16 observations and 11 variables.
NOTE: PROCEDURE SORT used (Total process time):
real time 0.03 seconds
cpu time 0.03 seconds
114 proc sort data = work.cdisc;
115 by libname datname datlab variable case;
116 run;
NOTE: There were 16 observations read from the data set WORK.CDISC.
NOTE: The data set WORK.CDISC has 16 observations and 11 variables.
NOTE: PROCEDURE SORT used (Total process time):
real time 0.03 seconds
cpu time 0.03 seconds
117
6 The SAS System 09:41 Wednesday, October 21, 2009
118 proc format;
119 *** Generate the comments for the CDISC evaluation case number ***;
120 value $casefmt
121 '1' = '1'
122 '2' = '2'
123 '3' = '3'
124 '4' = '4'
125 '5' = '5'
126 '6' = '6'
127 '7' = '7'
128 '8' = '8'
129 '9' = '9'
130 '10' = '10'
131 '11' = '11'
132 '12' = '12'
133 '13' = '13'
134 '14' = '14'
135 '15' = '15'
136 '16' = '16'
137 '17' = '17'
138 '18' = '18'
139 '19' = '19'
140 '20' = '20'
141 '21' = '21'
142 '22' = '22'
143 '23' = '23'
144 '24' = '24'
145 '25' = '25'
146 '26' = '26'
147 '27' = '27'
148 '28' = '28'
149 '29' = '29'
150 '30' = '30'
151 '31' = '31'
152 '32' = '32'
153 '33' = '33'
154 '34' = '34'
155 '35' = '35'
156 '36' = '36'
157 '37' = '37'
158 '38' = '38'
159 '39' = '39'
160 '40' = '40'
161 '41' = '41'
162 '42' = '42'
163 '43' = '43'
164 '44' = '44'
165 '45' = '45'
166 '46' = '46'
167 '47' = '47'
168 '48' = '48'
169 '49' = '49'
170 '50' = '50'
7 The SAS System 09:41 Wednesday, October 21, 2009
171 '51' = '51'
172 '52' = '52'
173 '53' = '53'
174 '54' = '54'
175 '55' = '55'
176 '56' = '56'
177 '57' = '57'
178 '58' = '58'
179 '59' = '59'
180 '60' = '60'
181 '61' = '61'
182 '62' = '62'
183 '63' = '63'
184 '64' = '64'
185 '65' = '65'
186 '66' = '66'
187 '67' = '67'
188 '68' = '68'
189 '69' = '69'
190 '70' = '70'
191 '71' = '71'
192 '72' = '72'
193 '73' = '73'
194 '74' = '74'
195 '75' = '75'
196 '76' = '76'
197 '77' = '77'
198 '78' = '78'
199 '79' = '79'
200 '80' = '80'
201 '81' = '81'
202 '82' = '82'
203 '83' = '83'
204 '84' = '84'
205 '85' = '85'
206 '86' = '86'
207 '87' = '87'
208 '88' = '88'
209 '89' = '89'
210 '90' = '90'
211 '91' = '91'
212 '92' = '92'
213 '93' = '93'
214 '94' = '94'
215 '95' = '95'
216 '96' = '96'
217 '97' = '97'
218 '98' = '98'
219 '99' = '99'
220 '100' = '100'
221 '101' = '101'
222 '102' = '102'
223 '103' = '103'
8 The SAS System 09:41 Wednesday, October 21, 2009
224 '104' = '104'
225 '105' = '105'
226 '106' = '106'
227 '107' = '107'
228 '108' = '108'
229 '109' = '109'
230 '110' = '110'
231 '111' = '111'
232 '112' = '112'
233 '113' = '113';
NOTE: Format $CASEFMT has been output.
234
235
236
237 *** Generate the format for the bookmark of variables ***;
238 value $bookfmt
239 "ce.studyid" = 'ce.studyid'
240 "ce.domain" = 'ce.domain'
241 "ce.usubjid" = 'ce.usubjid'
242 "ce.ceseq" = 'ce.ceseq'
243 "ce.cegrpid" = 'ce.cegrpid'
244 "ce.cerefid" = 'ce.cerefid'
245 "ce.cespid" = 'ce.cespid'
246 "ce.ceterm" = 'ce.ceterm'
247 "ce.cedecod" = 'ce.cedecod'
248 "ce.cecat" = 'ce.cecat'
249 "ce.cescat" = 'ce.cescat'
250 "ce.ceoccur" = 'ce.ceoccur'
251 "ce.cestdtc" = 'ce.cestdtc'
252 "ce.ceendtc" = 'ce.ceendtc'
253 "ce.cestrf" = 'ce.cestrf'
254 "ce.ceenrf" = 'ce.ceenrf'
255 ;
NOTE: Format $BOOKFMT has been output.
256
257 *** Generate the format for dataset linking ***;
258 value $datfmt
259 "ae" = 'ae
'
260 "ae3a" = 'ae3a
'
261 "cdisc10" = 'cdisc10
'
262 "cdisc11" = 'cdisc11
'
263 "cdisc14" = 'cdisc14
'
264 "cdisc15" = 'cdisc15
'
265 "cdisc18" = 'cdisc18
'
266 "cdisc2" = 'cdisc2
'
267 "cdisc21" = 'cdisc21
'
268 "cdisc2b_1" = 'cdisc2b_1
'
269 "cdisc2b_2" = 'cdisc2b_2
'
270 "cdisc2b_3" = 'cdisc2b_3
'
271 "cdisc2_b" = 'cdisc2_b
'
272 "cdisc2_c" = 'cdisc2_c
'
273 "cdisc4" = 'cdisc4
'
274 "cdisc5" = 'cdisc5
'
9 The SAS System 09:41 Wednesday, October 21, 2009
275 "cdisc6" = 'cdisc6
'
276 "cdisc7" = 'cdisc7
'
277 "cdisc8" = 'cdisc8
'
278 "cdisc9" = 'cdisc9
'
279 "ce" = 'ce
'
280 "cm" = 'cm
'
281 "co" = 'co
'
282 "da" = 'da
'
283 "dm" = 'dm
'
284 "ds" = 'ds
'
285 "dv" = 'dv
'
286 "eg" = 'eg
'
287 "ex" = 'ex
'
288 "fa" = 'fa
'
289 "ie" = 'ie
'
290 "lb" = 'lb
'
291 "mb" = 'mb
'
292 "mh" = 'mh
'
293 "ms" = 'ms
'
294 "notdm" = 'notdm
'
295 "pc" = 'pc
'
296 "pe" = 'pe
'
297 "pp" = 'pp
'
298 "qs" = 'qs
'
299 "relrec" = 'relrec
'
300 "sc" = 'sc
'
301 "se" = 'se
'
302 "su" = 'su
'
303 "supmh" = 'supmh
'
304 "suppae" = 'suppae
'
305 "suppp" = 'suppp
'
306 "supte" = 'supte
'
307 "supvs" = 'supvs
'
308 "sv" = 'sv
'
309 "ta" = 'ta
'
310 "te" = 'te
'
311 "ti" = 'ti
'
312 "ts" = 'ts
'
313 "tv" = 'tv
'
314 "vs" = 'vs
'
315 ;
NOTE: Format $DATFMT has been output.
316 run;
NOTE: PROCEDURE FORMAT used (Total process time):
real time 0.06 seconds
cpu time 0.01 seconds
317
318 data work.cdisc;
319 set work.cdisc;
320 by libname datname datlab variable case;
10 The SAS System 09:41 Wednesday, October 21, 2009
321
322 attrib datvar label="Dataset and Variable" length=$100 format=$bookfmt.;
323 if variable ne '' then
324 datvar = compress(lowcase(datname) || "." || lowcase(variable));
325 else datvar = lowcase(datname);
326 /*format case casefmt.;*/
327 attrib charcase label = "Case Number" length = $10;
328 charcase = trim(left(put(case, best.)));
329 format charcase $casefmt.;
330 *format datname $datfmt.;
331 run;
NOTE: There were 16 observations read from the data set WORK.CDISC.
NOTE: The data set WORK.CDISC has 16 observations and 13 variables.
NOTE: DATA statement used (Total process time):
real time 0.04 seconds
cpu time 0.04 seconds
332
333 *** Remove The Special Characters ******;
334 proc template;
335 define style styles.test/store=work.test;
336 parent=styles.default;
337 style byline from titlesandfooters /
338 protectspecialchars=off;
339 end;
NOTE: STYLE 'Styles.Test' has been saved to: WORK.TEST
340 run;
NOTE: PROCEDURE TEMPLATE used (Total process time):
real time 0.06 seconds
cpu time 0.01 seconds
341
342 proc sort data = work.cdisc;
343 by libname datname datlab variable case;
344 run;
NOTE: There were 16 observations read from the data set WORK.CDISC.
NOTE: The data set WORK.CDISC has 16 observations and 13 variables.
NOTE: PROCEDURE SORT used (Total process time):
real time 0.04 seconds
cpu time 0.04 seconds
345
346 ods listing close;
347 ods html file='cdisc47.html' style=styles.mxistyle;
NOTE: Writing HTML Body file: cdisc47.html
348 data work.ce (drop=usrname datetime);
349 set work.cdisc;
350 where lowcase(datname)=lowcase("ce");
11 The SAS System 09:41 Wednesday, October 21, 2009
351 run;
NOTE: There were 16 observations read from the data set WORK.CDISC.
WHERE LOWCASE(datname)='ce';
NOTE: The data set WORK.CE has 16 observations and 11 variables.
NOTE: DATA statement used (Total process time):
real time 0.03 seconds
cpu time 0.03 seconds
352 data ce(drop=xxx);
353 set ce;
354 retain xxx 0;
355 if xxx = 2 then xxx = 1;
356 else xxx = xxx + 1;
357 yyy = compress(put(xxx,best.));
358 run;
NOTE: There were 16 observations read from the data set WORK.CE.
NOTE: The data set WORK.CE has 16 observations and 12 variables.
NOTE: DATA statement used (Total process time):
real time 0.03 seconds
cpu time 0.03 seconds
359
360 %let newlab = %nrbquote(Clinical Events);
361 title1 height=2 ' Findings from CDISC Evaluation';
362 title2 height=2 "Data Table Name = ce Data Table Label=&newlab";
363 footnote1 height=2 "Generated on: 10/21/2009, 9:41:35 am, Administrator";
364 footnote2 height=2 "Located at: C:\apache\htdocs\cdiscbuilder\data";
365 proc report data = work.ce nowindows;
366 column obs libname datvar label type length charcase comment yyy;
367 define obs/computed 'Obs';
368 define libname/width=20;
369 define datvar/width=50;
370 define label/width=50;
371 define type/width=20;
372 define length/width=50;
373 define comment/width=50;
374 define charcase/width=50;
375 define yyy/ noprint;
376
377 compute yyy;
378 if yyy = "2" then do;
379 call define (_row_,'style','STYLE=[BACKGROUND=cxFFFFCC]');
380 end;
381 endcompute;
382
383 compute charcase;
384 if charcase='1' then call define
384 ! ('charcase','style','STYLE=[BACKGROUND=CXccffcc JUST=CENTER]');
385 if charcase='2' then call define
12 The SAS System 09:41 Wednesday, October 21, 2009
385 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0030 JUST=CENTER]');
386 if charcase='3' then call define
386 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0094 JUST=CENTER]');
387 if charcase='4' then call define
387 ! ('charcase','style','STYLE=[BACKGROUND=CXcd00f8 JUST=CENTER]');
388 if charcase='5' then call define
388 ! ('charcase','style','STYLE=[BACKGROUND=CXcd015c JUST=CENTER]');
389 if charcase='6' then call define
389 ! ('charcase','style','STYLE=[BACKGROUND=CXcd01c0 JUST=CENTER]');
390 if charcase='7' then call define
390 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0224 JUST=CENTER]');
391 if charcase='8' then call define
391 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0288 JUST=CENTER]');
392 if charcase='9' then call define
392 ! ('charcase','style','STYLE=[BACKGROUND=CXcd02ec JUST=CENTER]');
393 if charcase='10' then call define
393 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0350 JUST=CENTER]');
394 if charcase='11' then call define
394 ! ('charcase','style','STYLE=[BACKGROUND=CXcd03b4 JUST=CENTER]');
395 if charcase='12' then call define
395 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0418 JUST=CENTER]');
396 if charcase='13' then call define
396 ! ('charcase','style','STYLE=[BACKGROUND=CXcd047c JUST=CENTER]');
397 if charcase='14' then call define
397 ! ('charcase','style','STYLE=[BACKGROUND=CXcd04e0 JUST=CENTER]');
398 if charcase='15' then call define
398 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0544 JUST=CENTER]');
399 if charcase='16' then call define
399 ! ('charcase','style','STYLE=[BACKGROUND=CXcd05a8 JUST=CENTER]');
400 if charcase='17' then call define
400 ! ('charcase','style','STYLE=[BACKGROUND=CXcd060c JUST=CENTER]');
401 if charcase='18' then call define
401 ! ('charcase','style','STYLE=[BACKGROUND=CXcd0670 JUST=CENTER]');
402 if charcase='19' then call define
402 ! ('charcase','style','STYLE=[BACKGROUND=CXcd06d4 JUST=CENTER]');
403 if charcase='20' then call define
403 ! ('charcase','style','STYLE=[BACKGROUND=CXffffcc JUST=CENTER]');
404 if charcase='21' then call define
404 ! ('charcase','style','STYLE=[BACKGROUND=CX398C54 JUST=CENTER]');
405 if charcase='22' then call define
405 ! ('charcase','style','STYLE=[BACKGROUND=CX398d1c JUST=CENTER]');
406 if charcase='23' then call define
406 ! ('charcase','style','STYLE=[BACKGROUND=CX398d80 JUST=CENTER]');
407 if charcase='24' then call define
407 ! ('charcase','style','STYLE=[BACKGROUND=CX398de4 JUST=CENTER]');
408 if charcase='25' then call define
408 ! ('charcase','style','STYLE=[BACKGROUND=CX398e48 JUST=CENTER]');
409 if charcase='26' then call define
409 ! ('charcase','style','STYLE=[BACKGROUND=CX398eac JUST=CENTER]');
410 if charcase='27' then call define
410 ! ('charcase','style','STYLE=[BACKGROUND=CX398f10 JUST=CENTER]');
411 if charcase='28' then call define
411 ! ('charcase','style','STYLE=[BACKGROUND=CX398f74 JUST=CENTER]');
13 The SAS System 09:41 Wednesday, October 21, 2009
412 if charcase='29' then call define
412 ! ('charcase','style','STYLE=[BACKGROUND=CX398fd8 JUST=CENTER]');
413 if charcase='30' then call define
413 ! ('charcase','style','STYLE=[BACKGROUND=CX39903c JUST=CENTER]');
414 if charcase='31' then call define
414 ! ('charcase','style','STYLE=[BACKGROUND=CX3990a0 JUST=CENTER]');
415 if charcase='32' then call define
415 ! ('charcase','style','STYLE=[BACKGROUND=CX399104 JUST=CENTER]');
416 if charcase='33' then call define
416 ! ('charcase','style','STYLE=[BACKGROUND=CX399168 JUST=CENTER]');
417 if charcase='34' then call define
417 ! ('charcase','style','STYLE=[BACKGROUND=CX3991cc JUST=CENTER]');
418 if charcase='35' then call define
418 ! ('charcase','style','STYLE=[BACKGROUND=CX399230 JUST=CENTER]');
419 if charcase='36' then call define
419 ! ('charcase','style','STYLE=[BACKGROUND=CX399294 JUST=CENTER]');
420 if charcase='37' then call define
420 ! ('charcase','style','STYLE=[BACKGROUND=CX3992f8 JUST=CENTER]');
421 if charcase='38' then call define
421 ! ('charcase','style','STYLE=[BACKGROUND=CX39935c JUST=CENTER]');
422 if charcase='39' then call define
422 ! ('charcase','style','STYLE=[BACKGROUND=CXffcccc JUST=CENTER]');
423 if charcase='40' then call define
423 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd30 JUST=CENTER]');
424 if charcase='41' then call define
424 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd94 JUST=CENTER]');
425 if charcase='42' then call define
425 ! ('charcase','style','STYLE=[BACKGROUND=CXffcdf8 JUST=CENTER]');
426 if charcase='43' then call define
426 ! ('charcase','style','STYLE=[BACKGROUND=CXffce5c JUST=CENTER]');
427 if charcase='44' then call define
427 ! ('charcase','style','STYLE=[BACKGROUND=CXffcec0 JUST=CENTER]');
428 if charcase='45' then call define
428 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf24 JUST=CENTER]');
429 if charcase='46' then call define
429 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf88 JUST=CENTER]');
430 if charcase='47' then call define
430 ! ('charcase','style','STYLE=[BACKGROUND=CXffcfec JUST=CENTER]');
431 if charcase='48' then call define
431 ! ('charcase','style','STYLE=[BACKGROUND=CXffd050 JUST=CENTER]');
432 if charcase='49' then call define
432 ! ('charcase','style','STYLE=[BACKGROUND=CXffd0b4 JUST=CENTER]');
433 if charcase='50' then call define
433 ! ('charcase','style','STYLE=[BACKGROUND=CXffd118 JUST=CENTER]');
434 if charcase='51' then call define
434 ! ('charcase','style','STYLE=[BACKGROUND=CXffd17c JUST=CENTER]');
435 if charcase='52' then call define
435 ! ('charcase','style','STYLE=[BACKGROUND=CXffd1e0 JUST=CENTER]');
436 if charcase='53' then call define
436 ! ('charcase','style','STYLE=[BACKGROUND=CXffd244 JUST=CENTER]');
437 if charcase='54' then call define
437 ! ('charcase','style','STYLE=[BACKGROUND=CXffd2a8 JUST=CENTER]');
438 if charcase='55' then call define
14 The SAS System 09:41 Wednesday, October 21, 2009
438 ! ('charcase','style','STYLE=[BACKGROUND=CXffd30c JUST=CENTER]');
439 if charcase='56' then call define
439 ! ('charcase','style','STYLE=[BACKGROUND=CXffd370 JUST=CENTER]');
440 if charcase='57' then call define
440 ! ('charcase','style','STYLE=[BACKGROUND=CXffd3d4 JUST=CENTER]');
441 if charcase='58' then call define
441 ! ('charcase','style','STYLE=[BACKGROUND=CXccccff JUST=CENTER]');
442 if charcase='59' then call define
442 ! ('charcase','style','STYLE=[BACKGROUND=CXcccd63 JUST=CENTER]');
443 if charcase='60' then call define
443 ! ('charcase','style','STYLE=[BACKGROUND=CXcccdc7 JUST=CENTER]');
444 if charcase='61' then call define
444 ! ('charcase','style','STYLE=[BACKGROUND=CXccce2b JUST=CENTER]');
445 if charcase='62' then call define
445 ! ('charcase','style','STYLE=[BACKGROUND=CXccce8f JUST=CENTER]');
446 if charcase='63' then call define
446 ! ('charcase','style','STYLE=[BACKGROUND=CXcccef3 JUST=CENTER]');
447 if charcase='64' then call define
447 ! ('charcase','style','STYLE=[BACKGROUND=CXcccf57 JUST=CENTER]');
448 if charcase='65' then call define
448 ! ('charcase','style','STYLE=[BACKGROUND=CXcccfbb JUST=CENTER]');
449 if charcase='66' then call define
449 ! ('charcase','style','STYLE=[BACKGROUND=CXccd01f JUST=CENTER]');
450 if charcase='67' then call define
450 ! ('charcase','style','STYLE=[BACKGROUND=CXccd083 JUST=CENTER]');
451 if charcase='68' then call define
451 ! ('charcase','style','STYLE=[BACKGROUND=CXccd0e7 JUST=CENTER]');
452 if charcase='69' then call define
452 ! ('charcase','style','STYLE=[BACKGROUND=CXccd14b JUST=CENTER]');
453 if charcase='70' then call define
453 ! ('charcase','style','STYLE=[BACKGROUND=CXccd1af JUST=CENTER]');
454 if charcase='71' then call define
454 ! ('charcase','style','STYLE=[BACKGROUND=CXccd213 JUST=CENTER]');
455 if charcase='72' then call define
455 ! ('charcase','style','STYLE=[BACKGROUND=CXccd277 JUST=CENTER]');
456 if charcase='73' then call define
456 ! ('charcase','style','STYLE=[BACKGROUND=CXccd2db JUST=CENTER]');
457 if charcase='74' then call define
457 ! ('charcase','style','STYLE=[BACKGROUND=CXccd33f JUST=CENTER]');
458 if charcase='75' then call define
458 ! ('charcase','style','STYLE=[BACKGROUND=CXccd3a3 JUST=CENTER]');
459 if charcase='76' then call define
459 ! ('charcase','style','STYLE=[BACKGROUND=CXccd407 JUST=CENTER]');
460 if charcase='77' then call define
460 ! ('charcase','style','STYLE=[BACKGROUND=CX99ccff JUST=CENTER]');
461 if charcase='78' then call define
461 ! ('charcase','style','STYLE=[BACKGROUND=CX99cd63 JUST=CENTER]');
462 if charcase='79' then call define
462 ! ('charcase','style','STYLE=[BACKGROUND=CX99cdc7 JUST=CENTER]');
463 if charcase='80' then call define
463 ! ('charcase','style','STYLE=[BACKGROUND=CX99ce2b JUST=CENTER]');
464 if charcase='81' then call define
464 ! ('charcase','style','STYLE=[BACKGROUND=CX99ce8f JUST=CENTER]');
15 The SAS System 09:41 Wednesday, October 21, 2009
465 if charcase='82' then call define
465 ! ('charcase','style','STYLE=[BACKGROUND=CX99cef3 JUST=CENTER]');
466 if charcase='83' then call define
466 ! ('charcase','style','STYLE=[BACKGROUND=CX99cf57 JUST=CENTER]');
467 if charcase='84' then call define
467 ! ('charcase','style','STYLE=[BACKGROUND=CX99cfbb JUST=CENTER]');
468 if charcase='85' then call define
468 ! ('charcase','style','STYLE=[BACKGROUND=CX99d01f JUST=CENTER]');
469 if charcase='86' then call define
469 ! ('charcase','style','STYLE=[BACKGROUND=CX99d083 JUST=CENTER]');
470 if charcase='87' then call define
470 ! ('charcase','style','STYLE=[BACKGROUND=CX99d0e7 JUST=CENTER]');
471 if charcase='88' then call define
471 ! ('charcase','style','STYLE=[BACKGROUND=CX99d14b JUST=CENTER]');
472 if charcase='89' then call define
472 ! ('charcase','style','STYLE=[BACKGROUND=CX99d1af JUST=CENTER]');
473 if charcase='90' then call define
473 ! ('charcase','style','STYLE=[BACKGROUND=CX99d213 JUST=CENTER]');
474 if charcase='91' then call define
474 ! ('charcase','style','STYLE=[BACKGROUND=CX99d277 JUST=CENTER]');
475 if charcase='92' then call define
475 ! ('charcase','style','STYLE=[BACKGROUND=CX99d2db JUST=CENTER]');
476 if charcase='93' then call define
476 ! ('charcase','style','STYLE=[BACKGROUND=CX99d33f JUST=CENTER]');
477 if charcase='94' then call define
477 ! ('charcase','style','STYLE=[BACKGROUND=CX99d3a3 JUST=CENTER]');
478 if charcase='95' then call define
478 ! ('charcase','style','STYLE=[BACKGROUND=CX99d407 JUST=CENTER]');
479 if charcase='96' then call define
479 ! ('charcase','style','STYLE=[BACKGROUND=CXffcc99 JUST=CENTER]');
480 if charcase='97' then call define
480 ! ('charcase','style','STYLE=[BACKGROUND=CXffccfd JUST=CENTER]');
481 if charcase='98' then call define
481 ! ('charcase','style','STYLE=[BACKGROUND=CXffcd61 JUST=CENTER]');
482 if charcase='99' then call define
482 ! ('charcase','style','STYLE=[BACKGROUND=CXffcdc5 JUST=CENTER]');
483 if charcase='100' then call define
483 ! ('charcase','style','STYLE=[BACKGROUND=CXffce29 JUST=CENTER]');
484 if charcase='101' then call define
484 ! ('charcase','style','STYLE=[BACKGROUND=CXffce8d JUST=CENTER]');
485 if charcase='102' then call define
485 ! ('charcase','style','STYLE=[BACKGROUND=CXffcef1 JUST=CENTER]');
486 if charcase='103' then call define
486 ! ('charcase','style','STYLE=[BACKGROUND=CXffcf55 JUST=CENTER]');
487 if charcase='104' then call define
487 ! ('charcase','style','STYLE=[BACKGROUND=CXffcfb9 JUST=CENTER]');
488 if charcase='105' then call define
488 ! ('charcase','style','STYLE=[BACKGROUND=CXffd01d JUST=CENTER]');
489 if charcase='106' then call define
489 ! ('charcase','style','STYLE=[BACKGROUND=CXffd081 JUST=CENTER]');
490 if charcase='107' then call define
490 ! ('charcase','style','STYLE=[BACKGROUND=CXffd0e5 JUST=CENTER]');
491 if charcase='108' then call define
16 The SAS System 09:41 Wednesday, October 21, 2009
491 ! ('charcase','style','STYLE=[BACKGROUND=CXffd149 JUST=CENTER]');
492 if charcase='109' then call define
492 ! ('charcase','style','STYLE=[BACKGROUND=CXffd1ad JUST=CENTER]');
493 if charcase='110' then call define
493 ! ('charcase','style','STYLE=[BACKGROUND=CXffd211 JUST=CENTER]');
494 if charcase='111' then call define
494 ! ('charcase','style','STYLE=[BACKGROUND=CXffd275 JUST=CENTER]');
495 if charcase='112' then call define
495 ! ('charcase','style','STYLE=[BACKGROUND=CXffd2d9 JUST=CENTER]');
496 if charcase='113' then call define
496 ! ('charcase','style','STYLE=[BACKGROUND=CXffd33d JUST=CENTER]');
497 endcomp;
498
499 compute obs;
500 dobs + 1;
501 obs = dobs;
502 endcompute;
503 run;
NOTE: There were 16 observations read from the data set WORK.CE.
NOTE: PROCEDURE REPORT used (Total process time):
real time 0.14 seconds
cpu time 0.04 seconds
504 run;
505 ods html close;
506 ods listing;
NOTE: PROCEDURE DISPLAY used (Total process time):
real time 3.23 seconds
cpu time 2.67 seconds
NOTE: SAS Institute Inc., SAS Campus Drive, Cary, NC USA 27513-2414
NOTE: The SAS System used:
real time 3.96 seconds
cpu time 3.39 seconds