Routine: BGPM5ACR

BGPM5ACR ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON JUL 15, 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,"846,00904022380 ",.02)

 ;;00904022380

 ;;9002226.02101,"846,00904022540 ",.01)

 ;;00904022540

 ;;9002226.02101,"846,00904022540 ",.02)

 ;;00904022540

 ;;9002226.02101,"846,00904022560 ",.01)

 ;;00904022560

 ;;9002226.02101,"846,00904022560 ",.02)

 ;;00904022560

 ;;9002226.02101,"846,00904022660 ",.01)

 ;;00904022660

 ;;9002226.02101,"846,00904022660 ",.02)

 ;;00904022660

 ;;9002226.02101,"846,00904022680 ",.01)

 ;;00904022680

 ;;9002226.02101,"846,00904022680 ",.02)

 ;;00904022680

 ;;9002226.02101,"846,00904023460 ",.01)

 ;;00904023460

 ;;9002226.02101,"846,00904023460 ",.02)

 ;;00904023460

 ;;9002226.02101,"846,00904023660 ",.01)

 ;;00904023660

 ;;9002226.02101,"846,00904023660 ",.02)

 ;;00904023660

 ;;9002226.02101,"846,00904507560 ",.01)

 ;;00904507560

 ;;9002226.02101,"846,00904507560 ",.02)

 ;;00904507560

 ;;9002226.02101,"846,00904507660 ",.01)

 ;;00904507660

 ;;9002226.02101,"846,00904507660 ",.02)

 ;;00904507660

 ;;9002226.02101,"846,00904507740 ",.01)

 ;;00904507740

 ;;9002226.02101,"846,00904507740 ",.02)

 ;;00904507740

 ;;9002226.02101,"846,00904507760 ",.01)

 ;;00904507760

 ;;9002226.02101,"846,00904507760 ",.02)

 ;;00904507760

 ;;9002226.02101,"846,00904507780 ",.01)

 ;;00904507780

 ;;9002226.02101,"846,00904507780 ",.02)

 ;;00904507780

 ;;9002226.02101,"846,00904612361 ",.01)

 ;;00904612361

 ;;9002226.02101,"846,00904612361 ",.02)

 ;;00904612361

 ;;9002226.02101,"846,00904612461 ",.01)

 ;;00904612461

 ;;9002226.02101,"846,00904612461 ",.02)

 ;;00904612461

 ;;9002226.02101,"846,00904613760 ",.01)

 ;;00904613760

 ;;9002226.02101,"846,00904613760 ",.02)

 ;;00904613760

 ;;9002226.02101,"846,00904613840 ",.01)

 ;;00904613840

 ;;9002226.02101,"846,00904613840 ",.02)

 ;;00904613840

 ;;9002226.02101,"846,00904613860 ",.01)

 ;;00904613860

 ;;9002226.02101,"846,00904613860 ",.02)

 ;;00904613860

 ;;9002226.02101,"846,00904613960 ",.01)

 ;;00904613960

 ;;9002226.02101,"846,00904613960 ",.02)

 ;;00904613960

 ;;9002226.02101,"846,00904613980 ",.01)

 ;;00904613980

 ;;9002226.02101,"846,00904613980 ",.02)

 ;;00904613980

 ;;9002226.02101,"846,00904792440 ",.01)

 ;;00904792440

 ;;9002226.02101,"846,00904792440 ",.02)

 ;;00904792440

 ;;9002226.02101,"846,00904792460 ",.01)

 ;;00904792460

 ;;9002226.02101,"846,00904792460 ",.02)

 ;;00904792460

 ;;9002226.02101,"846,00904792461 ",.01)

 ;;00904792461

 ;;9002226.02101,"846,00904792461 ",.02)

 ;;00904792461

 ;;9002226.02101,"846,00904792480 ",.01)

 ;;00904792480

 ;;9002226.02101,"846,00904792480 ",.02)

 ;;00904792480

 ;;9002226.02101,"846,00904792540 ",.01)

 ;;00904792540

 ;;9002226.02101,"846,00904792540 ",.02)

 ;;00904792540

 ;;9002226.02101,"846,00904792560 ",.01)

 ;;00904792560

 ;;9002226.02101,"846,00904792560 ",.02)

 ;;00904792560

 ;;9002226.02101,"846,00904792561 ",.01)

 ;;00904792561

 ;;9002226.02101,"846,00904792561 ",.02)

 ;;00904792561

 ;;9002226.02101,"846,00904792580 ",.01)

 ;;00904792580

 ;;9002226.02101,"846,00904792580 ",.02)

 ;;00904792580

 ;;9002226.02101,"846,10544019230 ",.01)

 ;;10544019230

 ;;9002226.02101,"846,10544019230 ",.02)

 ;;10544019230

 ;;9002226.02101,"846,10768715001 ",.01)

 ;;10768715001

 ;;9002226.02101,"846,10768715001 ",.02)

 ;;10768715001

 ;;9002226.02101,"846,10768715002 ",.01)

 ;;10768715002

 ;;9002226.02101,"846,10768715002 ",.02)

 ;;10768715002

 ;;9002226.02101,"846,10768747501 ",.01)

 ;;10768747501

 ;;9002226.02101,"846,10768747501 ",.02)

 ;;10768747501

 ;;9002226.02101,"846,10768747502 ",.01)

 ;;10768747502

 ;;9002226.02101,"846,10768747502 ",.02)

 ;;10768747502

 ;;9002226.02101,"846,10768770001 ",.01)

 ;;10768770001

 ;;9002226.02101,"846,10768770001 ",.02)

 ;;10768770001

 ;;9002226.02101,"846,10768770002 ",.01)

 ;;10768770002

 ;;9002226.02101,"846,10768770002 ",.02)

 ;;10768770002

 ;;9002226.02101,"846,11819006560 ",.01)

 ;;11819006560

 ;;9002226.02101,"846,11819006560 ",.02)

 ;;11819006560

 ;;9002226.02101,"846,11819006590 ",.01)

 ;;11819006590

 ;;9002226.02101,"846,11819006590 ",.02)

 ;;11819006590

 ;;9002226.02101,"846,11819006591 ",.01)

 ;;11819006591

 ;;9002226.02101,"846,11819006591 ",.02)

 ;;11819006591

 ;;9002226.02101,"846,11819006595 ",.01)

 ;;11819006595

 ;;9002226.02101,"846,11819006595 ",.02)

 ;;11819006595

 ;;9002226.02101,"846,11819006597 ",.01)

 ;;11819006597

 ;;9002226.02101,"846,11819006597 ",.02)

 ;;11819006597

 ;;9002226.02101,"846,11819006598 ",.01)

 ;;11819006598

 ;;9002226.02101,"846,11819006598 ",.02)

 ;;11819006598

 ;;9002226.02101,"846,11819008760 ",.01)

 ;;11819008760

 ;;9002226.02101,"846,11819008760 ",.02)

 ;;11819008760

 ;;9002226.02101,"846,11819008790 ",.01)

 ;;11819008790

 ;;9002226.02101,"846,11819008790 ",.02)

 ;;11819008790

 ;;9002226.02101,"846,11819008791 ",.01)

 ;;11819008791

 ;;9002226.02101,"846,11819008791 ",.02)

 ;;11819008791

 ;;9002226.02101,"846,11819008795 ",.01)

 ;;11819008795

 ;;9002226.02101,"846,11819008795 ",.02)

 ;;11819008795

 ;;9002226.02101,"846,11819008797 ",.01)

 ;;11819008797

 ;;9002226.02101,"846,11819008797 ",.02)

 ;;11819008797

 ;;9002226.02101,"846,11819008798 ",.01)

 ;;11819008798

 ;;9002226.02101,"846,11819008798 ",.02)

 ;;11819008798

 ;;9002226.02101,"846,12634049060 ",.01)

 ;;12634049060

 ;;9002226.02101,"846,12634049060 ",.02)

 ;;12634049060

 ;;9002226.02101,"846,12634072960 ",.01)

 ;;12634072960

 ;;9002226.02101,"846,12634072960 ",.02)

 ;;12634072960

 ;;9002226.02101,"846,12634078480 ",.01)

 ;;12634078480

 ;;9002226.02101,"846,12634078480 ",.02)

 ;;12634078480

 ;;9002226.02101,"846,12634079012 ",.01)

 ;;12634079012

 ;;9002226.02101,"846,12634079012 ",.02)

 ;;12634079012

 ;;9002226.02101,"846,13411022001 ",.01)

 ;;13411022001

 ;;9002226.02101,"846,13411022001 ",.02)

 ;;13411022001

 ;;9002226.02101,"846,13411022002 ",.01)

 ;;13411022002

 ;;9002226.02101,"846,13411022002 ",.02)

 ;;13411022002

 ;;9002226.02101,"846,13411022003 ",.01)

 ;;13411022003

 ;;9002226.02101,"846,13411022003 ",.02)

 ;;13411022003

 ;;9002226.02101,"846,13411022006 ",.01)

 ;;13411022006

 ;;9002226.02101,"846,13411022006 ",.02)

 ;;13411022006

 ;;9002226.02101,"846,13411022010 ",.01)

 ;;13411022010

 ;;9002226.02101,"846,13411022010 ",.02)

 ;;13411022010

 ;;9002226.02101,"846,13411022101 ",.01)

 ;;13411022101

 ;;9002226.02101,"846,13411022101 ",.02)

 ;;13411022101

 ;;9002226.02101,"846,13411022102 ",.01)

 ;;13411022102

 ;;9002226.02101,"846,13411022102 ",.02)

 ;;13411022102

 ;;9002226.02101,"846,13411022103 ",.01)

 ;;13411022103

 ;;9002226.02101,"846,13411022103 ",.02)

 ;;13411022103

 ;;9002226.02101,"846,13411022106 ",.01)

 ;;13411022106

 ;;9002226.02101,"846,13411022106 ",.02)

 ;;13411022106

 ;;9002226.02101,"846,13411022110 ",.01)

 ;;13411022110

 ;;9002226.02101,"846,13411022110 ",.02)

 ;;13411022110

 ;;9002226.02101,"846,13411034603 ",.01)

 ;;13411034603

 ;;9002226.02101,"846,13411034603 ",.02)

 ;;13411034603

 ;;9002226.02101,"846,13411034703 ",.01)

 ;;13411034703

 ;;9002226.02101,"846,13411034703 ",.02)

 ;;13411034703

 ;;9002226.02101,"846,13411034803 ",.01)

 ;;13411034803

 ;;9002226.02101,"846,13411034803 ",.02)

 ;;13411034803

 ;;9002226.02101,"846,13411034903 ",.01)

 ;;13411034903

 ;;9002226.02101,"846,13411034903 ",.02)

 ;;13411034903

 ;;9002226.02101,"846,13411035003 ",.01)

 ;;13411035003

 ;;9002226.02101,"846,13411035003 ",.02)

 ;;13411035003

 ;;9002226.02101,"846,14550051702 ",.01)

 ;;14550051702

 ;;9002226.02101,"846,14550051702 ",.02)

 ;;14550051702

 ;;9002226.02101,"846,14550051704 ",.01)

 ;;14550051704

 ;;9002226.02101,"846,14550051704 ",.02)

 ;;14550051704

 ;;9002226.02101,"846,14550051802 ",.01)

 ;;14550051802

 ;;9002226.02101,"846,14550051802 ",.02)

 ;;14550051802

 ;;9002226.02101,"846,14550051804 ",.01)

 ;;14550051804

 ;;9002226.02101,"846,14550051804 ",.02)

 ;;14550051804

 ;;9002226.02101,"846,14550051902 ",.01)

 ;;14550051902

 ;;9002226.02101,"846,14550051902 ",.02)

 ;;14550051902

 ;;9002226.02101,"846,14550051904 ",.01)

 ;;14550051904

 ;;9002226.02101,"846,14550051904 ",.02)

 ;;14550051904

 ;;9002226.02101,"846,15548096701 ",.01)

 ;;15548096701

 ;;9002226.02101,"846,15548096701 ",.02)

 ;;15548096701

 ;;9002226.02101,"846,15548096705 ",.01)

 ;;15548096705

 ;;9002226.02101,"846,15548096705 ",.02)

 ;;15548096705

 ;;9002226.02101,"846,15548096801 ",.01)

 ;;15548096801

 ;;9002226.02101,"846,15548096801 ",.02)

 ;;15548096801

 ;;9002226.02101,"846,15548096805 ",.01)

 ;;15548096805

 ;;9002226.02101,"846,15548096805 ",.02)

 ;;15548096805

 ;;9002226.02101,"846,16252051801 ",.01)

 ;;16252051801

 ;;9002226.02101,"846,16252051801 ",.02)

 ;;16252051801

 ;;9002226.02101,"846,16252051901 ",.01)

 ;;16252051901

 ;;9002226.02101,"846,16252051901 ",.02)

 ;;16252051901

 ;;9002226.02101,"846,16252052001 ",.01)

 ;;16252052001

 ;;9002226.02101,"846,16252052001 ",.02)

 ;;16252052001

 ;;9002226.02101,"846,16364000101 ",.01)

 ;;16364000101

 ;;9002226.02101,"846,16364000101 ",.02)

 ;;16364000101

 ;;9002226.02101,"846,16364000201 ",.01)

 ;;16364000201

 ;;9002226.02101,"846,16364000201 ",.02)

 ;;16364000201

 ;;9002226.02101,"846,16364000301 ",.01)

 ;;16364000301

 ;;9002226.02101,"846,16364000301 ",.02)

 ;;16364000301

 ;;9002226.02101,"846,16590028730 ",.01)

 ;;16590028730

 ;;9002226.02101,"846,16590028730 ",.02)

 ;;16590028730

 ;;9002226.02101,"846,16590028760 ",.01)

 ;;16590028760

 ;;9002226.02101,"846,16590028760 ",.02)

 ;;16590028760

 ;;9002226.02101,"846,16590028771 ",.01)

 ;;16590028771

 ;;9002226.02101,"846,16590028771 ",.02)

 ;;16590028771

 ;;9002226.02101,"846,16590028790 ",.01)

 ;;16590028790

 ;;9002226.02101,"846,16590028790 ",.02)

 ;;16590028790

 ;;9002226.02101,"846,16590041860 ",.01)

 ;;16590041860

 ;;9002226.02101,"846,16590041860 ",.02)

 ;;16590041860

 ;;9002226.02101,"846,16729000101 ",.01)

 ;;16729000101

 ;;9002226.02101,"846,16729000101 ",.02)

 ;;16729000101

 ;;9002226.02101,"846,16729000201 ",.01)

 ;;16729000201

 ;;9002226.02101,"846,16729000201 ",.02)

 ;;16729000201

 ;;9002226.02101,"846,16729000301 ",.01)

 ;;16729000301

 ;;9002226.02101,"846,16729000301 ",.02)

 ;;16729000301

 ;;9002226.02101,"846,16729013900 ",.01)

 ;;16729013900

 ;;9002226.02101,"846,16729013900 ",.02)

 ;;16729013900

 ;;9002226.02101,"846,16729013916 ",.01)

 ;;16729013916

 ;;9002226.02101,"846,16729013916 ",.02)

 ;;16729013916

 ;;9002226.02101,"846,16729013917 ",.01)

 ;;16729013917

 ;;9002226.02101,"846,16729013917 ",.02)

 ;;16729013917

 ;;9002226.02101,"846,16729014000 ",.01)

 ;;16729014000

 ;;9002226.02101,"846,16729014000 ",.02)

 ;;16729014000

 ;;9002226.02101,"846,16729014016 ",.01)

 ;;16729014016

 ;;9002226.02101,"846,16729014016 ",.02)

 ;;16729014016

 ;;9002226.02101,"846,16729014017 ",.01)

 ;;16729014017

 ;;9002226.02101,"846,16729014017 ",.02)

 ;;16729014017

 ;;9002226.02101,"846,17856084402 ",.01)

 ;;17856084402

 ;;9002226.02101,"846,17856084402 ",.02)

 ;;17856084402

 ;;9002226.02101,"846,17856087302 ",.01)

 ;;17856087302

 ;;9002226.02101,"846,17856087302 ",.02)

 ;;17856087302

 ;;9002226.02101,"846,17856289802 ",.01)

 ;;17856289802

 ;;9002226.02101,"846,17856289802 ",.02)

 ;;17856289802

 ;;9002226.02101,"846,17856315802 ",.01)

 ;;17856315802

 ;;9002226.02101,"846,17856315802 ",.02)

 ;;17856315802

 ;;9002226.02101,"846,21695046730 ",.01)

 ;;21695046730

 ;;9002226.02101,"846,21695046730 ",.02)

 ;;21695046730

 ;;9002226.02101,"846,21695046760 ",.01)

 ;;21695046760

 ;;9002226.02101,"846,21695046760 ",.02)

 ;;21695046760

 ;;9002226.02101,"846,21695046830 ",.01)

 ;;21695046830

 ;;9002226.02101,"846,21695046830 ",.02)

 ;;21695046830

 ;;9002226.02101,"846,21695046860 ",.01)

 ;;21695046860

