Routine: BGPM5BFL

BGPM5BFL ;IHS/MSC/MMT-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,"1084,58016037605 ",.02)

 ;;58016037605

 ;;9002226.02101,"1084,58016037606 ",.01)

 ;;58016037606

 ;;9002226.02101,"1084,58016037606 ",.02)

 ;;58016037606

 ;;9002226.02101,"1084,58016037607 ",.01)

 ;;58016037607

 ;;9002226.02101,"1084,58016037607 ",.02)

 ;;58016037607

 ;;9002226.02101,"1084,58016037608 ",.01)

 ;;58016037608

 ;;9002226.02101,"1084,58016037608 ",.02)

 ;;58016037608

 ;;9002226.02101,"1084,58016037609 ",.01)

 ;;58016037609

 ;;9002226.02101,"1084,58016037609 ",.02)

 ;;58016037609

 ;;9002226.02101,"1084,58016037610 ",.01)

 ;;58016037610

 ;;9002226.02101,"1084,58016037610 ",.02)

 ;;58016037610

 ;;9002226.02101,"1084,58016037612 ",.01)

 ;;58016037612

 ;;9002226.02101,"1084,58016037612 ",.02)

 ;;58016037612

 ;;9002226.02101,"1084,58016037614 ",.01)

 ;;58016037614

 ;;9002226.02101,"1084,58016037614 ",.02)

 ;;58016037614

 ;;9002226.02101,"1084,58016037615 ",.01)

 ;;58016037615

 ;;9002226.02101,"1084,58016037615 ",.02)

 ;;58016037615

 ;;9002226.02101,"1084,58016037616 ",.01)

 ;;58016037616

 ;;9002226.02101,"1084,58016037616 ",.02)

 ;;58016037616

 ;;9002226.02101,"1084,58016037618 ",.01)

 ;;58016037618

 ;;9002226.02101,"1084,58016037618 ",.02)

 ;;58016037618

 ;;9002226.02101,"1084,58016037620 ",.01)

 ;;58016037620

 ;;9002226.02101,"1084,58016037620 ",.02)

 ;;58016037620

 ;;9002226.02101,"1084,58016037621 ",.01)

 ;;58016037621

 ;;9002226.02101,"1084,58016037621 ",.02)

 ;;58016037621

 ;;9002226.02101,"1084,58016037624 ",.01)

 ;;58016037624

 ;;9002226.02101,"1084,58016037624 ",.02)

 ;;58016037624

 ;;9002226.02101,"1084,58016037625 ",.01)

 ;;58016037625

 ;;9002226.02101,"1084,58016037625 ",.02)

 ;;58016037625

 ;;9002226.02101,"1084,58016037626 ",.01)

 ;;58016037626

 ;;9002226.02101,"1084,58016037626 ",.02)

 ;;58016037626

 ;;9002226.02101,"1084,58016037627 ",.01)

 ;;58016037627

 ;;9002226.02101,"1084,58016037627 ",.02)

 ;;58016037627

 ;;9002226.02101,"1084,58016037628 ",.01)

 ;;58016037628

 ;;9002226.02101,"1084,58016037628 ",.02)

 ;;58016037628

 ;;9002226.02101,"1084,58016037630 ",.01)

 ;;58016037630

 ;;9002226.02101,"1084,58016037630 ",.02)

 ;;58016037630

 ;;9002226.02101,"1084,58016037632 ",.01)

 ;;58016037632

 ;;9002226.02101,"1084,58016037632 ",.02)

 ;;58016037632

 ;;9002226.02101,"1084,58016037635 ",.01)

 ;;58016037635

 ;;9002226.02101,"1084,58016037635 ",.02)

 ;;58016037635

 ;;9002226.02101,"1084,58016037636 ",.01)

 ;;58016037636

 ;;9002226.02101,"1084,58016037636 ",.02)

 ;;58016037636

 ;;9002226.02101,"1084,58016037640 ",.01)

 ;;58016037640

 ;;9002226.02101,"1084,58016037640 ",.02)

 ;;58016037640

 ;;9002226.02101,"1084,58016037642 ",.01)

 ;;58016037642

 ;;9002226.02101,"1084,58016037642 ",.02)

 ;;58016037642

 ;;9002226.02101,"1084,58016037644 ",.01)

 ;;58016037644

 ;;9002226.02101,"1084,58016037644 ",.02)

 ;;58016037644

 ;;9002226.02101,"1084,58016037645 ",.01)

 ;;58016037645

 ;;9002226.02101,"1084,58016037645 ",.02)

 ;;58016037645

 ;;9002226.02101,"1084,58016037648 ",.01)

 ;;58016037648

 ;;9002226.02101,"1084,58016037648 ",.02)

 ;;58016037648

 ;;9002226.02101,"1084,58016037650 ",.01)

 ;;58016037650

 ;;9002226.02101,"1084,58016037650 ",.02)

 ;;58016037650

 ;;9002226.02101,"1084,58016037656 ",.01)

 ;;58016037656

 ;;9002226.02101,"1084,58016037656 ",.02)

 ;;58016037656

 ;;9002226.02101,"1084,58016037660 ",.01)

 ;;58016037660

 ;;9002226.02101,"1084,58016037660 ",.02)

 ;;58016037660

 ;;9002226.02101,"1084,58016037667 ",.01)

 ;;58016037667

 ;;9002226.02101,"1084,58016037667 ",.02)

 ;;58016037667

 ;;9002226.02101,"1084,58016037669 ",.01)

 ;;58016037669

 ;;9002226.02101,"1084,58016037669 ",.02)

 ;;58016037669

 ;;9002226.02101,"1084,58016037670 ",.01)

 ;;58016037670

 ;;9002226.02101,"1084,58016037670 ",.02)

 ;;58016037670

 ;;9002226.02101,"1084,58016037671 ",.01)

 ;;58016037671

 ;;9002226.02101,"1084,58016037671 ",.02)

 ;;58016037671

 ;;9002226.02101,"1084,58016037672 ",.01)

 ;;58016037672

 ;;9002226.02101,"1084,58016037672 ",.02)

 ;;58016037672

 ;;9002226.02101,"1084,58016037673 ",.01)

 ;;58016037673

 ;;9002226.02101,"1084,58016037673 ",.02)

 ;;58016037673

 ;;9002226.02101,"1084,58016037675 ",.01)

 ;;58016037675

 ;;9002226.02101,"1084,58016037675 ",.02)

 ;;58016037675

 ;;9002226.02101,"1084,58016037676 ",.01)

 ;;58016037676

 ;;9002226.02101,"1084,58016037676 ",.02)

 ;;58016037676

 ;;9002226.02101,"1084,58016037677 ",.01)

 ;;58016037677

 ;;9002226.02101,"1084,58016037677 ",.02)

 ;;58016037677

 ;;9002226.02101,"1084,58016037679 ",.01)

 ;;58016037679

 ;;9002226.02101,"1084,58016037679 ",.02)

 ;;58016037679

 ;;9002226.02101,"1084,58016037680 ",.01)

 ;;58016037680

 ;;9002226.02101,"1084,58016037680 ",.02)

 ;;58016037680

 ;;9002226.02101,"1084,58016037681 ",.01)

 ;;58016037681

 ;;9002226.02101,"1084,58016037681 ",.02)

 ;;58016037681

 ;;9002226.02101,"1084,58016037682 ",.01)

 ;;58016037682

 ;;9002226.02101,"1084,58016037682 ",.02)

 ;;58016037682

 ;;9002226.02101,"1084,58016037683 ",.01)

 ;;58016037683

 ;;9002226.02101,"1084,58016037683 ",.02)

 ;;58016037683

 ;;9002226.02101,"1084,58016037684 ",.01)

 ;;58016037684

 ;;9002226.02101,"1084,58016037684 ",.02)

 ;;58016037684

 ;;9002226.02101,"1084,58016037687 ",.01)

 ;;58016037687

 ;;9002226.02101,"1084,58016037687 ",.02)

 ;;58016037687

 ;;9002226.02101,"1084,58016037689 ",.01)

 ;;58016037689

 ;;9002226.02101,"1084,58016037689 ",.02)

 ;;58016037689

 ;;9002226.02101,"1084,58016037690 ",.01)

 ;;58016037690

 ;;9002226.02101,"1084,58016037690 ",.02)

 ;;58016037690

 ;;9002226.02101,"1084,58016037691 ",.01)

 ;;58016037691

 ;;9002226.02101,"1084,58016037691 ",.02)

 ;;58016037691

 ;;9002226.02101,"1084,58016037692 ",.01)

 ;;58016037692

 ;;9002226.02101,"1084,58016037692 ",.02)

 ;;58016037692

 ;;9002226.02101,"1084,58016037693 ",.01)

 ;;58016037693

 ;;9002226.02101,"1084,58016037693 ",.02)

 ;;58016037693

 ;;9002226.02101,"1084,58016037696 ",.01)

 ;;58016037696

 ;;9002226.02101,"1084,58016037696 ",.02)

 ;;58016037696

 ;;9002226.02101,"1084,58016037697 ",.01)

 ;;58016037697

 ;;9002226.02101,"1084,58016037697 ",.02)

 ;;58016037697

 ;;9002226.02101,"1084,58016037698 ",.01)

 ;;58016037698

 ;;9002226.02101,"1084,58016037698 ",.02)

 ;;58016037698

 ;;9002226.02101,"1084,58016037699 ",.01)

 ;;58016037699

 ;;9002226.02101,"1084,58016037699 ",.02)

 ;;58016037699

 ;;9002226.02101,"1084,58016037800 ",.01)

 ;;58016037800

 ;;9002226.02101,"1084,58016037800 ",.02)

 ;;58016037800

 ;;9002226.02101,"1084,58016037801 ",.01)

 ;;58016037801

 ;;9002226.02101,"1084,58016037801 ",.02)

 ;;58016037801

 ;;9002226.02101,"1084,58016037802 ",.01)

 ;;58016037802

 ;;9002226.02101,"1084,58016037802 ",.02)

 ;;58016037802

 ;;9002226.02101,"1084,58016037803 ",.01)

 ;;58016037803

 ;;9002226.02101,"1084,58016037803 ",.02)

 ;;58016037803

 ;;9002226.02101,"1084,58016037804 ",.01)

 ;;58016037804

 ;;9002226.02101,"1084,58016037804 ",.02)

 ;;58016037804

 ;;9002226.02101,"1084,58016037805 ",.01)

 ;;58016037805

 ;;9002226.02101,"1084,58016037805 ",.02)

 ;;58016037805

 ;;9002226.02101,"1084,58016037806 ",.01)

 ;;58016037806

 ;;9002226.02101,"1084,58016037806 ",.02)

 ;;58016037806

 ;;9002226.02101,"1084,58016037807 ",.01)

 ;;58016037807

 ;;9002226.02101,"1084,58016037807 ",.02)

 ;;58016037807

 ;;9002226.02101,"1084,58016037808 ",.01)

 ;;58016037808

 ;;9002226.02101,"1084,58016037808 ",.02)

 ;;58016037808

 ;;9002226.02101,"1084,58016037809 ",.01)

 ;;58016037809

 ;;9002226.02101,"1084,58016037809 ",.02)

 ;;58016037809

 ;;9002226.02101,"1084,58016037810 ",.01)

 ;;58016037810

 ;;9002226.02101,"1084,58016037810 ",.02)

 ;;58016037810

 ;;9002226.02101,"1084,58016037812 ",.01)

 ;;58016037812

 ;;9002226.02101,"1084,58016037812 ",.02)

 ;;58016037812

 ;;9002226.02101,"1084,58016037814 ",.01)

 ;;58016037814

 ;;9002226.02101,"1084,58016037814 ",.02)

 ;;58016037814

 ;;9002226.02101,"1084,58016037815 ",.01)

 ;;58016037815

 ;;9002226.02101,"1084,58016037815 ",.02)

 ;;58016037815

 ;;9002226.02101,"1084,58016037816 ",.01)

 ;;58016037816

 ;;9002226.02101,"1084,58016037816 ",.02)

 ;;58016037816

 ;;9002226.02101,"1084,58016037818 ",.01)

 ;;58016037818

 ;;9002226.02101,"1084,58016037818 ",.02)

 ;;58016037818

 ;;9002226.02101,"1084,58016037820 ",.01)

 ;;58016037820

 ;;9002226.02101,"1084,58016037820 ",.02)

 ;;58016037820

 ;;9002226.02101,"1084,58016037821 ",.01)

 ;;58016037821

 ;;9002226.02101,"1084,58016037821 ",.02)

 ;;58016037821

 ;;9002226.02101,"1084,58016037824 ",.01)

 ;;58016037824

 ;;9002226.02101,"1084,58016037824 ",.02)

 ;;58016037824

 ;;9002226.02101,"1084,58016037825 ",.01)

 ;;58016037825

 ;;9002226.02101,"1084,58016037825 ",.02)

 ;;58016037825

 ;;9002226.02101,"1084,58016037826 ",.01)

 ;;58016037826

 ;;9002226.02101,"1084,58016037826 ",.02)

 ;;58016037826

 ;;9002226.02101,"1084,58016037827 ",.01)

 ;;58016037827

 ;;9002226.02101,"1084,58016037827 ",.02)

 ;;58016037827

 ;;9002226.02101,"1084,58016037828 ",.01)

 ;;58016037828

 ;;9002226.02101,"1084,58016037828 ",.02)

 ;;58016037828

 ;;9002226.02101,"1084,58016037830 ",.01)

 ;;58016037830

 ;;9002226.02101,"1084,58016037830 ",.02)

 ;;58016037830

 ;;9002226.02101,"1084,58016037832 ",.01)

 ;;58016037832

 ;;9002226.02101,"1084,58016037832 ",.02)

 ;;58016037832

 ;;9002226.02101,"1084,58016037835 ",.01)

 ;;58016037835

 ;;9002226.02101,"1084,58016037835 ",.02)

 ;;58016037835

 ;;9002226.02101,"1084,58016037836 ",.01)

 ;;58016037836

 ;;9002226.02101,"1084,58016037836 ",.02)

 ;;58016037836

 ;;9002226.02101,"1084,58016037840 ",.01)

 ;;58016037840

 ;;9002226.02101,"1084,58016037840 ",.02)

 ;;58016037840

 ;;9002226.02101,"1084,58016037842 ",.01)

 ;;58016037842

 ;;9002226.02101,"1084,58016037842 ",.02)

 ;;58016037842

 ;;9002226.02101,"1084,58016037844 ",.01)

 ;;58016037844

 ;;9002226.02101,"1084,58016037844 ",.02)

 ;;58016037844

 ;;9002226.02101,"1084,58016037845 ",.01)

 ;;58016037845

 ;;9002226.02101,"1084,58016037845 ",.02)

 ;;58016037845

 ;;9002226.02101,"1084,58016037848 ",.01)

 ;;58016037848

 ;;9002226.02101,"1084,58016037848 ",.02)

 ;;58016037848

 ;;9002226.02101,"1084,58016037850 ",.01)

 ;;58016037850

 ;;9002226.02101,"1084,58016037850 ",.02)

 ;;58016037850

 ;;9002226.02101,"1084,58016037856 ",.01)

 ;;58016037856

 ;;9002226.02101,"1084,58016037856 ",.02)

 ;;58016037856

 ;;9002226.02101,"1084,58016037860 ",.01)

 ;;58016037860

 ;;9002226.02101,"1084,58016037860 ",.02)

 ;;58016037860

 ;;9002226.02101,"1084,58016037867 ",.01)

 ;;58016037867

 ;;9002226.02101,"1084,58016037867 ",.02)

 ;;58016037867

 ;;9002226.02101,"1084,58016037869 ",.01)

 ;;58016037869

 ;;9002226.02101,"1084,58016037869 ",.02)

 ;;58016037869

 ;;9002226.02101,"1084,58016037870 ",.01)

 ;;58016037870

 ;;9002226.02101,"1084,58016037870 ",.02)

 ;;58016037870

 ;;9002226.02101,"1084,58016037871 ",.01)

 ;;58016037871

 ;;9002226.02101,"1084,58016037871 ",.02)

 ;;58016037871

 ;;9002226.02101,"1084,58016037872 ",.01)

 ;;58016037872

 ;;9002226.02101,"1084,58016037872 ",.02)

 ;;58016037872

 ;;9002226.02101,"1084,58016037873 ",.01)

 ;;58016037873

 ;;9002226.02101,"1084,58016037873 ",.02)

 ;;58016037873

 ;;9002226.02101,"1084,58016037875 ",.01)

 ;;58016037875

 ;;9002226.02101,"1084,58016037875 ",.02)

 ;;58016037875

 ;;9002226.02101,"1084,58016037876 ",.01)

 ;;58016037876

 ;;9002226.02101,"1084,58016037876 ",.02)

 ;;58016037876

 ;;9002226.02101,"1084,58016037877 ",.01)

 ;;58016037877

 ;;9002226.02101,"1084,58016037877 ",.02)

 ;;58016037877

 ;;9002226.02101,"1084,58016037879 ",.01)

 ;;58016037879

 ;;9002226.02101,"1084,58016037879 ",.02)

 ;;58016037879

 ;;9002226.02101,"1084,58016037880 ",.01)

 ;;58016037880

 ;;9002226.02101,"1084,58016037880 ",.02)

 ;;58016037880

