Routine: BGPM5AYT

BGPM5AYT ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON SEP 02, 2011;

 ;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106

START ;

 K:'$G(ATXPGMC) ^TMP("ATX",$J)

 S ATXPGMC=$G(ATXPGMC)+1

 F ATXI=1:1 S X=$P($T(TMP+ATXI),";;",2,99) Q:X=""  S X="^TMP(""ATX"",$J,"_X,ATXI=ATXI+1,Y=$P($T(TMP+ATXI),";;",2,99) S @X=Y

TMP ;;TAXONOMY (WITH BULLETIN)

 ;;9002226.02101,"1010,59852 ",.01)

 ;;59852

 ;;9002226.02101,"1010,59852 ",.02)

 ;;59852

 ;;9002226.02101,"1010,59855 ",.01)

 ;;59855

 ;;9002226.02101,"1010,59855 ",.02)

 ;;59855

 ;;9002226.02101,"1010,59856 ",.01)

 ;;59856

 ;;9002226.02101,"1010,59856 ",.02)

 ;;59856

 ;;9002226.02101,"1010,59857 ",.01)

 ;;59857

 ;;9002226.02101,"1010,59857 ",.02)

 ;;59857

 ;;9002226.02101,"1010,59866 ",.01)

 ;;59866

 ;;9002226.02101,"1010,59866 ",.02)

 ;;59866

 ;;9002226.02101,"1010,59870 ",.01)

 ;;59870

 ;;9002226.02101,"1010,59870 ",.02)

 ;;59870

 ;;9002226.02101,"1010,59871 ",.01)

 ;;59871

 ;;9002226.02101,"1010,59871 ",.02)

 ;;59871

 ;;9002226.02101,"1010,59897 ",.01)

 ;;59897

 ;;9002226.02101,"1010,59897 ",.02)

 ;;59897

 ;;9002226.02101,"1010,59898 ",.01)

 ;;59898

 ;;9002226.02101,"1010,59898 ",.02)

 ;;59898

 ;;9002226.02101,"1010,59899 ",.01)

 ;;59899

 ;;9002226.02101,"1010,59899 ",.02)

 ;;59899

 ;;9002226.02101,"1010,76801 ",.01)

 ;;76801

 ;;9002226.02101,"1010,76801 ",.02)

 ;;76801

 ;;9002226.02101,"1010,76805 ",.01)

 ;;76805

 ;;9002226.02101,"1010,76805 ",.02)

 ;;76805

 ;;9002226.02101,"1010,76811 ",.01)

 ;;76811

 ;;9002226.02101,"1010,76811 ",.02)

 ;;76811

 ;;9002226.02101,"1010,76813 ",.01)

 ;;76813

 ;;9002226.02101,"1010,76813 ",.02)

 ;;76813

 ;;9002226.02101,"1010,76815 ",.01)

 ;;76815

 ;;9002226.02101,"1010,76815 ",.02)

 ;;76815

 ;;9002226.02101,"1010,76816 ",.01)

 ;;76816

 ;;9002226.02101,"1010,76816 ",.02)

 ;;76816

 ;;9002226.02101,"1010,76817 ",.01)

 ;;76817

 ;;9002226.02101,"1010,76817 ",.02)

 ;;76817

 ;;9002226.02101,"1010,76818 ",.01)

 ;;76818

 ;;9002226.02101,"1010,76818 ",.02)

 ;;76818

 ;;9002226.02101,"1010,76819 ",.01)

 ;;76819

 ;;9002226.02101,"1010,76819 ",.02)

 ;;76819

 ;;9002226.02101,"1010,76820 ",.01)

 ;;76820

 ;;9002226.02101,"1010,76820 ",.02)

 ;;76820

 ;;9002226.02101,"1010,76821 ",.01)

 ;;76821

 ;;9002226.02101,"1010,76821 ",.02)

 ;;76821

 ;;9002226.02101,"1010,76825 ",.01)

 ;;76825

 ;;9002226.02101,"1010,76825 ",.02)

 ;;76825

 ;;9002226.02101,"1010,76826 ",.01)

 ;;76826

 ;;9002226.02101,"1010,76826 ",.02)

 ;;76826

 ;;9002226.02101,"1010,76827 ",.01)

 ;;76827

 ;;9002226.02101,"1010,76827 ",.02)

 ;;76827

 ;;9002226.02101,"1010,76828 ",.01)

 ;;76828

 ;;9002226.02101,"1010,76828 ",.02)

 ;;76828

 ;;9002226.02101,"1010,76941 ",.01)

 ;;76941

 ;;9002226.02101,"1010,76941 ",.02)

 ;;76941

 ;;9002226.02101,"1010,76945 ",.01)

 ;;76945

 ;;9002226.02101,"1010,76945 ",.02)

 ;;76945

 ;;9002226.02101,"1010,76946 ",.01)

 ;;76946

 ;;9002226.02101,"1010,76946 ",.02)

 ;;76946

 ;;9002226.02101,"1010,80055 ",.01)

 ;;80055

 ;;9002226.02101,"1010,80055 ",.02)

 ;;80055

 ;;9002226.02101,"1010,81025 ",.01)

 ;;81025

 ;;9002226.02101,"1010,81025 ",.02)

 ;;81025

 ;;9002226.02101,"1010,82105 ",.01)

 ;;82105

 ;;9002226.02101,"1010,82105 ",.02)

 ;;82105

 ;;9002226.02101,"1010,82106 ",.01)

 ;;82106

 ;;9002226.02101,"1010,82106 ",.02)

 ;;82106

 ;;9002226.02101,"1010,82143 ",.01)

 ;;82143

 ;;9002226.02101,"1010,82143 ",.02)

 ;;82143

 ;;9002226.02101,"1010,82731 ",.01)

 ;;82731

 ;;9002226.02101,"1010,82731 ",.02)

 ;;82731

 ;;9002226.02101,"1010,83632 ",.01)

 ;;83632

 ;;9002226.02101,"1010,83632 ",.02)

 ;;83632

 ;;9002226.02101,"1010,83661 ",.01)

 ;;83661

 ;;9002226.02101,"1010,83661 ",.02)

 ;;83661

 ;;9002226.02101,"1010,83662 ",.01)

 ;;83662

 ;;9002226.02101,"1010,83662 ",.02)

 ;;83662

 ;;9002226.02101,"1010,83663 ",.01)

 ;;83663

 ;;9002226.02101,"1010,83663 ",.02)

 ;;83663

 ;;9002226.02101,"1010,83664 ",.01)

 ;;83664

 ;;9002226.02101,"1010,83664 ",.02)

 ;;83664

 ;;9002226.02101,"1010,84163 ",.01)

 ;;84163

 ;;9002226.02101,"1010,84163 ",.02)

 ;;84163

 ;;9002226.02101,"1010,84702 ",.01)

 ;;84702

 ;;9002226.02101,"1010,84702 ",.02)

 ;;84702

 ;;9002226.02101,"1010,84703 ",.01)

 ;;84703

 ;;9002226.02101,"1010,84703 ",.02)

 ;;84703

 ;;9002226.02101,"1010,84704 ",.01)

 ;;84704

 ;;9002226.02101,"1010,84704 ",.02)

 ;;84704

 ;;9002226.02101,"1010,86592 ",.01)

 ;;86592

 ;;9002226.02101,"1010,86592 ",.02)

 ;;86592

 ;;9002226.02101,"1010,86593 ",.01)

 ;;86593

 ;;9002226.02101,"1010,86593 ",.02)

 ;;86593

 ;;9002226.02101,"1010,86631 ",.01)

 ;;86631

 ;;9002226.02101,"1010,86631 ",.02)

 ;;86631

 ;;9002226.02101,"1010,86632 ",.01)

 ;;86632

 ;;9002226.02101,"1010,86632 ",.02)

 ;;86632

 ;;9002226.02101,"1010,87110 ",.01)

 ;;87110

 ;;9002226.02101,"1010,87110 ",.02)

 ;;87110

 ;;9002226.02101,"1010,87164 ",.01)

 ;;87164

 ;;9002226.02101,"1010,87164 ",.02)

 ;;87164

 ;;9002226.02101,"1010,87166 ",.01)

 ;;87166

 ;;9002226.02101,"1010,87166 ",.02)

 ;;87166

 ;;9002226.02101,"1010,87270 ",.01)

 ;;87270

 ;;9002226.02101,"1010,87270 ",.02)

 ;;87270

 ;;9002226.02101,"1010,87320 ",.01)

 ;;87320

 ;;9002226.02101,"1010,87320 ",.02)

 ;;87320

 ;;9002226.02101,"1010,87490 ",.01)

 ;;87490

 ;;9002226.02101,"1010,87490 ",.02)

 ;;87490

 ;;9002226.02101,"1010,87491 ",.01)

 ;;87491

 ;;9002226.02101,"1010,87491 ",.02)

 ;;87491

 ;;9002226.02101,"1010,87492 ",.01)

 ;;87492

 ;;9002226.02101,"1010,87492 ",.02)

 ;;87492

 ;;9002226.02101,"1010,87590 ",.01)

 ;;87590

 ;;9002226.02101,"1010,87590 ",.02)

 ;;87590

 ;;9002226.02101,"1010,87591 ",.01)

 ;;87591

 ;;9002226.02101,"1010,87591 ",.02)

 ;;87591

 ;;9002226.02101,"1010,87592 ",.01)

 ;;87592

 ;;9002226.02101,"1010,87592 ",.02)

 ;;87592

 ;;9002226.02101,"1010,87620 ",.01)

 ;;87620

 ;;9002226.02101,"1010,87620 ",.02)

 ;;87620

 ;;9002226.02101,"1010,87621 ",.01)

 ;;87621

 ;;9002226.02101,"1010,87621 ",.02)

 ;;87621

 ;;9002226.02101,"1010,87622 ",.01)

 ;;87622

 ;;9002226.02101,"1010,87622 ",.02)

 ;;87622

 ;;9002226.02101,"1010,87660 ",.01)

 ;;87660

 ;;9002226.02101,"1010,87660 ",.02)

 ;;87660

 ;;9002226.02101,"1010,87800 ",.01)

 ;;87800

 ;;9002226.02101,"1010,87800 ",.02)

 ;;87800

 ;;9002226.02101,"1010,87801 ",.01)

 ;;87801

 ;;9002226.02101,"1010,87801 ",.02)

 ;;87801

 ;;9002226.02101,"1010,87808 ",.01)

 ;;87808

 ;;9002226.02101,"1010,87808 ",.02)

 ;;87808

 ;;9002226.02101,"1010,87810 ",.01)

 ;;87810

 ;;9002226.02101,"1010,87810 ",.02)

 ;;87810

 ;;9002226.02101,"1010,87850 ",.01)

 ;;87850

 ;;9002226.02101,"1010,87850 ",.02)

 ;;87850

 ;;9002226.02101,"1010,88141 ",.01)

 ;;88141

 ;;9002226.02101,"1010,88141 ",.02)

 ;;88141

 ;;9002226.02101,"1010,88142 ",.01)

 ;;88142

 ;;9002226.02101,"1010,88142 ",.02)

 ;;88142

 ;;9002226.02101,"1010,88143 ",.01)

 ;;88143

 ;;9002226.02101,"1010,88143 ",.02)

 ;;88143

 ;;9002226.02101,"1010,88147 ",.01)

 ;;88147

 ;;9002226.02101,"1010,88147 ",.02)

 ;;88147

 ;;9002226.02101,"1010,88148 ",.01)

 ;;88148

 ;;9002226.02101,"1010,88148 ",.02)

 ;;88148

 ;;9002226.02101,"1010,88150 ",.01)

 ;;88150

 ;;9002226.02101,"1010,88150 ",.02)

 ;;88150

 ;;9002226.02101,"1010,88152 ",.01)

 ;;88152

 ;;9002226.02101,"1010,88152 ",.02)

 ;;88152

 ;;9002226.02101,"1010,88153 ",.01)

 ;;88153

 ;;9002226.02101,"1010,88153 ",.02)

 ;;88153

 ;;9002226.02101,"1010,88154 ",.01)

 ;;88154

 ;;9002226.02101,"1010,88154 ",.02)

 ;;88154

 ;;9002226.02101,"1010,88155 ",.01)

 ;;88155

 ;;9002226.02101,"1010,88155 ",.02)

 ;;88155

 ;;9002226.02101,"1010,88164 ",.01)

 ;;88164

 ;;9002226.02101,"1010,88164 ",.02)

 ;;88164

 ;;9002226.02101,"1010,88165 ",.01)

 ;;88165

 ;;9002226.02101,"1010,88165 ",.02)

 ;;88165

 ;;9002226.02101,"1010,88166 ",.01)

 ;;88166

 ;;9002226.02101,"1010,88166 ",.02)

 ;;88166

 ;;9002226.02101,"1010,88167 ",.01)

 ;;88167

 ;;9002226.02101,"1010,88167 ",.02)

 ;;88167

 ;;9002226.02101,"1010,88174 ",.01)

 ;;88174

 ;;9002226.02101,"1010,88174 ",.02)

 ;;88174

 ;;9002226.02101,"1010,88175 ",.01)

 ;;88175

 ;;9002226.02101,"1010,88175 ",.02)

 ;;88175

 ;;9002226.02101,"1010,88235 ",.01)

 ;;88235

 ;;9002226.02101,"1010,88235 ",.02)

 ;;88235

 ;;9002226.02101,"1010,88267 ",.01)

 ;;88267

 ;;9002226.02101,"1010,88267 ",.02)

 ;;88267

 ;;9002226.02101,"1010,88269 ",.01)

 ;;88269

 ;;9002226.02101,"1010,88269 ",.02)

 ;;88269

 ;;9002226.02101,"1010,G0101 ",.01)

 ;;G0101

 ;;9002226.02101,"1010,G0101 ",.02)

 ;;G0101

 ;;9002226.02101,"1010,G0123 ",.01)

 ;;G0123

 ;;9002226.02101,"1010,G0123 ",.02)

 ;;G0123

 ;;9002226.02101,"1010,G0124 ",.01)

 ;;G0124

 ;;9002226.02101,"1010,G0124 ",.02)

 ;;G0124

 ;;9002226.02101,"1010,G0141 ",.01)

 ;;G0141

 ;;9002226.02101,"1010,G0141 ",.02)

 ;;G0141

 ;;9002226.02101,"1010,G0143 ",.01)

 ;;G0143

 ;;9002226.02101,"1010,G0143 ",.02)

 ;;G0143

 ;;9002226.02101,"1010,G0144 ",.01)

 ;;G0144

 ;;9002226.02101,"1010,G0144 ",.02)

 ;;G0144

 ;;9002226.02101,"1010,G0145 ",.01)

 ;;G0145

 ;;9002226.02101,"1010,G0145 ",.02)

 ;;G0145

 ;;9002226.02101,"1010,G0147 ",.01)

 ;;G0147

 ;;9002226.02101,"1010,G0147 ",.02)

 ;;G0147

 ;;9002226.02101,"1010,G0148 ",.01)

 ;;G0148

 ;;9002226.02101,"1010,G0148 ",.02)

 ;;G0148

 ;;9002226.02101,"1010,H1000 ",.01)

 ;;H1000

 ;;9002226.02101,"1010,H1000 ",.02)

 ;;H1000

 ;;9002226.02101,"1010,H1001 ",.01)

 ;;H1001

 ;;9002226.02101,"1010,H1001 ",.02)

 ;;H1001

 ;;9002226.02101,"1010,H1003 ",.01)

 ;;H1003

 ;;9002226.02101,"1010,H1003 ",.02)

 ;;H1003

 ;;9002226.02101,"1010,H1004 ",.01)

 ;;H1004

 ;;9002226.02101,"1010,H1004 ",.02)

 ;;H1004

 ;;9002226.02101,"1010,H1005 ",.01)

 ;;H1005

 ;;9002226.02101,"1010,H1005 ",.02)

 ;;H1005

 ;;9002226.02101,"1010,P3000 ",.01)

 ;;P3000

 ;;9002226.02101,"1010,P3000 ",.02)

 ;;P3000

 ;;9002226.02101,"1010,P3001 ",.01)

 ;;P3001

 ;;9002226.02101,"1010,P3001 ",.02)

 ;;P3001

 ;;9002226.02101,"1010,Q0091 ",.01)

 ;;Q0091

 ;;9002226.02101,"1010,Q0091 ",.02)

 ;;Q0091

 ;;9002226.02101,"1010,S0180 ",.01)

 ;;S0180

 ;;9002226.02101,"1010,S0180 ",.02)

 ;;S0180

 ;;9002226.02101,"1010,S0199 ",.01)

 ;;S0199

 ;;9002226.02101,"1010,S0199 ",.02)

 ;;S0199

 ;;9002226.02101,"1010,S4981 ",.01)

 ;;S4981

 ;;9002226.02101,"1010,S4981 ",.02)

 ;;S4981

 ;;9002226.02101,"1010,S8055 ",.01)

 ;;S8055

 ;;9002226.02101,"1010,S8055 ",.02)

 ;;S8055

