2.0P171385PXRMINPL2982435994
EDT)!(DATE="") D
. S IEN=""
. F S IEN=$O(^DGPM(SUB,DATE,IEN)) Q:IEN="" D
.. S DATA=^DGPM(IEN,0)
.. S DFN=$P(DATA,U,3)
.. I SUB="ATT1" D
...;WARD is a required field but it may not exist for older entries.
... S WARDP=+$P(DATA,U,6)
... S WARD=WARDP_";"_$S(WARDP>0:$P($G(^DIC(42,WARDP,0)),U,1),1:0)
.. I SUB="ATT3" D
... S WARD=$$GET1^DIQ(405,IEN,200)
... S WARDP=$S(WARD'="":$O(^DIC(42,"B",WARD,"")),1:0)
... S WARD=WARDP_";"_WARD
..;If a location list has been passed in make sure the hospital
..;location for the ward is on the list.
.. S HLOC=$S(WARDP>0:^DIC(42,WARDP,44),1:0)
.. I LOCLIST>0 S OK=$S($D(^PXRMD(810.9,LOCLIST,44,"B",HLOC)):1,1:0)
.. I 'OK Q
.. S (CNT,^TMP($J,"CNT",DFN))=+$G(^TMP($J,"CNT",DFN))+1
.. S ^TMP($J,PLIST,DFN,CNT)=U_DATE_U_405_U_DFN_U_WARD
.. S INST=$S(HLOC>0:+$P(^SC(HLOC,0),U,4),1:0)
.. S INSTNM=INST_";"_$S(INST>0:$P(^DIC(4,INST,0),U,1),1:0)
.. S INSTNM=INSTNM_";"_$S(INST>0:$P($G(^DIC(4,INST,99)),U,1),1:0)
.. S ^TMP($J,PLIST,DFN,CNT,"VALUE")=WARD
.. S ^TMP($J,PLIST,DFN,CNT,"INSTITUTION")=INSTNM
.. S ^TMP($J,PLIST,DFN,CNT,"TYPE_OF_MVMT")=$$GET1^DIQ(405.1,$P(DATA,U,4),.01)
K ^TMP($J,"CNT")
Q
;
;=====================================
CURR(NGET,BDT,EDT,PLIST,PARAM) ;Current inpatients.
; DBIAs #10035, #10039, #10040, #10061, #10090
N CNT,DFN,HLOC,INST,INSTNM,LOCLIST,OK,WARD,WARDP,WARDSUB,VAIN,VAERR
K ^TMP($J,PLIST),^TMP($J,"CNT")
S OK=1
S LOCLIST=$S(PARAM'="":+$O(^PXRMD(810.9,"B",PARAM,0)),1:0)
S WARD=""
F S WARD=$O(^DPT("CN",WARD)) Q:WARD="" D
. S DFN=0
. F S DFN=$O(^DPT("CN",WARD,DFN)) Q:'+DFN D
..;If a location list has been passed in make sure the hospital
..;location for the ward is on the list.
.. S WARDP=+$O(^DIC(42,"B",WARD,""))
.. S HLOC=+$G(^DIC(42,WARDP,44))
.. I LOCLIST>0 S OK=$S($D(^PXRMD(810.9,LOCLIST,44,"B",HLOC)):1,1:0)
.. I 'OK Q
.. K VAIN,VAERR D INP^VADPT
.. S WARDSUB=+VAIN(4)_";"_WARD
.. S (CNT,^TMP($J,"CNT",DFN))=+$G(^TMP($J,"CNT",DFN))+1
.. S ^TMP($J,PLIST,DFN,CNT)=U_+VAIN(7)_U_2_U_DFN_U_WARDSUB
.. S INST=$S(HLOC>0:+$P(^SC(HLOC,0),U,4),1:0)
.. S INSTNM=INST_";"_$S(INST>0:$P(^DIC(4,INST,0),U,1),1:0)
.. S INSTNM=INSTNM_";"_$S(INST>0:$P($G(^DIC(4,INST,99)),U,1),1:0)
.. S ^TMP($J,PLIST,DFN,CNT,"VALUE")=WARDSUB
.. S ^TMP($J,PLIST,DFN,CNT,"INSTITUTION")=INSTNM
.. S ^TMP($J,PLIST,DFN,CNT,"ADMIT DATE")=VAIN(7)
K ^TMP($J,"CNT")
Q
;
;=====================================
DISCH(NGET,BDT,EDT,PLIST,PARAM) ;Discharges during a date range.
;NOTE: ASIH is not accounted for in this version.
D ADMDISCH(BDT,EDT,PLIST,PARAM,"ATT3")
Q
;
]]>
VA DRUG CLASS50.605VT1034212858687870NOVA DRUG CLASS50.605CV350581335344278NOLABORATORY TEST60LDL CHOLESTEROL9011035251149NOHEALTH FACTORS9999999.64MU STK500491292931282NOHEALTH FACTORS9999999.64STATIN MEDS GIVEN AT DISCHARGE502071904696844NOHEALTH FACTORS9999999.64LABORATORY6283529089054NOHEALTH FACTORS9999999.64LDL 100 OR ABOVE630778274999NOHEALTH FACTORS9999999.64LDL NOT DONE PRIOR TO HOSP ADMISSION6291019186990NOHEALTH FACTORS9999999.64LIPID MED INTERVENTIONS660077249707256NOHEALTH FACTORS9999999.64LIPID LOWERING MED PRIOR TO HOSP ARRIVAL6274037945624NOHEALTH FACTORS9999999.64ELECTIVE CAROTID INTERVENTION5003062385829161NOHEALTH FACTORS9999999.64COMFORT MEASURES PROTOCOL FOLLOWED500305779307093NOHEALTH FACTORS9999999.64STATIN NOT PRESCRIBED AT DISCHARGE500762709566975NOHEALTH FACTORS9999999.64ENROLLED IN CLINICAL TRIALS500714182986683NOHEALTH FACTORS9999999.64COMFORT MEASURES ON OR DAY AFTER ARRIVAL500641895354898NOREMINDER COMPUTED FINDINGS811.4VA-DISCHARGES FOR A DATE RANGE941608937132NOREMINDER COMPUTED FINDINGS811.4VA-ADMISSIONS FOR A DATE RANGE901960922291NOREMINDER TAXONOMY811.2MU STK DENOM EXCLU ELECTIVE SURGERY TX1223882324901NOREMINDER TAXONOMY811.2MU STK-6 DENOM INCLU TX121336592338NOREMINDER TERM811.5MU STK-6 NUMER INCLU DRUG7352841598559NOREMINDER TERM811.5MU DISCHARGE TO ANOTHER HOSP7293422916630NOREMINDER TERM811.5MU DISCHARGED PT LEFT AGAINST MED ADVICE6881255054350NOREMINDER TERM811.5MU DISCHARGE DEATH685536067863NOREMINDER TERM811.5MU DISCHARGED TO HEALTH CARE FACILITY FOR HOSPIC CARE6841819822144NOREMINDER TERM811.5MU DISCHARGED HOME-HOSPIC CARE6751839453929NOREMINDER TERM811.5MU STK-6 DENOM INCLU LAB>=1005573302260757NO
=100
811.5;+557,;100~LOCAL
811.52;+558,+557,;.01~LT.LDL CHOLESTEROL
811.52;+558,+557,;14~I V>99
811.52;+558,+557,;17~1
811.52;+558,+557,;22~I V>99
811.52;+559,+557,;.01~HF.LDL 100 OR ABOVE
811.52;+560,+557,;.01~HF.LDL NOT DONE PRIOR TO HOSP ADMISSION
811.53;+561,+557,;.01~07/22/2011@03:14:46
811.53;+561,+557,;2~WP-start~1
Exchange Stub
]]>
REMINDER TERM811.5MU STK-6 DENOM INCLU DRUG TRM5562232999810NOREMINDER TERM811.5MU STK-6 DENOM INCLU LAB TRM5542815214583NOREMINDER TERM811.5MU STK-6 DENOM INCLU LAB<100 TRM5533862626982NOREMINDER TERM811.5MU STK-6 DENOM EXCLU TRM5441237097076NOREMINDER DEFINITION811.9MU STK-6 NUMER CR2393624100900YES
18y
LOS <=120 DAYS
NO COMFORT MEASURES DOCUMENTD
PT NOT ON CLNICAL TRIALS
EX PT ADMITTED FOR ELECTIVE CAROTID INTERVENTION
EX PT DISCHARGED TO ANOTHER HOSP
EX PT WHO LEFT AGAINST MEDICAL ADVICE
EX PT WHO EXPIRED
EX PT DISCHAGED TO HOME FO RHOSPICE CARE
EX PT DISCHARGED TO HEALTH CARE FACILITY FOR HOSPIC CARE
EX PT WITH A REASON FOR NOT PRESCRIBING STATIN MEDICATION AT DISCHARGE
Discharges with an ICD-9-CM Principal Diagnosis Code for ischemic stroke
Patients who were on a lipid lowering medication prior to hospital arrival
Patients with LDL-c not measured
Patients with LDL-c Greater than or equal to 100mg/dl
811.9;+239,;30~(AGE)&FI(10)&FI(12)&(FI(1)&FFI(1))&FI(7)&FI(6)&'FI(13)&'FI(14)&'FI(15)&'FI(16)&'FI(17)&'FI(3)&'FI(2)
811.9;+239,;31~(AGE)&FI(10)&FI(12)&(FI(1)&FFI(1))&FI(7)&FI(6)&'FI(13)&'FI(14)&'FI(15)&'FI(16)&'FI(17)&'FI(3)&'FI(2)
811.9;+239,;32~13
811.9;+239,;33~AGE;10;12;1;7;6;13;14;15;16;17;3;2
811.9;+239,;36~0
811.9;+239,;40~0
811.9;+239,;42~8
811.9;+239,;43~4;5;8;9;11;FF1;FF2;FF3
811.9;+239,;60~WP-start~1
^
811.9;+239,;62~1
811.9;+239,;63~0
811.9;+239,;67~0
811.9;+239,;68~0
811.9;+239,;71~WP-start~1
811.9;+239,;72~0
811.9;+239,;73~1
811.9;+239,;77~0
811.9;+239,;78~0
811.9;+239,;100~LOCAL
811.9;+239,;103~L
811.9001;+240,+239,;.01~07/22/2011@03:14:47
811.9001;+240,+239,;2~WP-start~1
Exchange Stub
811.902;+241,+239,;.01~TX.MU STK-6 DENOM INCLU TX
811.902;+241,+239,;24~0
811.902;+241,+239,;25~0
811.902;+242,+239,;.01~RT.MU STK-6 NUMER INCLU DRUG
811.902;+242,+239,;24~0
811.902;+242,+239,;25~0
811.902;+243,+239,;.01~HF.LDL NOT DONE PRIOR TO HOSP ADMISSION
811.902;+243,+239,;11~0
811.902;+243,+239,;24~0
811.902;+243,+239,;25~0
811.902;+244,+239,;.01~DC.CV350
811.902;+244,+239,;24~0
811.902;+244,+239,;25~0
811.902;+245,+239,;.01~RT.MU DISCHARGE DEATH
811.902;+245,+239,;24~0
811.902;+245,+239,;25~0
811.902;+246,+239,;.01~RT.MU DISCHARGE TO ANOTHER HOSP
811.902;+246,+239,;24~0
811.902;+246,+239,;25~0
811.902;+247,+239,;.01~RT.MU DISCHARGED HOME-HOSPIC CARE
811.902;+247,+239,;24~0
811.902;+247,+239,;25~0
811.902;+248,+239,;.01~RT.MU DISCHARGED PT LEFT AGAINST MED ADVICE
811.902;+248,+239,;24~0
811.902;+248,+239,;25~0
811.902;+249,+239,;.01~RT.MU DISCHARGED TO HEALTH CARE FACILITY FOR HOSPIC CARE
811.902;+249,+239,;24~0
811.902;+249,+239,;25~0
811.902;+250,+239,;.01~TX.MU STK DENOM EXCLU ELECTIVE SURGERY TX
811.902;+250,+239,;24~0
811.902;+250,+239,;25~0
811.902;+251,+239,;.01~RT.MU STK-6 DENOM EXCLU TRM
811.902;+251,+239,;24~0
811.902;+251,+239,;25~0
811.902;+252,+239,;.01~CF.VA-ADMISSIONS FOR A DATE RANGE
811.902;+252,+239,;24~0
811.902;+252,+239,;25~0
811.902;+253,+239,;.01~CF.VA-DISCHARGES FOR A DATE RANGE
811.902;+253,+239,;24~0
811.902;+253,+239,;25~0
811.902;+254,+239,;.01~RT.MU STK-6 DENOM INCLU LAB>=100
811.902;+254,+239,;24~0
811.902;+254,+239,;25~0
811.902;+255,+239,;.01~RT.MU STK-6 DENOM INCLU DRUG TRM
811.902;+255,+239,;24~0
811.902;+255,+239,;25~0
811.902;+256,+239,;.01~RT.MU STK-6 DENOM INCLU LAB<100 TRM
811.902;+256,+239,;24~0
811.902;+256,+239,;25~0
811.902;+257,+239,;.01~RT.MU STK-6 DENOM INCLU LAB TRM
811.902;+257,+239,;24~0
811.902;+257,+239,;25~0
811.90221;+258,+244,+239,;.01~ACTIVE
811.90221;+259,+255,+239,;.01~ACTIVE
811.90221;+260,+244,+239,;.01~DISCONTINUED
811.90221;+261,+255,+239,;.01~DISCONTINUED
811.90221;+262,+244,+239,;.01~DISCONTINUED (EDIT)
811.90221;+263,+255,+239,;.01~DISCONTINUED (EDIT)
811.90221;+264,+244,+239,;.01~DISCONTINUED (RENEWAL)
811.90221;+265,+255,+239,;.01~DISCONTINUED (RENEWAL)
811.90221;+266,+244,+239,;.01~EXPIRED
811.90221;+267,+255,+239,;.01~EXPIRED
811.90221;+268,+244,+239,;.01~SUSPENDED
811.90221;+269,+255,+239,;.01~SUSPENDED
811.925;+270,+239,;.01~1
811.925;+270,+239,;3~DIFF_DATE(5,4)<121
811.925;+270,+239,;10~FN(1)<121
811.925;+270,+239,;41~0
811.925;+270,+239,;42~0
811.925;+271,+239,;.01~2
811.925;+271,+239,;3~(MAX_DATE(1)MAX_DATE(4))!(MAX_DATE(1)=MAX_DATE(4)))&((MAX_DATE(1)>MAX_DATE(12))!(MAX_DATE(1)=MAX_DATE(12))))
811.925;+272,+239,;10~(FN(1)FN(6))!(FN(1)=FN(6)))&((FN(1)>FN(10))!(FN(1)=FN(10))))
811.925;+272,+239,;41~0
811.925;+272,+239,;42~0
811.9255;+273,+270,+239,;.01~1
811.9255;+273,+270,+239,;.02~DIFF_DATE
811.9255;+274,+271,+239,;.01~1
811.9255;+274,+271,+239,;.02~MAX_DATE
811.9255;+275,+272,+239,;.01~1
811.9255;+275,+272,+239,;.02~MAX_DATE
811.9255;+276,+272,+239,;.01~10
811.9255;+276,+272,+239,;.02~MAX_DATE
811.9255;+277,+272,+239,;.01~11
811.9255;+277,+272,+239,;.02~MAX_DATE
811.9255;+278,+272,+239,;.01~12
811.9255;+278,+272,+239,;.02~MAX_DATE
811.9255;+279,+271,+239,;.01~2
811.9255;+279,+271,+239,;.02~MAX_DATE
811.9255;+280,+272,+239,;.01~2
811.9255;+280,+272,+239,;.02~MAX_DATE
811.9255;+281,+271,+239,;.01~3
811.9255;+281,+271,+239,;.02~MAX_DATE
811.9255;+282,+272,+239,;.01~3
811.9255;+282,+272,+239,;.02~MAX_DATE
811.9255;+283,+271,+239,;.01~4
811.9255;+283,+271,+239,;.02~MAX_DATE
811.9255;+284,+272,+239,;.01~4
811.9255;+284,+272,+239,;.02~MAX_DATE
811.9255;+285,+272,+239,;.01~5
811.9255;+285,+272,+239,;.02~MAX_DATE
811.9255;+286,+272,+239,;.01~6
811.9255;+286,+272,+239,;.02~MAX_DATE
811.9255;+287,+272,+239,;.01~7
811.9255;+287,+272,+239,;.02~MAX_DATE
811.9255;+288,+272,+239,;.01~8
811.9255;+288,+272,+239,;.02~MAX_DATE
811.9255;+289,+272,+239,;.01~9
811.9255;+289,+272,+239,;.02~MAX_DATE
811.9256;+290,+273,+270,+239,;.01~5
811.9256;+291,+274,+271,+239,;.01~1
811.9256;+292,+275,+272,+239,;.01~1
811.9256;+293,+276,+272,+239,;.01~12
811.9256;+294,+277,+272,+239,;.01~1
811.9256;+295,+278,+272,+239,;.01~12
811.9256;+296,+279,+271,+239,;.01~5
811.9256;+297,+280,+272,+239,;.01~5
811.9256;+298,+281,+271,+239,;.01~1
811.9256;+299,+282,+272,+239,;.01~1
811.9256;+300,+283,+271,+239,;.01~5
811.9256;+301,+284,+272,+239,;.01~5
811.9256;+302,+285,+272,+239,;.01~1
811.9256;+303,+286,+272,+239,;.01~4
811.9256;+304,+287,+272,+239,;.01~1
811.9256;+305,+288,+272,+239,;.01~4
811.9256;+306,+289,+272,+239,;.01~1
811.9256;+307,+273,+270,+239,;.01~4
811.97;+308,+239,;.01~99Y
811.97;+308,+239,;1~18
811.97;+308,+239,;2~99
811.97;+308,+239,;5~0
811.97;+308,+239,;6~0
]]>
REMINDER DEFINITION811.9MU STK-6 DENOM CR1951268617803YES
18y
LOS <=120 DAYS
NO COMFORT MEASURES DOCUMENTD
PT NOT ON CLNICAL TRIALS
EX PT ADMITTED FOR ELECTIVE CAROTID INTERVENTION
EX PT DISCHARGED TO ANOTHER HOSP
EX PT WHO LEFT AGAINST MEDICAL ADVICE
EX PT WHO EXPIRED
EX PT DISCHAGED TO HOME FO RHOSPICE CARE
EX PT DISCHARGED TO HEALTH CARE FACILITY FOR HOSPIC CARE
EX PT WITH A REASON FOR NOT PRESCRIBING STATIN MEDICATION AT DISCHARGE
Discharges with an ICD-9-CM Principal Diagnosis Code for ischemic stroke
Patients who were on a lipid lowering medication prior to hospital arrival
Patients with LDL-c not measured
Patients with LDL-c Greater than or equal to 100mg/dl
811.9;+195,;30~(AGE)&(FI(1)&FFI(1))&FI(7)&FI(6)&'FI(13)&'FI(14)&'FI(15)&'FI(16)&'FI(17)&'FI(3)&'FI(2)
811.9;+195,;31~(AGE)&(FI(1)&FFI(1))&FI(7)&FI(6)&'FI(13)&'FI(14)&'FI(15)&'FI(16)&'FI(17)&'FI(3)&'FI(2)
811.9;+195,;32~11
811.9;+195,;33~AGE;1;7;6;13;14;15;16;17;3;2
811.9;+195,;36~0
811.9;+195,;40~0
811.9;+195,;42~8
811.9;+195,;43~4;5;8;9;11;FF1;FF2;FF3
811.9;+195,;60~WP-start~1
^
811.9;+195,;62~1
811.9;+195,;63~0
811.9;+195,;67~0
811.9;+195,;68~0
811.9;+195,;71~WP-start~1
811.9;+195,;72~0
811.9;+195,;73~1
811.9;+195,;77~0
811.9;+195,;78~0
811.9;+195,;100~LOCAL
811.9;+195,;103~L
811.9001;+196,+195,;.01~07/22/2011@03:14:48
811.9001;+196,+195,;2~WP-start~1
Exchange Stub
811.902;+197,+195,;.01~TX.MU STK-6 DENOM INCLU TX
811.902;+197,+195,;24~0
811.902;+197,+195,;25~0
811.902;+198,+195,;.01~HF.LDL NOT DONE PRIOR TO HOSP ADMISSION
811.902;+198,+195,;11~0
811.902;+198,+195,;24~0
811.902;+198,+195,;25~0
811.902;+199,+195,;.01~RT.MU DISCHARGE DEATH
811.902;+199,+195,;24~0
811.902;+199,+195,;25~0
811.902;+200,+195,;.01~RT.MU DISCHARGE TO ANOTHER HOSP
811.902;+200,+195,;24~0
811.902;+200,+195,;25~0
811.902;+201,+195,;.01~RT.MU DISCHARGED HOME-HOSPIC CARE
811.902;+201,+195,;24~0
811.902;+201,+195,;25~0
811.902;+202,+195,;.01~RT.MU DISCHARGED PT LEFT AGAINST MED ADVICE
811.902;+202,+195,;24~0
811.902;+202,+195,;25~0
811.902;+203,+195,;.01~RT.MU DISCHARGED TO HEALTH CARE FACILITY FOR HOSPIC CARE
811.902;+203,+195,;24~0
811.902;+203,+195,;25~0
811.902;+204,+195,;.01~TX.MU STK DENOM EXCLU ELECTIVE SURGERY TX
811.902;+204,+195,;24~0
811.902;+204,+195,;25~0
811.902;+205,+195,;.01~RT.MU STK-6 DENOM EXCLU TRM
811.902;+205,+195,;24~0
811.902;+205,+195,;25~0
811.902;+206,+195,;.01~CF.VA-ADMISSIONS FOR A DATE RANGE
811.902;+206,+195,;24~0
811.902;+206,+195,;25~0
811.902;+207,+195,;.01~CF.VA-DISCHARGES FOR A DATE RANGE
811.902;+207,+195,;24~0
811.902;+207,+195,;25~0
811.902;+208,+195,;.01~RT.MU STK-6 DENOM INCLU LAB>=100
811.902;+208,+195,;24~0
811.902;+208,+195,;25~0
811.902;+209,+195,;.01~RT.MU STK-6 DENOM INCLU DRUG TRM
811.902;+209,+195,;24~0
811.902;+209,+195,;25~0
811.902;+210,+195,;.01~RT.MU STK-6 DENOM INCLU LAB<100 TRM
811.902;+210,+195,;24~0
811.902;+210,+195,;25~0
811.902;+211,+195,;.01~RT.MU STK-6 DENOM INCLU LAB TRM
811.902;+211,+195,;24~0
811.902;+211,+195,;25~0
811.90221;+212,+209,+195,;.01~ACTIVE
811.90221;+213,+209,+195,;.01~DISCONTINUED
811.90221;+214,+209,+195,;.01~DISCONTINUED (EDIT)
811.90221;+215,+209,+195,;.01~DISCONTINUED (RENEWAL)
811.90221;+216,+209,+195,;.01~EXPIRED
811.90221;+217,+209,+195,;.01~SUSPENDED
811.925;+218,+195,;.01~1
811.925;+218,+195,;3~DIFF_DATE(5,4)<121
811.925;+218,+195,;10~FN(1)<121
811.925;+218,+195,;41~0
811.925;+218,+195,;42~0
811.925;+219,+195,;.01~2
811.925;+219,+195,;3~(MAX_DATE(1)MAX_DATE(4))!(MAX_DATE(1)=MAX_DATE(4)))&((MAX_DATE(1)>MAX_DATE(12))!(MAX_DATE(1)=MAX_DATE(12))))
811.925;+220,+195,;10~(FN(1)FN(6))!(FN(1)=FN(6)))&((FN(1)>FN(10))!(FN(1)=FN(10))))
811.925;+220,+195,;41~0
811.925;+220,+195,;42~0
811.9255;+221,+218,+195,;.01~1
811.9255;+221,+218,+195,;.02~DIFF_DATE
811.9255;+222,+219,+195,;.01~1
811.9255;+222,+219,+195,;.02~MAX_DATE
811.9255;+223,+220,+195,;.01~1
811.9255;+223,+220,+195,;.02~MAX_DATE
811.9255;+224,+220,+195,;.01~10
811.9255;+224,+220,+195,;.02~MAX_DATE
811.9255;+225,+220,+195,;.01~11
811.9255;+225,+220,+195,;.02~MAX_DATE
811.9255;+226,+220,+195,;.01~12
811.9255;+226,+220,+195,;.02~MAX_DATE
811.9255;+227,+219,+195,;.01~2
811.9255;+227,+219,+195,;.02~MAX_DATE
811.9255;+228,+220,+195,;.01~2
811.9255;+228,+220,+195,;.02~MAX_DATE
811.9255;+229,+219,+195,;.01~3
811.9255;+229,+219,+195,;.02~MAX_DATE
811.9255;+230,+220,+195,;.01~3
811.9255;+230,+220,+195,;.02~MAX_DATE
811.9255;+231,+219,+195,;.01~4
811.9255;+231,+219,+195,;.02~MAX_DATE
811.9255;+232,+220,+195,;.01~4
811.9255;+232,+220,+195,;.02~MAX_DATE
811.9255;+233,+220,+195,;.01~5
811.9255;+233,+220,+195,;.02~MAX_DATE
811.9255;+234,+220,+195,;.01~6
811.9255;+234,+220,+195,;.02~MAX_DATE
811.9255;+235,+220,+195,;.01~7
811.9255;+235,+220,+195,;.02~MAX_DATE
811.9255;+236,+220,+195,;.01~8
811.9255;+236,+220,+195,;.02~MAX_DATE
811.9255;+237,+220,+195,;.01~9
811.9255;+237,+220,+195,;.02~MAX_DATE
811.9256;+238,+221,+218,+195,;.01~5
811.9256;+239,+222,+219,+195,;.01~1
811.9256;+240,+223,+220,+195,;.01~1
811.9256;+241,+224,+220,+195,;.01~12
811.9256;+242,+225,+220,+195,;.01~1
811.9256;+243,+226,+220,+195,;.01~12
811.9256;+244,+227,+219,+195,;.01~5
811.9256;+245,+228,+220,+195,;.01~5
811.9256;+246,+229,+219,+195,;.01~1
811.9256;+247,+230,+220,+195,;.01~1
811.9256;+248,+231,+219,+195,;.01~5
811.9256;+249,+232,+220,+195,;.01~5
811.9256;+250,+233,+220,+195,;.01~1
811.9256;+251,+234,+220,+195,;.01~4
811.9256;+252,+235,+220,+195,;.01~1
811.9256;+253,+236,+220,+195,;.01~4
811.9256;+254,+237,+220,+195,;.01~1
811.9256;+255,+221,+218,+195,;.01~4
811.97;+256,+195,;.01~99Y
811.97;+256,+195,;1~18
811.97;+256,+195,;2~99
811.97;+256,+195,;5~0
811.97;+256,+195,;6~0
]]>
33191052411811810913113112214414413515815714817517116218918817920620219322321921023823622725525124227226825928928527630630229332331931034033632738835334439339344440639744944947946245348748455450049157155958958457559559461660859962262164363562664964867066265367667569768968070370272471670773072975374373476175878177476578978680780279381381283382681783983886385284387386810648868771137106913161150114113811321