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.64 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:     cdisc108.sas                                     *
3          * Description: Case #108. TE End Element For TE domains, this identifies records that
3        ! violate the condition*
4          *              [Rule for End of Element is not null or Planned Duration of Element is
4        ! not null].*
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.te(label="Demographics");
12         attrib STUDYID   label="Study Identifier" length=$100;
13         attrib DOMAIN  	 label="Domain Abbreviation" length=$100;
14         attrib ETCD      label="Element Code" length=$100;
15         attrib ELEMENT   label="Description of Element" length=$100;
16         attrib TESTRL   label="Rule for Start of Element" length=$100;
17         attrib TEENRL   label="Rule for End of Element" length=$100;
18         attrib TEDUR  	 label="Study Site Identifier" length=$100;
19         
20         STUDYID ='test';
21         DOMAIN='test';ETCD='test';  ELEMENT  ='test';TESTRL  ='test';TEENRL  ='test';TEDUR
21       ! ='';
22         ;
23         output;
24         STUDYID ='test';
25         DOMAIN='test';ETCD='test';  ELEMENT  ='test';TESTRL  ='test';TEENRL  ='';TEDUR
2                                        The SAS System         09:51 Wednesday, October 21, 2009

25       ! ='test';
26         output;
27         STUDYID ='test';
28         DOMAIN='test';ETCD='test';  ELEMENT  ='test';TESTRL  ='test';TEENRL  ='';TEDUR  ='';
29         ;
30         output;
31         STUDYID ='test';
32         DOMAIN='test';ETCD='test';  ELEMENT  ='test';TESTRL  ='test';TEENRL  ='test';TEDUR
32       ! ='test';
33         output;
34         STUDYID ='test';
35         DOMAIN='test';ETCD='test';  ELEMENT  ='test';TESTRL  ='test';TEENRL  ='test';TEDUR
35       ! ='';
36         ;
37         output;
38         STUDYID ='test';
39         DOMAIN='test';ETCD='test';  ELEMENT  ='test';TESTRL  ='test';TEENRL  ='';TEDUR  ='';
40         output;
41         run;

NOTE: The data set TEMPLIB.TE has 6 observations and 7 variables.
NOTE: DATA statement used (Total process time):
      real time           0.04 seconds
      cpu time            0.04 seconds
      

42         %cdisc(datlib=templib,datname=te);

43                              data misobs(keep=obsnum);
44                                 retain obsnum 0;
45                                 set templib.te(keep=STUDYID);
46                                 obsnum=obsnum+1;
47                                 if missing(STUDYID) then
48                                    output;
49                              run;

NOTE: There were 6 observations read from the data set TEMPLIB.TE.
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
      

50                              data misobs(keep=obsnum);
51                                 retain obsnum 0;
52                                 set templib.te(keep=DOMAIN);
53                                 obsnum=obsnum+1;
54                                 if missing(DOMAIN) then
55                                    output;
56                              run;

NOTE: There were 6 observations read from the data set TEMPLIB.TE.
NOTE: The data set WORK.MISOBS has 0 observations and 1 variables.
3                                        The SAS System         09:51 Wednesday, October 21, 2009

NOTE: DATA statement used (Total process time):
      real time           0.01 seconds
      cpu time            0.01 seconds
      

57                              data misobs(keep=obsnum);
58                                 retain obsnum 0;
59                                 set templib.te(keep=ETCD);
60                                 obsnum=obsnum+1;
61                                 if missing(ETCD) then
62                                    output;
63                              run;

NOTE: There were 6 observations read from the data set TEMPLIB.TE.
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
      

64                              data misobs(keep=obsnum);
65                                 retain obsnum 0;
66                                 set templib.te(keep=ELEMENT);
67                                 obsnum=obsnum+1;
68                                 if missing(ELEMENT) then
69                                    output;
70                              run;

NOTE: There were 6 observations read from the data set TEMPLIB.TE.
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
      

71                              data misobs(keep=obsnum);
72                                 retain obsnum 0;
73                                 set templib.te(keep=TESTRL);
74                                 obsnum=obsnum+1;
75                                 if missing(TESTRL) then
76                                    output;
77                              run;

NOTE: There were 6 observations read from the data set TEMPLIB.TE.
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
      

78         data _39;
79         retain obsnum 0;
80         set templib.te(keep=TEDUR);
4                                        The SAS System         09:51 Wednesday, October 21, 2009

81         obsnum = obsnum + 1;
82         if compress(TEDUR) ne '' then if substr(TEDUR,1,1)='-' then output;
83         run;

NOTE: There were 6 observations read from the data set TEMPLIB.TE.
NOTE: The data set WORK._39 has 0 observations and 2 variables.
NOTE: DATA statement used (Total process time):
      real time           0.01 seconds
      cpu time            0.01 seconds
      

