Routine: BGPM5AUV

BGPM5AUV ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON AUG 29, 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,"1033,00904042840 ",.01)

 ;;00904042840

 ;;9002226.02101,"1033,00904042840 ",.02)

 ;;00904042840

 ;;9002226.02101,"1033,00904042851 ",.01)

 ;;00904042851

 ;;9002226.02101,"1033,00904042851 ",.02)

 ;;00904042851

 ;;9002226.02101,"1033,00904042861 ",.01)

 ;;00904042861

 ;;9002226.02101,"1033,00904042861 ",.02)

 ;;00904042861

 ;;9002226.02101,"1033,00904042895 ",.01)

 ;;00904042895

 ;;9002226.02101,"1033,00904042895 ",.02)

 ;;00904042895

 ;;9002226.02101,"1033,00904043040 ",.01)

 ;;00904043040

 ;;9002226.02101,"1033,00904043040 ",.02)

 ;;00904043040

 ;;9002226.02101,"1033,00904043051 ",.01)

 ;;00904043051

 ;;9002226.02101,"1033,00904043051 ",.02)

 ;;00904043051

 ;;9002226.02101,"1033,00904043061 ",.01)

 ;;00904043061

 ;;9002226.02101,"1033,00904043061 ",.02)

 ;;00904043061

 ;;9002226.02101,"1033,00904164660 ",.01)

 ;;00904164660

 ;;9002226.02101,"1033,00904164660 ",.02)

 ;;00904164660

 ;;9002226.02101,"1033,00904201740 ",.01)

 ;;00904201740

 ;;9002226.02101,"1033,00904201740 ",.02)

 ;;00904201740

 ;;9002226.02101,"1033,00904201760 ",.01)

 ;;00904201760

 ;;9002226.02101,"1033,00904201760 ",.02)

 ;;00904201760

 ;;9002226.02101,"1033,00904207340 ",.01)

 ;;00904207340

 ;;9002226.02101,"1033,00904207340 ",.02)

 ;;00904207340

 ;;9002226.02101,"1033,00904207360 ",.01)

 ;;00904207360

 ;;9002226.02101,"1033,00904207360 ",.02)

 ;;00904207360

 ;;9002226.02101,"1033,00904221860 ",.01)

 ;;00904221860

 ;;9002226.02101,"1033,00904221860 ",.02)

 ;;00904221860

 ;;9002226.02101,"1033,00904240760 ",.01)

 ;;00904240760

 ;;9002226.02101,"1033,00904240760 ",.02)

 ;;00904240760

 ;;9002226.02101,"1033,00904240780 ",.01)

 ;;00904240780

 ;;9002226.02101,"1033,00904240780 ",.02)

 ;;00904240780

 ;;9002226.02101,"1033,00904241660 ",.01)

 ;;00904241660

 ;;9002226.02101,"1033,00904241660 ",.02)

 ;;00904241660

 ;;9002226.02101,"1033,00904241680 ",.01)

 ;;00904241680

 ;;9002226.02101,"1033,00904241680 ",.02)

 ;;00904241680

 ;;9002226.02101,"1033,00904245060 ",.01)

 ;;00904245060

 ;;9002226.02101,"1033,00904245060 ",.02)

 ;;00904245060

 ;;9002226.02101,"1033,00904245080 ",.01)

 ;;00904245080

 ;;9002226.02101,"1033,00904245080 ",.02)

 ;;00904245080

 ;;9002226.02101,"1033,00904245160 ",.01)

 ;;00904245160

 ;;9002226.02101,"1033,00904245160 ",.02)

 ;;00904245160

 ;;9002226.02101,"1033,00904245180 ",.01)

 ;;00904245180

 ;;9002226.02101,"1033,00904245180 ",.02)

 ;;00904245180

 ;;9002226.02101,"1033,00904245280 ",.01)

 ;;00904245280

 ;;9002226.02101,"1033,00904245280 ",.02)

 ;;00904245280

 ;;9002226.02101,"1033,00904246216 ",.01)

 ;;00904246216

 ;;9002226.02101,"1033,00904246216 ",.02)

 ;;00904246216

 ;;9002226.02101,"1033,00904246316 ",.01)

 ;;00904246316

 ;;9002226.02101,"1033,00904246316 ",.02)

 ;;00904246316

 ;;9002226.02101,"1033,00904246860 ",.01)

 ;;00904246860

 ;;9002226.02101,"1033,00904246860 ",.02)

 ;;00904246860

 ;;9002226.02101,"1033,00904247116 ",.01)

 ;;00904247116

 ;;9002226.02101,"1033,00904247116 ",.02)

 ;;00904247116

 ;;9002226.02101,"1033,00904261740 ",.01)

 ;;00904261740

 ;;9002226.02101,"1033,00904261740 ",.02)

 ;;00904261740

 ;;9002226.02101,"1033,00904261760 ",.01)

 ;;00904261760

 ;;9002226.02101,"1033,00904261760 ",.02)

 ;;00904261760

 ;;9002226.02101,"1033,00904261761 ",.01)

 ;;00904261761

 ;;9002226.02101,"1033,00904261761 ",.02)

 ;;00904261761

 ;;9002226.02101,"1033,00904261840 ",.01)

 ;;00904261840

 ;;9002226.02101,"1033,00904261840 ",.02)

 ;;00904261840

 ;;9002226.02101,"1033,00904261851 ",.01)

 ;;00904261851

 ;;9002226.02101,"1033,00904261851 ",.02)

 ;;00904261851

 ;;9002226.02101,"1033,00904261904 ",.01)

 ;;00904261904

 ;;9002226.02101,"1033,00904261904 ",.02)

 ;;00904261904

 ;;9002226.02101,"1033,00904261907 ",.01)

 ;;00904261907

 ;;9002226.02101,"1033,00904261907 ",.02)

 ;;00904261907

 ;;9002226.02101,"1033,00904262004 ",.01)

 ;;00904262004

 ;;9002226.02101,"1033,00904262004 ",.02)

 ;;00904262004

 ;;9002226.02101,"1033,00904262007 ",.01)

 ;;00904262007

 ;;9002226.02101,"1033,00904262007 ",.02)

 ;;00904262007

 ;;9002226.02101,"1033,00904264760 ",.01)

 ;;00904264760

 ;;9002226.02101,"1033,00904264760 ",.02)

 ;;00904264760

 ;;9002226.02101,"1033,00904265304 ",.01)

 ;;00904265304

 ;;9002226.02101,"1033,00904265304 ",.02)

 ;;00904265304

 ;;9002226.02101,"1033,00904272540 ",.01)

 ;;00904272540

 ;;9002226.02101,"1033,00904272540 ",.02)

 ;;00904272540

 ;;9002226.02101,"1033,00904272560 ",.01)

 ;;00904272560

 ;;9002226.02101,"1033,00904272560 ",.02)

 ;;00904272560

 ;;9002226.02101,"1033,00904272561 ",.01)

 ;;00904272561

 ;;9002226.02101,"1033,00904272561 ",.02)

 ;;00904272561

 ;;9002226.02101,"1033,00904272640 ",.01)

 ;;00904272640

 ;;9002226.02101,"1033,00904272640 ",.02)

 ;;00904272640

 ;;9002226.02101,"1033,00904272660 ",.01)

 ;;00904272660

 ;;9002226.02101,"1033,00904272660 ",.02)

 ;;00904272660

 ;;9002226.02101,"1033,00904283760 ",.01)

 ;;00904283760

 ;;9002226.02101,"1033,00904283760 ",.02)

 ;;00904283760

 ;;9002226.02101,"1033,00904283860 ",.01)

 ;;00904283860

 ;;9002226.02101,"1033,00904283860 ",.02)

 ;;00904283860

 ;;9002226.02101,"1033,00904380040 ",.01)

 ;;00904380040

 ;;9002226.02101,"1033,00904380040 ",.02)

 ;;00904380040

 ;;9002226.02101,"1033,00904380060 ",.01)

 ;;00904380060

 ;;9002226.02101,"1033,00904380060 ",.02)

 ;;00904380060

 ;;9002226.02101,"1033,00904380061 ",.01)

 ;;00904380061

 ;;9002226.02101,"1033,00904380061 ",.02)

 ;;00904380061

 ;;9002226.02101,"1033,00904380140 ",.01)

 ;;00904380140

 ;;9002226.02101,"1033,00904380140 ",.02)

 ;;00904380140

 ;;9002226.02101,"1033,00904380160 ",.01)

 ;;00904380160

 ;;9002226.02101,"1033,00904380160 ",.02)

 ;;00904380160

 ;;9002226.02101,"1033,00904380161 ",.01)

 ;;00904380161

 ;;9002226.02101,"1033,00904380161 ",.02)

 ;;00904380161

 ;;9002226.02101,"1033,00904380204 ",.01)

 ;;00904380204

 ;;9002226.02101,"1033,00904380204 ",.02)

 ;;00904380204

 ;;9002226.02101,"1033,00904380208 ",.01)

 ;;00904380208

 ;;9002226.02101,"1033,00904380208 ",.02)

 ;;00904380208

 ;;9002226.02101,"1033,00904380304 ",.01)

 ;;00904380304

 ;;9002226.02101,"1033,00904380304 ",.02)

 ;;00904380304

 ;;9002226.02101,"1033,00904380308 ",.01)

 ;;00904380308

 ;;9002226.02101,"1033,00904380308 ",.02)

 ;;00904380308

 ;;9002226.02101,"1033,00904383860 ",.01)

 ;;00904383860

 ;;9002226.02101,"1033,00904383860 ",.02)

 ;;00904383860

 ;;9002226.02101,"1033,00904400104 ",.01)

 ;;00904400104

 ;;9002226.02101,"1033,00904400104 ",.02)

 ;;00904400104

 ;;9002226.02101,"1033,00904400108 ",.01)

 ;;00904400108

 ;;9002226.02101,"1033,00904400108 ",.02)

 ;;00904400108

 ;;9002226.02101,"1033,00904400404 ",.01)

 ;;00904400404

 ;;9002226.02101,"1033,00904400404 ",.02)

 ;;00904400404

 ;;9002226.02101,"1033,00904400408 ",.01)

 ;;00904400408

 ;;9002226.02101,"1033,00904400408 ",.02)

 ;;00904400408

 ;;9002226.02101,"1033,00904520460 ",.01)

 ;;00904520460

 ;;9002226.02101,"1033,00904520460 ",.02)

 ;;00904520460

 ;;9002226.02101,"1033,00904520560 ",.01)

 ;;00904520560

 ;;9002226.02101,"1033,00904520560 ",.02)

 ;;00904520560

 ;;9002226.02101,"1033,00904580761 ",.01)

 ;;00904580761

 ;;9002226.02101,"1033,00904580761 ",.02)

 ;;00904580761

 ;;9002226.02101,"1033,00904581361 ",.01)

 ;;00904581361

 ;;9002226.02101,"1033,00904581361 ",.02)

 ;;00904581361

 ;;9002226.02101,"1033,00904584261 ",.01)

 ;;00904584261

 ;;9002226.02101,"1033,00904584261 ",.02)

 ;;00904584261

 ;;9002226.02101,"1033,00904584361 ",.01)

 ;;00904584361

 ;;9002226.02101,"1033,00904584361 ",.02)

 ;;00904584361

 ;;9002226.02101,"1033,00904595961 ",.01)

 ;;00904595961

 ;;9002226.02101,"1033,00904595961 ",.02)

 ;;00904595961

 ;;9002226.02101,"1033,00904596061 ",.01)

 ;;00904596061

 ;;9002226.02101,"1033,00904596061 ",.02)

 ;;00904596061

 ;;9002226.02101,"1033,00904601004 ",.01)

 ;;00904601004

 ;;9002226.02101,"1033,00904601004 ",.02)

 ;;00904601004

 ;;9002226.02101,"1033,00904625161 ",.01)

 ;;00904625161

 ;;9002226.02101,"1033,00904625161 ",.02)

 ;;00904625161

 ;;9002226.02101,"1033,00904768260 ",.01)

 ;;00904768260

 ;;9002226.02101,"1033,00904768260 ",.02)

 ;;00904768260

 ;;9002226.02101,"1033,00904768351 ",.01)

 ;;00904768351

 ;;9002226.02101,"1033,00904768351 ",.02)

 ;;00904768351

 ;;9002226.02101,"1033,00904771340 ",.01)

 ;;00904771340

 ;;9002226.02101,"1033,00904771340 ",.02)

 ;;00904771340

 ;;9002226.02101,"1033,00904771360 ",.01)

 ;;00904771360

 ;;9002226.02101,"1033,00904771360 ",.02)

 ;;00904771360

 ;;9002226.02101,"1033,00904773303 ",.01)

 ;;00904773303

 ;;9002226.02101,"1033,00904773303 ",.02)

 ;;00904773303

 ;;9002226.02101,"1033,00904773330 ",.01)

 ;;00904773330

 ;;9002226.02101,"1033,00904773330 ",.02)

 ;;00904773330

 ;;9002226.02101,"1033,00904787840 ",.01)

 ;;00904787840

 ;;9002226.02101,"1033,00904787840 ",.02)

 ;;00904787840

 ;;9002226.02101,"1033,00904787851 ",.01)

 ;;00904787851

 ;;9002226.02101,"1033,00904787851 ",.02)

 ;;00904787851

 ;;9002226.02101,"1033,00904787860 ",.01)

 ;;00904787860

 ;;9002226.02101,"1033,00904787860 ",.02)

 ;;00904787860

 ;;9002226.02101,"1033,016014797 ",.01)

 ;;016014797

 ;;9002226.02101,"1033,016014797 ",.02)

 ;;016014797

 ;;9002226.02101,"1033,40 ",.01)

 ;;40

 ;;9002226.02101,"1033,40 ",.02)

 ;;40

 ;;9002226.02101,"1033,52959036720 ",.01)

 ;;52959036720

 ;;9002226.02101,"1033,52959036720 ",.02)

 ;;52959036720

 ;;9002226.02101,"1033,52959036721 ",.01)

 ;;52959036721

 ;;9002226.02101,"1033,52959036721 ",.02)

 ;;52959036721

 ;;9002226.02101,"1033,52959036730 ",.01)

 ;;52959036730

 ;;9002226.02101,"1033,52959036730 ",.02)

 ;;52959036730

 ;;9002226.02101,"1033,52959036740 ",.01)

 ;;52959036740

 ;;9002226.02101,"1033,52959036740 ",.02)

 ;;52959036740

 ;;9002226.02101,"1033,52959036810 ",.01)

 ;;52959036810

 ;;9002226.02101,"1033,52959036810 ",.02)

 ;;52959036810

 ;;9002226.02101,"1033,52959036814 ",.01)

 ;;52959036814

 ;;9002226.02101,"1033,52959036814 ",.02)

 ;;52959036814

 ;;9002226.02101,"1033,52959036820 ",.01)

 ;;52959036820

 ;;9002226.02101,"1033,52959036820 ",.02)

 ;;52959036820

 ;;9002226.02101,"1033,52959036821 ",.01)

 ;;52959036821

 ;;9002226.02101,"1033,52959036821 ",.02)

 ;;52959036821

 ;;9002226.02101,"1033,52959036828 ",.01)

 ;;52959036828

 ;;9002226.02101,"1033,52959036828 ",.02)

 ;;52959036828

 ;;9002226.02101,"1033,52959036830 ",.01)

 ;;52959036830

 ;;9002226.02101,"1033,52959036830 ",.02)

 ;;52959036830

 ;;9002226.02101,"1033,52959036840 ",.01)

 ;;52959036840

 ;;9002226.02101,"1033,52959036840 ",.02)

 ;;52959036840

 ;;9002226.02101,"1033,52959038920 ",.01)

 ;;52959038920

 ;;9002226.02101,"1033,52959038920 ",.02)

 ;;52959038920

 ;;9002226.02101,"1033,52959038928 ",.01)

 ;;52959038928

 ;;9002226.02101,"1033,52959038928 ",.02)

 ;;52959038928

 ;;9002226.02101,"1033,52959038930 ",.01)

 ;;52959038930

 ;;9002226.02101,"1033,52959038930 ",.02)

 ;;52959038930

 ;;9002226.02101,"1033,52959038940 ",.01)

 ;;52959038940

 ;;9002226.02101,"1033,52959038940 ",.02)

 ;;52959038940

 ;;9002226.02101,"1033,52959042804 ",.01)

 ;;52959042804

 ;;9002226.02101,"1033,52959042804 ",.02)

 ;;52959042804

 ;;9002226.02101,"1033,52959042810 ",.01)

 ;;52959042810

 ;;9002226.02101,"1033,52959042810 ",.02)

 ;;52959042810

 ;;9002226.02101,"1033,52959042814 ",.01)

 ;;52959042814

 ;;9002226.02101,"1033,52959042814 ",.02)

 ;;52959042814

 ;;9002226.02101,"1033,52959042815 ",.01)

 ;;52959042815

 ;;9002226.02101,"1033,52959042815 ",.02)

 ;;52959042815

 ;;9002226.02101,"1033,52959042816 ",.01)

 ;;52959042816

 ;;9002226.02101,"1033,52959042816 ",.02)

 ;;52959042816

 ;;9002226.02101,"1033,52959042818 ",.01)

 ;;52959042818

 ;;9002226.02101,"1033,52959042818 ",.02)

 ;;52959042818

