source: quality/tags/mu/PRD/MU_STK10.PRD@ 1348

Last change on this file since 1348 was 1348, checked in by George Lilly, 12 years ago

PRD file created for Meaningful Use Certification by WorldVistA

File size: 30.9 KB
Line 
1<?xml version="1.0" standalone="yes"?>
2<REMINDER_EXCHANGE_FILE_ENTRY>
3<PACKAGE_VERSION>2.0P17</PACKAGE_VERSION>
4<INDEX_AT>1029</INDEX_AT>
5<SOURCE>
6<NAME>MU_STK10</NAME>
7<USER>BOKHARI,SYED</USER>
8<SITE>VOE OFFICE INSTITUTION</SITE>
9<DATE_PACKED>07/22/2011@03:16:20</DATE_PACKED>
10</SOURCE>
11<DESCRIPTION><![CDATA[
12The following Clinical Reminder items were selected for packing:
13REMINDER DEFINITION
14 MU STK-10 DENOM CR
15 MU STK-10 NUMER CR
16]]></DESCRIPTION>
17<KEYWORDS>
18</KEYWORDS>
19<M_ROUTINE>
20<ROUTINE_NAME>PXRMINPL</ROUTINE_NAME>
21<CHECKSUM>2982435994</CHECKSUM>
22<CODE>
23<![CDATA[
24PXRMINPL ;SLC/RMS,PKR - List computed findings for inpatient info. ; 09/08/2008
25 ;;2.0;CLINICAL REMINDERS;**12**;Feb 04, 2005
26 ;=====================================
27ADM(NGET,BDT,EDT,PLIST,PARAM) ;All admissions during a date range.
28 D ADMDISCH(BDT,EDT,PLIST,PARAM,"ATT1")
29 Q
30 ;
31 ;=====================================
32ADMDISCH(BDT,EDT,PLIST,PARAM,SUB) ;Build admission and discharge lists.
33 ;Admissions when SUB="ATT1" and discharges when SUB="ATT3"
34 ;DBIAs (^DIC(4: #2251,#10090), (^DIC(42: #10039),
35 ;(^DGPM: #1480), (^DPT: #187), (^SC: #10040)
36 N CNT,DATA,DATE,DFN,HLOC,IEN,LOCLIST,OK,WARD,WARDP
37 K ^TMP($J,PLIST),^TMP($J,"CNT")
38 S DATE=BDT-.000001
39 S OK=1
40 S LOCLIST=$S(PARAM'="":+$O(^PXRMD(810.9,"B",PARAM,0)),1:0)
41 F S DATE=$O(^DGPM(SUB,DATE)) Q:(DATE>EDT)!(DATE="") D
42 . S IEN=""
43 . F S IEN=$O(^DGPM(SUB,DATE,IEN)) Q:IEN="" D
44 .. S DATA=^DGPM(IEN,0)
45 .. S DFN=$P(DATA,U,3)
46 .. I SUB="ATT1" D
47 ...;WARD is a required field but it may not exist for older entries.
48 ... S WARDP=+$P(DATA,U,6)
49 ... S WARD=WARDP_";"_$S(WARDP>0:$P($G(^DIC(42,WARDP,0)),U,1),1:0)
50 .. I SUB="ATT3" D
51 ... S WARD=$$GET1^DIQ(405,IEN,200)
52 ... S WARDP=$S(WARD'="":$O(^DIC(42,"B",WARD,"")),1:0)
53 ... S WARD=WARDP_";"_WARD
54 ..;If a location list has been passed in make sure the hospital
55 ..;location for the ward is on the list.
56 .. S HLOC=$S(WARDP>0:^DIC(42,WARDP,44),1:0)
57 .. I LOCLIST>0 S OK=$S($D(^PXRMD(810.9,LOCLIST,44,"B",HLOC)):1,1:0)
58 .. I 'OK Q
59 .. S (CNT,^TMP($J,"CNT",DFN))=+$G(^TMP($J,"CNT",DFN))+1
60 .. S ^TMP($J,PLIST,DFN,CNT)=U_DATE_U_405_U_DFN_U_WARD
61 .. S INST=$S(HLOC>0:+$P(^SC(HLOC,0),U,4),1:0)
62 .. S INSTNM=INST_";"_$S(INST>0:$P(^DIC(4,INST,0),U,1),1:0)
63 .. S INSTNM=INSTNM_";"_$S(INST>0:$P($G(^DIC(4,INST,99)),U,1),1:0)
64 .. S ^TMP($J,PLIST,DFN,CNT,"VALUE")=WARD
65 .. S ^TMP($J,PLIST,DFN,CNT,"INSTITUTION")=INSTNM
66 .. S ^TMP($J,PLIST,DFN,CNT,"TYPE_OF_MVMT")=$$GET1^DIQ(405.1,$P(DATA,U,4),.01)
67 K ^TMP($J,"CNT")
68 Q
69 ;
70 ;=====================================
71CURR(NGET,BDT,EDT,PLIST,PARAM) ;Current inpatients.
72 ; DBIAs #10035, #10039, #10040, #10061, #10090
73 N CNT,DFN,HLOC,INST,INSTNM,LOCLIST,OK,WARD,WARDP,WARDSUB,VAIN,VAERR
74 K ^TMP($J,PLIST),^TMP($J,"CNT")
75 S OK=1
76 S LOCLIST=$S(PARAM'="":+$O(^PXRMD(810.9,"B",PARAM,0)),1:0)
77 S WARD=""
78 F S WARD=$O(^DPT("CN",WARD)) Q:WARD="" D
79 . S DFN=0
80 . F S DFN=$O(^DPT("CN",WARD,DFN)) Q:'+DFN D
81 ..;If a location list has been passed in make sure the hospital
82 ..;location for the ward is on the list.
83 .. S WARDP=+$O(^DIC(42,"B",WARD,""))
84 .. S HLOC=+$G(^DIC(42,WARDP,44))
85 .. I LOCLIST>0 S OK=$S($D(^PXRMD(810.9,LOCLIST,44,"B",HLOC)):1,1:0)
86 .. I 'OK Q
87 .. K VAIN,VAERR D INP^VADPT
88 .. S WARDSUB=+VAIN(4)_";"_WARD
89 .. S (CNT,^TMP($J,"CNT",DFN))=+$G(^TMP($J,"CNT",DFN))+1
90 .. S ^TMP($J,PLIST,DFN,CNT)=U_+VAIN(7)_U_2_U_DFN_U_WARDSUB
91 .. S INST=$S(HLOC>0:+$P(^SC(HLOC,0),U,4),1:0)
92 .. S INSTNM=INST_";"_$S(INST>0:$P(^DIC(4,INST,0),U,1),1:0)
93 .. S INSTNM=INSTNM_";"_$S(INST>0:$P($G(^DIC(4,INST,99)),U,1),1:0)
94 .. S ^TMP($J,PLIST,DFN,CNT,"VALUE")=WARDSUB
95 .. S ^TMP($J,PLIST,DFN,CNT,"INSTITUTION")=INSTNM
96 .. S ^TMP($J,PLIST,DFN,CNT,"ADMIT DATE")=VAIN(7)
97 K ^TMP($J,"CNT")
98 Q
99 ;
100 ;=====================================
101DISCH(NGET,BDT,EDT,PLIST,PARAM) ;Discharges during a date range.
102 ;NOTE: ASIH is not accounted for in this version.
103 D ADMDISCH(BDT,EDT,PLIST,PARAM,"ATT3")
104 Q
105 ;
106]]>
107</CODE>
108</M_ROUTINE>
109<FILEMAN_FILE>
110<FILE_NAME>HEALTH FACTORS</FILE_NAME>
111<FILE_NUMBER>9999999.64</FILE_NUMBER>
112<POINT_01>MU STK</POINT_01>
113<INTERNAL_ENTRY_NUMBER>50049</INTERNAL_ENTRY_NUMBER>
114<CHECKSUM>1292931282</CHECKSUM>
115<SELECTED>NO</SELECTED>
116<FILEMAN_FDA>
117<![CDATA[
1189999999.64;+50049,;.01~MU STK
1199999999.64;+50049,;.1~CATEGORY
120]]>
121</FILEMAN_FDA>
122</FILEMAN_FILE>
123<FILEMAN_FILE>
124<FILE_NAME>HEALTH FACTORS</FILE_NAME>
125<FILE_NUMBER>9999999.64</FILE_NUMBER>
126<POINT_01>REHABILITATION SERVICES RECEIVED</POINT_01>
127<INTERNAL_ENTRY_NUMBER>50208</INTERNAL_ENTRY_NUMBER>
128<CHECKSUM>1652347862</CHECKSUM>
129<SELECTED>NO</SELECTED>
130<FILEMAN_FDA>
131<![CDATA[
1329999999.64;+50208,;.01~REHABILITATION SERVICES RECEIVED
1339999999.64;+50208,;.03~MU STK
1349999999.64;+50208,;.04~REHAB
1359999999.64;+50208,;.08~YES
1369999999.64;+50208,;.1~FACTOR
137]]>
138</FILEMAN_FDA>
139</FILEMAN_FILE>
140<FILEMAN_FILE>
141<FILE_NAME>HEALTH FACTORS</FILE_NAME>
142<FILE_NUMBER>9999999.64</FILE_NUMBER>
143<POINT_01>ELECTIVE CAROTID INTERVENTION</POINT_01>
144<INTERNAL_ENTRY_NUMBER>500306</INTERNAL_ENTRY_NUMBER>
145<CHECKSUM>2385829161</CHECKSUM>
146<SELECTED>NO</SELECTED>
147<FILEMAN_FDA>
148<![CDATA[
1499999999.64;+500306,;.01~ELECTIVE CAROTID INTERVENTION
1509999999.64;+500306,;.03~MU STK
1519999999.64;+500306,;.04~ELEC SURG
1529999999.64;+500306,;.08~YES
1539999999.64;+500306,;.1~FACTOR
154]]>
155</FILEMAN_FDA>
156</FILEMAN_FILE>
157<FILEMAN_FILE>
158<FILE_NAME>HEALTH FACTORS</FILE_NAME>
159<FILE_NUMBER>9999999.64</FILE_NUMBER>
160<POINT_01>COMFORT MEASURES PROTOCOL FOLLOWED</POINT_01>
161<INTERNAL_ENTRY_NUMBER>500305</INTERNAL_ENTRY_NUMBER>
162<CHECKSUM>779307093</CHECKSUM>
163<SELECTED>NO</SELECTED>
164<FILEMAN_FDA>
165<![CDATA[
1669999999.64;+500305,;.01~COMFORT MEASURES PROTOCOL FOLLOWED
1679999999.64;+500305,;.03~MU STK
1689999999.64;+500305,;.04~COMFORT P
1699999999.64;+500305,;.08~YES
1709999999.64;+500305,;.1~FACTOR
171]]>
172</FILEMAN_FDA>
173</FILEMAN_FILE>
174<FILEMAN_FILE>
175<FILE_NAME>HEALTH FACTORS</FILE_NAME>
176<FILE_NUMBER>9999999.64</FILE_NUMBER>
177<POINT_01>ENROLLED IN CLINICAL TRIALS</POINT_01>
178<INTERNAL_ENTRY_NUMBER>50071</INTERNAL_ENTRY_NUMBER>
179<CHECKSUM>4182986683</CHECKSUM>
180<SELECTED>NO</SELECTED>
181<FILEMAN_FDA>
182<![CDATA[
1839999999.64;+50071,;.01~ENROLLED IN CLINICAL TRIALS
1849999999.64;+50071,;.03~MU STK
1859999999.64;+50071,;.04~TRIALS
1869999999.64;+50071,;.08~YES
1879999999.64;+50071,;.1~FACTOR
188]]>
189</FILEMAN_FDA>
190</FILEMAN_FILE>
191<FILEMAN_FILE>
192<FILE_NAME>HEALTH FACTORS</FILE_NAME>
193<FILE_NUMBER>9999999.64</FILE_NUMBER>
194<POINT_01>COMFORT MEASURES ON OR DAY AFTER ARRIVAL</POINT_01>
195<INTERNAL_ENTRY_NUMBER>50064</INTERNAL_ENTRY_NUMBER>
196<CHECKSUM>1895354898</CHECKSUM>
197<SELECTED>NO</SELECTED>
198<FILEMAN_FDA>
199<![CDATA[
2009999999.64;+50064,;.01~COMFORT MEASURES ON OR DAY AFTER ARRIVAL
2019999999.64;+50064,;.03~MU STK
2029999999.64;+50064,;.04~COMFORT M
2039999999.64;+50064,;.08~YES
2049999999.64;+50064,;.1~FACTOR
205]]>
206</FILEMAN_FDA>
207</FILEMAN_FILE>
208<FILEMAN_FILE>
209<FILE_NAME>REMINDER COMPUTED FINDINGS</FILE_NAME>
210<FILE_NUMBER>811.4</FILE_NUMBER>
211<POINT_01>VA-DISCHARGES FOR A DATE RANGE</POINT_01>
212<INTERNAL_ENTRY_NUMBER>94</INTERNAL_ENTRY_NUMBER>
213<CHECKSUM>1608937132</CHECKSUM>
214<SELECTED>NO</SELECTED>
215<FILEMAN_FDA>
216<![CDATA[
217811.4;+94,;.01~VA-DISCHARGES FOR A DATE RANGE
218811.4;+94,;.02~PXRMINPL
219811.4;+94,;.03~DISCH
220811.4;+94,;.04~Discharges for a Date Range
221811.4;+94,;1~WP-start~26
222This list type computed finding can be used to build a list of
223patients who have been discharged in the specified date range. A
224Reminder Location List can be used to restrict the selection of
225patients to only the ward locations included in the location list.
226To do this enter the exact .01 name of a Reminder Location List into
227the COMPUTED FINDING PARAMETER field. If a Reminder Location List is
228not used then all ward locations will be included.
229
230The CONDITION field may also be used to select entries by any of the
231following CSUB subscripts:
232
233V or V("VALUE") = the ward from which the patient was discharged
234 in the format of 9;3EAST (IEN;Ward Name)
235
236V("INSTITUTION") = the name of the INSTITUTION (file #4) entry
237 with which the ward is associated in the format
238 5000;ELY;660GC (IEN;Institution Name;Station Number)
239
240V("TYPE_OF_MVMT") = the type of movement entry from file 405.1
241 (e.g., REGULAR, OPT-NSC, OPT-SC, etc.)
242
243
244
245
246
247
248811.4;+94,;5~LIST
249811.4;+94,;100~NATIONAL
250811.42;+95,+94,;.01~07/22/2011@03:16:26
251811.42;+95,+94,;2~WP-start~1
252Exchange Stub
253]]>
254</FILEMAN_FDA>
255<IEN_ROOT>
256<![CDATA[
25795^1
258]]>
259</IEN_ROOT>
260</FILEMAN_FILE>
261<FILEMAN_FILE>
262<FILE_NAME>REMINDER COMPUTED FINDINGS</FILE_NAME>
263<FILE_NUMBER>811.4</FILE_NUMBER>
264<POINT_01>VA-ADMISSIONS FOR A DATE RANGE</POINT_01>
265<INTERNAL_ENTRY_NUMBER>90</INTERNAL_ENTRY_NUMBER>
266<CHECKSUM>1960922291</CHECKSUM>
267<SELECTED>NO</SELECTED>
268<FILEMAN_FDA>
269<![CDATA[
270811.4;+90,;.01~VA-ADMISSIONS FOR A DATE RANGE
271811.4;+90,;.02~PXRMINPL
272811.4;+90,;.03~ADM
273811.4;+90,;.04~Admissions for a Date Range
274811.4;+90,;1~WP-start~29
275This list type computed finding can be used to build a list of
276patients who were admitted in the specified date range. A Reminder
277Location List can be used to restrict the selection of patients to
278only the ward locations included in the location list. To do this
279enter the exact .01 name of a Reminder Location List into the
280COMPUTED FINDING PARAMETER field. If a Reminder Location List is not
281used then all ward locations will be included.
282
283The CONDITION field may also be used to select entries by any of the
284following CSUB subscripts:
285
286V or V("VALUE") = the ward to which the patient was admitted
287 in the format of 9;3EAST (IEN;Ward Name)
288
289V("INSTITUTION") = the name of the INSTITUTION (file #4) entry
290 with which the ward is associated in the format
291 5000;ELY;660GC (IEN;Institution Name;Station Number)
292
293V("TYPE_OF_MVMT") = the type of movement entry from file 405.1
294 (e.g., REGULAR, OPT-NSC, OPT-SC, etc.)
295
296
297
298
299
300
301
302
303
304811.4;+90,;5~LIST
305811.4;+90,;100~NATIONAL
306811.42;+91,+90,;.01~07/22/2011@03:16:27
307811.42;+91,+90,;2~WP-start~1
308Exchange Stub
309]]>
310</FILEMAN_FDA>
311<IEN_ROOT>
312<![CDATA[
31391^1
314]]>
315</IEN_ROOT>
316</FILEMAN_FILE>
317<FILEMAN_FILE>
318<FILE_NAME>REMINDER TAXONOMY</FILE_NAME>
319<FILE_NUMBER>811.2</FILE_NUMBER>
320<POINT_01>MU STK DENOM EXCLU ELECTIVE SURGERY TX</POINT_01>
321<INTERNAL_ENTRY_NUMBER>122</INTERNAL_ENTRY_NUMBER>
322<CHECKSUM>3882324901</CHECKSUM>
323<SELECTED>NO</SELECTED>
324<FILEMAN_FDA>
325<![CDATA[
326811.2;+122,;.01~MU STK DENOM EXCLU ELECTIVE SURGERY TX
327811.2;+122,;.02~ELECTIVE SURGERY
328811.2;+122,;100~LOCAL
329811.21;+123,+122,;.01~07/22/2011@03:16:27
330811.21;+123,+122,;2~WP-start~1
331Exchange Stub
332811.22104;+124,+122,;.01~37205
333811.22104;+124,+122,;1~37205
334811.22104;+124,+122,;2~37204
335811.22104;+124,+122,;3~37206
336811.22104;+125,+122,;.01~37206
337811.22104;+125,+122,;1~37206
338811.22104;+125,+122,;2~37205
339811.22104;+125,+122,;3~37207
340811.22104;+126,+122,;.01~35301
341811.22104;+126,+122,;1~35301
342811.22104;+126,+122,;2~35286
343811.22104;+126,+122,;3~35302
344]]>
345</FILEMAN_FDA>
346<IEN_ROOT>
347<![CDATA[
348123^1
349124^1
350125^2
351126^3
352]]>
353</IEN_ROOT>
354</FILEMAN_FILE>
355<FILEMAN_FILE>
356<FILE_NAME>REMINDER TAXONOMY</FILE_NAME>
357<FILE_NUMBER>811.2</FILE_NUMBER>
358<POINT_01>MU STK-8 DENOM INCLU TX</POINT_01>
359<INTERNAL_ENTRY_NUMBER>120</INTERNAL_ENTRY_NUMBER>
360<CHECKSUM>3610401467</CHECKSUM>
361<SELECTED>NO</SELECTED>
362<FILEMAN_FDA>
363<![CDATA[
364811.2;+120,;.01~MU STK-8 DENOM INCLU TX
365811.2;+120,;.02~ISCHEMIC AND HEMORRHAGIC STROKES
366811.2;+120,;4~IN
367811.2;+120,;100~LOCAL
368811.21;+121,+120,;.01~07/22/2011@03:16:27
369811.21;+121,+120,;2~WP-start~1
370Exchange Stub
371811.22102;+122,+120,;.01~433.01
372811.22102;+122,+120,;1~433.01
373811.22102;+122,+120,;2~433.00
374811.22102;+122,+120,;3~433.1
375811.22102;+123,+120,;.01~434.11
376811.22102;+123,+120,;1~434.91
377811.22102;+123,+120,;2~434.10
378811.22102;+123,+120,;3~435.0
379811.22102;+124,+120,;.01~436.
380811.22102;+124,+120,;1~436.
381811.22102;+124,+120,;2~435.9
382811.22102;+124,+120,;3~437.0
383811.22102;+125,+120,;.01~430.
384811.22102;+125,+120,;1~430.
385811.22102;+125,+120,;2~429.9
386811.22102;+125,+120,;3~431.
387811.22102;+126,+120,;.01~431.
388811.22102;+126,+120,;1~431.
389811.22102;+126,+120,;2~430.
390811.22102;+126,+120,;3~432.0
391811.22102;+127,+120,;.01~433.10
392811.22102;+127,+120,;1~433.10
393811.22102;+127,+120,;2~433.1
394811.22102;+127,+120,;3~433.11
395811.22102;+128,+120,;.01~433.11
396811.22102;+128,+120,;1~433.11
397811.22102;+128,+120,;2~433.10
398811.22102;+128,+120,;3~433.2
399811.22102;+129,+120,;.01~433.21
400811.22102;+129,+120,;1~433.21
401811.22102;+129,+120,;2~433.20
402811.22102;+129,+120,;3~433.3
403811.22102;+130,+120,;.01~433.31
404811.22102;+130,+120,;1~433.31
405811.22102;+130,+120,;2~433.30
406811.22102;+130,+120,;3~433.8
407811.22102;+131,+120,;.01~433.81
408811.22102;+131,+120,;1~433.81
409811.22102;+131,+120,;2~433.80
410811.22102;+131,+120,;3~433.9
411811.22102;+132,+120,;.01~433.91
412811.22102;+132,+120,;1~433.91
413811.22102;+132,+120,;2~433.90
414811.22102;+132,+120,;3~434.0
415811.22102;+133,+120,;.01~434.00
416811.22102;+133,+120,;1~434.00
417811.22102;+133,+120,;2~434.0
418811.22102;+133,+120,;3~434.01
419811.22102;+134,+120,;.01~434.01
420811.22102;+134,+120,;1~434.01
421811.22102;+134,+120,;2~434.00
422811.22102;+134,+120,;3~434.1
423]]>
424</FILEMAN_FDA>
425<IEN_ROOT>
426<![CDATA[
427121^1
428122^1
429123^10
430124^11
431125^12
432126^13
433127^2
434128^3
435129^4
436130^5
437131^6
438132^7
439133^8
440134^9
441]]>
442</IEN_ROOT>
443</FILEMAN_FILE>
444<FILEMAN_FILE>
445<FILE_NAME>REMINDER TERM</FILE_NAME>
446<FILE_NUMBER>811.5</FILE_NUMBER>
447<POINT_01>MU STK-10 NUMER INCLU TRM</POINT_01>
448<INTERNAL_ENTRY_NUMBER>736</INTERNAL_ENTRY_NUMBER>
449<CHECKSUM>3597923117</CHECKSUM>
450<SELECTED>NO</SELECTED>
451<FILEMAN_FDA>
452<![CDATA[
453811.5;+736,;.01~MU STK-10 NUMER INCLU TRM
454811.5;+736,;100~LOCAL
455811.52;+737,+736,;.01~HF.REHABILITATION SERVICES RECEIVED
456811.53;+738,+736,;.01~07/22/2011@03:16:28
457811.53;+738,+736,;2~WP-start~1
458Exchange Stub
459]]>
460</FILEMAN_FDA>
461<IEN_ROOT>
462<![CDATA[
463737^1
464738^1
465]]>
466</IEN_ROOT>
467</FILEMAN_FILE>
468<FILEMAN_FILE>
469<FILE_NAME>REMINDER TERM</FILE_NAME>
470<FILE_NUMBER>811.5</FILE_NUMBER>
471<POINT_01>MU DISCHARGE TO ANOTHER HOSP</POINT_01>
472<INTERNAL_ENTRY_NUMBER>729</INTERNAL_ENTRY_NUMBER>
473<CHECKSUM>3422916630</CHECKSUM>
474<SELECTED>NO</SELECTED>
475<FILEMAN_FDA>
476<![CDATA[
477811.5;+729,;.01~MU DISCHARGE TO ANOTHER HOSP
478811.5;+729,;100~LOCAL
479811.52;+730,+729,;.01~CF.VA-DISCHARGES FOR A DATE RANGE
480811.52;+730,+729,;14~I V("TYPE_OF_MVMT")="DISCHARGED TO ANOTHER HOSP"
481811.52;+730,+729,;22~I $G(V("TYPE_OF_MVMT"))="DISCHARGED TO ANOTHER HOSP"
482811.52;+730,+729,;23~"TYPE_OF_MVMT";
483811.53;+731,+729,;.01~07/22/2011@03:16:28
484811.53;+731,+729,;2~WP-start~1
485Exchange Stub
486]]>
487</FILEMAN_FDA>
488<IEN_ROOT>
489<![CDATA[
490730^1
491731^1
492]]>
493</IEN_ROOT>
494</FILEMAN_FILE>
495<FILEMAN_FILE>
496<FILE_NAME>REMINDER TERM</FILE_NAME>
497<FILE_NUMBER>811.5</FILE_NUMBER>
498<POINT_01>MU DISCHARGED PT LEFT AGAINST MED ADVICE</POINT_01>
499<INTERNAL_ENTRY_NUMBER>688</INTERNAL_ENTRY_NUMBER>
500<CHECKSUM>1255054350</CHECKSUM>
501<SELECTED>NO</SELECTED>
502<FILEMAN_FDA>
503<![CDATA[
504811.5;+688,;.01~MU DISCHARGED PT LEFT AGAINST MED ADVICE
505811.5;+688,;100~LOCAL
506811.52;+689,+688,;.01~CF.VA-DISCHARGES FOR A DATE RANGE
507811.52;+689,+688,;14~I V("TYPE_OF_MVMT")="PATIENT LEFT AGAINST MED ADVICE"
508811.52;+689,+688,;22~I $G(V("TYPE_OF_MVMT"))="PATIENT LEFT AGAINST MED ADVICE"
509811.52;+689,+688,;23~"TYPE_OF_MVMT";
510811.53;+690,+688,;.01~07/22/2011@03:16:28
511811.53;+690,+688,;2~WP-start~1
512Exchange Stub
513]]>
514</FILEMAN_FDA>
515<IEN_ROOT>
516<![CDATA[
517689^1
518690^1
519]]>
520</IEN_ROOT>
521</FILEMAN_FILE>
522<FILEMAN_FILE>
523<FILE_NAME>REMINDER TERM</FILE_NAME>
524<FILE_NUMBER>811.5</FILE_NUMBER>
525<POINT_01>MU DISCHARGE DEATH</POINT_01>
526<INTERNAL_ENTRY_NUMBER>685</INTERNAL_ENTRY_NUMBER>
527<CHECKSUM>536067863</CHECKSUM>
528<SELECTED>NO</SELECTED>
529<FILEMAN_FDA>
530<![CDATA[
531811.5;+685,;.01~MU DISCHARGE DEATH
532811.5;+685,;100~LOCAL
533811.52;+686,+685,;.01~CF.VA-DISCHARGES FOR A DATE RANGE
534811.52;+686,+685,;14~I V("TYPE_OF_MVMT")="DEATH"
535811.52;+686,+685,;22~I $G(V("TYPE_OF_MVMT"))="DEATH"
536811.52;+686,+685,;23~"TYPE_OF_MVMT";
537811.53;+687,+685,;.01~07/22/2011@03:16:28
538811.53;+687,+685,;2~WP-start~1
539Exchange Stub
540]]>
541</FILEMAN_FDA>
542<IEN_ROOT>
543<![CDATA[
544686^1
545687^1
546]]>
547</IEN_ROOT>
548</FILEMAN_FILE>
549<FILEMAN_FILE>
550<FILE_NAME>REMINDER TERM</FILE_NAME>
551<FILE_NUMBER>811.5</FILE_NUMBER>
552<POINT_01>MU DISCHARGED TO HEALTH CARE FACILITY FOR HOSPIC CARE</POINT_01>
553<INTERNAL_ENTRY_NUMBER>684</INTERNAL_ENTRY_NUMBER>
554<CHECKSUM>1819822144</CHECKSUM>
555<SELECTED>NO</SELECTED>
556<FILEMAN_FDA>
557<![CDATA[
558811.5;+684,;.01~MU DISCHARGED TO HEALTH CARE FACILITY FOR HOSPIC CARE
559811.5;+684,;100~LOCAL
560811.52;+685,+684,;.01~CF.VA-DISCHARGES FOR A DATE RANGE
561811.52;+685,+684,;14~I V("TYPE_OF_MVMT")="DISCHARGED TO HOSPICE CARE FACILITY"
562811.52;+685,+684,;22~I $G(V("TYPE_OF_MVMT"))="DISCHARGED TO HOSPICE CARE FACILITY"
563811.52;+685,+684,;23~"TYPE_OF_MVMT";
564811.53;+686,+684,;.01~07/22/2011@03:16:28
565811.53;+686,+684,;2~WP-start~1
566Exchange Stub
567]]>
568</FILEMAN_FDA>
569<IEN_ROOT>
570<![CDATA[
571685^1
572686^1
573]]>
574</IEN_ROOT>
575</FILEMAN_FILE>
576<FILEMAN_FILE>
577<FILE_NAME>REMINDER TERM</FILE_NAME>
578<FILE_NUMBER>811.5</FILE_NUMBER>
579<POINT_01>MU DISCHARGED HOME-HOSPIC CARE</POINT_01>
580<INTERNAL_ENTRY_NUMBER>675</INTERNAL_ENTRY_NUMBER>
581<CHECKSUM>1839453929</CHECKSUM>
582<SELECTED>NO</SELECTED>
583<FILEMAN_FDA>
584<![CDATA[
585811.5;+675,;.01~MU DISCHARGED HOME-HOSPIC CARE
586811.5;+675,;100~LOCAL
587811.52;+676,+675,;.01~CF.VA-DISCHARGES FOR A DATE RANGE
588811.52;+676,+675,;14~I V("TYPE_OF_MVMT")="DISCHARGE TO HOME FOR HOSPIC CARE"
589811.52;+676,+675,;22~I $G(V("TYPE_OF_MVMT"))="DISCHARGE TO HOME FOR HOSPIC CARE"
590811.52;+676,+675,;23~"TYPE_OF_MVMT";
591811.53;+677,+675,;.01~07/22/2011@03:16:28
592811.53;+677,+675,;2~WP-start~1
593Exchange Stub
594]]>
595</FILEMAN_FDA>
596<IEN_ROOT>
597<![CDATA[
598676^1
599677^1
600]]>
601</IEN_ROOT>
602</FILEMAN_FILE>
603<FILEMAN_FILE>
604<FILE_NAME>REMINDER TERM</FILE_NAME>
605<FILE_NUMBER>811.5</FILE_NUMBER>
606<POINT_01>MU STK-8 DENOM EXCLU TRM</POINT_01>
607<INTERNAL_ENTRY_NUMBER>543</INTERNAL_ENTRY_NUMBER>
608<CHECKSUM>1459727918</CHECKSUM>
609<SELECTED>NO</SELECTED>
610<FILEMAN_FDA>
611<![CDATA[
612811.5;+543,;.01~MU STK-8 DENOM EXCLU TRM
613811.5;+543,;1~WP-start~1
614CONTAINS HF
615811.5;+543,;100~LOCAL
616811.52;+544,+543,;.01~HF.COMFORT MEASURES PROTOCOL FOLLOWED
617811.52;+545,+543,;.01~HF.ELECTIVE CAROTID INTERVENTION
618811.52;+546,+543,;.01~HF.ENROLLED IN CLINICAL TRIALS
619811.52;+547,+543,;.01~HF.COMFORT MEASURES ON OR DAY AFTER ARRIVAL
620811.53;+548,+543,;.01~07/22/2011@03:16:28
621811.53;+548,+543,;2~WP-start~1
622Exchange Stub
623]]>
624</FILEMAN_FDA>
625<IEN_ROOT>
626<![CDATA[
627544^2
628545^5
629546^6
630547^9
631548^1
632]]>
633</IEN_ROOT>
634</FILEMAN_FILE>
635<FILEMAN_FILE>
636<FILE_NAME>REMINDER DEFINITION</FILE_NAME>
637<FILE_NUMBER>811.9</FILE_NUMBER>
638<POINT_01>MU STK-10 NUMER CR</POINT_01>
639<INTERNAL_ENTRY_NUMBER>242</INTERNAL_ENTRY_NUMBER>
640<CHECKSUM>1119886564</CHECKSUM>
641<SELECTED>YES</SELECTED>
642<FILEMAN_FDA>
643<![CDATA[
644811.9;+242,;.01~MU STK-10 NUMER CR
645811.9;+242,;1.2~MU STK-10 NUMER CR
646811.9;+242,;2~WP-start~15
647.
648Discharges with an ICD-9-CM Principal Diagnosis Code for ischemic or hemorrhagic stroke as defined in Appendix A, Table 8.1 or Table 8.2.
649.
650A discharge to home, home care or court/law enforcement
651Excluded Populations:
652.
653Patients less than 18 years of age
654.
655Patients who have a Length of Stay greater than 120 days
656.
657Patients with Comfort Measures Only documented
658.
659Patients enrolled in clinical trials
660.
661Patients admitted for Elective Carotid Intervention
662811.9;+242,;30~(AGE)&(FI(3)&FF(4))&'FI(6)&'FI(9)&'FI(7)&'FI(8)&'FI(10)&'FI(4)&'FI(5)&(FI(11)&FF(4))
663811.9;+242,;31~(AGE)&(FI(3)&FF(4))&'FI(6)&'FI(9)&'FI(7)&'FI(8)&'FI(10)&'FI(4)&'FI(5)&(FI(11)&FF(4))
664811.9;+242,;32~12
665811.9;+242,;33~AGE;3;FF4;6;9;7;8;10;4;5;11;FF4
666811.9;+242,;36~0
667811.9;+242,;40~0
668811.9;+242,;42~5
669811.9;+242,;43~1;2;FF1;FF2;FF3
670811.9;+242,;62~0
671811.9;+242,;63~0
672811.9;+242,;67~0
673811.9;+242,;68~0
674811.9;+242,;72~0
675811.9;+242,;73~0
676811.9;+242,;77~0
677811.9;+242,;78~0
678811.9;+242,;100~LOCAL
679811.9;+242,;103~L
680811.9001;+243,+242,;.01~07/22/2011@03:16:29
681811.9001;+243,+242,;2~WP-start~1
682Exchange Stub
683811.902;+244,+242,;.01~CF.VA-ADMISSIONS FOR A DATE RANGE
684811.902;+244,+242,;24~0
685811.902;+244,+242,;25~0
686811.902;+245,+242,;.01~RT.MU DISCHARGED TO HEALTH CARE FACILITY FOR HOSPIC CARE
687811.902;+245,+242,;24~0
688811.902;+245,+242,;25~0
689811.902;+246,+242,;.01~RT.MU STK-10 NUMER INCLU TRM
690811.902;+246,+242,;24~0
691811.902;+246,+242,;25~0
692811.902;+247,+242,;.01~CF.VA-DISCHARGES FOR A DATE RANGE
693811.902;+247,+242,;24~0
694811.902;+247,+242,;25~0
695811.902;+248,+242,;.01~TX.MU STK-8 DENOM INCLU TX
696811.902;+248,+242,;17~50
697811.902;+248,+242,;24~0
698811.902;+248,+242,;25~0
699811.902;+249,+242,;.01~RT.MU STK-8 DENOM EXCLU TRM
700811.902;+249,+242,;17~50
701811.902;+249,+242,;24~0
702811.902;+249,+242,;25~0
703811.902;+250,+242,;.01~TX.MU STK DENOM EXCLU ELECTIVE SURGERY TX
704811.902;+250,+242,;24~0
705811.902;+250,+242,;25~0
706811.902;+251,+242,;.01~RT.MU DISCHARGE DEATH
707811.902;+251,+242,;24~0
708811.902;+251,+242,;25~0
709811.902;+252,+242,;.01~RT.MU DISCHARGED HOME-HOSPIC CARE
710811.902;+252,+242,;24~0
711811.902;+252,+242,;25~0
712811.902;+253,+242,;.01~RT.MU DISCHARGED PT LEFT AGAINST MED ADVICE
713811.902;+253,+242,;24~0
714811.902;+253,+242,;25~0
715811.902;+254,+242,;.01~RT.MU DISCHARGE TO ANOTHER HOSP
716811.902;+254,+242,;24~0
717811.902;+254,+242,;25~0
718811.925;+255,+242,;.01~1
719811.925;+255,+242,;3~(MAX_DATE(3)>MAX_DATE(2))&(MAX_DATE(3)<MAX_DATE(1))
720811.925;+255,+242,;10~(FN(1)>FN(2))&(FN(1)<FN(4))
721811.925;+255,+242,;41~0
722811.925;+255,+242,;42~0
723811.925;+256,+242,;.01~2
724811.925;+256,+242,;3~(MAX_DATE(5)>MAX_DATE(2))&(MAX_DATE(5)<MAX_DATE(1))
725811.925;+256,+242,;10~(FN(1)>FN(2))&(FN(1)<FN(4))
726811.925;+256,+242,;41~0
727811.925;+256,+242,;42~0
728811.925;+257,+242,;.01~3
729811.925;+257,+242,;3~(MAX_DATE(4)>MAX_DATE(2))&(MAX_DATE(4)<MAX_DATE(1))
730811.925;+257,+242,;10~(FN(1)>FN(2))&(FN(1)<FN(4))
731811.925;+257,+242,;41~0
732811.925;+257,+242,;42~0
733811.925;+258,+242,;.01~4
734811.925;+258,+242,;3~DIFF_DATE(2,1)<121
735811.925;+258,+242,;10~FN(1)<121
736811.925;+258,+242,;41~0
737811.925;+258,+242,;42~0
738811.9255;+259,+255,+242,;.01~1
739811.9255;+259,+255,+242,;.02~MAX_DATE
740811.9255;+260,+256,+242,;.01~1
741811.9255;+260,+256,+242,;.02~MAX_DATE
742811.9255;+261,+257,+242,;.01~1
743811.9255;+261,+257,+242,;.02~MAX_DATE
744811.9255;+262,+258,+242,;.01~1
745811.9255;+262,+258,+242,;.02~DIFF_DATE
746811.9255;+263,+255,+242,;.01~2
747811.9255;+263,+255,+242,;.02~MAX_DATE
748811.9255;+264,+256,+242,;.01~2
749811.9255;+264,+256,+242,;.02~MAX_DATE
750811.9255;+265,+257,+242,;.01~2
751811.9255;+265,+257,+242,;.02~MAX_DATE
752811.9255;+266,+255,+242,;.01~3
753811.9255;+266,+255,+242,;.02~MAX_DATE
754811.9255;+267,+256,+242,;.01~3
755811.9255;+267,+256,+242,;.02~MAX_DATE
756811.9255;+268,+257,+242,;.01~3
757811.9255;+268,+257,+242,;.02~MAX_DATE
758811.9255;+269,+255,+242,;.01~4
759811.9255;+269,+255,+242,;.02~MAX_DATE
760811.9255;+270,+256,+242,;.01~4
761811.9255;+270,+256,+242,;.02~MAX_DATE
762811.9255;+271,+257,+242,;.01~4
763811.9255;+271,+257,+242,;.02~MAX_DATE
764811.9256;+272,+259,+255,+242,;.01~3
765811.9256;+273,+260,+256,+242,;.01~5
766811.9256;+274,+261,+257,+242,;.01~4
767811.9256;+275,+262,+258,+242,;.01~2
768811.9256;+276,+263,+255,+242,;.01~2
769811.9256;+277,+264,+256,+242,;.01~2
770811.9256;+278,+265,+257,+242,;.01~2
771811.9256;+279,+266,+255,+242,;.01~3
772811.9256;+280,+267,+256,+242,;.01~5
773811.9256;+281,+268,+257,+242,;.01~4
774811.9256;+282,+269,+255,+242,;.01~1
775811.9256;+283,+270,+256,+242,;.01~1
776811.9256;+284,+271,+257,+242,;.01~1
777811.9256;+285,+262,+258,+242,;.01~1
778811.97;+286,+242,;.01~99Y
779811.97;+286,+242,;1~18
780811.97;+286,+242,;2~99
781811.97;+286,+242,;5~0
782811.97;+286,+242,;6~0
783]]>
784</FILEMAN_FDA>
785<IEN_ROOT>
786<![CDATA[
787243^1
788244^1
789245^10
790246^11
791247^2
792248^3
793249^4
794250^5
795251^6
796252^7
797253^8
798254^9
799255^1
800256^2
801257^3
802258^4
803259^1
804260^1
805261^1
806262^1
807263^2
808264^2
809265^2
810266^3
811267^3
812268^3
813269^4
814270^4
815271^4
816272^1
817273^1
818274^1
819275^1
820276^1
821277^1
822278^1
823279^1
824280^1
825281^1
826282^1
827283^1
828284^1
829285^2
830286^1
831]]>
832</IEN_ROOT>
833</FILEMAN_FILE>
834<FILEMAN_FILE>
835<FILE_NAME>REMINDER DEFINITION</FILE_NAME>
836<FILE_NUMBER>811.9</FILE_NUMBER>
837<POINT_01>MU STK-10 DENOM CR</POINT_01>
838<INTERNAL_ENTRY_NUMBER>241</INTERNAL_ENTRY_NUMBER>
839<CHECKSUM>1212364542</CHECKSUM>
840<SELECTED>YES</SELECTED>
841<FILEMAN_FDA>
842<![CDATA[
843811.9;+241,;.01~MU STK-10 DENOM CR
844811.9;+241,;1.2~MU STK-10 DENOM CR
845811.9;+241,;2~WP-start~15
846.
847Discharges with an ICD-9-CM Principal Diagnosis Code for ischemic or hemorrhagic stroke as defined in Appendix A, Table 8.1 or Table 8.2.
848.
849A discharge to home, home care or court/law enforcement
850Excluded Populations:
851.
852Patients less than 18 years of age
853.
854Patients who have a Length of Stay greater than 120 days
855.
856Patients with Comfort Measures Only documented
857.
858Patients enrolled in clinical trials
859.
860Patients admitted for Elective Carotid Intervention
861811.9;+241,;30~(AGE)&(FI(3)&FF(4))&'FI(6)&'FI(9)&'FI(7)&'FI(8)&'FI(10)&'FI(4)&'FI(5)
862811.9;+241,;31~(AGE)&(FI(3)&FF(4))&'FI(6)&'FI(9)&'FI(7)&'FI(8)&'FI(10)&'FI(4)&'FI(5)
863811.9;+241,;32~10
864811.9;+241,;33~AGE;3;FF4;6;9;7;8;10;4;5
865811.9;+241,;36~0
866811.9;+241,;40~0
867811.9;+241,;42~5
868811.9;+241,;43~1;2;FF1;FF2;FF3
869811.9;+241,;62~0
870811.9;+241,;63~0
871811.9;+241,;67~0
872811.9;+241,;68~0
873811.9;+241,;72~0
874811.9;+241,;73~0
875811.9;+241,;77~0
876811.9;+241,;78~0
877811.9;+241,;100~LOCAL
878811.9;+241,;103~L
879811.9001;+242,+241,;.01~07/22/2011@03:16:30
880811.9001;+242,+241,;2~WP-start~1
881Exchange Stub
882811.902;+243,+241,;.01~CF.VA-ADMISSIONS FOR A DATE RANGE
883811.902;+243,+241,;24~0
884811.902;+243,+241,;25~0
885811.902;+244,+241,;.01~RT.MU DISCHARGED TO HEALTH CARE FACILITY FOR HOSPIC CARE
886811.902;+244,+241,;24~0
887811.902;+244,+241,;25~0
888811.902;+245,+241,;.01~CF.VA-DISCHARGES FOR A DATE RANGE
889811.902;+245,+241,;24~0
890811.902;+245,+241,;25~0
891811.902;+246,+241,;.01~TX.MU STK-8 DENOM INCLU TX
892811.902;+246,+241,;17~50
893811.902;+246,+241,;24~0
894811.902;+246,+241,;25~0
895811.902;+247,+241,;.01~RT.MU STK-8 DENOM EXCLU TRM
896811.902;+247,+241,;17~50
897811.902;+247,+241,;24~0
898811.902;+247,+241,;25~0
899811.902;+248,+241,;.01~TX.MU STK DENOM EXCLU ELECTIVE SURGERY TX
900811.902;+248,+241,;24~0
901811.902;+248,+241,;25~0
902811.902;+249,+241,;.01~RT.MU DISCHARGE DEATH
903811.902;+249,+241,;24~0
904811.902;+249,+241,;25~0
905811.902;+250,+241,;.01~RT.MU DISCHARGED HOME-HOSPIC CARE
906811.902;+250,+241,;24~0
907811.902;+250,+241,;25~0
908811.902;+251,+241,;.01~RT.MU DISCHARGED PT LEFT AGAINST MED ADVICE
909811.902;+251,+241,;24~0
910811.902;+251,+241,;25~0
911811.902;+252,+241,;.01~RT.MU DISCHARGE TO ANOTHER HOSP
912811.902;+252,+241,;24~0
913811.902;+252,+241,;25~0
914811.925;+253,+241,;.01~1
915811.925;+253,+241,;3~(MAX_DATE(3)>MAX_DATE(2))&(MAX_DATE(3)<MAX_DATE(1))
916811.925;+253,+241,;10~(FN(1)>FN(2))&(FN(1)<FN(4))
917811.925;+253,+241,;41~0
918811.925;+253,+241,;42~0
919811.925;+254,+241,;.01~2
920811.925;+254,+241,;3~(MAX_DATE(5)>MAX_DATE(2))&(MAX_DATE(5)<MAX_DATE(1))
921811.925;+254,+241,;10~(FN(1)>FN(2))&(FN(1)<FN(4))
922811.925;+254,+241,;41~0
923811.925;+254,+241,;42~0
924811.925;+255,+241,;.01~3
925811.925;+255,+241,;3~(MAX_DATE(4)>MAX_DATE(2))&(MAX_DATE(4)<MAX_DATE(1))
926811.925;+255,+241,;10~(FN(1)>FN(2))&(FN(1)<FN(4))
927811.925;+255,+241,;41~0
928811.925;+255,+241,;42~0
929811.925;+256,+241,;.01~4
930811.925;+256,+241,;3~DIFF_DATE(2,1)<121
931811.925;+256,+241,;10~FN(1)<121
932811.925;+256,+241,;41~0
933811.925;+256,+241,;42~0
934811.9255;+257,+253,+241,;.01~1
935811.9255;+257,+253,+241,;.02~MAX_DATE
936811.9255;+258,+254,+241,;.01~1
937811.9255;+258,+254,+241,;.02~MAX_DATE
938811.9255;+259,+255,+241,;.01~1
939811.9255;+259,+255,+241,;.02~MAX_DATE
940811.9255;+260,+256,+241,;.01~1
941811.9255;+260,+256,+241,;.02~DIFF_DATE
942811.9255;+261,+253,+241,;.01~2
943811.9255;+261,+253,+241,;.02~MAX_DATE
944811.9255;+262,+254,+241,;.01~2
945811.9255;+262,+254,+241,;.02~MAX_DATE
946811.9255;+263,+255,+241,;.01~2
947811.9255;+263,+255,+241,;.02~MAX_DATE
948811.9255;+264,+253,+241,;.01~3
949811.9255;+264,+253,+241,;.02~MAX_DATE
950811.9255;+265,+254,+241,;.01~3
951811.9255;+265,+254,+241,;.02~MAX_DATE
952811.9255;+266,+255,+241,;.01~3
953811.9255;+266,+255,+241,;.02~MAX_DATE
954811.9255;+267,+253,+241,;.01~4
955811.9255;+267,+253,+241,;.02~MAX_DATE
956811.9255;+268,+254,+241,;.01~4
957811.9255;+268,+254,+241,;.02~MAX_DATE
958811.9255;+269,+255,+241,;.01~4
959811.9255;+269,+255,+241,;.02~MAX_DATE
960811.9256;+270,+257,+253,+241,;.01~3
961811.9256;+271,+258,+254,+241,;.01~5
962811.9256;+272,+259,+255,+241,;.01~4
963811.9256;+273,+260,+256,+241,;.01~2
964811.9256;+274,+261,+253,+241,;.01~2
965811.9256;+275,+262,+254,+241,;.01~2
966811.9256;+276,+263,+255,+241,;.01~2
967811.9256;+277,+264,+253,+241,;.01~3
968811.9256;+278,+265,+254,+241,;.01~5
969811.9256;+279,+266,+255,+241,;.01~4
970811.9256;+280,+267,+253,+241,;.01~1
971811.9256;+281,+268,+254,+241,;.01~1
972811.9256;+282,+269,+255,+241,;.01~1
973811.9256;+283,+260,+256,+241,;.01~1
974811.97;+284,+241,;.01~99Y
975811.97;+284,+241,;1~18
976811.97;+284,+241,;2~99
977811.97;+284,+241,;5~0
978811.97;+284,+241,;6~0
979]]>
980</FILEMAN_FDA>
981<IEN_ROOT>
982<![CDATA[
983242^1
984243^1
985244^10
986245^2
987246^3
988247^4
989248^5
990249^6
991250^7
992251^8
993252^9
994253^1
995254^2
996255^3
997256^4
998257^1
999258^1
1000259^1
1001260^1
1002261^2
1003262^2
1004263^2
1005264^3
1006265^3
1007266^3
1008267^4
1009268^4
1010269^4
1011270^1
1012271^1
1013272^1
1014273^1
1015274^1
1016275^1
1017276^1
1018277^1
1019278^1
1020279^1
1021280^1
1022281^1
1023282^1
1024283^2
1025284^1
1026]]>
1027</IEN_ROOT>
1028</FILEMAN_FILE>
1029<INDEX>
1030<NUMBER_OF_COMPONENTS>20</NUMBER_OF_COMPONENTS>
1031<COMPONENT>
1032<M_ROUTINE_START>19</M_ROUTINE_START>
1033<ROUTINE_CODE_END>105</ROUTINE_CODE_END>
1034<ROUTINE_CODE_START>24</ROUTINE_CODE_START>
1035</COMPONENT>
1036<COMPONENT>
1037<FDA_END>119</FDA_END>
1038<FDA_START>118</FDA_START>
1039<FILE_START>109</FILE_START>
1040</COMPONENT>
1041<COMPONENT>
1042<FDA_END>136</FDA_END>
1043<FDA_START>132</FDA_START>
1044<FILE_START>123</FILE_START>
1045</COMPONENT>
1046<COMPONENT>
1047<FDA_END>153</FDA_END>
1048<FDA_START>149</FDA_START>
1049<FILE_START>140</FILE_START>
1050</COMPONENT>
1051<COMPONENT>
1052<FDA_END>170</FDA_END>
1053<FDA_START>166</FDA_START>
1054<FILE_START>157</FILE_START>
1055</COMPONENT>
1056<COMPONENT>
1057<FDA_END>187</FDA_END>
1058<FDA_START>183</FDA_START>
1059<FILE_START>174</FILE_START>
1060</COMPONENT>
1061<COMPONENT>
1062<FDA_END>204</FDA_END>
1063<FDA_START>200</FDA_START>
1064<FILE_START>191</FILE_START>
1065</COMPONENT>
1066<COMPONENT>
1067<FDA_END>252</FDA_END>
1068<FDA_START>217</FDA_START>
1069<FILE_START>208</FILE_START>
1070<IEN_ROOT_END>257</IEN_ROOT_END>
1071<IEN_ROOT_START>257</IEN_ROOT_START>
1072</COMPONENT>
1073<COMPONENT>
1074<FDA_END>308</FDA_END>
1075<FDA_START>270</FDA_START>
1076<FILE_START>261</FILE_START>
1077<IEN_ROOT_END>313</IEN_ROOT_END>
1078<IEN_ROOT_START>313</IEN_ROOT_START>
1079</COMPONENT>
1080<COMPONENT>
1081<FDA_END>343</FDA_END>
1082<FDA_START>326</FDA_START>
1083<FILE_START>317</FILE_START>
1084<IEN_ROOT_END>351</IEN_ROOT_END>
1085<IEN_ROOT_START>348</IEN_ROOT_START>
1086</COMPONENT>
1087<COMPONENT>
1088<FDA_END>422</FDA_END>
1089<FDA_START>364</FDA_START>
1090<FILE_START>355</FILE_START>
1091<IEN_ROOT_END>440</IEN_ROOT_END>
1092<IEN_ROOT_START>427</IEN_ROOT_START>
1093</COMPONENT>
1094<COMPONENT>
1095<FDA_END>458</FDA_END>
1096<FDA_START>453</FDA_START>
1097<FILE_START>444</FILE_START>
1098<IEN_ROOT_END>464</IEN_ROOT_END>
1099<IEN_ROOT_START>463</IEN_ROOT_START>
1100</COMPONENT>
1101<COMPONENT>
1102<FDA_END>485</FDA_END>
1103<FDA_START>477</FDA_START>
1104<FILE_START>468</FILE_START>
1105<IEN_ROOT_END>491</IEN_ROOT_END>
1106<IEN_ROOT_START>490</IEN_ROOT_START>
1107</COMPONENT>
1108<COMPONENT>
1109<FDA_END>512</FDA_END>
1110<FDA_START>504</FDA_START>
1111<FILE_START>495</FILE_START>
1112<IEN_ROOT_END>518</IEN_ROOT_END>
1113<IEN_ROOT_START>517</IEN_ROOT_START>
1114</COMPONENT>
1115<COMPONENT>
1116<FDA_END>539</FDA_END>
1117<FDA_START>531</FDA_START>
1118<FILE_START>522</FILE_START>
1119<IEN_ROOT_END>545</IEN_ROOT_END>
1120<IEN_ROOT_START>544</IEN_ROOT_START>
1121</COMPONENT>
1122<COMPONENT>
1123<FDA_END>566</FDA_END>
1124<FDA_START>558</FDA_START>
1125<FILE_START>549</FILE_START>
1126<IEN_ROOT_END>572</IEN_ROOT_END>
1127<IEN_ROOT_START>571</IEN_ROOT_START>
1128</COMPONENT>
1129<COMPONENT>
1130<FDA_END>593</FDA_END>
1131<FDA_START>585</FDA_START>
1132<FILE_START>576</FILE_START>
1133<IEN_ROOT_END>599</IEN_ROOT_END>
1134<IEN_ROOT_START>598</IEN_ROOT_START>
1135</COMPONENT>
1136<COMPONENT>
1137<FDA_END>622</FDA_END>
1138<FDA_START>612</FDA_START>
1139<FILE_START>603</FILE_START>
1140<IEN_ROOT_END>631</IEN_ROOT_END>
1141<IEN_ROOT_START>627</IEN_ROOT_START>
1142</COMPONENT>
1143<COMPONENT>
1144<FDA_END>782</FDA_END>
1145<FDA_START>644</FDA_START>
1146<FILE_START>635</FILE_START>
1147<IEN_ROOT_END>830</IEN_ROOT_END>
1148<IEN_ROOT_START>787</IEN_ROOT_START>
1149</COMPONENT>
1150<COMPONENT>
1151<FDA_END>978</FDA_END>
1152<FDA_START>843</FDA_START>
1153<FILE_START>834</FILE_START>
1154<IEN_ROOT_END>1025</IEN_ROOT_END>
1155<IEN_ROOT_START>983</IEN_ROOT_START>
1156</COMPONENT>
1157</INDEX>
1158</REMINDER_EXCHANGE_FILE_ENTRY>
Note: See TracBrowser for help on using the repository browser.