84         proc sort data=templib.te out=te nodupkey;
85         by ETCD;
86         run;

NOTE: There were 6 observations read from the data set TEMPLIB.TE.
NOTE: 5 observations with duplicate key values were deleted.
NOTE: The data set WORK.TE has 1 observations and 7 variables.
NOTE: PROCEDURE SORT used (Total process time):
      real time           0.04 seconds
      cpu time            0.04 seconds
      

87         proc sort data=templib.TE out=te nodupkey;
88         by ETCD;
89         run;

NOTE: There were 6 observations read from the data set TEMPLIB.TE.
NOTE: 5 observations with duplicate key values were deleted.
NOTE: The data set WORK.TE has 1 observations and 7 variables.
NOTE: PROCEDURE SORT used (Total process time):
      real time           0.03 seconds
      cpu time            0.03 seconds
      

NOTE: Table WORK._75 created, with 0 rows and 1 columns.

90         data _108;
91         retain obsnum 0;
92         set templib.te;
93         obsnum = obsnum + 1;
94         if TEENRL='' AND TEDUR='' then do;
95         output;
96         end;
97         run;

NOTE: There were 6 observations read from the data set TEMPLIB.TE.
NOTE: The data set WORK._108 has 2 observations and 8 variables.
NOTE: DATA statement used (Total process time):
      real time           0.01 seconds
      cpu time            0.01 seconds
      

5                                        The SAS System         09:51 Wednesday, October 21, 2009

98                  proc sort data=cdisc nodupkey;
99                     by libname datname datlab variable length label type case comment;
100                 run;

NOTE: There were 6 observations read from the data set WORK.CDISC.
NOTE: 0 observations with duplicate key values were deleted.
NOTE: The data set WORK.CDISC has 6 observations and 11 variables.
NOTE: PROCEDURE SORT used (Total process time):
      real time           0.04 seconds
      cpu time            0.04 seconds
      

101              proc sort data = work.cdisc;
102                 by libname datname datlab variable case;
103              run;

NOTE: There were 6 observations read from the data set WORK.CDISC.
NOTE: The data set WORK.CDISC has 6 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' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#1">1</a>'
109                 '2' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#2">2</a>'
110                 '3' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#3">3</a>'
111                 '4' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#4">4</a>'
112                 '5' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#5">5</a>'
113                 '6' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#6">6</a>'
114                 '7' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#7">7</a>'
115                 '8' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#8">8</a>'
116                 '9' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#9">9</a>'
117                 '10' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#10">10</a>'
118                 '11' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#11">11</a>'
119                 '12' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#12">12</a>'
120                 '13' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#13">13</a>'
121                 '14' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#14">14</a>'
122                 '15' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#15">15</a>'
123                 '16' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#16">16</a>'
124                 '17' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#17">17</a>'
125                 '18' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#18">18</a>'
126                 '19' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#19">19</a>'
127                 '20' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#20">20</a>'
128                 '21' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#21">21</a>'
129                 '22' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#22">22</a>'
130                 '23' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#23">23</a>'
131                 '24' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#24">24</a>'
132                 '25' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#25">25</a>'
133                 '26' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#26">26</a>'
6                                        The SAS System         09:51 Wednesday, October 21, 2009

134                 '27' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#27">27</a>'
135                 '28' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#28">28</a>'
136                 '29' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#29">29</a>'
137                 '30' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#30">30</a>'
138                 '31' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#31">31</a>'
139                 '32' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#32">32</a>'
140                 '33' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#33">33</a>'
141                 '34' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#34">34</a>'
142                 '35' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#35">35</a>'
143                 '36' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#36">36</a>'
144                 '37' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#37">37</a>'
145                 '38' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#38">38</a>'
146                 '39' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#39">39</a>'
147                 '40' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#40">40</a>'
148                 '41' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#41">41</a>'
149                 '42' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#42">42</a>'
150                 '43' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#43">43</a>'
151                 '44' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#44">44</a>'
152                 '45' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#45">45</a>'
153                 '46' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#46">46</a>'
154                 '47' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#47">47</a>'
155                 '48' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#48">48</a>'
156                 '49' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#49">49</a>'
157                 '50' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#50">50</a>'
158                 '51' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#51">51</a>'
159                 '52' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#52">52</a>'
160                 '53' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#53">53</a>'
161                 '54' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#54">54</a>'
162                 '55' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#55">55</a>'
163                 '56' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#56">56</a>'
164                 '57' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#57">57</a>'
165                 '58' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#58">58</a>'
166                 '59' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#59">59</a>'
167                 '60' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#60">60</a>'
168                 '61' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#61">61</a>'
169                 '62' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#62">62</a>'
170                 '63' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#63">63</a>'
171                 '64' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#64">64</a>'
172                 '65' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#65">65</a>'
173                 '66' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#66">66</a>'
174                 '67' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#67">67</a>'
175                 '68' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#68">68</a>'
176                 '69' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#69">69</a>'
177                 '70' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#70">70</a>'
178                 '71' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#71">71</a>'
179                 '72' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#72">72</a>'
180                 '73' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#73">73</a>'
181                 '74' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#74">74</a>'
182                 '75' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#75">75</a>'
183                 '76' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#76">76</a>'
184                 '77' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#77">77</a>'
185                 '78' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#78">78</a>'
186                 '79' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#79">79</a>'
7                                        The SAS System         09:51 Wednesday, October 21, 2009