BGPM5AYT  ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON SEP 02, 2011;

 +1       ;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106

 +2       ;

START     ;

 +1        IF '$GET(ATXPGMC)

               KILL ^TMP("ATX",$JOB)

 +2        SET ATXPGMC=$GET(ATXPGMC)+1

 +3        FOR ATXI=1:1

               SET X=$PIECE($TEXT(TMP+ATXI),";;",2,99)

               IF X=""

                   QUIT

               SET X="^TMP(""ATX"",$J,"_X

               SET ATXI=ATXI+1

               SET Y=$PIECE($TEXT(TMP+ATXI),";;",2,99)

               SET @X=Y

 +4        QUIT

 +5       ;

TMP       ;;TAXONOMY (WITH BULLETIN)

 +1       ;;9002226.02101,"1010,59852 ",.01)

 +2       ;;59852

 +3       ;;9002226.02101,"1010,59852 ",.02)

 +4       ;;59852

 +5       ;;9002226.02101,"1010,59855 ",.01)

 +6       ;;59855

 +7       ;;9002226.02101,"1010,59855 ",.02)

 +8       ;;59855

 +9       ;;9002226.02101,"1010,59856 ",.01)

 +10      ;;59856

 +11      ;;9002226.02101,"1010,59856 ",.02)

 +12      ;;59856

 +13      ;;9002226.02101,"1010,59857 ",.01)

 +14      ;;59857

 +15      ;;9002226.02101,"1010,59857 ",.02)

 +16      ;;59857

 +17      ;;9002226.02101,"1010,59866 ",.01)

 +18      ;;59866

 +19      ;;9002226.02101,"1010,59866 ",.02)

 +20      ;;59866

 +21      ;;9002226.02101,"1010,59870 ",.01)

 +22      ;;59870

 +23      ;;9002226.02101,"1010,59870 ",.02)

 +24      ;;59870

 +25      ;;9002226.02101,"1010,59871 ",.01)

 +26      ;;59871

 +27      ;;9002226.02101,"1010,59871 ",.02)

 +28      ;;59871

 +29      ;;9002226.02101,"1010,59897 ",.01)

 +30      ;;59897

 +31      ;;9002226.02101,"1010,59897 ",.02)

 +32      ;;59897

 +33      ;;9002226.02101,"1010,59898 ",.01)

 +34      ;;59898

 +35      ;;9002226.02101,"1010,59898 ",.02)

 +36      ;;59898

 +37      ;;9002226.02101,"1010,59899 ",.01)

 +38      ;;59899

 +39      ;;9002226.02101,"1010,59899 ",.02)

 +40      ;;59899

 +41      ;;9002226.02101,"1010,76801 ",.01)

 +42      ;;76801

 +43      ;;9002226.02101,"1010,76801 ",.02)

 +44      ;;76801

 +45      ;;9002226.02101,"1010,76805 ",.01)

 +46      ;;76805

 +47      ;;9002226.02101,"1010,76805 ",.02)

 +48      ;;76805

 +49      ;;9002226.02101,"1010,76811 ",.01)

 +50      ;;76811

 +51      ;;9002226.02101,"1010,76811 ",.02)

 +52      ;;76811

 +53      ;;9002226.02101,"1010,76813 ",.01)

 +54      ;;76813

 +55      ;;9002226.02101,"1010,76813 ",.02)

 +56      ;;76813

 +57      ;;9002226.02101,"1010,76815 ",.01)

 +58      ;;76815

 +59      ;;9002226.02101,"1010,76815 ",.02)

 +60      ;;76815

 +61      ;;9002226.02101,"1010,76816 ",.01)

 +62      ;;76816

 +63      ;;9002226.02101,"1010,76816 ",.02)

 +64      ;;76816

 +65      ;;9002226.02101,"1010,76817 ",.01)

 +66      ;;76817

 +67      ;;9002226.02101,"1010,76817 ",.02)

 +68      ;;76817

 +69      ;;9002226.02101,"1010,76818 ",.01)

 +70      ;;76818

 +71      ;;9002226.02101,"1010,76818 ",.02)

 +72      ;;76818

 +73      ;;9002226.02101,"1010,76819 ",.01)

 +74      ;;76819

 +75      ;;9002226.02101,"1010,76819 ",.02)

 +76      ;;76819

 +77      ;;9002226.02101,"1010,76820 ",.01)

 +78      ;;76820

 +79      ;;9002226.02101,"1010,76820 ",.02)

 +80      ;;76820

 +81      ;;9002226.02101,"1010,76821 ",.01)

 +82      ;;76821

 +83      ;;9002226.02101,"1010,76821 ",.02)

 +84      ;;76821

 +85      ;;9002226.02101,"1010,76825 ",.01)

 +86      ;;76825

 +87      ;;9002226.02101,"1010,76825 ",.02)

 +88      ;;76825

 +89      ;;9002226.02101,"1010,76826 ",.01)

 +90      ;;76826

 +91      ;;9002226.02101,"1010,76826 ",.02)

 +92      ;;76826

 +93      ;;9002226.02101,"1010,76827 ",.01)

 +94      ;;76827

 +95      ;;9002226.02101,"1010,76827 ",.02)

 +96      ;;76827

 +97      ;;9002226.02101,"1010,76828 ",.01)

 +98      ;;76828

 +99      ;;9002226.02101,"1010,76828 ",.02)

 +100     ;;76828

 +101     ;;9002226.02101,"1010,76941 ",.01)

 +102     ;;76941

 +103     ;;9002226.02101,"1010,76941 ",.02)

 +104     ;;76941

 +105     ;;9002226.02101,"1010,76945 ",.01)

 +106     ;;76945

 +107     ;;9002226.02101,"1010,76945 ",.02)

 +108     ;;76945

 +109     ;;9002226.02101,"1010,76946 ",.01)

 +110     ;;76946

 +111     ;;9002226.02101,"1010,76946 ",.02)

 +112     ;;76946

 +113     ;;9002226.02101,"1010,80055 ",.01)

 +114     ;;80055

 +115     ;;9002226.02101,"1010,80055 ",.02)

 +116     ;;80055

 +117     ;;9002226.02101,"1010,81025 ",.01)

 +118     ;;81025

 +119     ;;9002226.02101,"1010,81025 ",.02)

 +120     ;;81025

 +121     ;;9002226.02101,"1010,82105 ",.01)

 +122     ;;82105

 +123     ;;9002226.02101,"1010,82105 ",.02)

 +124     ;;82105

 +125     ;;9002226.02101,"1010,82106 ",.01)

 +126     ;;82106

 +127     ;;9002226.02101,"1010,82106 ",.02)

 +128     ;;82106

 +129     ;;9002226.02101,"1010,82143 ",.01)

 +130     ;;82143

 +131     ;;9002226.02101,"1010,82143 ",.02)

 +132     ;;82143

 +133     ;;9002226.02101,"1010,82731 ",.01)

 +134     ;;82731

 +135     ;;9002226.02101,"1010,82731 ",.02)

 +136     ;;82731

 +137     ;;9002226.02101,"1010,83632 ",.01)

 +138     ;;83632

 +139     ;;9002226.02101,"1010,83632 ",.02)

 +140     ;;83632

 +141     ;;9002226.02101,"1010,83661 ",.01)

 +142     ;;83661

 +143     ;;9002226.02101,"1010,83661 ",.02)

 +144     ;;83661

 +145     ;;9002226.02101,"1010,83662 ",.01)

 +146     ;;83662

 +147     ;;9002226.02101,"1010,83662 ",.02)

 +148     ;;83662

 +149     ;;9002226.02101,"1010,83663 ",.01)

 +150     ;;83663

 +151     ;;9002226.02101,"1010,83663 ",.02)

 +152     ;;83663

 +153     ;;9002226.02101,"1010,83664 ",.01)

 +154     ;;83664

 +155     ;;9002226.02101,"1010,83664 ",.02)

 +156     ;;83664

 +157     ;;9002226.02101,"1010,84163 ",.01)

 +158     ;;84163

 +159     ;;9002226.02101,"1010,84163 ",.02)

 +160     ;;84163

 +161     ;;9002226.02101,"1010,84702 ",.01)

 +162     ;;84702

 +163     ;;9002226.02101,"1010,84702 ",.02)

 +164     ;;84702

 +165     ;;9002226.02101,"1010,84703 ",.01)

 +166     ;;84703

 +167     ;;9002226.02101,"1010,84703 ",.02)

 +168     ;;84703

 +169     ;;9002226.02101,"1010,84704 ",.01)

 +170     ;;84704

 +171     ;;9002226.02101,"1010,84704 ",.02)

 +172     ;;84704

 +173     ;;9002226.02101,"1010,86592 ",.01)

 +174     ;;86592

 +175     ;;9002226.02101,"1010,86592 ",.02)

 +176     ;;86592

 +177     ;;9002226.02101,"1010,86593 ",.01)

 +178     ;;86593

 +179     ;;9002226.02101,"1010,86593 ",.02)

 +180     ;;86593

 +181     ;;9002226.02101,"1010,86631 ",.01)

 +182     ;;86631

 +183     ;;9002226.02101,"1010,86631 ",.02)

 +184     ;;86631

 +185     ;;9002226.02101,"1010,86632 ",.01)

 +186     ;;86632

 +187     ;;9002226.02101,"1010,86632 ",.02)

 +188     ;;86632

 +189     ;;9002226.02101,"1010,87110 ",.01)

 +190     ;;87110

 +191     ;;9002226.02101,"1010,87110 ",.02)

 +192     ;;87110

 +193     ;;9002226.02101,"1010,87164 ",.01)

 +194     ;;87164

 +195     ;;9002226.02101,"1010,87164 ",.02)

 +196     ;;87164

 +197     ;;9002226.02101,"1010,87166 ",.01)

 +198     ;;87166

 +199     ;;9002226.02101,"1010,87166 ",.02)

 +200     ;;87166

 +201     ;;9002226.02101,"1010,87270 ",.01)

 +202     ;;87270

 +203     ;;9002226.02101,"1010,87270 ",.02)

 +204     ;;87270

 +205     ;;9002226.02101,"1010,87320 ",.01)

 +206     ;;87320

 +207     ;;9002226.02101,"1010,87320 ",.02)

 +208     ;;87320

 +209     ;;9002226.02101,"1010,87490 ",.01)

 +210     ;;87490

 +211     ;;9002226.02101,"1010,87490 ",.02)

 +212     ;;87490

 +213     ;;9002226.02101,"1010,87491 ",.01)

 +214     ;;87491

 +215     ;;9002226.02101,"1010,87491 ",.02)

 +216     ;;87491

 +217     ;;9002226.02101,"1010,87492 ",.01)

 +218     ;;87492

 +219     ;;9002226.02101,"1010,87492 ",.02)

 +220     ;;87492

 +221     ;;9002226.02101,"1010,87590 ",.01)

 +222     ;;87590

 +223     ;;9002226.02101,"1010,87590 ",.02)

 +224     ;;87590

 +225     ;;9002226.02101,"1010,87591 ",.01)

 +226     ;;87591

 +227     ;;9002226.02101,"1010,87591 ",.02)

 +228     ;;87591

 +229     ;;9002226.02101,"1010,87592 ",.01)

 +230     ;;87592

 +231     ;;9002226.02101,"1010,87592 ",.02)

 +232     ;;87592

 +233     ;;9002226.02101,"1010,87620 ",.01)

 +234     ;;87620

 +235     ;;9002226.02101,"1010,87620 ",.02)

 +236     ;;87620

 +237     ;;9002226.02101,"1010,87621 ",.01)

 +238     ;;87621

 +239     ;;9002226.02101,"1010,87621 ",.02)

 +240     ;;87621

 +241     ;;9002226.02101,"1010,87622 ",.01)

 +242     ;;87622

 +243     ;;9002226.02101,"1010,87622 ",.02)

 +244     ;;87622

 +245     ;;9002226.02101,"1010,87660 ",.01)

 +246     ;;87660

 +247     ;;9002226.02101,"1010,87660 ",.02)

 +248     ;;87660

 +249     ;;9002226.02101,"1010,87800 ",.01)

 +250     ;;87800

 +251     ;;9002226.02101,"1010,87800 ",.02)

 +252     ;;87800

 +253     ;;9002226.02101,"1010,87801 ",.01)

 +254     ;;87801

 +255     ;;9002226.02101,"1010,87801 ",.02)

 +256     ;;87801

 +257     ;;9002226.02101,"1010,87808 ",.01)

 +258     ;;87808

 +259     ;;9002226.02101,"1010,87808 ",.02)

 +260     ;;87808

 +261     ;;9002226.02101,"1010,87810 ",.01)

 +262     ;;87810

 +263     ;;9002226.02101,"1010,87810 ",.02)

 +264     ;;87810

 +265     ;;9002226.02101,"1010,87850 ",.01)

 +266     ;;87850

 +267     ;;9002226.02101,"1010,87850 ",.02)

 +268     ;;87850

 +269     ;;9002226.02101,"1010,88141 ",.01)

 +270     ;;88141

 +271     ;;9002226.02101,"1010,88141 ",.02)

 +272     ;;88141

 +273     ;;9002226.02101,"1010,88142 ",.01)

 +274     ;;88142

 +275     ;;9002226.02101,"1010,88142 ",.02)

 +276     ;;88142

 +277     ;;9002226.02101,"1010,88143 ",.01)

 +278     ;;88143

 +279     ;;9002226.02101,"1010,88143 ",.02)

 +280     ;;88143

 +281     ;;9002226.02101,"1010,88147 ",.01)

 +282     ;;88147

 +283     ;;9002226.02101,"1010,88147 ",.02)

 +284     ;;88147

 +285     ;;9002226.02101,"1010,88148 ",.01)

 +286     ;;88148

 +287     ;;9002226.02101,"1010,88148 ",.02)

 +288     ;;88148

 +289     ;;9002226.02101,"1010,88150 ",.01)

 +290     ;;88150

 +291     ;;9002226.02101,"1010,88150 ",.02)

 +292     ;;88150

 +293     ;;9002226.02101,"1010,88152 ",.01)

 +294     ;;88152

 +295     ;;9002226.02101,"1010,88152 ",.02)

 +296     ;;88152

 +297     ;;9002226.02101,"1010,88153 ",.01)

 +298     ;;88153

 +299     ;;9002226.02101,"1010,88153 ",.02)

 +300     ;;88153

 +301     ;;9002226.02101,"1010,88154 ",.01)

 +302     ;;88154

 +303     ;;9002226.02101,"1010,88154 ",.02)

 +304     ;;88154

 +305     ;;9002226.02101,"1010,88155 ",.01)

 +306     ;;88155

 +307     ;;9002226.02101,"1010,88155 ",.02)

 +308     ;;88155

 +309     ;;9002226.02101,"1010,88164 ",.01)

 +310     ;;88164

 +311     ;;9002226.02101,"1010,88164 ",.02)

 +312     ;;88164

 +313     ;;9002226.02101,"1010,88165 ",.01)

 +314     ;;88165

 +315     ;;9002226.02101,"1010,88165 ",.02)

 +316     ;;88165

 +317     ;;9002226.02101,"1010,88166 ",.01)

 +318     ;;88166

 +319     ;;9002226.02101,"1010,88166 ",.02)

 +320     ;;88166

 +321     ;;9002226.02101,"1010,88167 ",.01)

 +322     ;;88167

 +323     ;;9002226.02101,"1010,88167 ",.02)

 +324     ;;88167

 +325     ;;9002226.02101,"1010,88174 ",.01)

 +326     ;;88174

 +327     ;;9002226.02101,"1010,88174 ",.02)

 +328     ;;88174

 +329     ;;9002226.02101,"1010,88175 ",.01)

 +330     ;;88175

 +331     ;;9002226.02101,"1010,88175 ",.02)

 +332     ;;88175

 +333     ;;9002226.02101,"1010,88235 ",.01)

 +334     ;;88235

 +335     ;;9002226.02101,"1010,88235 ",.02)

 +336     ;;88235

 +337     ;;9002226.02101,"1010,88267 ",.01)

 +338     ;;88267

 +339     ;;9002226.02101,"1010,88267 ",.02)

 +340     ;;88267

 +341     ;;9002226.02101,"1010,88269 ",.01)

 +342     ;;88269

 +343     ;;9002226.02101,"1010,88269 ",.02)

 +344     ;;88269

 +345     ;;9002226.02101,"1010,G0101 ",.01)

 +346     ;;G0101

 +347     ;;9002226.02101,"1010,G0101 ",.02)

 +348     ;;G0101

 +349     ;;9002226.02101,"1010,G0123 ",.01)

 +350     ;;G0123

 +351     ;;9002226.02101,"1010,G0123 ",.02)

 +352     ;;G0123

 +353     ;;9002226.02101,"1010,G0124 ",.01)

 +354     ;;G0124

 +355     ;;9002226.02101,"1010,G0124 ",.02)

 +356     ;;G0124

 +357     ;;9002226.02101,"1010,G0141 ",.01)

 +358     ;;G0141

 +359     ;;9002226.02101,"1010,G0141 ",.02)

 +360     ;;G0141

 +361     ;;9002226.02101,"1010,G0143 ",.01)

 +362     ;;G0143

 +363     ;;9002226.02101,"1010,G0143 ",.02)

 +364     ;;G0143

 +365     ;;9002226.02101,"1010,G0144 ",.01)

 +366     ;;G0144

 +367     ;;9002226.02101,"1010,G0144 ",.02)

 +368     ;;G0144

 +369     ;;9002226.02101,"1010,G0145 ",.01)

 +370     ;;G0145

 +371     ;;9002226.02101,"1010,G0145 ",.02)

 +372     ;;G0145

 +373     ;;9002226.02101,"1010,G0147 ",.01)

 +374     ;;G0147

 +375     ;;9002226.02101,"1010,G0147 ",.02)

 +376     ;;G0147

 +377     ;;9002226.02101,"1010,G0148 ",.01)

 +378     ;;G0148

 +379     ;;9002226.02101,"1010,G0148 ",.02)

 +380     ;;G0148

 +381     ;;9002226.02101,"1010,H1000 ",.01)

 +382     ;;H1000

 +383     ;;9002226.02101,"1010,H1000 ",.02)

 +384     ;;H1000

 +385     ;;9002226.02101,"1010,H1001 ",.01)

 +386     ;;H1001

 +387     ;;9002226.02101,"1010,H1001 ",.02)

 +388     ;;H1001

 +389     ;;9002226.02101,"1010,H1003 ",.01)

 +390     ;;H1003

 +391     ;;9002226.02101,"1010,H1003 ",.02)

 +392     ;;H1003

 +393     ;;9002226.02101,"1010,H1004 ",.01)

 +394     ;;H1004

 +395     ;;9002226.02101,"1010,H1004 ",.02)

 +396     ;;H1004

 +397     ;;9002226.02101,"1010,H1005 ",.01)

 +398     ;;H1005

 +399     ;;9002226.02101,"1010,H1005 ",.02)

 +400     ;;H1005

 +401     ;;9002226.02101,"1010,P3000 ",.01)

 +402     ;;P3000

 +403     ;;9002226.02101,"1010,P3000 ",.02)

 +404     ;;P3000

 +405     ;;9002226.02101,"1010,P3001 ",.01)

 +406     ;;P3001

 +407     ;;9002226.02101,"1010,P3001 ",.02)

 +408     ;;P3001

 +409     ;;9002226.02101,"1010,Q0091 ",.01)

 +410     ;;Q0091

 +411     ;;9002226.02101,"1010,Q0091 ",.02)

 +412     ;;Q0091

 +413     ;;9002226.02101,"1010,S0180 ",.01)

 +414     ;;S0180

 +415     ;;9002226.02101,"1010,S0180 ",.02)

 +416     ;;S0180

 +417     ;;9002226.02101,"1010,S0199 ",.01)

 +418     ;;S0199

 +419     ;;9002226.02101,"1010,S0199 ",.02)

 +420     ;;S0199

 +421     ;;9002226.02101,"1010,S4981 ",.01)

 +422     ;;S4981

 +423     ;;9002226.02101,"1010,S4981 ",.02)

 +424     ;;S4981

 +425     ;;9002226.02101,"1010,S8055 ",.01)

 +426     ;;S8055

 +427     ;;9002226.02101,"1010,S8055 ",.02)

 +428     ;;S8055

BGPM5AYT.m