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