187                 '80' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#80">80</a>'
188                 '81' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#81">81</a>'
189                 '82' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#82">82</a>'
190                 '83' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#83">83</a>'
191                 '84' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#84">84</a>'
192                 '85' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#85">85</a>'
193                 '86' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#86">86</a>'
194                 '87' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#87">87</a>'
195                 '88' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#88">88</a>'
196                 '89' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#89">89</a>'
197                 '90' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#90">90</a>'
198                 '91' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#91">91</a>'
199                 '92' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#92">92</a>'
200                 '93' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#93">93</a>'
201                 '94' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#94">94</a>'
202                 '95' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#95">95</a>'
203                 '96' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#96">96</a>'
204                 '97' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#97">97</a>'
205                 '98' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#98">98</a>'
206                 '99' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#99">99</a>'
207                 '100' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#100">100</a>'
208                 '101' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#101">101</a>'
209                 '102' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#102">102</a>'
210                 '103' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#103">103</a>'
211                 '104' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#104">104</a>'
212                 '105' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#105">105</a>'
213                 '106' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#106">106</a>'
214                 '107' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#107">107</a>'
215                 '108' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#108">108</a>'
216                 '109' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#109">109</a>'
217                 '110' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#110">110</a>'
218                 '111' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#111">111</a>'
219                 '112' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#112">112</a>'
220                 '113' = '<a href="http://meta-x.com/cdiscbuilder/cdisc.html#113">113</a>';
NOTE: Format $CASEFMT has been output.
221        
222        
223        
224                 *** Generate the format for the bookmark of variables ***;
225                 value $bookfmt
226                 "te.studyid" = '<a name="te.studyid">te.studyid</a>'
227                 "te.domain" = '<a name="te.domain">te.domain</a>'
228                 "te.etcd" = '<a name="te.etcd">te.etcd</a>'
229                 "te.element" = '<a name="te.element">te.element</a>'
230                 "te.testrl" = '<a name="te.testrl">te.testrl</a>'
231                 "te.teenrl" = '<a name="te.teenrl">te.teenrl</a>'
232                 "te.tedur" = '<a name="te.tedur">te.tedur</a>'
233                 ;
NOTE: Format $BOOKFMT has been output.
234        
235                 *** Generate the format for dataset linking ***;
236                 value $datfmt
237                 "ae" = '<a name="ae">ae</a><br>'
8                                        The SAS System         09:51 Wednesday, October 21, 2009

