Routine: BGPM5BEC

BGPM5BEC ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON SEP 12, 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,"1044,68258708103 ",.01)

 ;;68258708103

 ;;9002226.02101,"1044,68258708103 ",.02)

 ;;68258708103

 ;;9002226.02101,"1044,68258708509 ",.01)

 ;;68258708509

 ;;9002226.02101,"1044,68258708509 ",.02)

 ;;68258708509

 ;;9002226.02101,"1044,68258708606 ",.01)

 ;;68258708606

 ;;9002226.02101,"1044,68258708606 ",.02)

 ;;68258708606

 ;;9002226.02101,"1044,68258710103 ",.01)

 ;;68258710103

 ;;9002226.02101,"1044,68258710103 ",.02)

 ;;68258710103

 ;;9002226.02101,"1044,68258710106 ",.01)

 ;;68258710106

 ;;9002226.02101,"1044,68258710106 ",.02)

 ;;68258710106

 ;;9002226.02101,"1044,68258710902 ",.01)

 ;;68258710902

 ;;9002226.02101,"1044,68258710902 ",.02)

 ;;68258710902

 ;;9002226.02101,"1044,68258710903 ",.01)

 ;;68258710903

 ;;9002226.02101,"1044,68258710903 ",.02)

 ;;68258710903

 ;;9002226.02101,"1044,68258710909 ",.01)

 ;;68258710909

 ;;9002226.02101,"1044,68258710909 ",.02)

 ;;68258710909

 ;;9002226.02101,"1044,68258711501 ",.01)

 ;;68258711501

 ;;9002226.02101,"1044,68258711501 ",.02)

 ;;68258711501

 ;;9002226.02101,"1044,68258711601 ",.01)

 ;;68258711601

 ;;9002226.02101,"1044,68258711601 ",.02)

 ;;68258711601

 ;;9002226.02101,"1044,68258711603 ",.01)

 ;;68258711603

 ;;9002226.02101,"1044,68258711603 ",.02)

 ;;68258711603

 ;;9002226.02101,"1044,68258711703 ",.01)

 ;;68258711703

 ;;9002226.02101,"1044,68258711703 ",.02)

 ;;68258711703

 ;;9002226.02101,"1044,68382000101 ",.01)

 ;;68382000101

 ;;9002226.02101,"1044,68382000101 ",.02)

 ;;68382000101

 ;;9002226.02101,"1044,68382000105 ",.01)

 ;;68382000105

 ;;9002226.02101,"1044,68382000105 ",.02)

 ;;68382000105

 ;;9002226.02101,"1044,68382000106 ",.01)

 ;;68382000106

 ;;9002226.02101,"1044,68382000106 ",.02)

 ;;68382000106

 ;;9002226.02101,"1044,68382000110 ",.01)

 ;;68382000110

 ;;9002226.02101,"1044,68382000110 ",.02)

 ;;68382000110

 ;;9002226.02101,"1044,68382000116 ",.01)

 ;;68382000116

 ;;9002226.02101,"1044,68382000116 ",.02)

 ;;68382000116

 ;;9002226.02101,"1044,68382001801 ",.01)

 ;;68382001801

 ;;9002226.02101,"1044,68382001801 ",.02)

 ;;68382001801

 ;;9002226.02101,"1044,68382001805 ",.01)

 ;;68382001805

 ;;9002226.02101,"1044,68382001805 ",.02)

 ;;68382001805

 ;;9002226.02101,"1044,68382001806 ",.01)

 ;;68382001806

 ;;9002226.02101,"1044,68382001806 ",.02)

 ;;68382001806

 ;;9002226.02101,"1044,68382001810 ",.01)

 ;;68382001810

 ;;9002226.02101,"1044,68382001810 ",.02)

 ;;68382001810

 ;;9002226.02101,"1044,68382001814 ",.01)

 ;;68382001814

 ;;9002226.02101,"1044,68382001814 ",.02)

 ;;68382001814

 ;;9002226.02101,"1044,68382001816 ",.01)

 ;;68382001816

 ;;9002226.02101,"1044,68382001816 ",.02)

 ;;68382001816

 ;;9002226.02101,"1044,68382001901 ",.01)

 ;;68382001901

 ;;9002226.02101,"1044,68382001901 ",.02)

 ;;68382001901

 ;;9002226.02101,"1044,68382001905 ",.01)

 ;;68382001905

 ;;9002226.02101,"1044,68382001905 ",.02)

 ;;68382001905

 ;;9002226.02101,"1044,68382001906 ",.01)

 ;;68382001906

 ;;9002226.02101,"1044,68382001906 ",.02)

 ;;68382001906

 ;;9002226.02101,"1044,68382001910 ",.01)

 ;;68382001910

 ;;9002226.02101,"1044,68382001910 ",.02)

 ;;68382001910

 ;;9002226.02101,"1044,68382001914 ",.01)

 ;;68382001914

 ;;9002226.02101,"1044,68382001914 ",.02)

 ;;68382001914

 ;;9002226.02101,"1044,68382001916 ",.01)

 ;;68382001916

 ;;9002226.02101,"1044,68382001916 ",.02)

 ;;68382001916

 ;;9002226.02101,"1044,68382002001 ",.01)

 ;;68382002001

 ;;9002226.02101,"1044,68382002001 ",.02)

 ;;68382002001

 ;;9002226.02101,"1044,68382002005 ",.01)

 ;;68382002005

 ;;9002226.02101,"1044,68382002005 ",.02)

 ;;68382002005

 ;;9002226.02101,"1044,68382002006 ",.01)

 ;;68382002006

 ;;9002226.02101,"1044,68382002006 ",.02)

 ;;68382002006

 ;;9002226.02101,"1044,68382002010 ",.01)

 ;;68382002010

 ;;9002226.02101,"1044,68382002010 ",.02)

 ;;68382002010

 ;;9002226.02101,"1044,68382002014 ",.01)

 ;;68382002014

 ;;9002226.02101,"1044,68382002014 ",.02)

 ;;68382002014

 ;;9002226.02101,"1044,68382002016 ",.01)

 ;;68382002016

 ;;9002226.02101,"1044,68382002016 ",.02)

 ;;68382002016

 ;;9002226.02101,"1044,68382002101 ",.01)

 ;;68382002101

 ;;9002226.02101,"1044,68382002101 ",.02)

 ;;68382002101

 ;;9002226.02101,"1044,68382002105 ",.01)

 ;;68382002105

 ;;9002226.02101,"1044,68382002105 ",.02)

 ;;68382002105

 ;;9002226.02101,"1044,68382002106 ",.01)

 ;;68382002106

 ;;9002226.02101,"1044,68382002106 ",.02)

 ;;68382002106

 ;;9002226.02101,"1044,68382002110 ",.01)

 ;;68382002110

 ;;9002226.02101,"1044,68382002110 ",.02)

 ;;68382002110

 ;;9002226.02101,"1044,68382002114 ",.01)

 ;;68382002114

 ;;9002226.02101,"1044,68382002114 ",.02)

 ;;68382002114

 ;;9002226.02101,"1044,68382002116 ",.01)

 ;;68382002116

 ;;9002226.02101,"1044,68382002116 ",.02)

 ;;68382002116

 ;;9002226.02101,"1044,68382003401 ",.01)

 ;;68382003401

 ;;9002226.02101,"1044,68382003401 ",.02)

 ;;68382003401

 ;;9002226.02101,"1044,68382003405 ",.01)

 ;;68382003405

 ;;9002226.02101,"1044,68382003405 ",.02)

 ;;68382003405

 ;;9002226.02101,"1044,68382003406 ",.01)

 ;;68382003406

 ;;9002226.02101,"1044,68382003406 ",.02)

 ;;68382003406

 ;;9002226.02101,"1044,68382003410 ",.01)

 ;;68382003410

 ;;9002226.02101,"1044,68382003410 ",.02)

 ;;68382003410

 ;;9002226.02101,"1044,68382003416 ",.01)

 ;;68382003416

 ;;9002226.02101,"1044,68382003416 ",.02)

 ;;68382003416

 ;;9002226.02101,"1044,68382003501 ",.01)

 ;;68382003501

 ;;9002226.02101,"1044,68382003501 ",.02)

 ;;68382003501

 ;;9002226.02101,"1044,68382003505 ",.01)

 ;;68382003505

 ;;9002226.02101,"1044,68382003505 ",.02)

 ;;68382003505

 ;;9002226.02101,"1044,68382003506 ",.01)

 ;;68382003506

 ;;9002226.02101,"1044,68382003506 ",.02)

 ;;68382003506

 ;;9002226.02101,"1044,68382003510 ",.01)

 ;;68382003510

 ;;9002226.02101,"1044,68382003510 ",.02)

 ;;68382003510

 ;;9002226.02101,"1044,68382003516 ",.01)

 ;;68382003516

 ;;9002226.02101,"1044,68382003516 ",.02)

 ;;68382003516

 ;;9002226.02101,"1044,68382003601 ",.01)

 ;;68382003601

 ;;9002226.02101,"1044,68382003601 ",.02)

 ;;68382003601

 ;;9002226.02101,"1044,68382003605 ",.01)

 ;;68382003605

 ;;9002226.02101,"1044,68382003605 ",.02)

 ;;68382003605

 ;;9002226.02101,"1044,68382003606 ",.01)

 ;;68382003606

 ;;9002226.02101,"1044,68382003606 ",.02)

 ;;68382003606

 ;;9002226.02101,"1044,68382003610 ",.01)

 ;;68382003610

 ;;9002226.02101,"1044,68382003610 ",.02)

 ;;68382003610

 ;;9002226.02101,"1044,68382003616 ",.01)

 ;;68382003616

 ;;9002226.02101,"1044,68382003616 ",.02)

 ;;68382003616

 ;;9002226.02101,"1044,68382004301 ",.01)

 ;;68382004301

 ;;9002226.02101,"1044,68382004301 ",.02)

 ;;68382004301

 ;;9002226.02101,"1044,68382004305 ",.01)

 ;;68382004305

 ;;9002226.02101,"1044,68382004305 ",.02)

 ;;68382004305

 ;;9002226.02101,"1044,68382004306 ",.01)

 ;;68382004306

 ;;9002226.02101,"1044,68382004306 ",.02)

 ;;68382004306

 ;;9002226.02101,"1044,68382004310 ",.01)

 ;;68382004310

 ;;9002226.02101,"1044,68382004310 ",.02)

 ;;68382004310

 ;;9002226.02101,"1044,68382004314 ",.01)

 ;;68382004314

 ;;9002226.02101,"1044,68382004314 ",.02)

 ;;68382004314

 ;;9002226.02101,"1044,68382004316 ",.01)

 ;;68382004316

 ;;9002226.02101,"1044,68382004316 ",.02)

 ;;68382004316

 ;;9002226.02101,"1044,68382004318 ",.01)

 ;;68382004318

 ;;9002226.02101,"1044,68382004318 ",.02)

 ;;68382004318

 ;;9002226.02101,"1044,68382004401 ",.01)

 ;;68382004401

 ;;9002226.02101,"1044,68382004401 ",.02)

 ;;68382004401

 ;;9002226.02101,"1044,68382004405 ",.01)

 ;;68382004405

 ;;9002226.02101,"1044,68382004405 ",.02)

 ;;68382004405

 ;;9002226.02101,"1044,68382004406 ",.01)

 ;;68382004406

 ;;9002226.02101,"1044,68382004406 ",.02)

 ;;68382004406

 ;;9002226.02101,"1044,68382004410 ",.01)

 ;;68382004410

 ;;9002226.02101,"1044,68382004410 ",.02)

 ;;68382004410

 ;;9002226.02101,"1044,68382004414 ",.01)

 ;;68382004414

 ;;9002226.02101,"1044,68382004414 ",.02)

 ;;68382004414

 ;;9002226.02101,"1044,68382004416 ",.01)

 ;;68382004416

 ;;9002226.02101,"1044,68382004416 ",.02)

 ;;68382004416

 ;;9002226.02101,"1044,68382004501 ",.01)

 ;;68382004501

 ;;9002226.02101,"1044,68382004501 ",.02)

 ;;68382004501

 ;;9002226.02101,"1044,68382004506 ",.01)

 ;;68382004506

 ;;9002226.02101,"1044,68382004506 ",.02)

 ;;68382004506

 ;;9002226.02101,"1044,68382004514 ",.01)

 ;;68382004514

 ;;9002226.02101,"1044,68382004514 ",.02)

 ;;68382004514

 ;;9002226.02101,"1044,68382004516 ",.01)

 ;;68382004516

 ;;9002226.02101,"1044,68382004516 ",.02)

 ;;68382004516

 ;;9002226.02101,"1044,68382004540 ",.01)

 ;;68382004540

 ;;9002226.02101,"1044,68382004540 ",.02)

 ;;68382004540

 ;;9002226.02101,"1044,68382009701 ",.01)

 ;;68382009701

 ;;9002226.02101,"1044,68382009701 ",.02)

 ;;68382009701

 ;;9002226.02101,"1044,68382009705 ",.01)

 ;;68382009705

 ;;9002226.02101,"1044,68382009705 ",.02)

 ;;68382009705

 ;;9002226.02101,"1044,68382009706 ",.01)

 ;;68382009706

 ;;9002226.02101,"1044,68382009706 ",.02)

 ;;68382009706

 ;;9002226.02101,"1044,68382009710 ",.01)

 ;;68382009710

 ;;9002226.02101,"1044,68382009710 ",.02)

 ;;68382009710

 ;;9002226.02101,"1044,68382009716 ",.01)

 ;;68382009716

 ;;9002226.02101,"1044,68382009716 ",.02)

 ;;68382009716

 ;;9002226.02101,"1044,68382009801 ",.01)

 ;;68382009801

 ;;9002226.02101,"1044,68382009801 ",.02)

 ;;68382009801

 ;;9002226.02101,"1044,68382009805 ",.01)

 ;;68382009805

 ;;9002226.02101,"1044,68382009805 ",.02)

 ;;68382009805

 ;;9002226.02101,"1044,68382009806 ",.01)

 ;;68382009806

 ;;9002226.02101,"1044,68382009806 ",.02)

 ;;68382009806

 ;;9002226.02101,"1044,68382009810 ",.01)

 ;;68382009810

 ;;9002226.02101,"1044,68382009810 ",.02)

 ;;68382009810

 ;;9002226.02101,"1044,68382009816 ",.01)

 ;;68382009816

 ;;9002226.02101,"1044,68382009816 ",.02)

 ;;68382009816

 ;;9002226.02101,"1044,68382009901 ",.01)

 ;;68382009901

 ;;9002226.02101,"1044,68382009901 ",.02)

 ;;68382009901

 ;;9002226.02101,"1044,68382009905 ",.01)

 ;;68382009905

 ;;9002226.02101,"1044,68382009905 ",.02)

 ;;68382009905

 ;;9002226.02101,"1044,68382009906 ",.01)

 ;;68382009906

 ;;9002226.02101,"1044,68382009906 ",.02)

 ;;68382009906

 ;;9002226.02101,"1044,68382009910 ",.01)

 ;;68382009910

 ;;9002226.02101,"1044,68382009910 ",.02)

 ;;68382009910

 ;;9002226.02101,"1044,68382009916 ",.01)

 ;;68382009916

 ;;9002226.02101,"1044,68382009916 ",.02)

 ;;68382009916

 ;;9002226.02101,"1044,68382010006 ",.01)

 ;;68382010006

 ;;9002226.02101,"1044,68382010006 ",.02)

 ;;68382010006

 ;;9002226.02101,"1044,68382010101 ",.01)

 ;;68382010101

 ;;9002226.02101,"1044,68382010101 ",.02)

 ;;68382010101

 ;;9002226.02101,"1044,68382010105 ",.01)

 ;;68382010105

 ;;9002226.02101,"1044,68382010105 ",.02)

 ;;68382010105

 ;;9002226.02101,"1044,68382010106 ",.01)

 ;;68382010106

 ;;9002226.02101,"1044,68382010106 ",.02)

 ;;68382010106

 ;;9002226.02101,"1044,68382010110 ",.01)

 ;;68382010110

 ;;9002226.02101,"1044,68382010110 ",.02)

 ;;68382010110

 ;;9002226.02101,"1044,68382010114 ",.01)

 ;;68382010114

 ;;9002226.02101,"1044,68382010114 ",.02)

 ;;68382010114

 ;;9002226.02101,"1044,68382010116 ",.01)

 ;;68382010116

 ;;9002226.02101,"1044,68382010116 ",.02)

 ;;68382010116

 ;;9002226.02101,"1044,68382010118 ",.01)

 ;;68382010118

 ;;9002226.02101,"1044,68382010118 ",.02)

 ;;68382010118

 ;;9002226.02101,"1044,68387011230 ",.01)

 ;;68387011230

 ;;9002226.02101,"1044,68387011230 ",.02)

 ;;68387011230

 ;;9002226.02101,"1044,68387011930 ",.01)

 ;;68387011930

 ;;9002226.02101,"1044,68387011930 ",.02)

 ;;68387011930

 ;;9002226.02101,"1044,68387012030 ",.01)

 ;;68387012030

 ;;9002226.02101,"1044,68387012030 ",.02)

 ;;68387012030

 ;;9002226.02101,"1044,68387012060 ",.01)

 ;;68387012060