BGPM5ACR  ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON JUL 15, 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,"846,00904022380 ",.02)

 +2       ;;00904022380

 +3       ;;9002226.02101,"846,00904022540 ",.01)

 +4       ;;00904022540

 +5       ;;9002226.02101,"846,00904022540 ",.02)

 +6       ;;00904022540

 +7       ;;9002226.02101,"846,00904022560 ",.01)

 +8       ;;00904022560

 +9       ;;9002226.02101,"846,00904022560 ",.02)

 +10      ;;00904022560

 +11      ;;9002226.02101,"846,00904022660 ",.01)

 +12      ;;00904022660

 +13      ;;9002226.02101,"846,00904022660 ",.02)

 +14      ;;00904022660

 +15      ;;9002226.02101,"846,00904022680 ",.01)

 +16      ;;00904022680

 +17      ;;9002226.02101,"846,00904022680 ",.02)

 +18      ;;00904022680

 +19      ;;9002226.02101,"846,00904023460 ",.01)

 +20      ;;00904023460

 +21      ;;9002226.02101,"846,00904023460 ",.02)

 +22      ;;00904023460

 +23      ;;9002226.02101,"846,00904023660 ",.01)

 +24      ;;00904023660

 +25      ;;9002226.02101,"846,00904023660 ",.02)

 +26      ;;00904023660

 +27      ;;9002226.02101,"846,00904507560 ",.01)

 +28      ;;00904507560

 +29      ;;9002226.02101,"846,00904507560 ",.02)

 +30      ;;00904507560

 +31      ;;9002226.02101,"846,00904507660 ",.01)

 +32      ;;00904507660

 +33      ;;9002226.02101,"846,00904507660 ",.02)

 +34      ;;00904507660

 +35      ;;9002226.02101,"846,00904507740 ",.01)

 +36      ;;00904507740

 +37      ;;9002226.02101,"846,00904507740 ",.02)

 +38      ;;00904507740

 +39      ;;9002226.02101,"846,00904507760 ",.01)

 +40      ;;00904507760

 +41      ;;9002226.02101,"846,00904507760 ",.02)

 +42      ;;00904507760

 +43      ;;9002226.02101,"846,00904507780 ",.01)

 +44      ;;00904507780

 +45      ;;9002226.02101,"846,00904507780 ",.02)

 +46      ;;00904507780

 +47      ;;9002226.02101,"846,00904612361 ",.01)

 +48      ;;00904612361

 +49      ;;9002226.02101,"846,00904612361 ",.02)

 +50      ;;00904612361

 +51      ;;9002226.02101,"846,00904612461 ",.01)

 +52      ;;00904612461

 +53      ;;9002226.02101,"846,00904612461 ",.02)

 +54      ;;00904612461

 +55      ;;9002226.02101,"846,00904613760 ",.01)

 +56      ;;00904613760

 +57      ;;9002226.02101,"846,00904613760 ",.02)

 +58      ;;00904613760

 +59      ;;9002226.02101,"846,00904613840 ",.01)

 +60      ;;00904613840

 +61      ;;9002226.02101,"846,00904613840 ",.02)

 +62      ;;00904613840

 +63      ;;9002226.02101,"846,00904613860 ",.01)

 +64      ;;00904613860

 +65      ;;9002226.02101,"846,00904613860 ",.02)

 +66      ;;00904613860

 +67      ;;9002226.02101,"846,00904613960 ",.01)

 +68      ;;00904613960

 +69      ;;9002226.02101,"846,00904613960 ",.02)

 +70      ;;00904613960

 +71      ;;9002226.02101,"846,00904613980 ",.01)

 +72      ;;00904613980

 +73      ;;9002226.02101,"846,00904613980 ",.02)

 +74      ;;00904613980

 +75      ;;9002226.02101,"846,00904792440 ",.01)

 +76      ;;00904792440

 +77      ;;9002226.02101,"846,00904792440 ",.02)

 +78      ;;00904792440

 +79      ;;9002226.02101,"846,00904792460 ",.01)

 +80      ;;00904792460

 +81      ;;9002226.02101,"846,00904792460 ",.02)

 +82      ;;00904792460

 +83      ;;9002226.02101,"846,00904792461 ",.01)

 +84      ;;00904792461

 +85      ;;9002226.02101,"846,00904792461 ",.02)

 +86      ;;00904792461

 +87      ;;9002226.02101,"846,00904792480 ",.01)

 +88      ;;00904792480

 +89      ;;9002226.02101,"846,00904792480 ",.02)

 +90      ;;00904792480

 +91      ;;9002226.02101,"846,00904792540 ",.01)

 +92      ;;00904792540

 +93      ;;9002226.02101,"846,00904792540 ",.02)

 +94      ;;00904792540

 +95      ;;9002226.02101,"846,00904792560 ",.01)

 +96      ;;00904792560

 +97      ;;9002226.02101,"846,00904792560 ",.02)

 +98      ;;00904792560

 +99      ;;9002226.02101,"846,00904792561 ",.01)

 +100     ;;00904792561

 +101     ;;9002226.02101,"846,00904792561 ",.02)

 +102     ;;00904792561

 +103     ;;9002226.02101,"846,00904792580 ",.01)

 +104     ;;00904792580

 +105     ;;9002226.02101,"846,00904792580 ",.02)

 +106     ;;00904792580

 +107     ;;9002226.02101,"846,10544019230 ",.01)

 +108     ;;10544019230

 +109     ;;9002226.02101,"846,10544019230 ",.02)

 +110     ;;10544019230

 +111     ;;9002226.02101,"846,10768715001 ",.01)

 +112     ;;10768715001

 +113     ;;9002226.02101,"846,10768715001 ",.02)

 +114     ;;10768715001

 +115     ;;9002226.02101,"846,10768715002 ",.01)

 +116     ;;10768715002

 +117     ;;9002226.02101,"846,10768715002 ",.02)

 +118     ;;10768715002

 +119     ;;9002226.02101,"846,10768747501 ",.01)

 +120     ;;10768747501

 +121     ;;9002226.02101,"846,10768747501 ",.02)

 +122     ;;10768747501

 +123     ;;9002226.02101,"846,10768747502 ",.01)

 +124     ;;10768747502

 +125     ;;9002226.02101,"846,10768747502 ",.02)

 +126     ;;10768747502

 +127     ;;9002226.02101,"846,10768770001 ",.01)

 +128     ;;10768770001

 +129     ;;9002226.02101,"846,10768770001 ",.02)

 +130     ;;10768770001

 +131     ;;9002226.02101,"846,10768770002 ",.01)

 +132     ;;10768770002

 +133     ;;9002226.02101,"846,10768770002 ",.02)

 +134     ;;10768770002

 +135     ;;9002226.02101,"846,11819006560 ",.01)

 +136     ;;11819006560

 +137     ;;9002226.02101,"846,11819006560 ",.02)

 +138     ;;11819006560

 +139     ;;9002226.02101,"846,11819006590 ",.01)

 +140     ;;11819006590

 +141     ;;9002226.02101,"846,11819006590 ",.02)

 +142     ;;11819006590

 +143     ;;9002226.02101,"846,11819006591 ",.01)

 +144     ;;11819006591

 +145     ;;9002226.02101,"846,11819006591 ",.02)

 +146     ;;11819006591

 +147     ;;9002226.02101,"846,11819006595 ",.01)

 +148     ;;11819006595

 +149     ;;9002226.02101,"846,11819006595 ",.02)

 +150     ;;11819006595

 +151     ;;9002226.02101,"846,11819006597 ",.01)

 +152     ;;11819006597

 +153     ;;9002226.02101,"846,11819006597 ",.02)

 +154     ;;11819006597

 +155     ;;9002226.02101,"846,11819006598 ",.01)

 +156     ;;11819006598

 +157     ;;9002226.02101,"846,11819006598 ",.02)

 +158     ;;11819006598

 +159     ;;9002226.02101,"846,11819008760 ",.01)

 +160     ;;11819008760

 +161     ;;9002226.02101,"846,11819008760 ",.02)

 +162     ;;11819008760

 +163     ;;9002226.02101,"846,11819008790 ",.01)

 +164     ;;11819008790

 +165     ;;9002226.02101,"846,11819008790 ",.02)

 +166     ;;11819008790

 +167     ;;9002226.02101,"846,11819008791 ",.01)

 +168     ;;11819008791

 +169     ;;9002226.02101,"846,11819008791 ",.02)

 +170     ;;11819008791

 +171     ;;9002226.02101,"846,11819008795 ",.01)

 +172     ;;11819008795

 +173     ;;9002226.02101,"846,11819008795 ",.02)

 +174     ;;11819008795

 +175     ;;9002226.02101,"846,11819008797 ",.01)

 +176     ;;11819008797

 +177     ;;9002226.02101,"846,11819008797 ",.02)

 +178     ;;11819008797

 +179     ;;9002226.02101,"846,11819008798 ",.01)

 +180     ;;11819008798

 +181     ;;9002226.02101,"846,11819008798 ",.02)

 +182     ;;11819008798

 +183     ;;9002226.02101,"846,12634049060 ",.01)

 +184     ;;12634049060

 +185     ;;9002226.02101,"846,12634049060 ",.02)

 +186     ;;12634049060

 +187     ;;9002226.02101,"846,12634072960 ",.01)

 +188     ;;12634072960

 +189     ;;9002226.02101,"846,12634072960 ",.02)

 +190     ;;12634072960

 +191     ;;9002226.02101,"846,12634078480 ",.01)

 +192     ;;12634078480

 +193     ;;9002226.02101,"846,12634078480 ",.02)

 +194     ;;12634078480

 +195     ;;9002226.02101,"846,12634079012 ",.01)

 +196     ;;12634079012

 +197     ;;9002226.02101,"846,12634079012 ",.02)

 +198     ;;12634079012

 +199     ;;9002226.02101,"846,13411022001 ",.01)

 +200     ;;13411022001

 +201     ;;9002226.02101,"846,13411022001 ",.02)

 +202     ;;13411022001

 +203     ;;9002226.02101,"846,13411022002 ",.01)

 +204     ;;13411022002

 +205     ;;9002226.02101,"846,13411022002 ",.02)

 +206     ;;13411022002

 +207     ;;9002226.02101,"846,13411022003 ",.01)

 +208     ;;13411022003

 +209     ;;9002226.02101,"846,13411022003 ",.02)

 +210     ;;13411022003

 +211     ;;9002226.02101,"846,13411022006 ",.01)

 +212     ;;13411022006

 +213     ;;9002226.02101,"846,13411022006 ",.02)

 +214     ;;13411022006

 +215     ;;9002226.02101,"846,13411022010 ",.01)

 +216     ;;13411022010

 +217     ;;9002226.02101,"846,13411022010 ",.02)

 +218     ;;13411022010

 +219     ;;9002226.02101,"846,13411022101 ",.01)

 +220     ;;13411022101

 +221     ;;9002226.02101,"846,13411022101 ",.02)

 +222     ;;13411022101

 +223     ;;9002226.02101,"846,13411022102 ",.01)

 +224     ;;13411022102

 +225     ;;9002226.02101,"846,13411022102 ",.02)

 +226     ;;13411022102

 +227     ;;9002226.02101,"846,13411022103 ",.01)

 +228     ;;13411022103

 +229     ;;9002226.02101,"846,13411022103 ",.02)

 +230     ;;13411022103

 +231     ;;9002226.02101,"846,13411022106 ",.01)

 +232     ;;13411022106

 +233     ;;9002226.02101,"846,13411022106 ",.02)

 +234     ;;13411022106

 +235     ;;9002226.02101,"846,13411022110 ",.01)

 +236     ;;13411022110

 +237     ;;9002226.02101,"846,13411022110 ",.02)

 +238     ;;13411022110

 +239     ;;9002226.02101,"846,13411034603 ",.01)

 +240     ;;13411034603

 +241     ;;9002226.02101,"846,13411034603 ",.02)

 +242     ;;13411034603

 +243     ;;9002226.02101,"846,13411034703 ",.01)

 +244     ;;13411034703

 +245     ;;9002226.02101,"846,13411034703 ",.02)

 +246     ;;13411034703

 +247     ;;9002226.02101,"846,13411034803 ",.01)

 +248     ;;13411034803

 +249     ;;9002226.02101,"846,13411034803 ",.02)

 +250     ;;13411034803

 +251     ;;9002226.02101,"846,13411034903 ",.01)

 +252     ;;13411034903

 +253     ;;9002226.02101,"846,13411034903 ",.02)

 +254     ;;13411034903

 +255     ;;9002226.02101,"846,13411035003 ",.01)

 +256     ;;13411035003

 +257     ;;9002226.02101,"846,13411035003 ",.02)

 +258     ;;13411035003

 +259     ;;9002226.02101,"846,14550051702 ",.01)

 +260     ;;14550051702

 +261     ;;9002226.02101,"846,14550051702 ",.02)

 +262     ;;14550051702

 +263     ;;9002226.02101,"846,14550051704 ",.01)

 +264     ;;14550051704

 +265     ;;9002226.02101,"846,14550051704 ",.02)

 +266     ;;14550051704

 +267     ;;9002226.02101,"846,14550051802 ",.01)

 +268     ;;14550051802

 +269     ;;9002226.02101,"846,14550051802 ",.02)

 +270     ;;14550051802

 +271     ;;9002226.02101,"846,14550051804 ",.01)

 +272     ;;14550051804

 +273     ;;9002226.02101,"846,14550051804 ",.02)

 +274     ;;14550051804

 +275     ;;9002226.02101,"846,14550051902 ",.01)

 +276     ;;14550051902

 +277     ;;9002226.02101,"846,14550051902 ",.02)

 +278     ;;14550051902

 +279     ;;9002226.02101,"846,14550051904 ",.01)

 +280     ;;14550051904

 +281     ;;9002226.02101,"846,14550051904 ",.02)

 +282     ;;14550051904

 +283     ;;9002226.02101,"846,15548096701 ",.01)

 +284     ;;15548096701

 +285     ;;9002226.02101,"846,15548096701 ",.02)

 +286     ;;15548096701

 +287     ;;9002226.02101,"846,15548096705 ",.01)

 +288     ;;15548096705

 +289     ;;9002226.02101,"846,15548096705 ",.02)

 +290     ;;15548096705

 +291     ;;9002226.02101,"846,15548096801 ",.01)

 +292     ;;15548096801

 +293     ;;9002226.02101,"846,15548096801 ",.02)

 +294     ;;15548096801

 +295     ;;9002226.02101,"846,15548096805 ",.01)

 +296     ;;15548096805

 +297     ;;9002226.02101,"846,15548096805 ",.02)

 +298     ;;15548096805

 +299     ;;9002226.02101,"846,16252051801 ",.01)

 +300     ;;16252051801

 +301     ;;9002226.02101,"846,16252051801 ",.02)

 +302     ;;16252051801

 +303     ;;9002226.02101,"846,16252051901 ",.01)

 +304     ;;16252051901

 +305     ;;9002226.02101,"846,16252051901 ",.02)

 +306     ;;16252051901

 +307     ;;9002226.02101,"846,16252052001 ",.01)

 +308     ;;16252052001

 +309     ;;9002226.02101,"846,16252052001 ",.02)

 +310     ;;16252052001

 +311     ;;9002226.02101,"846,16364000101 ",.01)

 +312     ;;16364000101

 +313     ;;9002226.02101,"846,16364000101 ",.02)

 +314     ;;16364000101

 +315     ;;9002226.02101,"846,16364000201 ",.01)

 +316     ;;16364000201

 +317     ;;9002226.02101,"846,16364000201 ",.02)

 +318     ;;16364000201

 +319     ;;9002226.02101,"846,16364000301 ",.01)

 +320     ;;16364000301

 +321     ;;9002226.02101,"846,16364000301 ",.02)

 +322     ;;16364000301

 +323     ;;9002226.02101,"846,16590028730 ",.01)

 +324     ;;16590028730

 +325     ;;9002226.02101,"846,16590028730 ",.02)

 +326     ;;16590028730

 +327     ;;9002226.02101,"846,16590028760 ",.01)

 +328     ;;16590028760

 +329     ;;9002226.02101,"846,16590028760 ",.02)

 +330     ;;16590028760

 +331     ;;9002226.02101,"846,16590028771 ",.01)

 +332     ;;16590028771

 +333     ;;9002226.02101,"846,16590028771 ",.02)

 +334     ;;16590028771

 +335     ;;9002226.02101,"846,16590028790 ",.01)

 +336     ;;16590028790

 +337     ;;9002226.02101,"846,16590028790 ",.02)

 +338     ;;16590028790

 +339     ;;9002226.02101,"846,16590041860 ",.01)

 +340     ;;16590041860

 +341     ;;9002226.02101,"846,16590041860 ",.02)

 +342     ;;16590041860

 +343     ;;9002226.02101,"846,16729000101 ",.01)

 +344     ;;16729000101

 +345     ;;9002226.02101,"846,16729000101 ",.02)

 +346     ;;16729000101

 +347     ;;9002226.02101,"846,16729000201 ",.01)

 +348     ;;16729000201

 +349     ;;9002226.02101,"846,16729000201 ",.02)

 +350     ;;16729000201

 +351     ;;9002226.02101,"846,16729000301 ",.01)

 +352     ;;16729000301

 +353     ;;9002226.02101,"846,16729000301 ",.02)

 +354     ;;16729000301

 +355     ;;9002226.02101,"846,16729013900 ",.01)

 +356     ;;16729013900

 +357     ;;9002226.02101,"846,16729013900 ",.02)

 +358     ;;16729013900

 +359     ;;9002226.02101,"846,16729013916 ",.01)

 +360     ;;16729013916

 +361     ;;9002226.02101,"846,16729013916 ",.02)

 +362     ;;16729013916

 +363     ;;9002226.02101,"846,16729013917 ",.01)

 +364     ;;16729013917

 +365     ;;9002226.02101,"846,16729013917 ",.02)

 +366     ;;16729013917

 +367     ;;9002226.02101,"846,16729014000 ",.01)

 +368     ;;16729014000

 +369     ;;9002226.02101,"846,16729014000 ",.02)

 +370     ;;16729014000

 +371     ;;9002226.02101,"846,16729014016 ",.01)

 +372     ;;16729014016

 +373     ;;9002226.02101,"846,16729014016 ",.02)

 +374     ;;16729014016

 +375     ;;9002226.02101,"846,16729014017 ",.01)

 +376     ;;16729014017

 +377     ;;9002226.02101,"846,16729014017 ",.02)

 +378     ;;16729014017

 +379     ;;9002226.02101,"846,17856084402 ",.01)

 +380     ;;17856084402

 +381     ;;9002226.02101,"846,17856084402 ",.02)

 +382     ;;17856084402

 +383     ;;9002226.02101,"846,17856087302 ",.01)

 +384     ;;17856087302

 +385     ;;9002226.02101,"846,17856087302 ",.02)

 +386     ;;17856087302

 +387     ;;9002226.02101,"846,17856289802 ",.01)

 +388     ;;17856289802

 +389     ;;9002226.02101,"846,17856289802 ",.02)

 +390     ;;17856289802

 +391     ;;9002226.02101,"846,17856315802 ",.01)

 +392     ;;17856315802

 +393     ;;9002226.02101,"846,17856315802 ",.02)

 +394     ;;17856315802

 +395     ;;9002226.02101,"846,21695046730 ",.01)

 +396     ;;21695046730

 +397     ;;9002226.02101,"846,21695046730 ",.02)

 +398     ;;21695046730

 +399     ;;9002226.02101,"846,21695046760 ",.01)

 +400     ;;21695046760

 +401     ;;9002226.02101,"846,21695046760 ",.02)

 +402     ;;21695046760

 +403     ;;9002226.02101,"846,21695046830 ",.01)

 +404     ;;21695046830

 +405     ;;9002226.02101,"846,21695046830 ",.02)

 +406     ;;21695046830

 +407     ;;9002226.02101,"846,21695046860 ",.01)

 +408     ;;21695046860

BGPM5ACR.m