238                 "ae3a" = '<a name="ae3a">ae3a</a><br>'
239                 "cdisc10" = '<a name="cdisc10">cdisc10</a><br>'
240                 "cdisc11" = '<a name="cdisc11">cdisc11</a><br>'
241                 "cdisc14" = '<a name="cdisc14">cdisc14</a><br>'
242                 "cdisc15" = '<a name="cdisc15">cdisc15</a><br>'
243                 "cdisc18" = '<a name="cdisc18">cdisc18</a><br>'
244                 "cdisc2" = '<a name="cdisc2">cdisc2</a><br>'
245                 "cdisc21" = '<a name="cdisc21">cdisc21</a><br>'
246                 "cdisc2b_1" = '<a name="cdisc2b_1">cdisc2b_1</a><br>'
247                 "cdisc2b_2" = '<a name="cdisc2b_2">cdisc2b_2</a><br>'
248                 "cdisc2b_3" = '<a name="cdisc2b_3">cdisc2b_3</a><br>'
249                 "cdisc2_b" = '<a name="cdisc2_b">cdisc2_b</a><br>'
250                 "cdisc2_c" = '<a name="cdisc2_c">cdisc2_c</a><br>'
251                 "cdisc4" = '<a name="cdisc4">cdisc4</a><br>'
252                 "cdisc5" = '<a name="cdisc5">cdisc5</a><br>'
253                 "cdisc6" = '<a name="cdisc6">cdisc6</a><br>'
254                 "cdisc7" = '<a name="cdisc7">cdisc7</a><br>'
255                 "cdisc8" = '<a name="cdisc8">cdisc8</a><br>'
256                 "cdisc9" = '<a name="cdisc9">cdisc9</a><br>'
257                 "ce" = '<a name="ce">ce</a><br>'
258                 "cm" = '<a name="cm">cm</a><br>'
259                 "co" = '<a name="co">co</a><br>'
260                 "da" = '<a name="da">da</a><br>'
261                 "dm" = '<a name="dm">dm</a><br>'
262                 "ds" = '<a name="ds">ds</a><br>'
263                 "dv" = '<a name="dv">dv</a><br>'
264                 "eg" = '<a name="eg">eg</a><br>'
265                 "ex" = '<a name="ex">ex</a><br>'
266                 "fa" = '<a name="fa">fa</a><br>'
267                 "ie" = '<a name="ie">ie</a><br>'
268                 "lb" = '<a name="lb">lb</a><br>'
269                 "mb" = '<a name="mb">mb</a><br>'
270                 "mh" = '<a name="mh">mh</a><br>'
271                 "ms" = '<a name="ms">ms</a><br>'
272                 "notdm" = '<a name="notdm">notdm</a><br>'
273                 "pc" = '<a name="pc">pc</a><br>'
274                 "pe" = '<a name="pe">pe</a><br>'
275                 "pp" = '<a name="pp">pp</a><br>'
276                 "qs" = '<a name="qs">qs</a><br>'
277                 "relrec" = '<a name="relrec">relrec</a><br>'
278                 "sc" = '<a name="sc">sc</a><br>'
279                 "se" = '<a name="se">se</a><br>'
280                 "su" = '<a name="su">su</a><br>'
281                 "supmh" = '<a name="supmh">supmh</a><br>'
282                 "suppae" = '<a name="suppae">suppae</a><br>'
283                 "suppp" = '<a name="suppp">suppp</a><br>'
284                 "supte" = '<a name="supte">supte</a><br>'
285                 "supvs" = '<a name="supvs">supvs</a><br>'
286                 "sv" = '<a name="sv">sv</a><br>'
287                 "ta" = '<a name="ta">ta</a><br>'
288                 "te" = '<a name="te">te</a><br>'
289                 "ti" = '<a name="ti">ti</a><br>'
290                 "ts" = '<a name="ts">ts</a><br>'
9                                        The SAS System         09:51 Wednesday, October 21, 2009

291                 "tv" = '<a name="tv">tv</a><br>'
292                 "vs" = '<a name="vs">vs</a><br>'
293                 ;
NOTE: Format $DATFMT has been output.
294              run;

NOTE: PROCEDURE FORMAT used (Total process time):
      real time           0.18 seconds
      cpu time            0.04 seconds
      

295        
296              data work.cdisc;
297                 set work.cdisc;
298                 by libname datname datlab variable case;
299        
300                 attrib datvar label="Dataset and Variable" length=$100 format=$bookfmt.;
301                 if variable ne '' then
302                 datvar = compress(lowcase(datname) || "." || lowcase(variable));
303                 else datvar = lowcase(datname);
304                 /*format case casefmt.;*/
305                 attrib charcase label = "Case Number" length = $10;
306                 charcase = trim(left(put(case, best.)));
307                 format charcase $casefmt.;
308                 *format datname $datfmt.;
309              run;

NOTE: There were 6 observations read from the data set WORK.CDISC.
NOTE: The data set WORK.CDISC has 6 observations and 13 variables.
NOTE: DATA statement used (Total process time):
      real time           0.04 seconds
      cpu time            0.04 seconds
      

310        
311              *** Remove The Special Characters ******;
312              proc template;
313                 define style styles.test/store=work.test;
314                 parent=styles.default;
315                 style byline from titlesandfooters /
316                    protectspecialchars=off;
317                 end;
NOTE: STYLE 'Styles.Test' has been saved to: WORK.TEST
318              run;
NOTE: PROCEDURE TEMPLATE used (Total process time):
      real time           0.10 seconds
      cpu time            0.03 seconds
      

319        
320              proc sort data = work.cdisc;
321                 by libname datname datlab variable case;
322              run;
10                                       The SAS System         09:51 Wednesday, October 21, 2009


NOTE: There were 6 observations read from the data set WORK.CDISC.
NOTE: The data set WORK.CDISC has 6 observations and 13 variables.
NOTE: PROCEDURE SORT used (Total process time):
      real time           0.03 seconds
      cpu time            0.03 seconds
      

323        
324              ods listing close;
325              ods html file='cdisc108.html' style=styles.mxistyle;
NOTE: Writing HTML Body file: cdisc108.html
326              data work.te (drop=usrname datetime);
327                 set work.cdisc;
328                 where lowcase(datname)=lowcase("te");
329              run;

NOTE: There were 6 observations read from the data set WORK.CDISC.
      WHERE LOWCASE(datname)='te';
