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