source: WorldVistAEHR/trunk/g/DOQIT.zwr@ 724

Last change on this file since 724 was 613, checked in by George Lilly, 15 years ago

initial load of WorldVistAEHR
File size: 12.0 KB
RevLine 
[613]1FirstRelease WVEHR VER VOE1.0
2Cache 31-Jan-2008 23:07:04 ZWR
3^DOQIT(19904.6,0)="VEPE DOQ-IT TOPIC^19904.6^5^5"
4^DOQIT(19904.6,1,0)="CAD^CORONARY ARTERY DISEASE"
5^DOQIT(19904.6,1,1,0)="^19904.62^7^7"
6^DOQIT(19904.6,1,1,1,0)="CAD-1"
7^DOQIT(19904.6,1,1,1,1,0)="^19904.622P^31^31"
8^DOQIT(19904.6,1,1,1,1,1,0)="9042"
9^DOQIT(19904.6,1,1,1,1,2,0)="12990"
10^DOQIT(19904.6,1,1,1,1,3,0)="12991"
11^DOQIT(19904.6,1,1,1,1,4,0)="12992"
12^DOQIT(19904.6,1,1,1,1,5,0)="13230"
13^DOQIT(19904.6,1,1,1,1,6,0)="13231"
14^DOQIT(19904.6,1,1,1,1,7,0)="13634"
15^DOQIT(19904.6,1,1,1,1,8,0)="13807"
16^DOQIT(19904.6,1,1,1,1,9,0)="12989"
17^DOQIT(19904.6,1,1,1,1,10,0)="2506"
18^DOQIT(19904.6,1,1,1,1,11,0)="2507"
19^DOQIT(19904.6,1,1,1,1,12,0)="9038"
20^DOQIT(19904.6,1,1,1,1,13,0)="12447"
21^DOQIT(19904.6,1,1,1,1,14,0)="12448"
22^DOQIT(19904.6,1,1,1,1,15,0)="12449"
23^DOQIT(19904.6,1,1,1,1,16,0)="2491"
24^DOQIT(19904.6,1,1,1,1,17,0)="12450"
25^DOQIT(19904.6,1,1,1,1,18,0)="12451"
26^DOQIT(19904.6,1,1,1,1,19,0)="12452"
27^DOQIT(19904.6,1,1,1,1,20,0)="2492"
28^DOQIT(19904.6,1,1,1,1,21,0)="12453"
29^DOQIT(19904.6,1,1,1,1,22,0)="12454"
30^DOQIT(19904.6,1,1,1,1,23,0)="12455"
31^DOQIT(19904.6,1,1,1,1,24,0)="12456"
32^DOQIT(19904.6,1,1,1,1,25,0)="2493"
33^DOQIT(19904.6,1,1,1,1,26,0)="12457"
34^DOQIT(19904.6,1,1,1,1,27,0)="12458"
35^DOQIT(19904.6,1,1,1,1,28,0)="2494"
36^DOQIT(19904.6,1,1,1,1,29,0)="12459"
37^DOQIT(19904.6,1,1,1,1,30,0)="12460"
38^DOQIT(19904.6,1,1,1,1,31,0)="12461"
39^DOQIT(19904.6,1,1,1,1,"B",2491,16)=""
40^DOQIT(19904.6,1,1,1,1,"B",2492,20)=""
41^DOQIT(19904.6,1,1,1,1,"B",2493,25)=""
42^DOQIT(19904.6,1,1,1,1,"B",2494,28)=""
43^DOQIT(19904.6,1,1,1,1,"B",2506,10)=""
44^DOQIT(19904.6,1,1,1,1,"B",2507,11)=""
45^DOQIT(19904.6,1,1,1,1,"B",9038,12)=""
46^DOQIT(19904.6,1,1,1,1,"B",9042,1)=""
47^DOQIT(19904.6,1,1,1,1,"B",12447,13)=""
48^DOQIT(19904.6,1,1,1,1,"B",12448,14)=""
49^DOQIT(19904.6,1,1,1,1,"B",12449,15)=""
50^DOQIT(19904.6,1,1,1,1,"B",12450,17)=""
51^DOQIT(19904.6,1,1,1,1,"B",12451,18)=""
52^DOQIT(19904.6,1,1,1,1,"B",12452,19)=""
53^DOQIT(19904.6,1,1,1,1,"B",12453,21)=""
54^DOQIT(19904.6,1,1,1,1,"B",12454,22)=""
55^DOQIT(19904.6,1,1,1,1,"B",12455,23)=""
56^DOQIT(19904.6,1,1,1,1,"B",12456,24)=""
57^DOQIT(19904.6,1,1,1,1,"B",12457,26)=""
58^DOQIT(19904.6,1,1,1,1,"B",12458,27)=""
59^DOQIT(19904.6,1,1,1,1,"B",12459,29)=""
60^DOQIT(19904.6,1,1,1,1,"B",12460,30)=""
61^DOQIT(19904.6,1,1,1,1,"B",12461,31)=""
62^DOQIT(19904.6,1,1,1,1,"B",12989,9)=""
63^DOQIT(19904.6,1,1,1,1,"B",12990,2)=""
64^DOQIT(19904.6,1,1,1,1,"B",12991,3)=""
65^DOQIT(19904.6,1,1,1,1,"B",12992,4)=""
66^DOQIT(19904.6,1,1,1,1,"B",13230,5)=""
67^DOQIT(19904.6,1,1,1,1,"B",13231,6)=""
68^DOQIT(19904.6,1,1,1,1,"B",13634,7)=""
69^DOQIT(19904.6,1,1,1,1,"B",13807,8)=""
70^DOQIT(19904.6,1,1,1,2,0)="^19904.623P^1^1"
71^DOQIT(19904.6,1,1,1,2,1,0)="80061"
72^DOQIT(19904.6,1,1,1,2,"B",80061,1)=""
73^DOQIT(19904.6,1,1,2,0)="CAD-2"
74^DOQIT(19904.6,1,1,2,1,0)="^19904.622P^2^2"
75^DOQIT(19904.6,1,1,2,1,1,0)="2506"
76^DOQIT(19904.6,1,1,2,1,2,0)="2507"
77^DOQIT(19904.6,1,1,2,1,"B",2506,1)=""
78^DOQIT(19904.6,1,1,2,1,"B",2507,2)=""
79^DOQIT(19904.6,1,1,3,0)="CAD-3"
80^DOQIT(19904.6,1,1,4,0)="CAD-4"
81^DOQIT(19904.6,1,1,5,0)="CAD-5"
82^DOQIT(19904.6,1,1,6,0)="CAD-6"
83^DOQIT(19904.6,1,1,7,0)="CAD-7"
84^DOQIT(19904.6,1,1,"B","CAD-1",1)=""
85^DOQIT(19904.6,1,1,"B","CAD-2",2)=""
86^DOQIT(19904.6,1,1,"B","CAD-3",3)=""
87^DOQIT(19904.6,1,1,"B","CAD-4",4)=""
88^DOQIT(19904.6,1,1,"B","CAD-5",5)=""
89^DOQIT(19904.6,1,1,"B","CAD-6",6)=""
90^DOQIT(19904.6,1,1,"B","CAD-7",7)=""
91^DOQIT(19904.6,2,0)="HF^HEART FAILURE"
92^DOQIT(19904.6,2,1,0)="^19904.62^8^8"
93^DOQIT(19904.6,2,1,1,0)="HF-1^LEFT VENTRICAL ASSESSMENT"
94^DOQIT(19904.6,2,1,1,1,0)="^19904.622P^8^8"
95^DOQIT(19904.6,2,1,1,1,1,0)="2474"
96^DOQIT(19904.6,2,1,1,1,2,0)="2478"
97^DOQIT(19904.6,2,1,1,1,3,0)="2479"
98^DOQIT(19904.6,2,1,1,1,4,0)="2480"
99^DOQIT(19904.6,2,1,1,1,5,0)="12436"
100^DOQIT(19904.6,2,1,1,1,6,0)="12438"
101^DOQIT(19904.6,2,1,1,1,7,0)="12440"
102^DOQIT(19904.6,2,1,1,1,8,0)="12442"
103^DOQIT(19904.6,2,1,1,1,"B",2474,1)=""
104^DOQIT(19904.6,2,1,1,1,"B",2478,2)=""
105^DOQIT(19904.6,2,1,1,1,"B",2479,3)=""
106^DOQIT(19904.6,2,1,1,1,"B",2480,4)=""
107^DOQIT(19904.6,2,1,1,1,"B",12436,5)=""
108^DOQIT(19904.6,2,1,1,1,"B",12438,6)=""
109^DOQIT(19904.6,2,1,1,1,"B",12440,7)=""
110^DOQIT(19904.6,2,1,1,1,"B",12442,8)=""
111^DOQIT(19904.6,2,1,2,0)="HF-2^Y"
112^DOQIT(19904.6,2,1,3,0)="HF-3"
113^DOQIT(19904.6,2,1,4,0)="HF-4"
114^DOQIT(19904.6,2,1,5,0)="HF-5"
115^DOQIT(19904.6,2,1,6,0)="HF-6"
116^DOQIT(19904.6,2,1,7,0)="HF-7"
117^DOQIT(19904.6,2,1,8,0)="HF-8"
118^DOQIT(19904.6,2,1,"B","HF-1",1)=""
119^DOQIT(19904.6,2,1,"B","HF-2",2)=""
120^DOQIT(19904.6,2,1,"B","HF-3",3)=""
121^DOQIT(19904.6,2,1,"B","HF-4",4)=""
122^DOQIT(19904.6,2,1,"B","HF-5",5)=""
123^DOQIT(19904.6,2,1,"B","HF-6",6)=""
124^DOQIT(19904.6,2,1,"B","HF-7",7)=""
125^DOQIT(19904.6,2,1,"B","HF-8",8)=""
126^DOQIT(19904.6,3,0)="DM^DIABETES MELLITUS"
127^DOQIT(19904.6,3,1,0)="^19904.62^8^8"
128^DOQIT(19904.6,3,1,1,0)="DM-1^hbA1c Management"
129^DOQIT(19904.6,3,1,2,0)="DM-2^HbA1c Management Control"
130^DOQIT(19904.6,3,1,3,0)="DM-3"
131^DOQIT(19904.6,3,1,4,0)="DM-4"
132^DOQIT(19904.6,3,1,5,0)="DM-5"
133^DOQIT(19904.6,3,1,6,0)="DM-6"
134^DOQIT(19904.6,3,1,7,0)="DM-7"
135^DOQIT(19904.6,3,1,8,0)="DM-8"
136^DOQIT(19904.6,3,1,"B","DM-1",1)=""
137^DOQIT(19904.6,3,1,"B","DM-2",2)=""
138^DOQIT(19904.6,3,1,"B","DM-3",3)=""
139^DOQIT(19904.6,3,1,"B","DM-4",4)=""
140^DOQIT(19904.6,3,1,"B","DM-5",5)=""
141^DOQIT(19904.6,3,1,"B","DM-6",6)=""
142^DOQIT(19904.6,3,1,"B","DM-7",7)=""
143^DOQIT(19904.6,3,1,"B","DM-8",8)=""
144^DOQIT(19904.6,4,0)="HTN^Hypertension"
145^DOQIT(19904.6,4,1,0)="^19904.62^3^3"
146^DOQIT(19904.6,4,1,1,0)="HTN-1"
147^DOQIT(19904.6,4,1,2,0)="HTN-2"
148^DOQIT(19904.6,4,1,3,0)="HTN-3"
149^DOQIT(19904.6,4,1,"B","HTN-1",1)=""
150^DOQIT(19904.6,4,1,"B","HTN-2",2)=""
151^DOQIT(19904.6,4,1,"B","HTN-3",3)=""
152^DOQIT(19904.6,5,0)="PC^Preventive Care"
153^DOQIT(19904.6,5,1,0)="^19904.62^9^9"
154^DOQIT(19904.6,5,1,1,0)="PC-1"
155^DOQIT(19904.6,5,1,2,0)="PC-5"
156^DOQIT(19904.6,5,1,3,0)="PC-6"
157^DOQIT(19904.6,5,1,3,1,0)="^19904.622P"
158^DOQIT(19904.6,5,1,4,0)="PC-7"
159^DOQIT(19904.6,5,1,5,0)="PC-8"
160^DOQIT(19904.6,5,1,6,0)="PC-9"
161^DOQIT(19904.6,5,1,7,0)="PC-10"
162^DOQIT(19904.6,5,1,8,0)="PC-11"
163^DOQIT(19904.6,5,1,9,0)="PC-12"
164^DOQIT(19904.6,5,1,"B","PC-1",1)=""
165^DOQIT(19904.6,5,1,"B","PC-10",7)=""
166^DOQIT(19904.6,5,1,"B","PC-11",8)=""
167^DOQIT(19904.6,5,1,"B","PC-12",9)=""
168^DOQIT(19904.6,5,1,"B","PC-5",2)=""
169^DOQIT(19904.6,5,1,"B","PC-6",3)=""
170^DOQIT(19904.6,5,1,"B","PC-7",4)=""
171^DOQIT(19904.6,5,1,"B","PC-8",5)=""
172^DOQIT(19904.6,5,1,"B","PC-9",6)=""
173^DOQIT(19904.6,"B","CAD",1)=""
174^DOQIT(19904.6,"B","DM",3)=""
175^DOQIT(19904.6,"B","HF",2)=""
176^DOQIT(19904.6,"B","HTN",4)=""
177^DOQIT(19904.6,"B","PC",5)=""
178^DOQIT("CONFIG",0)="VEPE DOQ-IT CONFIGURATION^19904.5S^1^1"
179^DOQIT("CONFIG",1,0)="1^C:\DOQIT\^201"
180^DOQIT("CONFIG",1,1,0)="^19904.53^5^5"
181^DOQIT("CONFIG",1,1,1,0)="CAD^CORONARY ARTERY DISEASE"
182^DOQIT("CONFIG",1,1,1,1,0)="^19904.532^7^7"
183^DOQIT("CONFIG",1,1,1,1,1,0)="CAD1^CAD W/ PRESCRIBED ANTI-PLATELET THERAPY"
184^DOQIT("CONFIG",1,1,1,1,2,0)="CAD2^CAD W/ PRESCRIBED LIPID LOWERING THERAPY"
185^DOQIT("CONFIG",1,1,1,1,3,0)="CAD3^CAD W/ PRIOR MI PRESCRIBED BETA-BLOCKER THERAPY"
186^DOQIT("CONFIG",1,1,1,1,4,0)="CAD4^CAD W/ BLOOD PRESSURE MEASUREMENT LAST OFF.VISIT"
187^DOQIT("CONFIG",1,1,1,1,5,0)="CAD5^CAD W/ AT LEAST 1 LIPID PROFILE DURING PERIOD"
188^DOQIT("CONFIG",1,1,1,1,6,0)="CAD6^CAD W/ MOST RECENT LDL CHOLESTEROL <130 MG/DL"
189^DOQIT("CONFIG",1,1,1,1,7,0)="CAD7^CAD W/ DIABETES &/OR LVSD & PRESC. ACE INHIBITOR"
190^DOQIT("CONFIG",1,1,1,1,"B","CAD1",1)=""
191^DOQIT("CONFIG",1,1,1,1,"B","CAD2",2)=""
192^DOQIT("CONFIG",1,1,1,1,"B","CAD3",3)=""
193^DOQIT("CONFIG",1,1,1,1,"B","CAD4",4)=""
194^DOQIT("CONFIG",1,1,1,1,"B","CAD5",5)=""
195^DOQIT("CONFIG",1,1,1,1,"B","CAD6",6)=""
196^DOQIT("CONFIG",1,1,1,1,"B","CAD7",7)=""
197^DOQIT("CONFIG",1,1,2,0)="DM^DIABETES MELLITUS"
198^DOQIT("CONFIG",1,1,2,1,0)="^19904.532^8^8"
199^DOQIT("CONFIG",1,1,2,1,1,0)="DM1^DM W/ 1 OR MORE A1C TESTS"
200^DOQIT("CONFIG",1,1,2,1,2,0)="DM2^DM W/ MOST RECENT A1C LEVEL >9.0% (POOR CONTROL)"
201^DOQIT("CONFIG",1,1,2,1,3,0)="DM3^DM W/ MOST RECENT BP < 140/90 MM HG"
202^DOQIT("CONFIG",1,1,2,1,4,0)="DM4^DM W/ AT LEAST 1 LDL CHOLESTEROL TEST"
203^DOQIT("CONFIG",1,1,2,1,5,0)="DM5^DM W/ MOST RECENT LDL CHOLESTEROL < 130 MG/DL"
204^DOQIT("CONFIG",1,1,2,1,6,0)="DM6^DM URINE PROTEIN TESTING"
205^DOQIT("CONFIG",1,1,2,1,7,0)="DM7^DM EYE EXAM"
206^DOQIT("CONFIG",1,1,2,1,8,0)="DM8^DM FOOT EXAM"
207^DOQIT("CONFIG",1,1,2,1,"B","DM1",1)=""
208^DOQIT("CONFIG",1,1,2,1,"B","DM2",2)=""
209^DOQIT("CONFIG",1,1,2,1,"B","DM3",3)=""
210^DOQIT("CONFIG",1,1,2,1,"B","DM4",4)=""
211^DOQIT("CONFIG",1,1,2,1,"B","DM5",5)=""
212^DOQIT("CONFIG",1,1,2,1,"B","DM6",6)=""
213^DOQIT("CONFIG",1,1,2,1,"B","DM7",7)=""
214^DOQIT("CONFIG",1,1,2,1,"B","DM8",8)=""
215^DOQIT("CONFIG",1,1,3,0)="HF^HEART FAILURE"
216^DOQIT("CONFIG",1,1,3,1,0)="^19904.532^8^8"
217^DOQIT("CONFIG",1,1,3,1,1,0)="HF1^HF LEFT VENTRICULAR FUNCTION (LVF) ASSESSMENT"
218^DOQIT("CONFIG",1,1,3,1,2,0)="HF2^HF LEFT VENTRICULAR FUNCTION (LVF) TESTING"
219^DOQIT("CONFIG",1,1,3,1,3,0)="HF3^HF WEIGHT MEASUREMENT"
220^DOQIT("CONFIG",1,1,3,1,4,0)="HF4^HF BLOOD PRESSURE SCREENING"
221^DOQIT("CONFIG",1,1,3,1,5,0)="HF5^HF PATIENT EDUCATION"
222^DOQIT("CONFIG",1,1,3,1,6,0)="HF6^HF BETA BLOCKER THERAPY"
223^DOQIT("CONFIG",1,1,3,1,7,0)="HF7^HF ACE INHIBITOR THERAPY"
224^DOQIT("CONFIG",1,1,3,1,8,0)="HF8^HF WARFARIN THERAPY FOR PATIENTS WITH ATRIAL FIB"
225^DOQIT("CONFIG",1,1,3,1,"B","HF1",1)=""
226^DOQIT("CONFIG",1,1,3,1,"B","HF2",2)=""
227^DOQIT("CONFIG",1,1,3,1,"B","HF3",3)=""
228^DOQIT("CONFIG",1,1,3,1,"B","HF4",4)=""
229^DOQIT("CONFIG",1,1,3,1,"B","HF5",5)=""
230^DOQIT("CONFIG",1,1,3,1,"B","HF6",6)=""
231^DOQIT("CONFIG",1,1,3,1,"B","HF7",7)=""
232^DOQIT("CONFIG",1,1,3,1,"B","HF8",8)=""
233^DOQIT("CONFIG",1,1,4,0)="HTN^HYPERTENSION"
234^DOQIT("CONFIG",1,1,4,1,0)="^19904.532^3^3"
235^DOQIT("CONFIG",1,1,4,1,1,0)="HTN1^HTN BLOOD PRESSURE SCREENING"
236^DOQIT("CONFIG",1,1,4,1,2,0)="HTN2^HTN BLOOD PRESSURE CONTROL"
237^DOQIT("CONFIG",1,1,4,1,3,0)="HTN3^HTN PLAN OF CARE"
238^DOQIT("CONFIG",1,1,4,1,"B","HTN1",1)=""
239^DOQIT("CONFIG",1,1,4,1,"B","HTN2",2)=""
240^DOQIT("CONFIG",1,1,4,1,"B","HTN3",3)=""
241^DOQIT("CONFIG",1,1,5,0)="PC^PREVENTIVE CARE"
242^DOQIT("CONFIG",1,1,5,1,0)="^19904.532^9^9"
243^DOQIT("CONFIG",1,1,5,1,1,0)="PC1^PC1 BLOOD PRESSURE MEASUREMENT"
244^DOQIT("CONFIG",1,1,5,1,2,0)="PC5^PC5 BREAST CANCER SCREENING"
245^DOQIT("CONFIG",1,1,5,1,3,0)="PC6^PC6 COLORECTAL CANCER SCREENING"
246^DOQIT("CONFIG",1,1,5,1,4,0)="PC7^PC7 INFLUENZA VACCINATION"
247^DOQIT("CONFIG",1,1,5,1,5,0)="PC8^PC8 PNEMONIA VACCINATION"
248^DOQIT("CONFIG",1,1,5,1,6,0)="PC9^PC9 LIPID MEASUREMENT"
249^DOQIT("CONFIG",1,1,5,1,7,0)="PC10^PC10 LDL CHOLESTEROL LEVEL"
250^DOQIT("CONFIG",1,1,5,1,8,0)="PC11^PC11 TOBACCO USE"
251^DOQIT("CONFIG",1,1,5,1,9,0)="PC12^PC12 TOBACCO CESSATION"
252^DOQIT("CONFIG",1,1,5,1,"B","PC1",1)=""
253^DOQIT("CONFIG",1,1,5,1,"B","PC10",7)=""
254^DOQIT("CONFIG",1,1,5,1,"B","PC11",8)=""
255^DOQIT("CONFIG",1,1,5,1,"B","PC12",9)=""
256^DOQIT("CONFIG",1,1,5,1,"B","PC5",2)=""
257^DOQIT("CONFIG",1,1,5,1,"B","PC6",3)=""
258^DOQIT("CONFIG",1,1,5,1,"B","PC7",4)=""
259^DOQIT("CONFIG",1,1,5,1,"B","PC8",5)=""
260^DOQIT("CONFIG",1,1,5,1,"B","PC9",6)=""
261^DOQIT("CONFIG",1,1,"B","CAD",1)=""
262^DOQIT("CONFIG",1,1,"B","DM",2)=""
263^DOQIT("CONFIG",1,1,"B","HF",3)=""
264^DOQIT("CONFIG",1,1,"B","HTN",4)=""
265^DOQIT("CONFIG",1,1,"B","PC",5)=""
266^DOQIT("CONFIG","B",1,1)=""
267^DOQIT("REG",0)="VEPE DOQ-IT REGISTRATION^19904.4P^2^3"
268^DOQIT("REG",1,0)="1"
269^DOQIT("REG",1,"CAD")="R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R"
270^DOQIT("REG",1,"DM")="R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R"
271^DOQIT("REG",1,"HF")="R^^R^^R^^C^^R^^R^^R^^R^^R"
272^DOQIT("REG",1,"HTN")="R^^R^^R^^R"
273^DOQIT("REG",1,"PC")="R^^^R^^^^^^^R^^R^^R^^R^^R^^R^^R^^R"
274^DOQIT("REG",2,0)="2"
275^DOQIT("REG",2,"CAD")="R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R"
276^DOQIT("REG",2,"DM")="R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R"
277^DOQIT("REG",2,"HF")="R^^R^^R^^R^^R^^R^^R^^R^^R"
278^DOQIT("REG",2,"HTN")="R^^R^^R^^R"
279^DOQIT("REG",2,"PC")="R^^^R^^^^^^^R^^R^^R^^R^^R^^R^^R^^R"
280^DOQIT("REG",3,0)="3"
281^DOQIT("REG",3,"CAD")="R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R"
282^DOQIT("REG",3,"DM")="R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R^3050730^R"
283^DOQIT("REG",3,"HF")="R^^R^^C^^R^^R^^R^^R^^R^^R"
284^DOQIT("REG",3,"HTN")="R^^R^^R^^R"
285^DOQIT("REG",3,"PC")="R^^^R^^^^^^^C^^R^^R^^R^^R^^R^^R^^R"
286^DOQIT("REG","B",1,1)=""
287^DOQIT("REG","B",2,2)=""
288^DOQIT("REG","B",3,3)=""
Note: See TracBrowser for help on using the repository browser.