BGPM5BFL  ;IHS/MSC/MMT-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,"1084,58016037605 ",.02)

 +2       ;;58016037605

 +3       ;;9002226.02101,"1084,58016037606 ",.01)

 +4       ;;58016037606

 +5       ;;9002226.02101,"1084,58016037606 ",.02)

 +6       ;;58016037606

 +7       ;;9002226.02101,"1084,58016037607 ",.01)

 +8       ;;58016037607

 +9       ;;9002226.02101,"1084,58016037607 ",.02)

 +10      ;;58016037607

 +11      ;;9002226.02101,"1084,58016037608 ",.01)

 +12      ;;58016037608

 +13      ;;9002226.02101,"1084,58016037608 ",.02)

 +14      ;;58016037608

 +15      ;;9002226.02101,"1084,58016037609 ",.01)

 +16      ;;58016037609

 +17      ;;9002226.02101,"1084,58016037609 ",.02)

 +18      ;;58016037609

 +19      ;;9002226.02101,"1084,58016037610 ",.01)

 +20      ;;58016037610

 +21      ;;9002226.02101,"1084,58016037610 ",.02)

 +22      ;;58016037610

 +23      ;;9002226.02101,"1084,58016037612 ",.01)

 +24      ;;58016037612

 +25      ;;9002226.02101,"1084,58016037612 ",.02)

 +26      ;;58016037612

 +27      ;;9002226.02101,"1084,58016037614 ",.01)

 +28      ;;58016037614

 +29      ;;9002226.02101,"1084,58016037614 ",.02)

 +30      ;;58016037614

 +31      ;;9002226.02101,"1084,58016037615 ",.01)

 +32      ;;58016037615

 +33      ;;9002226.02101,"1084,58016037615 ",.02)

 +34      ;;58016037615

 +35      ;;9002226.02101,"1084,58016037616 ",.01)

 +36      ;;58016037616

 +37      ;;9002226.02101,"1084,58016037616 ",.02)

 +38      ;;58016037616

 +39      ;;9002226.02101,"1084,58016037618 ",.01)

 +40      ;;58016037618

 +41      ;;9002226.02101,"1084,58016037618 ",.02)

 +42      ;;58016037618

 +43      ;;9002226.02101,"1084,58016037620 ",.01)

 +44      ;;58016037620

 +45      ;;9002226.02101,"1084,58016037620 ",.02)

 +46      ;;58016037620

 +47      ;;9002226.02101,"1084,58016037621 ",.01)

 +48      ;;58016037621

 +49      ;;9002226.02101,"1084,58016037621 ",.02)

 +50      ;;58016037621

 +51      ;;9002226.02101,"1084,58016037624 ",.01)

 +52      ;;58016037624

 +53      ;;9002226.02101,"1084,58016037624 ",.02)

 +54      ;;58016037624

 +55      ;;9002226.02101,"1084,58016037625 ",.01)

 +56      ;;58016037625

 +57      ;;9002226.02101,"1084,58016037625 ",.02)

 +58      ;;58016037625

 +59      ;;9002226.02101,"1084,58016037626 ",.01)

 +60      ;;58016037626

 +61      ;;9002226.02101,"1084,58016037626 ",.02)

 +62      ;;58016037626

 +63      ;;9002226.02101,"1084,58016037627 ",.01)

 +64      ;;58016037627

 +65      ;;9002226.02101,"1084,58016037627 ",.02)

 +66      ;;58016037627

 +67      ;;9002226.02101,"1084,58016037628 ",.01)

 +68      ;;58016037628

 +69      ;;9002226.02101,"1084,58016037628 ",.02)

 +70      ;;58016037628

 +71      ;;9002226.02101,"1084,58016037630 ",.01)

 +72      ;;58016037630

 +73      ;;9002226.02101,"1084,58016037630 ",.02)

 +74      ;;58016037630

 +75      ;;9002226.02101,"1084,58016037632 ",.01)

 +76      ;;58016037632

 +77      ;;9002226.02101,"1084,58016037632 ",.02)

 +78      ;;58016037632

 +79      ;;9002226.02101,"1084,58016037635 ",.01)

 +80      ;;58016037635

 +81      ;;9002226.02101,"1084,58016037635 ",.02)

 +82      ;;58016037635

 +83      ;;9002226.02101,"1084,58016037636 ",.01)

 +84      ;;58016037636

 +85      ;;9002226.02101,"1084,58016037636 ",.02)

 +86      ;;58016037636

 +87      ;;9002226.02101,"1084,58016037640 ",.01)

 +88      ;;58016037640

 +89      ;;9002226.02101,"1084,58016037640 ",.02)

 +90      ;;58016037640

 +91      ;;9002226.02101,"1084,58016037642 ",.01)

 +92      ;;58016037642

 +93      ;;9002226.02101,"1084,58016037642 ",.02)

 +94      ;;58016037642

 +95      ;;9002226.02101,"1084,58016037644 ",.01)

 +96      ;;58016037644

 +97      ;;9002226.02101,"1084,58016037644 ",.02)

 +98      ;;58016037644

 +99      ;;9002226.02101,"1084,58016037645 ",.01)

 +100     ;;58016037645

 +101     ;;9002226.02101,"1084,58016037645 ",.02)

 +102     ;;58016037645

 +103     ;;9002226.02101,"1084,58016037648 ",.01)

 +104     ;;58016037648

 +105     ;;9002226.02101,"1084,58016037648 ",.02)

 +106     ;;58016037648

 +107     ;;9002226.02101,"1084,58016037650 ",.01)

 +108     ;;58016037650

 +109     ;;9002226.02101,"1084,58016037650 ",.02)

 +110     ;;58016037650

 +111     ;;9002226.02101,"1084,58016037656 ",.01)

 +112     ;;58016037656

 +113     ;;9002226.02101,"1084,58016037656 ",.02)

 +114     ;;58016037656

 +115     ;;9002226.02101,"1084,58016037660 ",.01)

 +116     ;;58016037660

 +117     ;;9002226.02101,"1084,58016037660 ",.02)

 +118     ;;58016037660

 +119     ;;9002226.02101,"1084,58016037667 ",.01)

 +120     ;;58016037667

 +121     ;;9002226.02101,"1084,58016037667 ",.02)

 +122     ;;58016037667

 +123     ;;9002226.02101,"1084,58016037669 ",.01)

 +124     ;;58016037669

 +125     ;;9002226.02101,"1084,58016037669 ",.02)

 +126     ;;58016037669

 +127     ;;9002226.02101,"1084,58016037670 ",.01)

 +128     ;;58016037670

 +129     ;;9002226.02101,"1084,58016037670 ",.02)

 +130     ;;58016037670

 +131     ;;9002226.02101,"1084,58016037671 ",.01)

 +132     ;;58016037671

 +133     ;;9002226.02101,"1084,58016037671 ",.02)

 +134     ;;58016037671

 +135     ;;9002226.02101,"1084,58016037672 ",.01)

 +136     ;;58016037672

 +137     ;;9002226.02101,"1084,58016037672 ",.02)

 +138     ;;58016037672

 +139     ;;9002226.02101,"1084,58016037673 ",.01)

 +140     ;;58016037673

 +141     ;;9002226.02101,"1084,58016037673 ",.02)

 +142     ;;58016037673

 +143     ;;9002226.02101,"1084,58016037675 ",.01)

 +144     ;;58016037675

 +145     ;;9002226.02101,"1084,58016037675 ",.02)

 +146     ;;58016037675

 +147     ;;9002226.02101,"1084,58016037676 ",.01)

 +148     ;;58016037676

 +149     ;;9002226.02101,"1084,58016037676 ",.02)

 +150     ;;58016037676

 +151     ;;9002226.02101,"1084,58016037677 ",.01)

 +152     ;;58016037677

 +153     ;;9002226.02101,"1084,58016037677 ",.02)

 +154     ;;58016037677

 +155     ;;9002226.02101,"1084,58016037679 ",.01)

 +156     ;;58016037679

 +157     ;;9002226.02101,"1084,58016037679 ",.02)

 +158     ;;58016037679

 +159     ;;9002226.02101,"1084,58016037680 ",.01)

 +160     ;;58016037680

 +161     ;;9002226.02101,"1084,58016037680 ",.02)

 +162     ;;58016037680

 +163     ;;9002226.02101,"1084,58016037681 ",.01)

 +164     ;;58016037681

 +165     ;;9002226.02101,"1084,58016037681 ",.02)

 +166     ;;58016037681

 +167     ;;9002226.02101,"1084,58016037682 ",.01)

 +168     ;;58016037682

 +169     ;;9002226.02101,"1084,58016037682 ",.02)

 +170     ;;58016037682

 +171     ;;9002226.02101,"1084,58016037683 ",.01)

 +172     ;;58016037683

 +173     ;;9002226.02101,"1084,58016037683 ",.02)

 +174     ;;58016037683

 +175     ;;9002226.02101,"1084,58016037684 ",.01)

 +176     ;;58016037684

 +177     ;;9002226.02101,"1084,58016037684 ",.02)

 +178     ;;58016037684

 +179     ;;9002226.02101,"1084,58016037687 ",.01)

 +180     ;;58016037687

 +181     ;;9002226.02101,"1084,58016037687 ",.02)

 +182     ;;58016037687

 +183     ;;9002226.02101,"1084,58016037689 ",.01)

 +184     ;;58016037689

 +185     ;;9002226.02101,"1084,58016037689 ",.02)

 +186     ;;58016037689

 +187     ;;9002226.02101,"1084,58016037690 ",.01)

 +188     ;;58016037690

 +189     ;;9002226.02101,"1084,58016037690 ",.02)

 +190     ;;58016037690

 +191     ;;9002226.02101,"1084,58016037691 ",.01)

 +192     ;;58016037691

 +193     ;;9002226.02101,"1084,58016037691 ",.02)

 +194     ;;58016037691

 +195     ;;9002226.02101,"1084,58016037692 ",.01)

 +196     ;;58016037692

 +197     ;;9002226.02101,"1084,58016037692 ",.02)

 +198     ;;58016037692

 +199     ;;9002226.02101,"1084,58016037693 ",.01)

 +200     ;;58016037693

 +201     ;;9002226.02101,"1084,58016037693 ",.02)

 +202     ;;58016037693

 +203     ;;9002226.02101,"1084,58016037696 ",.01)

 +204     ;;58016037696

 +205     ;;9002226.02101,"1084,58016037696 ",.02)

 +206     ;;58016037696

 +207     ;;9002226.02101,"1084,58016037697 ",.01)

 +208     ;;58016037697

 +209     ;;9002226.02101,"1084,58016037697 ",.02)

 +210     ;;58016037697

 +211     ;;9002226.02101,"1084,58016037698 ",.01)

 +212     ;;58016037698

 +213     ;;9002226.02101,"1084,58016037698 ",.02)

 +214     ;;58016037698

 +215     ;;9002226.02101,"1084,58016037699 ",.01)

 +216     ;;58016037699

 +217     ;;9002226.02101,"1084,58016037699 ",.02)

 +218     ;;58016037699

 +219     ;;9002226.02101,"1084,58016037800 ",.01)

 +220     ;;58016037800

 +221     ;;9002226.02101,"1084,58016037800 ",.02)

 +222     ;;58016037800

 +223     ;;9002226.02101,"1084,58016037801 ",.01)

 +224     ;;58016037801

 +225     ;;9002226.02101,"1084,58016037801 ",.02)

 +226     ;;58016037801

 +227     ;;9002226.02101,"1084,58016037802 ",.01)

 +228     ;;58016037802

 +229     ;;9002226.02101,"1084,58016037802 ",.02)

 +230     ;;58016037802

 +231     ;;9002226.02101,"1084,58016037803 ",.01)

 +232     ;;58016037803

 +233     ;;9002226.02101,"1084,58016037803 ",.02)

 +234     ;;58016037803

 +235     ;;9002226.02101,"1084,58016037804 ",.01)

 +236     ;;58016037804

 +237     ;;9002226.02101,"1084,58016037804 ",.02)

 +238     ;;58016037804

 +239     ;;9002226.02101,"1084,58016037805 ",.01)

 +240     ;;58016037805

 +241     ;;9002226.02101,"1084,58016037805 ",.02)

 +242     ;;58016037805

 +243     ;;9002226.02101,"1084,58016037806 ",.01)

 +244     ;;58016037806

 +245     ;;9002226.02101,"1084,58016037806 ",.02)

 +246     ;;58016037806

 +247     ;;9002226.02101,"1084,58016037807 ",.01)

 +248     ;;58016037807

 +249     ;;9002226.02101,"1084,58016037807 ",.02)

 +250     ;;58016037807

 +251     ;;9002226.02101,"1084,58016037808 ",.01)

 +252     ;;58016037808

 +253     ;;9002226.02101,"1084,58016037808 ",.02)

 +254     ;;58016037808

 +255     ;;9002226.02101,"1084,58016037809 ",.01)

 +256     ;;58016037809

 +257     ;;9002226.02101,"1084,58016037809 ",.02)

 +258     ;;58016037809

 +259     ;;9002226.02101,"1084,58016037810 ",.01)

 +260     ;;58016037810

 +261     ;;9002226.02101,"1084,58016037810 ",.02)

 +262     ;;58016037810

 +263     ;;9002226.02101,"1084,58016037812 ",.01)

 +264     ;;58016037812

 +265     ;;9002226.02101,"1084,58016037812 ",.02)

 +266     ;;58016037812

 +267     ;;9002226.02101,"1084,58016037814 ",.01)

 +268     ;;58016037814

 +269     ;;9002226.02101,"1084,58016037814 ",.02)

 +270     ;;58016037814

 +271     ;;9002226.02101,"1084,58016037815 ",.01)

 +272     ;;58016037815

 +273     ;;9002226.02101,"1084,58016037815 ",.02)

 +274     ;;58016037815

 +275     ;;9002226.02101,"1084,58016037816 ",.01)

 +276     ;;58016037816

 +277     ;;9002226.02101,"1084,58016037816 ",.02)

 +278     ;;58016037816

 +279     ;;9002226.02101,"1084,58016037818 ",.01)

 +280     ;;58016037818

 +281     ;;9002226.02101,"1084,58016037818 ",.02)

 +282     ;;58016037818

 +283     ;;9002226.02101,"1084,58016037820 ",.01)

 +284     ;;58016037820

 +285     ;;9002226.02101,"1084,58016037820 ",.02)

 +286     ;;58016037820

 +287     ;;9002226.02101,"1084,58016037821 ",.01)

 +288     ;;58016037821

 +289     ;;9002226.02101,"1084,58016037821 ",.02)

 +290     ;;58016037821

 +291     ;;9002226.02101,"1084,58016037824 ",.01)

 +292     ;;58016037824

 +293     ;;9002226.02101,"1084,58016037824 ",.02)

 +294     ;;58016037824

 +295     ;;9002226.02101,"1084,58016037825 ",.01)

 +296     ;;58016037825

 +297     ;;9002226.02101,"1084,58016037825 ",.02)

 +298     ;;58016037825

 +299     ;;9002226.02101,"1084,58016037826 ",.01)

 +300     ;;58016037826

 +301     ;;9002226.02101,"1084,58016037826 ",.02)

 +302     ;;58016037826

 +303     ;;9002226.02101,"1084,58016037827 ",.01)

 +304     ;;58016037827

 +305     ;;9002226.02101,"1084,58016037827 ",.02)

 +306     ;;58016037827

 +307     ;;9002226.02101,"1084,58016037828 ",.01)

 +308     ;;58016037828

 +309     ;;9002226.02101,"1084,58016037828 ",.02)

 +310     ;;58016037828

 +311     ;;9002226.02101,"1084,58016037830 ",.01)

 +312     ;;58016037830

 +313     ;;9002226.02101,"1084,58016037830 ",.02)

 +314     ;;58016037830

 +315     ;;9002226.02101,"1084,58016037832 ",.01)

 +316     ;;58016037832

 +317     ;;9002226.02101,"1084,58016037832 ",.02)

 +318     ;;58016037832

 +319     ;;9002226.02101,"1084,58016037835 ",.01)

 +320     ;;58016037835

 +321     ;;9002226.02101,"1084,58016037835 ",.02)

 +322     ;;58016037835

 +323     ;;9002226.02101,"1084,58016037836 ",.01)

 +324     ;;58016037836

 +325     ;;9002226.02101,"1084,58016037836 ",.02)

 +326     ;;58016037836

 +327     ;;9002226.02101,"1084,58016037840 ",.01)

 +328     ;;58016037840

 +329     ;;9002226.02101,"1084,58016037840 ",.02)

 +330     ;;58016037840

 +331     ;;9002226.02101,"1084,58016037842 ",.01)

 +332     ;;58016037842

 +333     ;;9002226.02101,"1084,58016037842 ",.02)

 +334     ;;58016037842

 +335     ;;9002226.02101,"1084,58016037844 ",.01)

 +336     ;;58016037844

 +337     ;;9002226.02101,"1084,58016037844 ",.02)

 +338     ;;58016037844

 +339     ;;9002226.02101,"1084,58016037845 ",.01)

 +340     ;;58016037845

 +341     ;;9002226.02101,"1084,58016037845 ",.02)

 +342     ;;58016037845

 +343     ;;9002226.02101,"1084,58016037848 ",.01)

 +344     ;;58016037848

 +345     ;;9002226.02101,"1084,58016037848 ",.02)

 +346     ;;58016037848

 +347     ;;9002226.02101,"1084,58016037850 ",.01)

 +348     ;;58016037850

 +349     ;;9002226.02101,"1084,58016037850 ",.02)

 +350     ;;58016037850

 +351     ;;9002226.02101,"1084,58016037856 ",.01)

 +352     ;;58016037856

 +353     ;;9002226.02101,"1084,58016037856 ",.02)

 +354     ;;58016037856

 +355     ;;9002226.02101,"1084,58016037860 ",.01)

 +356     ;;58016037860

 +357     ;;9002226.02101,"1084,58016037860 ",.02)

 +358     ;;58016037860

 +359     ;;9002226.02101,"1084,58016037867 ",.01)

 +360     ;;58016037867

 +361     ;;9002226.02101,"1084,58016037867 ",.02)

 +362     ;;58016037867

 +363     ;;9002226.02101,"1084,58016037869 ",.01)

 +364     ;;58016037869

 +365     ;;9002226.02101,"1084,58016037869 ",.02)

 +366     ;;58016037869

 +367     ;;9002226.02101,"1084,58016037870 ",.01)

 +368     ;;58016037870

 +369     ;;9002226.02101,"1084,58016037870 ",.02)

 +370     ;;58016037870

 +371     ;;9002226.02101,"1084,58016037871 ",.01)

 +372     ;;58016037871

 +373     ;;9002226.02101,"1084,58016037871 ",.02)

 +374     ;;58016037871

 +375     ;;9002226.02101,"1084,58016037872 ",.01)

 +376     ;;58016037872

 +377     ;;9002226.02101,"1084,58016037872 ",.02)

 +378     ;;58016037872

 +379     ;;9002226.02101,"1084,58016037873 ",.01)

 +380     ;;58016037873

 +381     ;;9002226.02101,"1084,58016037873 ",.02)

 +382     ;;58016037873

 +383     ;;9002226.02101,"1084,58016037875 ",.01)

 +384     ;;58016037875

 +385     ;;9002226.02101,"1084,58016037875 ",.02)

 +386     ;;58016037875

 +387     ;;9002226.02101,"1084,58016037876 ",.01)

 +388     ;;58016037876

 +389     ;;9002226.02101,"1084,58016037876 ",.02)

 +390     ;;58016037876

 +391     ;;9002226.02101,"1084,58016037877 ",.01)

 +392     ;;58016037877

 +393     ;;9002226.02101,"1084,58016037877 ",.02)

 +394     ;;58016037877

 +395     ;;9002226.02101,"1084,58016037879 ",.01)

 +396     ;;58016037879

 +397     ;;9002226.02101,"1084,58016037879 ",.02)

 +398     ;;58016037879

 +399     ;;9002226.02101,"1084,58016037880 ",.01)

 +400     ;;58016037880

 +401     ;;9002226.02101,"1084,58016037880 ",.02)

 +402     ;;58016037880

BGPM5BFL.m