Routine: BGPM5AQT

BGPM5AQT ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON AUG 16, 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,"1005,13411014409 ",.02)

 ;;13411014409

 ;;9002226.02101,"1005,13411014501 ",.01)

 ;;13411014501

 ;;9002226.02101,"1005,13411014501 ",.02)

 ;;13411014501

 ;;9002226.02101,"1005,13411014502 ",.01)

 ;;13411014502

 ;;9002226.02101,"1005,13411014502 ",.02)

 ;;13411014502

 ;;9002226.02101,"1005,13411014503 ",.01)

 ;;13411014503

 ;;9002226.02101,"1005,13411014503 ",.02)

 ;;13411014503

 ;;9002226.02101,"1005,13411014506 ",.01)

 ;;13411014506

 ;;9002226.02101,"1005,13411014506 ",.02)

 ;;13411014506

 ;;9002226.02101,"1005,13411014509 ",.01)

 ;;13411014509

 ;;9002226.02101,"1005,13411014509 ",.02)

 ;;13411014509

 ;;9002226.02101,"1005,13411015601 ",.01)

 ;;13411015601

 ;;9002226.02101,"1005,13411015601 ",.02)

 ;;13411015601

 ;;9002226.02101,"1005,13411015602 ",.01)

 ;;13411015602

 ;;9002226.02101,"1005,13411015602 ",.02)

 ;;13411015602

 ;;9002226.02101,"1005,13411015603 ",.01)

 ;;13411015603

 ;;9002226.02101,"1005,13411015603 ",.02)

 ;;13411015603

 ;;9002226.02101,"1005,13411015606 ",.01)

 ;;13411015606

 ;;9002226.02101,"1005,13411015606 ",.02)

 ;;13411015606

 ;;9002226.02101,"1005,13411015609 ",.01)

 ;;13411015609

 ;;9002226.02101,"1005,13411015609 ",.02)

 ;;13411015609

 ;;9002226.02101,"1005,13411018402 ",.01)

 ;;13411018402

 ;;9002226.02101,"1005,13411018402 ",.02)

 ;;13411018402

 ;;9002226.02101,"1005,13411018403 ",.01)

 ;;13411018403

 ;;9002226.02101,"1005,13411018403 ",.02)

 ;;13411018403

 ;;9002226.02101,"1005,13411018406 ",.01)

 ;;13411018406

 ;;9002226.02101,"1005,13411018406 ",.02)

 ;;13411018406

 ;;9002226.02101,"1005,13411018409 ",.01)

 ;;13411018409

 ;;9002226.02101,"1005,13411018409 ",.02)

 ;;13411018409

 ;;9002226.02101,"1005,13411018410 ",.01)

 ;;13411018410

 ;;9002226.02101,"1005,13411018410 ",.02)

 ;;13411018410

 ;;9002226.02101,"1005,13411018803 ",.01)

 ;;13411018803

 ;;9002226.02101,"1005,13411018803 ",.02)

 ;;13411018803

 ;;9002226.02101,"1005,13411018810 ",.01)

 ;;13411018810

 ;;9002226.02101,"1005,13411018810 ",.02)

 ;;13411018810

 ;;9002226.02101,"1005,13411018903 ",.01)

 ;;13411018903

 ;;9002226.02101,"1005,13411018903 ",.02)

 ;;13411018903

 ;;9002226.02101,"1005,13411018910 ",.01)

 ;;13411018910

 ;;9002226.02101,"1005,13411018910 ",.02)

 ;;13411018910

 ;;9002226.02101,"1005,13411019003 ",.01)

 ;;13411019003

 ;;9002226.02101,"1005,13411019003 ",.02)

 ;;13411019003

 ;;9002226.02101,"1005,13411019010 ",.01)

 ;;13411019010

 ;;9002226.02101,"1005,13411019010 ",.02)

 ;;13411019010

 ;;9002226.02101,"1005,13411023102 ",.01)

 ;;13411023102

 ;;9002226.02101,"1005,13411023102 ",.02)

 ;;13411023102

 ;;9002226.02101,"1005,13411023103 ",.01)

 ;;13411023103

 ;;9002226.02101,"1005,13411023103 ",.02)

 ;;13411023103

 ;;9002226.02101,"1005,13411023106 ",.01)

 ;;13411023106

 ;;9002226.02101,"1005,13411023106 ",.02)

 ;;13411023106

 ;;9002226.02101,"1005,13411023109 ",.01)

 ;;13411023109

 ;;9002226.02101,"1005,13411023109 ",.02)

 ;;13411023109

 ;;9002226.02101,"1005,13411023110 ",.01)

 ;;13411023110

 ;;9002226.02101,"1005,13411023110 ",.02)

 ;;13411023110

 ;;9002226.02101,"1005,13411023302 ",.01)

 ;;13411023302

 ;;9002226.02101,"1005,13411023302 ",.02)

 ;;13411023302

 ;;9002226.02101,"1005,13411023303 ",.01)

 ;;13411023303

 ;;9002226.02101,"1005,13411023303 ",.02)

 ;;13411023303

 ;;9002226.02101,"1005,13411023306 ",.01)

 ;;13411023306

 ;;9002226.02101,"1005,13411023306 ",.02)

 ;;13411023306

 ;;9002226.02101,"1005,13411023309 ",.01)

 ;;13411023309

 ;;9002226.02101,"1005,13411023309 ",.02)

 ;;13411023309

 ;;9002226.02101,"1005,13411023310 ",.01)

 ;;13411023310

 ;;9002226.02101,"1005,13411023310 ",.02)

 ;;13411023310

 ;;9002226.02101,"1005,13411033403 ",.01)

 ;;13411033403

 ;;9002226.02101,"1005,13411033403 ",.02)

 ;;13411033403

 ;;9002226.02101,"1005,13411037703 ",.01)

 ;;13411037703

 ;;9002226.02101,"1005,13411037703 ",.02)

 ;;13411037703

 ;;9002226.02101,"1005,13411037803 ",.01)

 ;;13411037803

 ;;9002226.02101,"1005,13411037803 ",.02)

 ;;13411037803

 ;;9002226.02101,"1005,13411037903 ",.01)

 ;;13411037903

 ;;9002226.02101,"1005,13411037903 ",.02)

 ;;13411037903

 ;;9002226.02101,"1005,13411038003 ",.01)

 ;;13411038003

 ;;9002226.02101,"1005,13411038003 ",.02)

 ;;13411038003

 ;;9002226.02101,"1005,13411038103 ",.01)

 ;;13411038103

 ;;9002226.02101,"1005,13411038103 ",.02)

 ;;13411038103

 ;;9002226.02101,"1005,13411038203 ",.01)

 ;;13411038203

 ;;9002226.02101,"1005,13411038203 ",.02)

 ;;13411038203

 ;;9002226.02101,"1005,13411046203 ",.01)

 ;;13411046203

 ;;9002226.02101,"1005,13411046203 ",.02)

 ;;13411046203

 ;;9002226.02101,"1005,13411049303 ",.01)

 ;;13411049303

 ;;9002226.02101,"1005,13411049303 ",.02)

 ;;13411049303

 ;;9002226.02101,"1005,13411054906 ",.01)

 ;;13411054906

 ;;9002226.02101,"1005,13411054906 ",.02)

 ;;13411054906

 ;;9002226.02101,"1005,14593041701 ",.01)

 ;;14593041701

 ;;9002226.02101,"1005,14593041701 ",.02)

 ;;14593041701

 ;;9002226.02101,"1005,14593041710 ",.01)

 ;;14593041710

 ;;9002226.02101,"1005,14593041710 ",.02)

 ;;14593041710

 ;;9002226.02101,"1005,14593041801 ",.01)

 ;;14593041801

 ;;9002226.02101,"1005,14593041801 ",.02)

 ;;14593041801

 ;;9002226.02101,"1005,14593041850 ",.01)

 ;;14593041850

 ;;9002226.02101,"1005,14593041850 ",.02)

 ;;14593041850

 ;;9002226.02101,"1005,14593042001 ",.01)

 ;;14593042001

 ;;9002226.02101,"1005,14593042001 ",.02)

 ;;14593042001

 ;;9002226.02101,"1005,14593042010 ",.01)

 ;;14593042010

 ;;9002226.02101,"1005,14593042010 ",.02)

 ;;14593042010

 ;;9002226.02101,"1005,14593042050 ",.01)

 ;;14593042050

 ;;9002226.02101,"1005,14593042050 ",.02)

 ;;14593042050

 ;;9002226.02101,"1005,15330023301 ",.01)

 ;;15330023301

 ;;9002226.02101,"1005,15330023301 ",.02)

 ;;15330023301

 ;;9002226.02101,"1005,15330023401 ",.01)

 ;;15330023401

 ;;9002226.02101,"1005,15330023401 ",.02)

 ;;15330023401

 ;;9002226.02101,"1005,15338020030 ",.01)

 ;;15338020030

 ;;9002226.02101,"1005,15338020030 ",.02)

 ;;15338020030

 ;;9002226.02101,"1005,15338021130 ",.01)

 ;;15338021130

 ;;9002226.02101,"1005,15338021130 ",.02)

 ;;15338021130

 ;;9002226.02101,"1005,15338022030 ",.01)

 ;;15338022030

 ;;9002226.02101,"1005,15338022030 ",.02)

 ;;15338022030

 ;;9002226.02101,"1005,15338023330 ",.01)

 ;;15338023330

 ;;9002226.02101,"1005,15338023330 ",.02)

 ;;15338023330

 ;;9002226.02101,"1005,15548004501 ",.01)

 ;;15548004501

 ;;9002226.02101,"1005,15548004501 ",.02)

 ;;15548004501

 ;;9002226.02101,"1005,15548004503 ",.01)

 ;;15548004503

 ;;9002226.02101,"1005,15548004503 ",.02)

 ;;15548004503

 ;;9002226.02101,"1005,15548004505 ",.01)

 ;;15548004505

 ;;9002226.02101,"1005,15548004505 ",.02)

 ;;15548004505

 ;;9002226.02101,"1005,15548004601 ",.01)

 ;;15548004601

 ;;9002226.02101,"1005,15548004601 ",.02)

 ;;15548004601

 ;;9002226.02101,"1005,15548004602 ",.01)

 ;;15548004602

 ;;9002226.02101,"1005,15548004602 ",.02)

 ;;15548004602

 ;;9002226.02101,"1005,15548004603 ",.01)

 ;;15548004603

 ;;9002226.02101,"1005,15548004603 ",.02)

 ;;15548004603

 ;;9002226.02101,"1005,15548004701 ",.01)

 ;;15548004701

 ;;9002226.02101,"1005,15548004701 ",.02)

 ;;15548004701

 ;;9002226.02101,"1005,15548004703 ",.01)

 ;;15548004703

 ;;9002226.02101,"1005,15548004703 ",.02)

 ;;15548004703

 ;;9002226.02101,"1005,15548004801 ",.01)

 ;;15548004801

 ;;9002226.02101,"1005,15548004801 ",.02)

 ;;15548004801

 ;;9002226.02101,"1005,15548015846 ",.01)

 ;;15548015846

 ;;9002226.02101,"1005,15548015846 ",.02)

 ;;15548015846

 ;;9002226.02101,"1005,15548015885 ",.01)

 ;;15548015885

 ;;9002226.02101,"1005,15548015885 ",.02)

 ;;15548015885

 ;;9002226.02101,"1005,15548015895 ",.01)

 ;;15548015895

 ;;9002226.02101,"1005,15548015895 ",.02)

 ;;15548015895

 ;;9002226.02101,"1005,15548020213 ",.01)

 ;;15548020213

 ;;9002226.02101,"1005,15548020213 ",.02)

 ;;15548020213

 ;;9002226.02101,"1005,15548022703 ",.01)

 ;;15548022703

 ;;9002226.02101,"1005,15548022703 ",.02)

 ;;15548022703

 ;;9002226.02101,"1005,15548027203 ",.01)

 ;;15548027203

 ;;9002226.02101,"1005,15548027203 ",.02)

 ;;15548027203

 ;;9002226.02101,"1005,15548027210 ",.01)

 ;;15548027210

 ;;9002226.02101,"1005,15548027210 ",.02)

 ;;15548027210

 ;;9002226.02101,"1005,15548027303 ",.01)

 ;;15548027303

 ;;9002226.02101,"1005,15548027303 ",.02)

 ;;15548027303

 ;;9002226.02101,"1005,15548027310 ",.01)

 ;;15548027310

 ;;9002226.02101,"1005,15548027310 ",.02)

 ;;15548027310

 ;;9002226.02101,"1005,15548033810 ",.01)

 ;;15548033810

 ;;9002226.02101,"1005,15548033810 ",.02)

 ;;15548033810

 ;;9002226.02101,"1005,15548033830 ",.01)

 ;;15548033830

 ;;9002226.02101,"1005,15548033830 ",.02)

 ;;15548033830

 ;;9002226.02101,"1005,15548033850 ",.01)

 ;;15548033850

 ;;9002226.02101,"1005,15548033850 ",.02)

 ;;15548033850

 ;;9002226.02101,"1005,15548033892 ",.01)

 ;;15548033892

 ;;9002226.02101,"1005,15548033892 ",.02)

 ;;15548033892

 ;;9002226.02101,"1005,15548034950 ",.01)

 ;;15548034950

 ;;9002226.02101,"1005,15548034950 ",.02)

 ;;15548034950

 ;;9002226.02101,"1005,15548038450 ",.01)

 ;;15548038450

 ;;9002226.02101,"1005,15548038450 ",.02)

 ;;15548038450

 ;;9002226.02101,"1005,15548039046 ",.01)

 ;;15548039046

 ;;9002226.02101,"1005,15548039046 ",.02)

 ;;15548039046

 ;;9002226.02101,"1005,15548039050 ",.01)

 ;;15548039050

 ;;9002226.02101,"1005,15548039050 ",.02)

 ;;15548039050

 ;;9002226.02101,"1005,15548039092 ",.01)

 ;;15548039092

 ;;9002226.02101,"1005,15548039092 ",.02)

 ;;15548039092

 ;;9002226.02101,"1005,15548045051 ",.01)

 ;;15548045051

 ;;9002226.02101,"1005,15548045051 ",.02)

 ;;15548045051

 ;;9002226.02101,"1005,15548045054 ",.01)

 ;;15548045054

 ;;9002226.02101,"1005,15548045054 ",.02)

 ;;15548045054

 ;;9002226.02101,"1005,15548045075 ",.01)

 ;;15548045075

 ;;9002226.02101,"1005,15548045075 ",.02)

 ;;15548045075

 ;;9002226.02101,"1005,15548045250 ",.01)

 ;;15548045250

 ;;9002226.02101,"1005,15548045250 ",.02)

 ;;15548045250

 ;;9002226.02101,"1005,15548045251 ",.01)

 ;;15548045251

 ;;9002226.02101,"1005,15548045251 ",.02)

 ;;15548045251

 ;;9002226.02101,"1005,15548045294 ",.01)

 ;;15548045294

 ;;9002226.02101,"1005,15548045294 ",.02)

 ;;15548045294

 ;;9002226.02101,"1005,15548045295 ",.01)

 ;;15548045295

 ;;9002226.02101,"1005,15548045295 ",.02)

 ;;15548045295

 ;;9002226.02101,"1005,15548048250 ",.01)

 ;;15548048250

 ;;9002226.02101,"1005,15548048250 ",.02)

 ;;15548048250

 ;;9002226.02101,"1005,15548048251 ",.01)

 ;;15548048251

 ;;9002226.02101,"1005,15548048251 ",.02)

 ;;15548048251

 ;;9002226.02101,"1005,15548048275 ",.01)

 ;;15548048275

 ;;9002226.02101,"1005,15548048275 ",.02)

 ;;15548048275

 ;;9002226.02101,"1005,15548048550 ",.01)

 ;;15548048550

 ;;9002226.02101,"1005,15548048550 ",.02)

 ;;15548048550

 ;;9002226.02101,"1005,15548060941 ",.01)

 ;;15548060941

 ;;9002226.02101,"1005,15548060941 ",.02)

 ;;15548060941

 ;;9002226.02101,"1005,15548060942 ",.01)

 ;;15548060942

 ;;9002226.02101,"1005,15548060942 ",.02)

 ;;15548060942

 ;;9002226.02101,"1005,15548060945 ",.01)

 ;;15548060945

 ;;9002226.02101,"1005,15548060945 ",.02)

 ;;15548060945

 ;;9002226.02101,"1005,15548060985 ",.01)

 ;;15548060985

 ;;9002226.02101,"1005,15548060985 ",.02)

 ;;15548060985

 ;;9002226.02101,"1005,16252053000 ",.01)

 ;;16252053000

 ;;9002226.02101,"1005,16252053000 ",.02)

 ;;16252053000

 ;;9002226.02101,"1005,16252053090 ",.01)

 ;;16252053090

 ;;9002226.02101,"1005,16252053090 ",.02)

 ;;16252053090

 ;;9002226.02101,"1005,16252053100 ",.01)

 ;;16252053100

 ;;9002226.02101,"1005,16252053100 ",.02)

 ;;16252053100

 ;;9002226.02101,"1005,16252053190 ",.01)

 ;;16252053190

 ;;9002226.02101,"1005,16252053190 ",.02)

 ;;16252053190