BGPM5AUV  ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON AUG 29, 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,"1033,00904042840 ",.01)

 +2       ;;00904042840

 +3       ;;9002226.02101,"1033,00904042840 ",.02)

 +4       ;;00904042840

 +5       ;;9002226.02101,"1033,00904042851 ",.01)

 +6       ;;00904042851

 +7       ;;9002226.02101,"1033,00904042851 ",.02)

 +8       ;;00904042851

 +9       ;;9002226.02101,"1033,00904042861 ",.01)

 +10      ;;00904042861

 +11      ;;9002226.02101,"1033,00904042861 ",.02)

 +12      ;;00904042861

 +13      ;;9002226.02101,"1033,00904042895 ",.01)

 +14      ;;00904042895

 +15      ;;9002226.02101,"1033,00904042895 ",.02)

 +16      ;;00904042895

 +17      ;;9002226.02101,"1033,00904043040 ",.01)

 +18      ;;00904043040

 +19      ;;9002226.02101,"1033,00904043040 ",.02)

 +20      ;;00904043040

 +21      ;;9002226.02101,"1033,00904043051 ",.01)

 +22      ;;00904043051

 +23      ;;9002226.02101,"1033,00904043051 ",.02)

 +24      ;;00904043051

 +25      ;;9002226.02101,"1033,00904043061 ",.01)

 +26      ;;00904043061

 +27      ;;9002226.02101,"1033,00904043061 ",.02)

 +28      ;;00904043061

 +29      ;;9002226.02101,"1033,00904164660 ",.01)

 +30      ;;00904164660

 +31      ;;9002226.02101,"1033,00904164660 ",.02)

 +32      ;;00904164660

 +33      ;;9002226.02101,"1033,00904201740 ",.01)

 +34      ;;00904201740

 +35      ;;9002226.02101,"1033,00904201740 ",.02)

 +36      ;;00904201740

 +37      ;;9002226.02101,"1033,00904201760 ",.01)

 +38      ;;00904201760

 +39      ;;9002226.02101,"1033,00904201760 ",.02)

 +40      ;;00904201760

 +41      ;;9002226.02101,"1033,00904207340 ",.01)

 +42      ;;00904207340

 +43      ;;9002226.02101,"1033,00904207340 ",.02)

 +44      ;;00904207340

 +45      ;;9002226.02101,"1033,00904207360 ",.01)

 +46      ;;00904207360

 +47      ;;9002226.02101,"1033,00904207360 ",.02)

 +48      ;;00904207360

 +49      ;;9002226.02101,"1033,00904221860 ",.01)

 +50      ;;00904221860

 +51      ;;9002226.02101,"1033,00904221860 ",.02)

 +52      ;;00904221860

 +53      ;;9002226.02101,"1033,00904240760 ",.01)

 +54      ;;00904240760

 +55      ;;9002226.02101,"1033,00904240760 ",.02)

 +56      ;;00904240760

 +57      ;;9002226.02101,"1033,00904240780 ",.01)

 +58      ;;00904240780

 +59      ;;9002226.02101,"1033,00904240780 ",.02)

 +60      ;;00904240780

 +61      ;;9002226.02101,"1033,00904241660 ",.01)

 +62      ;;00904241660

 +63      ;;9002226.02101,"1033,00904241660 ",.02)

 +64      ;;00904241660

 +65      ;;9002226.02101,"1033,00904241680 ",.01)

 +66      ;;00904241680

 +67      ;;9002226.02101,"1033,00904241680 ",.02)

 +68      ;;00904241680

 +69      ;;9002226.02101,"1033,00904245060 ",.01)

 +70      ;;00904245060

 +71      ;;9002226.02101,"1033,00904245060 ",.02)

 +72      ;;00904245060

 +73      ;;9002226.02101,"1033,00904245080 ",.01)

 +74      ;;00904245080

 +75      ;;9002226.02101,"1033,00904245080 ",.02)

 +76      ;;00904245080

 +77      ;;9002226.02101,"1033,00904245160 ",.01)

 +78      ;;00904245160

 +79      ;;9002226.02101,"1033,00904245160 ",.02)

 +80      ;;00904245160

 +81      ;;9002226.02101,"1033,00904245180 ",.01)

 +82      ;;00904245180

 +83      ;;9002226.02101,"1033,00904245180 ",.02)

 +84      ;;00904245180

 +85      ;;9002226.02101,"1033,00904245280 ",.01)

 +86      ;;00904245280

 +87      ;;9002226.02101,"1033,00904245280 ",.02)

 +88      ;;00904245280

 +89      ;;9002226.02101,"1033,00904246216 ",.01)

 +90      ;;00904246216

 +91      ;;9002226.02101,"1033,00904246216 ",.02)

 +92      ;;00904246216

 +93      ;;9002226.02101,"1033,00904246316 ",.01)

 +94      ;;00904246316

 +95      ;;9002226.02101,"1033,00904246316 ",.02)

 +96      ;;00904246316

 +97      ;;9002226.02101,"1033,00904246860 ",.01)

 +98      ;;00904246860

 +99      ;;9002226.02101,"1033,00904246860 ",.02)

 +100     ;;00904246860

 +101     ;;9002226.02101,"1033,00904247116 ",.01)

 +102     ;;00904247116

 +103     ;;9002226.02101,"1033,00904247116 ",.02)

 +104     ;;00904247116

 +105     ;;9002226.02101,"1033,00904261740 ",.01)

 +106     ;;00904261740

 +107     ;;9002226.02101,"1033,00904261740 ",.02)

 +108     ;;00904261740

 +109     ;;9002226.02101,"1033,00904261760 ",.01)

 +110     ;;00904261760

 +111     ;;9002226.02101,"1033,00904261760 ",.02)

 +112     ;;00904261760

 +113     ;;9002226.02101,"1033,00904261761 ",.01)

 +114     ;;00904261761

 +115     ;;9002226.02101,"1033,00904261761 ",.02)

 +116     ;;00904261761

 +117     ;;9002226.02101,"1033,00904261840 ",.01)

 +118     ;;00904261840

 +119     ;;9002226.02101,"1033,00904261840 ",.02)

 +120     ;;00904261840

 +121     ;;9002226.02101,"1033,00904261851 ",.01)

 +122     ;;00904261851

 +123     ;;9002226.02101,"1033,00904261851 ",.02)

 +124     ;;00904261851

 +125     ;;9002226.02101,"1033,00904261904 ",.01)

 +126     ;;00904261904

 +127     ;;9002226.02101,"1033,00904261904 ",.02)

 +128     ;;00904261904

 +129     ;;9002226.02101,"1033,00904261907 ",.01)

 +130     ;;00904261907

 +131     ;;9002226.02101,"1033,00904261907 ",.02)

 +132     ;;00904261907

 +133     ;;9002226.02101,"1033,00904262004 ",.01)

 +134     ;;00904262004

 +135     ;;9002226.02101,"1033,00904262004 ",.02)

 +136     ;;00904262004

 +137     ;;9002226.02101,"1033,00904262007 ",.01)

 +138     ;;00904262007

 +139     ;;9002226.02101,"1033,00904262007 ",.02)

 +140     ;;00904262007

 +141     ;;9002226.02101,"1033,00904264760 ",.01)

 +142     ;;00904264760

 +143     ;;9002226.02101,"1033,00904264760 ",.02)

 +144     ;;00904264760

 +145     ;;9002226.02101,"1033,00904265304 ",.01)

 +146     ;;00904265304

 +147     ;;9002226.02101,"1033,00904265304 ",.02)

 +148     ;;00904265304

 +149     ;;9002226.02101,"1033,00904272540 ",.01)

 +150     ;;00904272540

 +151     ;;9002226.02101,"1033,00904272540 ",.02)

 +152     ;;00904272540

 +153     ;;9002226.02101,"1033,00904272560 ",.01)

 +154     ;;00904272560

 +155     ;;9002226.02101,"1033,00904272560 ",.02)

 +156     ;;00904272560

 +157     ;;9002226.02101,"1033,00904272561 ",.01)

 +158     ;;00904272561

 +159     ;;9002226.02101,"1033,00904272561 ",.02)

 +160     ;;00904272561

 +161     ;;9002226.02101,"1033,00904272640 ",.01)

 +162     ;;00904272640

 +163     ;;9002226.02101,"1033,00904272640 ",.02)

 +164     ;;00904272640

 +165     ;;9002226.02101,"1033,00904272660 ",.01)

 +166     ;;00904272660

 +167     ;;9002226.02101,"1033,00904272660 ",.02)

 +168     ;;00904272660

 +169     ;;9002226.02101,"1033,00904283760 ",.01)

 +170     ;;00904283760

 +171     ;;9002226.02101,"1033,00904283760 ",.02)

 +172     ;;00904283760

 +173     ;;9002226.02101,"1033,00904283860 ",.01)

 +174     ;;00904283860

 +175     ;;9002226.02101,"1033,00904283860 ",.02)

 +176     ;;00904283860

 +177     ;;9002226.02101,"1033,00904380040 ",.01)

 +178     ;;00904380040

 +179     ;;9002226.02101,"1033,00904380040 ",.02)

 +180     ;;00904380040

 +181     ;;9002226.02101,"1033,00904380060 ",.01)

 +182     ;;00904380060

 +183     ;;9002226.02101,"1033,00904380060 ",.02)

 +184     ;;00904380060

 +185     ;;9002226.02101,"1033,00904380061 ",.01)

 +186     ;;00904380061

 +187     ;;9002226.02101,"1033,00904380061 ",.02)

 +188     ;;00904380061

 +189     ;;9002226.02101,"1033,00904380140 ",.01)

 +190     ;;00904380140

 +191     ;;9002226.02101,"1033,00904380140 ",.02)

 +192     ;;00904380140

 +193     ;;9002226.02101,"1033,00904380160 ",.01)

 +194     ;;00904380160

 +195     ;;9002226.02101,"1033,00904380160 ",.02)

 +196     ;;00904380160

 +197     ;;9002226.02101,"1033,00904380161 ",.01)

 +198     ;;00904380161

 +199     ;;9002226.02101,"1033,00904380161 ",.02)

 +200     ;;00904380161

 +201     ;;9002226.02101,"1033,00904380204 ",.01)

 +202     ;;00904380204

 +203     ;;9002226.02101,"1033,00904380204 ",.02)

 +204     ;;00904380204

 +205     ;;9002226.02101,"1033,00904380208 ",.01)

 +206     ;;00904380208

 +207     ;;9002226.02101,"1033,00904380208 ",.02)

 +208     ;;00904380208

 +209     ;;9002226.02101,"1033,00904380304 ",.01)

 +210     ;;00904380304

 +211     ;;9002226.02101,"1033,00904380304 ",.02)

 +212     ;;00904380304

 +213     ;;9002226.02101,"1033,00904380308 ",.01)

 +214     ;;00904380308

 +215     ;;9002226.02101,"1033,00904380308 ",.02)

 +216     ;;00904380308

 +217     ;;9002226.02101,"1033,00904383860 ",.01)

 +218     ;;00904383860

 +219     ;;9002226.02101,"1033,00904383860 ",.02)

 +220     ;;00904383860

 +221     ;;9002226.02101,"1033,00904400104 ",.01)

 +222     ;;00904400104

 +223     ;;9002226.02101,"1033,00904400104 ",.02)

 +224     ;;00904400104

 +225     ;;9002226.02101,"1033,00904400108 ",.01)

 +226     ;;00904400108

 +227     ;;9002226.02101,"1033,00904400108 ",.02)

 +228     ;;00904400108

 +229     ;;9002226.02101,"1033,00904400404 ",.01)

 +230     ;;00904400404

 +231     ;;9002226.02101,"1033,00904400404 ",.02)

 +232     ;;00904400404

 +233     ;;9002226.02101,"1033,00904400408 ",.01)

 +234     ;;00904400408

 +235     ;;9002226.02101,"1033,00904400408 ",.02)

 +236     ;;00904400408

 +237     ;;9002226.02101,"1033,00904520460 ",.01)

 +238     ;;00904520460

 +239     ;;9002226.02101,"1033,00904520460 ",.02)

 +240     ;;00904520460

 +241     ;;9002226.02101,"1033,00904520560 ",.01)

 +242     ;;00904520560

 +243     ;;9002226.02101,"1033,00904520560 ",.02)

 +244     ;;00904520560

 +245     ;;9002226.02101,"1033,00904580761 ",.01)

 +246     ;;00904580761

 +247     ;;9002226.02101,"1033,00904580761 ",.02)

 +248     ;;00904580761

 +249     ;;9002226.02101,"1033,00904581361 ",.01)

 +250     ;;00904581361

 +251     ;;9002226.02101,"1033,00904581361 ",.02)

 +252     ;;00904581361

 +253     ;;9002226.02101,"1033,00904584261 ",.01)

 +254     ;;00904584261

 +255     ;;9002226.02101,"1033,00904584261 ",.02)

 +256     ;;00904584261

 +257     ;;9002226.02101,"1033,00904584361 ",.01)

 +258     ;;00904584361

 +259     ;;9002226.02101,"1033,00904584361 ",.02)

 +260     ;;00904584361

 +261     ;;9002226.02101,"1033,00904595961 ",.01)

 +262     ;;00904595961

 +263     ;;9002226.02101,"1033,00904595961 ",.02)

 +264     ;;00904595961

 +265     ;;9002226.02101,"1033,00904596061 ",.01)

 +266     ;;00904596061

 +267     ;;9002226.02101,"1033,00904596061 ",.02)

 +268     ;;00904596061

 +269     ;;9002226.02101,"1033,00904601004 ",.01)

 +270     ;;00904601004

 +271     ;;9002226.02101,"1033,00904601004 ",.02)

 +272     ;;00904601004

 +273     ;;9002226.02101,"1033,00904625161 ",.01)

 +274     ;;00904625161

 +275     ;;9002226.02101,"1033,00904625161 ",.02)

 +276     ;;00904625161

 +277     ;;9002226.02101,"1033,00904768260 ",.01)

 +278     ;;00904768260

 +279     ;;9002226.02101,"1033,00904768260 ",.02)

 +280     ;;00904768260

 +281     ;;9002226.02101,"1033,00904768351 ",.01)

 +282     ;;00904768351

 +283     ;;9002226.02101,"1033,00904768351 ",.02)

 +284     ;;00904768351

 +285     ;;9002226.02101,"1033,00904771340 ",.01)

 +286     ;;00904771340

 +287     ;;9002226.02101,"1033,00904771340 ",.02)

 +288     ;;00904771340

 +289     ;;9002226.02101,"1033,00904771360 ",.01)

 +290     ;;00904771360

 +291     ;;9002226.02101,"1033,00904771360 ",.02)

 +292     ;;00904771360

 +293     ;;9002226.02101,"1033,00904773303 ",.01)

 +294     ;;00904773303

 +295     ;;9002226.02101,"1033,00904773303 ",.02)

 +296     ;;00904773303

 +297     ;;9002226.02101,"1033,00904773330 ",.01)

 +298     ;;00904773330

 +299     ;;9002226.02101,"1033,00904773330 ",.02)

 +300     ;;00904773330

 +301     ;;9002226.02101,"1033,00904787840 ",.01)

 +302     ;;00904787840

 +303     ;;9002226.02101,"1033,00904787840 ",.02)

 +304     ;;00904787840

 +305     ;;9002226.02101,"1033,00904787851 ",.01)

 +306     ;;00904787851

 +307     ;;9002226.02101,"1033,00904787851 ",.02)

 +308     ;;00904787851

 +309     ;;9002226.02101,"1033,00904787860 ",.01)

 +310     ;;00904787860

 +311     ;;9002226.02101,"1033,00904787860 ",.02)

 +312     ;;00904787860

 +313     ;;9002226.02101,"1033,016014797 ",.01)

 +314     ;;016014797

 +315     ;;9002226.02101,"1033,016014797 ",.02)

 +316     ;;016014797

 +317     ;;9002226.02101,"1033,40 ",.01)

 +318     ;;40

 +319     ;;9002226.02101,"1033,40 ",.02)

 +320     ;;40

 +321     ;;9002226.02101,"1033,52959036720 ",.01)

 +322     ;;52959036720

 +323     ;;9002226.02101,"1033,52959036720 ",.02)

 +324     ;;52959036720

 +325     ;;9002226.02101,"1033,52959036721 ",.01)

 +326     ;;52959036721

 +327     ;;9002226.02101,"1033,52959036721 ",.02)

 +328     ;;52959036721

 +329     ;;9002226.02101,"1033,52959036730 ",.01)

 +330     ;;52959036730

 +331     ;;9002226.02101,"1033,52959036730 ",.02)

 +332     ;;52959036730

 +333     ;;9002226.02101,"1033,52959036740 ",.01)

 +334     ;;52959036740

 +335     ;;9002226.02101,"1033,52959036740 ",.02)

 +336     ;;52959036740

 +337     ;;9002226.02101,"1033,52959036810 ",.01)

 +338     ;;52959036810

 +339     ;;9002226.02101,"1033,52959036810 ",.02)

 +340     ;;52959036810

 +341     ;;9002226.02101,"1033,52959036814 ",.01)

 +342     ;;52959036814

 +343     ;;9002226.02101,"1033,52959036814 ",.02)

 +344     ;;52959036814

 +345     ;;9002226.02101,"1033,52959036820 ",.01)

 +346     ;;52959036820

 +347     ;;9002226.02101,"1033,52959036820 ",.02)

 +348     ;;52959036820

 +349     ;;9002226.02101,"1033,52959036821 ",.01)

 +350     ;;52959036821

 +351     ;;9002226.02101,"1033,52959036821 ",.02)

 +352     ;;52959036821

 +353     ;;9002226.02101,"1033,52959036828 ",.01)

 +354     ;;52959036828

 +355     ;;9002226.02101,"1033,52959036828 ",.02)

 +356     ;;52959036828

 +357     ;;9002226.02101,"1033,52959036830 ",.01)

 +358     ;;52959036830

 +359     ;;9002226.02101,"1033,52959036830 ",.02)

 +360     ;;52959036830

 +361     ;;9002226.02101,"1033,52959036840 ",.01)

 +362     ;;52959036840

 +363     ;;9002226.02101,"1033,52959036840 ",.02)

 +364     ;;52959036840

 +365     ;;9002226.02101,"1033,52959038920 ",.01)

 +366     ;;52959038920

 +367     ;;9002226.02101,"1033,52959038920 ",.02)

 +368     ;;52959038920

 +369     ;;9002226.02101,"1033,52959038928 ",.01)

 +370     ;;52959038928

 +371     ;;9002226.02101,"1033,52959038928 ",.02)

 +372     ;;52959038928

 +373     ;;9002226.02101,"1033,52959038930 ",.01)

 +374     ;;52959038930

 +375     ;;9002226.02101,"1033,52959038930 ",.02)

 +376     ;;52959038930

 +377     ;;9002226.02101,"1033,52959038940 ",.01)

 +378     ;;52959038940

 +379     ;;9002226.02101,"1033,52959038940 ",.02)

 +380     ;;52959038940

 +381     ;;9002226.02101,"1033,52959042804 ",.01)

 +382     ;;52959042804

 +383     ;;9002226.02101,"1033,52959042804 ",.02)

 +384     ;;52959042804

 +385     ;;9002226.02101,"1033,52959042810 ",.01)

 +386     ;;52959042810

 +387     ;;9002226.02101,"1033,52959042810 ",.02)

 +388     ;;52959042810

 +389     ;;9002226.02101,"1033,52959042814 ",.01)

 +390     ;;52959042814

 +391     ;;9002226.02101,"1033,52959042814 ",.02)

 +392     ;;52959042814

 +393     ;;9002226.02101,"1033,52959042815 ",.01)

 +394     ;;52959042815

 +395     ;;9002226.02101,"1033,52959042815 ",.02)

 +396     ;;52959042815

 +397     ;;9002226.02101,"1033,52959042816 ",.01)

 +398     ;;52959042816

 +399     ;;9002226.02101,"1033,52959042816 ",.02)

 +400     ;;52959042816

 +401     ;;9002226.02101,"1033,52959042818 ",.01)

 +402     ;;52959042818

 +403     ;;9002226.02101,"1033,52959042818 ",.02)

 +404     ;;52959042818

BGPM5AUV.m