NOTE: The data set WORK.TE has 6 observations and 11 variables.
NOTE: DATA statement used (Total process time):
      real time           0.03 seconds
      cpu time            0.01 seconds
      

330                       data te(drop=xxx);
331                          set te;
332                          retain xxx 0;
333                          if xxx = 2 then xxx = 1;
334                          else xxx = xxx + 1;
335                          yyy = compress(put(xxx,best.));
336                       run;

NOTE: There were 6 observations read from the data set WORK.TE.
NOTE: The data set WORK.TE has 6 observations and 12 variables.
NOTE: DATA statement used (Total process time):
      real time           0.03 seconds
      cpu time            0.03 seconds
      

337        
338              %let newlab = %nrbquote(Demographics);
339              title1 height=2 '<a name="te"> Findings from CDISC Evaluation</a>';
340              title2 height=2 "Data Table Name = te Data Table Label=&newlab";
341              footnote1 height=2 "Generated on: 10/21/2009,  9:51:44 am, Administrator";
342              footnote2 height=2 "Located at: C:\apache\htdocs\cdiscbuilder\data";
343               proc report data = work.te nowindows;
344                    column obs libname datvar label type length charcase comment yyy;
345                       define obs/computed 'Obs';
346                       define libname/width=20;
347                       define datvar/width=50;
348                       define label/width=50;
349                       define type/width=20;
11                                       The SAS System         09:51 Wednesday, October 21, 2009

350                       define length/width=50;
351                       define comment/width=50;
352                       define charcase/width=50;
353                       define yyy/ noprint;
354        
355                    compute yyy;
356                       if yyy = "2" then do;
357                          call define (_row_,'style','STYLE=[BACKGROUND=cxFFFFCC]');
358                       end;
359                    endcompute;
360        
361                    compute charcase;
362                       if charcase='1' then call define
362      ! ('charcase','style','STYLE=[BACKGROUND=CXccffcc JUST=CENTER]');
363                       if charcase='2' then call define
363      ! ('charcase','style','STYLE=[BACKGROUND=CXcd0030 JUST=CENTER]');
364                       if charcase='3' then call define
364      ! ('charcase','style','STYLE=[BACKGROUND=CXcd0094 JUST=CENTER]');
365                       if charcase='4' then call define
365      ! ('charcase','style','STYLE=[BACKGROUND=CXcd00f8 JUST=CENTER]');
366                       if charcase='5' then call define
366      ! ('charcase','style','STYLE=[BACKGROUND=CXcd015c JUST=CENTER]');
367                       if charcase='6' then call define
367      ! ('charcase','style','STYLE=[BACKGROUND=CXcd01c0 JUST=CENTER]');
368                       if charcase='7' then call define
368      ! ('charcase','style','STYLE=[BACKGROUND=CXcd0224 JUST=CENTER]');
369                       if charcase='8' then call define
369      ! ('charcase','style','STYLE=[BACKGROUND=CXcd0288 JUST=CENTER]');
370                       if charcase='9' then call define
370      ! ('charcase','style','STYLE=[BACKGROUND=CXcd02ec JUST=CENTER]');
371                       if charcase='10' then call define
371      ! ('charcase','style','STYLE=[BACKGROUND=CXcd0350 JUST=CENTER]');
372                       if charcase='11' then call define
372      ! ('charcase','style','STYLE=[BACKGROUND=CXcd03b4 JUST=CENTER]');
373                       if charcase='12' then call define
373      ! ('charcase','style','STYLE=[BACKGROUND=CXcd0418 JUST=CENTER]');
374                       if charcase='13' then call define
374      ! ('charcase','style','STYLE=[BACKGROUND=CXcd047c JUST=CENTER]');
375                       if charcase='14' then call define
375      ! ('charcase','style','STYLE=[BACKGROUND=CXcd04e0 JUST=CENTER]');
376                       if charcase='15' then call define
376      ! ('charcase','style','STYLE=[BACKGROUND=CXcd0544 JUST=CENTER]');
377                       if charcase='16' then call define
377      ! ('charcase','style','STYLE=[BACKGROUND=CXcd05a8 JUST=CENTER]');
378                       if charcase='17' then call define
378      ! ('charcase','style','STYLE=[BACKGROUND=CXcd060c JUST=CENTER]');
379                       if charcase='18' then call define
379      ! ('charcase','style','STYLE=[BACKGROUND=CXcd0670 JUST=CENTER]');
380                       if charcase='19' then call define
380      ! ('charcase','style','STYLE=[BACKGROUND=CXcd06d4 JUST=CENTER]');
381                       if charcase='20' then call define
381      ! ('charcase','style','STYLE=[BACKGROUND=CXffffcc JUST=CENTER]');
382                       if charcase='21' then call define
12                                       The SAS System         09:51 Wednesday, October 21, 2009