BGPM5BEC  ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON SEP 12, 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,"1044,68258708103 ",.01)

 +2       ;;68258708103

 +3       ;;9002226.02101,"1044,68258708103 ",.02)

 +4       ;;68258708103

 +5       ;;9002226.02101,"1044,68258708509 ",.01)

 +6       ;;68258708509

 +7       ;;9002226.02101,"1044,68258708509 ",.02)

 +8       ;;68258708509

 +9       ;;9002226.02101,"1044,68258708606 ",.01)

 +10      ;;68258708606

 +11      ;;9002226.02101,"1044,68258708606 ",.02)

 +12      ;;68258708606

 +13      ;;9002226.02101,"1044,68258710103 ",.01)

 +14      ;;68258710103

 +15      ;;9002226.02101,"1044,68258710103 ",.02)

 +16      ;;68258710103

 +17      ;;9002226.02101,"1044,68258710106 ",.01)

 +18      ;;68258710106

 +19      ;;9002226.02101,"1044,68258710106 ",.02)

 +20      ;;68258710106

 +21      ;;9002226.02101,"1044,68258710902 ",.01)

 +22      ;;68258710902

 +23      ;;9002226.02101,"1044,68258710902 ",.02)

 +24      ;;68258710902

 +25      ;;9002226.02101,"1044,68258710903 ",.01)

 +26      ;;68258710903

 +27      ;;9002226.02101,"1044,68258710903 ",.02)

 +28      ;;68258710903

 +29      ;;9002226.02101,"1044,68258710909 ",.01)

 +30      ;;68258710909

 +31      ;;9002226.02101,"1044,68258710909 ",.02)

 +32      ;;68258710909

 +33      ;;9002226.02101,"1044,68258711501 ",.01)

 +34      ;;68258711501

 +35      ;;9002226.02101,"1044,68258711501 ",.02)

 +36      ;;68258711501

 +37      ;;9002226.02101,"1044,68258711601 ",.01)

 +38      ;;68258711601

 +39      ;;9002226.02101,"1044,68258711601 ",.02)

 +40      ;;68258711601

 +41      ;;9002226.02101,"1044,68258711603 ",.01)

 +42      ;;68258711603

 +43      ;;9002226.02101,"1044,68258711603 ",.02)

 +44      ;;68258711603

 +45      ;;9002226.02101,"1044,68258711703 ",.01)

 +46      ;;68258711703

 +47      ;;9002226.02101,"1044,68258711703 ",.02)

 +48      ;;68258711703

 +49      ;;9002226.02101,"1044,68382000101 ",.01)

 +50      ;;68382000101

 +51      ;;9002226.02101,"1044,68382000101 ",.02)

 +52      ;;68382000101

 +53      ;;9002226.02101,"1044,68382000105 ",.01)

 +54      ;;68382000105

 +55      ;;9002226.02101,"1044,68382000105 ",.02)

 +56      ;;68382000105

 +57      ;;9002226.02101,"1044,68382000106 ",.01)

 +58      ;;68382000106

 +59      ;;9002226.02101,"1044,68382000106 ",.02)

 +60      ;;68382000106

 +61      ;;9002226.02101,"1044,68382000110 ",.01)

 +62      ;;68382000110

 +63      ;;9002226.02101,"1044,68382000110 ",.02)

 +64      ;;68382000110

 +65      ;;9002226.02101,"1044,68382000116 ",.01)

 +66      ;;68382000116

 +67      ;;9002226.02101,"1044,68382000116 ",.02)

 +68      ;;68382000116

 +69      ;;9002226.02101,"1044,68382001801 ",.01)

 +70      ;;68382001801

 +71      ;;9002226.02101,"1044,68382001801 ",.02)

 +72      ;;68382001801

 +73      ;;9002226.02101,"1044,68382001805 ",.01)

 +74      ;;68382001805

 +75      ;;9002226.02101,"1044,68382001805 ",.02)

 +76      ;;68382001805

 +77      ;;9002226.02101,"1044,68382001806 ",.01)

 +78      ;;68382001806

 +79      ;;9002226.02101,"1044,68382001806 ",.02)

 +80      ;;68382001806

 +81      ;;9002226.02101,"1044,68382001810 ",.01)

 +82      ;;68382001810

 +83      ;;9002226.02101,"1044,68382001810 ",.02)

 +84      ;;68382001810

 +85      ;;9002226.02101,"1044,68382001814 ",.01)

 +86      ;;68382001814

 +87      ;;9002226.02101,"1044,68382001814 ",.02)

 +88      ;;68382001814

 +89      ;;9002226.02101,"1044,68382001816 ",.01)

 +90      ;;68382001816

 +91      ;;9002226.02101,"1044,68382001816 ",.02)

 +92      ;;68382001816

 +93      ;;9002226.02101,"1044,68382001901 ",.01)

 +94      ;;68382001901

 +95      ;;9002226.02101,"1044,68382001901 ",.02)

 +96      ;;68382001901

 +97      ;;9002226.02101,"1044,68382001905 ",.01)

 +98      ;;68382001905

 +99      ;;9002226.02101,"1044,68382001905 ",.02)

 +100     ;;68382001905

 +101     ;;9002226.02101,"1044,68382001906 ",.01)

 +102     ;;68382001906

 +103     ;;9002226.02101,"1044,68382001906 ",.02)

 +104     ;;68382001906

 +105     ;;9002226.02101,"1044,68382001910 ",.01)

 +106     ;;68382001910

 +107     ;;9002226.02101,"1044,68382001910 ",.02)

 +108     ;;68382001910

 +109     ;;9002226.02101,"1044,68382001914 ",.01)

 +110     ;;68382001914

 +111     ;;9002226.02101,"1044,68382001914 ",.02)

 +112     ;;68382001914

 +113     ;;9002226.02101,"1044,68382001916 ",.01)

 +114     ;;68382001916

 +115     ;;9002226.02101,"1044,68382001916 ",.02)

 +116     ;;68382001916

 +117     ;;9002226.02101,"1044,68382002001 ",.01)

 +118     ;;68382002001

 +119     ;;9002226.02101,"1044,68382002001 ",.02)

 +120     ;;68382002001

 +121     ;;9002226.02101,"1044,68382002005 ",.01)

 +122     ;;68382002005

 +123     ;;9002226.02101,"1044,68382002005 ",.02)

 +124     ;;68382002005

 +125     ;;9002226.02101,"1044,68382002006 ",.01)

 +126     ;;68382002006

 +127     ;;9002226.02101,"1044,68382002006 ",.02)

 +128     ;;68382002006

 +129     ;;9002226.02101,"1044,68382002010 ",.01)

 +130     ;;68382002010

 +131     ;;9002226.02101,"1044,68382002010 ",.02)

 +132     ;;68382002010

 +133     ;;9002226.02101,"1044,68382002014 ",.01)

 +134     ;;68382002014

 +135     ;;9002226.02101,"1044,68382002014 ",.02)

 +136     ;;68382002014

 +137     ;;9002226.02101,"1044,68382002016 ",.01)

 +138     ;;68382002016

 +139     ;;9002226.02101,"1044,68382002016 ",.02)

 +140     ;;68382002016

 +141     ;;9002226.02101,"1044,68382002101 ",.01)

 +142     ;;68382002101

 +143     ;;9002226.02101,"1044,68382002101 ",.02)

 +144     ;;68382002101

 +145     ;;9002226.02101,"1044,68382002105 ",.01)

 +146     ;;68382002105

 +147     ;;9002226.02101,"1044,68382002105 ",.02)

 +148     ;;68382002105

 +149     ;;9002226.02101,"1044,68382002106 ",.01)

 +150     ;;68382002106

 +151     ;;9002226.02101,"1044,68382002106 ",.02)

 +152     ;;68382002106

 +153     ;;9002226.02101,"1044,68382002110 ",.01)

 +154     ;;68382002110

 +155     ;;9002226.02101,"1044,68382002110 ",.02)

 +156     ;;68382002110

 +157     ;;9002226.02101,"1044,68382002114 ",.01)

 +158     ;;68382002114

 +159     ;;9002226.02101,"1044,68382002114 ",.02)

 +160     ;;68382002114

 +161     ;;9002226.02101,"1044,68382002116 ",.01)

 +162     ;;68382002116

 +163     ;;9002226.02101,"1044,68382002116 ",.02)

 +164     ;;68382002116

 +165     ;;9002226.02101,"1044,68382003401 ",.01)

 +166     ;;68382003401

 +167     ;;9002226.02101,"1044,68382003401 ",.02)

 +168     ;;68382003401

 +169     ;;9002226.02101,"1044,68382003405 ",.01)

 +170     ;;68382003405

 +171     ;;9002226.02101,"1044,68382003405 ",.02)

 +172     ;;68382003405

 +173     ;;9002226.02101,"1044,68382003406 ",.01)

 +174     ;;68382003406

 +175     ;;9002226.02101,"1044,68382003406 ",.02)

 +176     ;;68382003406

 +177     ;;9002226.02101,"1044,68382003410 ",.01)

 +178     ;;68382003410

 +179     ;;9002226.02101,"1044,68382003410 ",.02)

 +180     ;;68382003410

 +181     ;;9002226.02101,"1044,68382003416 ",.01)

 +182     ;;68382003416

 +183     ;;9002226.02101,"1044,68382003416 ",.02)

 +184     ;;68382003416

 +185     ;;9002226.02101,"1044,68382003501 ",.01)

 +186     ;;68382003501

 +187     ;;9002226.02101,"1044,68382003501 ",.02)

 +188     ;;68382003501

 +189     ;;9002226.02101,"1044,68382003505 ",.01)

 +190     ;;68382003505

 +191     ;;9002226.02101,"1044,68382003505 ",.02)

 +192     ;;68382003505

 +193     ;;9002226.02101,"1044,68382003506 ",.01)

 +194     ;;68382003506

 +195     ;;9002226.02101,"1044,68382003506 ",.02)

 +196     ;;68382003506

 +197     ;;9002226.02101,"1044,68382003510 ",.01)

 +198     ;;68382003510

 +199     ;;9002226.02101,"1044,68382003510 ",.02)

 +200     ;;68382003510

 +201     ;;9002226.02101,"1044,68382003516 ",.01)

 +202     ;;68382003516

 +203     ;;9002226.02101,"1044,68382003516 ",.02)

 +204     ;;68382003516

 +205     ;;9002226.02101,"1044,68382003601 ",.01)

 +206     ;;68382003601

 +207     ;;9002226.02101,"1044,68382003601 ",.02)

 +208     ;;68382003601

 +209     ;;9002226.02101,"1044,68382003605 ",.01)

 +210     ;;68382003605

 +211     ;;9002226.02101,"1044,68382003605 ",.02)

 +212     ;;68382003605

 +213     ;;9002226.02101,"1044,68382003606 ",.01)

 +214     ;;68382003606

 +215     ;;9002226.02101,"1044,68382003606 ",.02)

 +216     ;;68382003606

 +217     ;;9002226.02101,"1044,68382003610 ",.01)

 +218     ;;68382003610

 +219     ;;9002226.02101,"1044,68382003610 ",.02)

 +220     ;;68382003610

 +221     ;;9002226.02101,"1044,68382003616 ",.01)

 +222     ;;68382003616

 +223     ;;9002226.02101,"1044,68382003616 ",.02)

 +224     ;;68382003616

 +225     ;;9002226.02101,"1044,68382004301 ",.01)

 +226     ;;68382004301

 +227     ;;9002226.02101,"1044,68382004301 ",.02)

 +228     ;;68382004301

 +229     ;;9002226.02101,"1044,68382004305 ",.01)

 +230     ;;68382004305

 +231     ;;9002226.02101,"1044,68382004305 ",.02)

 +232     ;;68382004305

 +233     ;;9002226.02101,"1044,68382004306 ",.01)

 +234     ;;68382004306

 +235     ;;9002226.02101,"1044,68382004306 ",.02)

 +236     ;;68382004306

 +237     ;;9002226.02101,"1044,68382004310 ",.01)

 +238     ;;68382004310

 +239     ;;9002226.02101,"1044,68382004310 ",.02)

 +240     ;;68382004310

 +241     ;;9002226.02101,"1044,68382004314 ",.01)

 +242     ;;68382004314

 +243     ;;9002226.02101,"1044,68382004314 ",.02)

 +244     ;;68382004314

 +245     ;;9002226.02101,"1044,68382004316 ",.01)

 +246     ;;68382004316

 +247     ;;9002226.02101,"1044,68382004316 ",.02)

 +248     ;;68382004316

 +249     ;;9002226.02101,"1044,68382004318 ",.01)

 +250     ;;68382004318

 +251     ;;9002226.02101,"1044,68382004318 ",.02)

 +252     ;;68382004318

 +253     ;;9002226.02101,"1044,68382004401 ",.01)

 +254     ;;68382004401

 +255     ;;9002226.02101,"1044,68382004401 ",.02)

 +256     ;;68382004401

 +257     ;;9002226.02101,"1044,68382004405 ",.01)

 +258     ;;68382004405

 +259     ;;9002226.02101,"1044,68382004405 ",.02)

 +260     ;;68382004405

 +261     ;;9002226.02101,"1044,68382004406 ",.01)

 +262     ;;68382004406

 +263     ;;9002226.02101,"1044,68382004406 ",.02)

 +264     ;;68382004406

 +265     ;;9002226.02101,"1044,68382004410 ",.01)

 +266     ;;68382004410

 +267     ;;9002226.02101,"1044,68382004410 ",.02)

 +268     ;;68382004410

 +269     ;;9002226.02101,"1044,68382004414 ",.01)

 +270     ;;68382004414

 +271     ;;9002226.02101,"1044,68382004414 ",.02)

 +272     ;;68382004414

 +273     ;;9002226.02101,"1044,68382004416 ",.01)

 +274     ;;68382004416

 +275     ;;9002226.02101,"1044,68382004416 ",.02)

 +276     ;;68382004416

 +277     ;;9002226.02101,"1044,68382004501 ",.01)

 +278     ;;68382004501

 +279     ;;9002226.02101,"1044,68382004501 ",.02)

 +280     ;;68382004501

 +281     ;;9002226.02101,"1044,68382004506 ",.01)

 +282     ;;68382004506

 +283     ;;9002226.02101,"1044,68382004506 ",.02)

 +284     ;;68382004506

 +285     ;;9002226.02101,"1044,68382004514 ",.01)

 +286     ;;68382004514

 +287     ;;9002226.02101,"1044,68382004514 ",.02)

 +288     ;;68382004514

 +289     ;;9002226.02101,"1044,68382004516 ",.01)

 +290     ;;68382004516

 +291     ;;9002226.02101,"1044,68382004516 ",.02)

 +292     ;;68382004516

 +293     ;;9002226.02101,"1044,68382004540 ",.01)

 +294     ;;68382004540

 +295     ;;9002226.02101,"1044,68382004540 ",.02)

 +296     ;;68382004540

 +297     ;;9002226.02101,"1044,68382009701 ",.01)

 +298     ;;68382009701

 +299     ;;9002226.02101,"1044,68382009701 ",.02)

 +300     ;;68382009701

 +301     ;;9002226.02101,"1044,68382009705 ",.01)

 +302     ;;68382009705

 +303     ;;9002226.02101,"1044,68382009705 ",.02)

 +304     ;;68382009705

 +305     ;;9002226.02101,"1044,68382009706 ",.01)

 +306     ;;68382009706

 +307     ;;9002226.02101,"1044,68382009706 ",.02)

 +308     ;;68382009706

 +309     ;;9002226.02101,"1044,68382009710 ",.01)

 +310     ;;68382009710

 +311     ;;9002226.02101,"1044,68382009710 ",.02)

 +312     ;;68382009710

 +313     ;;9002226.02101,"1044,68382009716 ",.01)

 +314     ;;68382009716

 +315     ;;9002226.02101,"1044,68382009716 ",.02)

 +316     ;;68382009716

 +317     ;;9002226.02101,"1044,68382009801 ",.01)

 +318     ;;68382009801

 +319     ;;9002226.02101,"1044,68382009801 ",.02)

 +320     ;;68382009801

 +321     ;;9002226.02101,"1044,68382009805 ",.01)

 +322     ;;68382009805

 +323     ;;9002226.02101,"1044,68382009805 ",.02)

 +324     ;;68382009805

 +325     ;;9002226.02101,"1044,68382009806 ",.01)

 +326     ;;68382009806

 +327     ;;9002226.02101,"1044,68382009806 ",.02)

 +328     ;;68382009806

 +329     ;;9002226.02101,"1044,68382009810 ",.01)

 +330     ;;68382009810

 +331     ;;9002226.02101,"1044,68382009810 ",.02)

 +332     ;;68382009810

 +333     ;;9002226.02101,"1044,68382009816 ",.01)

 +334     ;;68382009816

 +335     ;;9002226.02101,"1044,68382009816 ",.02)

 +336     ;;68382009816

 +337     ;;9002226.02101,"1044,68382009901 ",.01)

 +338     ;;68382009901

 +339     ;;9002226.02101,"1044,68382009901 ",.02)

 +340     ;;68382009901

 +341     ;;9002226.02101,"1044,68382009905 ",.01)

 +342     ;;68382009905

 +343     ;;9002226.02101,"1044,68382009905 ",.02)

 +344     ;;68382009905

 +345     ;;9002226.02101,"1044,68382009906 ",.01)

 +346     ;;68382009906

 +347     ;;9002226.02101,"1044,68382009906 ",.02)

 +348     ;;68382009906

 +349     ;;9002226.02101,"1044,68382009910 ",.01)

 +350     ;;68382009910

 +351     ;;9002226.02101,"1044,68382009910 ",.02)

 +352     ;;68382009910

 +353     ;;9002226.02101,"1044,68382009916 ",.01)

 +354     ;;68382009916

 +355     ;;9002226.02101,"1044,68382009916 ",.02)

 +356     ;;68382009916

 +357     ;;9002226.02101,"1044,68382010006 ",.01)

 +358     ;;68382010006

 +359     ;;9002226.02101,"1044,68382010006 ",.02)

 +360     ;;68382010006

 +361     ;;9002226.02101,"1044,68382010101 ",.01)

 +362     ;;68382010101

 +363     ;;9002226.02101,"1044,68382010101 ",.02)

 +364     ;;68382010101

 +365     ;;9002226.02101,"1044,68382010105 ",.01)

 +366     ;;68382010105

 +367     ;;9002226.02101,"1044,68382010105 ",.02)

 +368     ;;68382010105

 +369     ;;9002226.02101,"1044,68382010106 ",.01)

 +370     ;;68382010106

 +371     ;;9002226.02101,"1044,68382010106 ",.02)

 +372     ;;68382010106

 +373     ;;9002226.02101,"1044,68382010110 ",.01)

 +374     ;;68382010110

 +375     ;;9002226.02101,"1044,68382010110 ",.02)

 +376     ;;68382010110

 +377     ;;9002226.02101,"1044,68382010114 ",.01)

 +378     ;;68382010114

 +379     ;;9002226.02101,"1044,68382010114 ",.02)

 +380     ;;68382010114

 +381     ;;9002226.02101,"1044,68382010116 ",.01)

 +382     ;;68382010116

 +383     ;;9002226.02101,"1044,68382010116 ",.02)

 +384     ;;68382010116

 +385     ;;9002226.02101,"1044,68382010118 ",.01)

 +386     ;;68382010118

 +387     ;;9002226.02101,"1044,68382010118 ",.02)

 +388     ;;68382010118

 +389     ;;9002226.02101,"1044,68387011230 ",.01)

 +390     ;;68387011230

 +391     ;;9002226.02101,"1044,68387011230 ",.02)

 +392     ;;68387011230

 +393     ;;9002226.02101,"1044,68387011930 ",.01)

 +394     ;;68387011930

 +395     ;;9002226.02101,"1044,68387011930 ",.02)

 +396     ;;68387011930

 +397     ;;9002226.02101,"1044,68387012030 ",.01)

 +398     ;;68387012030

 +399     ;;9002226.02101,"1044,68387012030 ",.02)

 +400     ;;68387012030

 +401     ;;9002226.02101,"1044,68387012060 ",.01)

 +402     ;;68387012060

BGPM5BEC.m