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