382      ! ('charcase','style','STYLE=[BACKGROUND=CX398C54 JUST=CENTER]');
383                       if charcase='22' then call define
383      ! ('charcase','style','STYLE=[BACKGROUND=CX398d1c JUST=CENTER]');
384                       if charcase='23' then call define
384      ! ('charcase','style','STYLE=[BACKGROUND=CX398d80 JUST=CENTER]');
385                       if charcase='24' then call define
385      ! ('charcase','style','STYLE=[BACKGROUND=CX398de4 JUST=CENTER]');
386                       if charcase='25' then call define
386      ! ('charcase','style','STYLE=[BACKGROUND=CX398e48 JUST=CENTER]');
387                       if charcase='26' then call define
387      ! ('charcase','style','STYLE=[BACKGROUND=CX398eac JUST=CENTER]');
388                       if charcase='27' then call define
388      ! ('charcase','style','STYLE=[BACKGROUND=CX398f10 JUST=CENTER]');
389                       if charcase='28' then call define
389      ! ('charcase','style','STYLE=[BACKGROUND=CX398f74 JUST=CENTER]');
390                       if charcase='29' then call define
390      ! ('charcase','style','STYLE=[BACKGROUND=CX398fd8 JUST=CENTER]');
391                       if charcase='30' then call define
391      ! ('charcase','style','STYLE=[BACKGROUND=CX39903c JUST=CENTER]');
392                       if charcase='31' then call define
392      ! ('charcase','style','STYLE=[BACKGROUND=CX3990a0 JUST=CENTER]');
393                       if charcase='32' then call define
393      ! ('charcase','style','STYLE=[BACKGROUND=CX399104 JUST=CENTER]');
394                       if charcase='33' then call define
394      ! ('charcase','style','STYLE=[BACKGROUND=CX399168 JUST=CENTER]');
395                       if charcase='34' then call define
395      ! ('charcase','style','STYLE=[BACKGROUND=CX3991cc JUST=CENTER]');
396                       if charcase='35' then call define
396      ! ('charcase','style','STYLE=[BACKGROUND=CX399230 JUST=CENTER]');
397                       if charcase='36' then call define
397      ! ('charcase','style','STYLE=[BACKGROUND=CX399294 JUST=CENTER]');
398                       if charcase='37' then call define
398      ! ('charcase','style','STYLE=[BACKGROUND=CX3992f8 JUST=CENTER]');
399                       if charcase='38' then call define
399      ! ('charcase','style','STYLE=[BACKGROUND=CX39935c JUST=CENTER]');
400                       if charcase='39' then call define
400      ! ('charcase','style','STYLE=[BACKGROUND=CXffcccc JUST=CENTER]');
401                       if charcase='40' then call define
401      ! ('charcase','style','STYLE=[BACKGROUND=CXffcd30 JUST=CENTER]');
402                       if charcase='41' then call define
402      ! ('charcase','style','STYLE=[BACKGROUND=CXffcd94 JUST=CENTER]');
403                       if charcase='42' then call define
403      ! ('charcase','style','STYLE=[BACKGROUND=CXffcdf8 JUST=CENTER]');
404                       if charcase='43' then call define
404      ! ('charcase','style','STYLE=[BACKGROUND=CXffce5c JUST=CENTER]');
405                       if charcase='44' then call define
405      ! ('charcase','style','STYLE=[BACKGROUND=CXffcec0 JUST=CENTER]');
406                       if charcase='45' then call define
406      ! ('charcase','style','STYLE=[BACKGROUND=CXffcf24 JUST=CENTER]');
407                       if charcase='46' then call define
407      ! ('charcase','style','STYLE=[BACKGROUND=CXffcf88 JUST=CENTER]');
408                       if charcase='47' then call define
408      ! ('charcase','style','STYLE=[BACKGROUND=CXffcfec JUST=CENTER]');
13                                       The SAS System         09:51 Wednesday, October 21, 2009