BGPM5AQT  ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON AUG 16, 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,"1005,13411014409 ",.02)

 +2       ;;13411014409

 +3       ;;9002226.02101,"1005,13411014501 ",.01)

 +4       ;;13411014501

 +5       ;;9002226.02101,"1005,13411014501 ",.02)

 +6       ;;13411014501

 +7       ;;9002226.02101,"1005,13411014502 ",.01)

 +8       ;;13411014502

 +9       ;;9002226.02101,"1005,13411014502 ",.02)

 +10      ;;13411014502

 +11      ;;9002226.02101,"1005,13411014503 ",.01)

 +12      ;;13411014503

 +13      ;;9002226.02101,"1005,13411014503 ",.02)

 +14      ;;13411014503

 +15      ;;9002226.02101,"1005,13411014506 ",.01)

 +16      ;;13411014506

 +17      ;;9002226.02101,"1005,13411014506 ",.02)

 +18      ;;13411014506

 +19      ;;9002226.02101,"1005,13411014509 ",.01)

 +20      ;;13411014509

 +21      ;;9002226.02101,"1005,13411014509 ",.02)

 +22      ;;13411014509

 +23      ;;9002226.02101,"1005,13411015601 ",.01)

 +24      ;;13411015601

 +25      ;;9002226.02101,"1005,13411015601 ",.02)

 +26      ;;13411015601

 +27      ;;9002226.02101,"1005,13411015602 ",.01)

 +28      ;;13411015602

 +29      ;;9002226.02101,"1005,13411015602 ",.02)

 +30      ;;13411015602

 +31      ;;9002226.02101,"1005,13411015603 ",.01)

 +32      ;;13411015603

 +33      ;;9002226.02101,"1005,13411015603 ",.02)

 +34      ;;13411015603

 +35      ;;9002226.02101,"1005,13411015606 ",.01)

 +36      ;;13411015606

 +37      ;;9002226.02101,"1005,13411015606 ",.02)

 +38      ;;13411015606

 +39      ;;9002226.02101,"1005,13411015609 ",.01)

 +40      ;;13411015609

 +41      ;;9002226.02101,"1005,13411015609 ",.02)

 +42      ;;13411015609

 +43      ;;9002226.02101,"1005,13411018402 ",.01)

 +44      ;;13411018402

 +45      ;;9002226.02101,"1005,13411018402 ",.02)

 +46      ;;13411018402

 +47      ;;9002226.02101,"1005,13411018403 ",.01)

 +48      ;;13411018403

 +49      ;;9002226.02101,"1005,13411018403 ",.02)

 +50      ;;13411018403

 +51      ;;9002226.02101,"1005,13411018406 ",.01)

 +52      ;;13411018406

 +53      ;;9002226.02101,"1005,13411018406 ",.02)

 +54      ;;13411018406

 +55      ;;9002226.02101,"1005,13411018409 ",.01)

 +56      ;;13411018409

 +57      ;;9002226.02101,"1005,13411018409 ",.02)

 +58      ;;13411018409

 +59      ;;9002226.02101,"1005,13411018410 ",.01)

 +60      ;;13411018410

 +61      ;;9002226.02101,"1005,13411018410 ",.02)

 +62      ;;13411018410

 +63      ;;9002226.02101,"1005,13411018803 ",.01)

 +64      ;;13411018803

 +65      ;;9002226.02101,"1005,13411018803 ",.02)

 +66      ;;13411018803

 +67      ;;9002226.02101,"1005,13411018810 ",.01)

 +68      ;;13411018810

 +69      ;;9002226.02101,"1005,13411018810 ",.02)

 +70      ;;13411018810

 +71      ;;9002226.02101,"1005,13411018903 ",.01)

 +72      ;;13411018903

 +73      ;;9002226.02101,"1005,13411018903 ",.02)

 +74      ;;13411018903

 +75      ;;9002226.02101,"1005,13411018910 ",.01)

 +76      ;;13411018910

 +77      ;;9002226.02101,"1005,13411018910 ",.02)

 +78      ;;13411018910

 +79      ;;9002226.02101,"1005,13411019003 ",.01)

 +80      ;;13411019003

 +81      ;;9002226.02101,"1005,13411019003 ",.02)

 +82      ;;13411019003

 +83      ;;9002226.02101,"1005,13411019010 ",.01)

 +84      ;;13411019010

 +85      ;;9002226.02101,"1005,13411019010 ",.02)

 +86      ;;13411019010

 +87      ;;9002226.02101,"1005,13411023102 ",.01)

 +88      ;;13411023102

 +89      ;;9002226.02101,"1005,13411023102 ",.02)

 +90      ;;13411023102

 +91      ;;9002226.02101,"1005,13411023103 ",.01)

 +92      ;;13411023103

 +93      ;;9002226.02101,"1005,13411023103 ",.02)

 +94      ;;13411023103

 +95      ;;9002226.02101,"1005,13411023106 ",.01)

 +96      ;;13411023106

 +97      ;;9002226.02101,"1005,13411023106 ",.02)

 +98      ;;13411023106

 +99      ;;9002226.02101,"1005,13411023109 ",.01)

 +100     ;;13411023109

 +101     ;;9002226.02101,"1005,13411023109 ",.02)

 +102     ;;13411023109

 +103     ;;9002226.02101,"1005,13411023110 ",.01)

 +104     ;;13411023110

 +105     ;;9002226.02101,"1005,13411023110 ",.02)

 +106     ;;13411023110

 +107     ;;9002226.02101,"1005,13411023302 ",.01)

 +108     ;;13411023302

 +109     ;;9002226.02101,"1005,13411023302 ",.02)

 +110     ;;13411023302

 +111     ;;9002226.02101,"1005,13411023303 ",.01)

 +112     ;;13411023303

 +113     ;;9002226.02101,"1005,13411023303 ",.02)

 +114     ;;13411023303

 +115     ;;9002226.02101,"1005,13411023306 ",.01)

 +116     ;;13411023306

 +117     ;;9002226.02101,"1005,13411023306 ",.02)

 +118     ;;13411023306

 +119     ;;9002226.02101,"1005,13411023309 ",.01)

 +120     ;;13411023309

 +121     ;;9002226.02101,"1005,13411023309 ",.02)

 +122     ;;13411023309

 +123     ;;9002226.02101,"1005,13411023310 ",.01)

 +124     ;;13411023310

 +125     ;;9002226.02101,"1005,13411023310 ",.02)

 +126     ;;13411023310

 +127     ;;9002226.02101,"1005,13411033403 ",.01)

 +128     ;;13411033403

 +129     ;;9002226.02101,"1005,13411033403 ",.02)

 +130     ;;13411033403

 +131     ;;9002226.02101,"1005,13411037703 ",.01)

 +132     ;;13411037703

 +133     ;;9002226.02101,"1005,13411037703 ",.02)

 +134     ;;13411037703

 +135     ;;9002226.02101,"1005,13411037803 ",.01)

 +136     ;;13411037803

 +137     ;;9002226.02101,"1005,13411037803 ",.02)

 +138     ;;13411037803

 +139     ;;9002226.02101,"1005,13411037903 ",.01)

 +140     ;;13411037903

 +141     ;;9002226.02101,"1005,13411037903 ",.02)

 +142     ;;13411037903

 +143     ;;9002226.02101,"1005,13411038003 ",.01)

 +144     ;;13411038003

 +145     ;;9002226.02101,"1005,13411038003 ",.02)

 +146     ;;13411038003

 +147     ;;9002226.02101,"1005,13411038103 ",.01)

 +148     ;;13411038103

 +149     ;;9002226.02101,"1005,13411038103 ",.02)

 +150     ;;13411038103

 +151     ;;9002226.02101,"1005,13411038203 ",.01)

 +152     ;;13411038203

 +153     ;;9002226.02101,"1005,13411038203 ",.02)

 +154     ;;13411038203

 +155     ;;9002226.02101,"1005,13411046203 ",.01)

 +156     ;;13411046203

 +157     ;;9002226.02101,"1005,13411046203 ",.02)

 +158     ;;13411046203

 +159     ;;9002226.02101,"1005,13411049303 ",.01)

 +160     ;;13411049303

 +161     ;;9002226.02101,"1005,13411049303 ",.02)

 +162     ;;13411049303

 +163     ;;9002226.02101,"1005,13411054906 ",.01)

 +164     ;;13411054906

 +165     ;;9002226.02101,"1005,13411054906 ",.02)

 +166     ;;13411054906

 +167     ;;9002226.02101,"1005,14593041701 ",.01)

 +168     ;;14593041701

 +169     ;;9002226.02101,"1005,14593041701 ",.02)

 +170     ;;14593041701

 +171     ;;9002226.02101,"1005,14593041710 ",.01)

 +172     ;;14593041710

 +173     ;;9002226.02101,"1005,14593041710 ",.02)

 +174     ;;14593041710

 +175     ;;9002226.02101,"1005,14593041801 ",.01)

 +176     ;;14593041801

 +177     ;;9002226.02101,"1005,14593041801 ",.02)

 +178     ;;14593041801

 +179     ;;9002226.02101,"1005,14593041850 ",.01)

 +180     ;;14593041850

 +181     ;;9002226.02101,"1005,14593041850 ",.02)

 +182     ;;14593041850

 +183     ;;9002226.02101,"1005,14593042001 ",.01)

 +184     ;;14593042001

 +185     ;;9002226.02101,"1005,14593042001 ",.02)

 +186     ;;14593042001

 +187     ;;9002226.02101,"1005,14593042010 ",.01)

 +188     ;;14593042010

 +189     ;;9002226.02101,"1005,14593042010 ",.02)

 +190     ;;14593042010

 +191     ;;9002226.02101,"1005,14593042050 ",.01)

 +192     ;;14593042050

 +193     ;;9002226.02101,"1005,14593042050 ",.02)

 +194     ;;14593042050

 +195     ;;9002226.02101,"1005,15330023301 ",.01)

 +196     ;;15330023301

 +197     ;;9002226.02101,"1005,15330023301 ",.02)

 +198     ;;15330023301

 +199     ;;9002226.02101,"1005,15330023401 ",.01)

 +200     ;;15330023401

 +201     ;;9002226.02101,"1005,15330023401 ",.02)

 +202     ;;15330023401

 +203     ;;9002226.02101,"1005,15338020030 ",.01)

 +204     ;;15338020030

 +205     ;;9002226.02101,"1005,15338020030 ",.02)

 +206     ;;15338020030

 +207     ;;9002226.02101,"1005,15338021130 ",.01)

 +208     ;;15338021130

 +209     ;;9002226.02101,"1005,15338021130 ",.02)

 +210     ;;15338021130

 +211     ;;9002226.02101,"1005,15338022030 ",.01)

 +212     ;;15338022030

 +213     ;;9002226.02101,"1005,15338022030 ",.02)

 +214     ;;15338022030

 +215     ;;9002226.02101,"1005,15338023330 ",.01)

 +216     ;;15338023330

 +217     ;;9002226.02101,"1005,15338023330 ",.02)

 +218     ;;15338023330

 +219     ;;9002226.02101,"1005,15548004501 ",.01)

 +220     ;;15548004501

 +221     ;;9002226.02101,"1005,15548004501 ",.02)

 +222     ;;15548004501

 +223     ;;9002226.02101,"1005,15548004503 ",.01)

 +224     ;;15548004503

 +225     ;;9002226.02101,"1005,15548004503 ",.02)

 +226     ;;15548004503

 +227     ;;9002226.02101,"1005,15548004505 ",.01)

 +228     ;;15548004505

 +229     ;;9002226.02101,"1005,15548004505 ",.02)

 +230     ;;15548004505

 +231     ;;9002226.02101,"1005,15548004601 ",.01)

 +232     ;;15548004601

 +233     ;;9002226.02101,"1005,15548004601 ",.02)

 +234     ;;15548004601

 +235     ;;9002226.02101,"1005,15548004602 ",.01)

 +236     ;;15548004602

 +237     ;;9002226.02101,"1005,15548004602 ",.02)

 +238     ;;15548004602

 +239     ;;9002226.02101,"1005,15548004603 ",.01)

 +240     ;;15548004603

 +241     ;;9002226.02101,"1005,15548004603 ",.02)

 +242     ;;15548004603

 +243     ;;9002226.02101,"1005,15548004701 ",.01)

 +244     ;;15548004701

 +245     ;;9002226.02101,"1005,15548004701 ",.02)

 +246     ;;15548004701

 +247     ;;9002226.02101,"1005,15548004703 ",.01)

 +248     ;;15548004703

 +249     ;;9002226.02101,"1005,15548004703 ",.02)

 +250     ;;15548004703

 +251     ;;9002226.02101,"1005,15548004801 ",.01)

 +252     ;;15548004801

 +253     ;;9002226.02101,"1005,15548004801 ",.02)

 +254     ;;15548004801

 +255     ;;9002226.02101,"1005,15548015846 ",.01)

 +256     ;;15548015846

 +257     ;;9002226.02101,"1005,15548015846 ",.02)

 +258     ;;15548015846

 +259     ;;9002226.02101,"1005,15548015885 ",.01)

 +260     ;;15548015885

 +261     ;;9002226.02101,"1005,15548015885 ",.02)

 +262     ;;15548015885

 +263     ;;9002226.02101,"1005,15548015895 ",.01)

 +264     ;;15548015895

 +265     ;;9002226.02101,"1005,15548015895 ",.02)

 +266     ;;15548015895

 +267     ;;9002226.02101,"1005,15548020213 ",.01)

 +268     ;;15548020213

 +269     ;;9002226.02101,"1005,15548020213 ",.02)

 +270     ;;15548020213

 +271     ;;9002226.02101,"1005,15548022703 ",.01)

 +272     ;;15548022703

 +273     ;;9002226.02101,"1005,15548022703 ",.02)

 +274     ;;15548022703

 +275     ;;9002226.02101,"1005,15548027203 ",.01)

 +276     ;;15548027203

 +277     ;;9002226.02101,"1005,15548027203 ",.02)

 +278     ;;15548027203

 +279     ;;9002226.02101,"1005,15548027210 ",.01)

 +280     ;;15548027210

 +281     ;;9002226.02101,"1005,15548027210 ",.02)

 +282     ;;15548027210

 +283     ;;9002226.02101,"1005,15548027303 ",.01)

 +284     ;;15548027303

 +285     ;;9002226.02101,"1005,15548027303 ",.02)

 +286     ;;15548027303

 +287     ;;9002226.02101,"1005,15548027310 ",.01)

 +288     ;;15548027310

 +289     ;;9002226.02101,"1005,15548027310 ",.02)

 +290     ;;15548027310

 +291     ;;9002226.02101,"1005,15548033810 ",.01)

 +292     ;;15548033810

 +293     ;;9002226.02101,"1005,15548033810 ",.02)

 +294     ;;15548033810

 +295     ;;9002226.02101,"1005,15548033830 ",.01)

 +296     ;;15548033830

 +297     ;;9002226.02101,"1005,15548033830 ",.02)

 +298     ;;15548033830

 +299     ;;9002226.02101,"1005,15548033850 ",.01)

 +300     ;;15548033850

 +301     ;;9002226.02101,"1005,15548033850 ",.02)

 +302     ;;15548033850

 +303     ;;9002226.02101,"1005,15548033892 ",.01)

 +304     ;;15548033892

 +305     ;;9002226.02101,"1005,15548033892 ",.02)

 +306     ;;15548033892

 +307     ;;9002226.02101,"1005,15548034950 ",.01)

 +308     ;;15548034950

 +309     ;;9002226.02101,"1005,15548034950 ",.02)

 +310     ;;15548034950

 +311     ;;9002226.02101,"1005,15548038450 ",.01)

 +312     ;;15548038450

 +313     ;;9002226.02101,"1005,15548038450 ",.02)

 +314     ;;15548038450

 +315     ;;9002226.02101,"1005,15548039046 ",.01)

 +316     ;;15548039046

 +317     ;;9002226.02101,"1005,15548039046 ",.02)

 +318     ;;15548039046

 +319     ;;9002226.02101,"1005,15548039050 ",.01)

 +320     ;;15548039050

 +321     ;;9002226.02101,"1005,15548039050 ",.02)

 +322     ;;15548039050

 +323     ;;9002226.02101,"1005,15548039092 ",.01)

 +324     ;;15548039092

 +325     ;;9002226.02101,"1005,15548039092 ",.02)

 +326     ;;15548039092

 +327     ;;9002226.02101,"1005,15548045051 ",.01)

 +328     ;;15548045051

 +329     ;;9002226.02101,"1005,15548045051 ",.02)

 +330     ;;15548045051

 +331     ;;9002226.02101,"1005,15548045054 ",.01)

 +332     ;;15548045054

 +333     ;;9002226.02101,"1005,15548045054 ",.02)

 +334     ;;15548045054

 +335     ;;9002226.02101,"1005,15548045075 ",.01)

 +336     ;;15548045075

 +337     ;;9002226.02101,"1005,15548045075 ",.02)

 +338     ;;15548045075

 +339     ;;9002226.02101,"1005,15548045250 ",.01)

 +340     ;;15548045250

 +341     ;;9002226.02101,"1005,15548045250 ",.02)

 +342     ;;15548045250

 +343     ;;9002226.02101,"1005,15548045251 ",.01)

 +344     ;;15548045251

 +345     ;;9002226.02101,"1005,15548045251 ",.02)

 +346     ;;15548045251

 +347     ;;9002226.02101,"1005,15548045294 ",.01)

 +348     ;;15548045294

 +349     ;;9002226.02101,"1005,15548045294 ",.02)

 +350     ;;15548045294

 +351     ;;9002226.02101,"1005,15548045295 ",.01)

 +352     ;;15548045295

 +353     ;;9002226.02101,"1005,15548045295 ",.02)

 +354     ;;15548045295

 +355     ;;9002226.02101,"1005,15548048250 ",.01)

 +356     ;;15548048250

 +357     ;;9002226.02101,"1005,15548048250 ",.02)

 +358     ;;15548048250

 +359     ;;9002226.02101,"1005,15548048251 ",.01)

 +360     ;;15548048251

 +361     ;;9002226.02101,"1005,15548048251 ",.02)

 +362     ;;15548048251

 +363     ;;9002226.02101,"1005,15548048275 ",.01)

 +364     ;;15548048275

 +365     ;;9002226.02101,"1005,15548048275 ",.02)

 +366     ;;15548048275

 +367     ;;9002226.02101,"1005,15548048550 ",.01)

 +368     ;;15548048550

 +369     ;;9002226.02101,"1005,15548048550 ",.02)

 +370     ;;15548048550

 +371     ;;9002226.02101,"1005,15548060941 ",.01)

 +372     ;;15548060941

 +373     ;;9002226.02101,"1005,15548060941 ",.02)

 +374     ;;15548060941

 +375     ;;9002226.02101,"1005,15548060942 ",.01)

 +376     ;;15548060942

 +377     ;;9002226.02101,"1005,15548060942 ",.02)

 +378     ;;15548060942

 +379     ;;9002226.02101,"1005,15548060945 ",.01)

 +380     ;;15548060945

 +381     ;;9002226.02101,"1005,15548060945 ",.02)

 +382     ;;15548060945

 +383     ;;9002226.02101,"1005,15548060985 ",.01)

 +384     ;;15548060985

 +385     ;;9002226.02101,"1005,15548060985 ",.02)

 +386     ;;15548060985

 +387     ;;9002226.02101,"1005,16252053000 ",.01)

 +388     ;;16252053000

 +389     ;;9002226.02101,"1005,16252053000 ",.02)

 +390     ;;16252053000

 +391     ;;9002226.02101,"1005,16252053090 ",.01)

 +392     ;;16252053090

 +393     ;;9002226.02101,"1005,16252053090 ",.02)

 +394     ;;16252053090

 +395     ;;9002226.02101,"1005,16252053100 ",.01)

 +396     ;;16252053100

 +397     ;;9002226.02101,"1005,16252053100 ",.02)

 +398     ;;16252053100

 +399     ;;9002226.02101,"1005,16252053190 ",.01)

 +400     ;;16252053190

 +401     ;;9002226.02101,"1005,16252053190 ",.02)

 +402     ;;16252053190

BGPM5AQT.m