409                       if charcase='48' then call define
409      ! ('charcase','style','STYLE=[BACKGROUND=CXffd050 JUST=CENTER]');
410                       if charcase='49' then call define
410      ! ('charcase','style','STYLE=[BACKGROUND=CXffd0b4 JUST=CENTER]');
411                       if charcase='50' then call define
411      ! ('charcase','style','STYLE=[BACKGROUND=CXffd118 JUST=CENTER]');
412                       if charcase='51' then call define
412      ! ('charcase','style','STYLE=[BACKGROUND=CXffd17c JUST=CENTER]');
413                       if charcase='52' then call define
413      ! ('charcase','style','STYLE=[BACKGROUND=CXffd1e0 JUST=CENTER]');
414                       if charcase='53' then call define
414      ! ('charcase','style','STYLE=[BACKGROUND=CXffd244 JUST=CENTER]');
415                       if charcase='54' then call define
415      ! ('charcase','style','STYLE=[BACKGROUND=CXffd2a8 JUST=CENTER]');
416                       if charcase='55' then call define
416      ! ('charcase','style','STYLE=[BACKGROUND=CXffd30c JUST=CENTER]');
417                       if charcase='56' then call define
417      ! ('charcase','style','STYLE=[BACKGROUND=CXffd370 JUST=CENTER]');
418                       if charcase='57' then call define
418      ! ('charcase','style','STYLE=[BACKGROUND=CXffd3d4 JUST=CENTER]');
419                       if charcase='58' then call define
419      ! ('charcase','style','STYLE=[BACKGROUND=CXccccff JUST=CENTER]');
420                       if charcase='59' then call define
420      ! ('charcase','style','STYLE=[BACKGROUND=CXcccd63 JUST=CENTER]');
421                       if charcase='60' then call define
421      ! ('charcase','style','STYLE=[BACKGROUND=CXcccdc7 JUST=CENTER]');
422                       if charcase='61' then call define
422      ! ('charcase','style','STYLE=[BACKGROUND=CXccce2b JUST=CENTER]');
423                       if charcase='62' then call define
423      ! ('charcase','style','STYLE=[BACKGROUND=CXccce8f JUST=CENTER]');
424                       if charcase='63' then call define
424      ! ('charcase','style','STYLE=[BACKGROUND=CXcccef3 JUST=CENTER]');
425                       if charcase='64' then call define
425      ! ('charcase','style','STYLE=[BACKGROUND=CXcccf57 JUST=CENTER]');
426                       if charcase='65' then call define
426      ! ('charcase','style','STYLE=[BACKGROUND=CXcccfbb JUST=CENTER]');
427                       if charcase='66' then call define
427      ! ('charcase','style','STYLE=[BACKGROUND=CXccd01f JUST=CENTER]');
428                       if charcase='67' then call define
428      ! ('charcase','style','STYLE=[BACKGROUND=CXccd083 JUST=CENTER]');
429                       if charcase='68' then call define
429      ! ('charcase','style','STYLE=[BACKGROUND=CXccd0e7 JUST=CENTER]');
430                       if charcase='69' then call define
430      ! ('charcase','style','STYLE=[BACKGROUND=CXccd14b JUST=CENTER]');
431                       if charcase='70' then call define
431      ! ('charcase','style','STYLE=[BACKGROUND=CXccd1af JUST=CENTER]');
432                       if charcase='71' then call define
432      ! ('charcase','style','STYLE=[BACKGROUND=CXccd213 JUST=CENTER]');
433                       if charcase='72' then call define
433      ! ('charcase','style','STYLE=[BACKGROUND=CXccd277 JUST=CENTER]');
434                       if charcase='73' then call define
434      ! ('charcase','style','STYLE=[BACKGROUND=CXccd2db JUST=CENTER]');
435                       if charcase='74' then call define
14                                       The SAS System         09:51 Wednesday, October 21, 2009

435      ! ('charcase','style','STYLE=[BACKGROUND=CXccd33f JUST=CENTER]');
436                       if charcase='75' then call define
436      ! ('charcase','style','STYLE=[BACKGROUND=CXccd3a3 JUST=CENTER]');
437                       if charcase='76' then call define
437      ! ('charcase','style','STYLE=[BACKGROUND=CXccd407 JUST=CENTER]');
438                       if charcase='77' then call define
438      ! ('charcase','style','STYLE=[BACKGROUND=CX99ccff JUST=CENTER]');
439                       if charcase='78' then call define
439      ! ('charcase','style','STYLE=[BACKGROUND=CX99cd63 JUST=CENTER]');
440                       if charcase='79' then call define
440      ! ('charcase','style','STYLE=[BACKGROUND=CX99cdc7 JUST=CENTER]');
441                       if charcase='80' then call define
441      ! ('charcase','style','STYLE=[BACKGROUND=CX99ce2b JUST=CENTER]');
442                       if charcase='81' then call define
442      ! ('charcase','style','STYLE=[BACKGROUND=CX99ce8f JUST=CENTER]');
443                       if charcase='82' then call define
443      ! ('charcase','style','STYLE=[BACKGROUND=CX99cef3 JUST=CENTER]');
444                       if charcase='83' then call define
444      ! ('charcase','style','STYLE=[BACKGROUND=CX99cf57 JUST=CENTER]');
445                       if charcase='84' then call define
445      ! ('charcase','style','STYLE=[BACKGROUND=CX99cfbb JUST=CENTER]');
446                       if charcase='85' then call define
446      ! ('charcase','style','STYLE=[BACKGROUND=CX99d01f JUST=CENTER]');
447                       if charcase='86' then call define
447      ! ('charcase','style','STYLE=[BACKGROUND=CX99d083 JUST=CENTER]');
448                       if charcase='87' then call define
448      ! ('charcase','style','STYLE=[BACKGROUND=CX99d0e7 JUST=CENTER]');
449                       if charcase='88' then call define
449      ! ('charcase','style','STYLE=[BACKGROUND=CX99d14b JUST=CENTER]');
450                       if charcase='89' then call define
450      ! ('charcase','style','STYLE=[BACKGROUND=CX99d1af JUST=CENTER]');
451                       if charcase='90' then call define
451      ! ('charcase','style','STYLE=[BACKGROUND=CX99d213 JUST=CENTER]');
452                       if charcase='91' then call define
452      ! ('charcase','style','STYLE=[BACKGROUND=CX99d277 JUST=CENTER]');
453                       if charcase='92' then call define
453      ! ('charcase','style','STYLE=[BACKGROUND=CX99d2db JUST=CENTER]');
454                       if charcase='93' then call define
454      ! ('charcase','style','STYLE=[BACKGROUND=CX99d33f JUST=CENTER]');
455                       if charcase='94' then call define
455      ! ('charcase','style','STYLE=[BACKGROUND=CX99d3a3 JUST=CENTER]');
456                       if charcase='95' then call define
456      ! ('charcase','style','STYLE=[BACKGROUND=CX99d407 JUST=CENTER]');
457                       if charcase='96' then call define
457      ! ('charcase','style','STYLE=[BACKGROUND=CXffcc99 JUST=CENTER]');
458                       if charcase='97' then call define
458      ! ('charcase','style','STYLE=[BACKGROUND=CXffccfd JUST=CENTER]');
459                       if charcase='98' then call define
459      ! ('charcase','style','STYLE=[BACKGROUND=CXffcd61 JUST=CENTER]');
460                       if charcase='99' then call define
460      ! ('charcase','style','STYLE=[BACKGROUND=CXffcdc5 JUST=CENTER]');
461                       if charcase='100' then call define
461      ! ('charcase','style','STYLE=[BACKGROUND=CXffce29 JUST=CENTER]');
15                                       The SAS System         09:51 Wednesday, October 21, 2009

462                       if charcase='101' then call define
462      ! ('charcase','style','STYLE=[BACKGROUND=CXffce8d JUST=CENTER]');
463                       if charcase='102' then call define
463      ! ('charcase','style','STYLE=[BACKGROUND=CXffcef1 JUST=CENTER]');
464                       if charcase='103' then call define
464      ! ('charcase','style','STYLE=[BACKGROUND=CXffcf55 JUST=CENTER]');
465                       if charcase='104' then call define
465      ! ('charcase','style','STYLE=[BACKGROUND=CXffcfb9 JUST=CENTER]');
466                       if charcase='105' then call define
466      ! ('charcase','style','STYLE=[BACKGROUND=CXffd01d JUST=CENTER]');
467                       if charcase='106' then call define
467      ! ('charcase','style','STYLE=[BACKGROUND=CXffd081 JUST=CENTER]');
468                       if charcase='107' then call define
468      ! ('charcase','style','STYLE=[BACKGROUND=CXffd0e5 JUST=CENTER]');
469                       if charcase='108' then call define
469      ! ('charcase','style','STYLE=[BACKGROUND=CXffd149 JUST=CENTER]');
470                       if charcase='109' then call define
470      ! ('charcase','style','STYLE=[BACKGROUND=CXffd1ad JUST=CENTER]');
471                       if charcase='110' then call define
471      ! ('charcase','style','STYLE=[BACKGROUND=CXffd211 JUST=CENTER]');
472                       if charcase='111' then call define
472      ! ('charcase','style','STYLE=[BACKGROUND=CXffd275 JUST=CENTER]');
473                       if charcase='112' then call define
473      ! ('charcase','style','STYLE=[BACKGROUND=CXffd2d9 JUST=CENTER]');
474                       if charcase='113' then call define
474      ! ('charcase','style','STYLE=[BACKGROUND=CXffd33d JUST=CENTER]');
475                    endcomp;
476        
477                    compute obs;
478                       dobs + 1;
479                       obs = dobs;
480                    endcompute;
481                 run;

NOTE: There were 6 observations read from the data set WORK.TE.
NOTE: PROCEDURE REPORT used (Total process time):
      real time           0.11 seconds
      cpu time            0.04 seconds
      

482              run;
483              ods html close;
484              ods listing;
NOTE: PROCEDURE DISPLAY used (Total process time):
      real time           2.87 seconds
      cpu time            2.34 seconds
      


NOTE: SAS Institute Inc., SAS Campus Drive, Cary, NC USA 27513-2414
NOTE: The SAS System used:
      real time           3.64 seconds
      cpu time            3.06 seconds
16                                       The SAS System         09:51 Wednesday, October 21, 2009