Routine: BUD2ZA18

BUD2ZA18 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 16, 2012;

 ;;10.0;IHS/RPMS UNIFORM DATA SYSTEM;;FEB 04, 2016;Build 50

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,"1149,55887036930 ",.01)

 ;;55887036930

 ;;9002226.02101,"1149,55887036930 ",.02)

 ;;55887036930

 ;;9002226.02101,"1149,55887036940 ",.01)

 ;;55887036940

 ;;9002226.02101,"1149,55887036940 ",.02)

 ;;55887036940

 ;;9002226.02101,"1149,55887036960 ",.01)

 ;;55887036960

 ;;9002226.02101,"1149,55887036960 ",.02)

 ;;55887036960

 ;;9002226.02101,"1149,55887036990 ",.01)

 ;;55887036990

 ;;9002226.02101,"1149,55887036990 ",.02)

 ;;55887036990

 ;;9002226.02101,"1149,55887085810 ",.01)

 ;;55887085810

 ;;9002226.02101,"1149,55887085810 ",.02)

 ;;55887085810

 ;;9002226.02101,"1149,55887085830 ",.01)

 ;;55887085830

 ;;9002226.02101,"1149,55887085830 ",.02)

 ;;55887085830

 ;;9002226.02101,"1149,55887085860 ",.01)

 ;;55887085860

 ;;9002226.02101,"1149,55887085860 ",.02)

 ;;55887085860

 ;;9002226.02101,"1149,55887085890 ",.01)

 ;;55887085890

 ;;9002226.02101,"1149,55887085890 ",.02)

 ;;55887085890

 ;;9002226.02101,"1149,55887086130 ",.01)

 ;;55887086130

 ;;9002226.02101,"1149,55887086130 ",.02)

 ;;55887086130

 ;;9002226.02101,"1149,55887086160 ",.01)

 ;;55887086160

 ;;9002226.02101,"1149,55887086160 ",.02)

 ;;55887086160

 ;;9002226.02101,"1149,55887086190 ",.01)

 ;;55887086190

 ;;9002226.02101,"1149,55887086190 ",.02)

 ;;55887086190

 ;;9002226.02101,"1149,55887097430 ",.01)

 ;;55887097430

 ;;9002226.02101,"1149,55887097430 ",.02)

 ;;55887097430

 ;;9002226.02101,"1149,55887097490 ",.01)

 ;;55887097490

 ;;9002226.02101,"1149,55887097490 ",.02)

 ;;55887097490

 ;;9002226.02101,"1149,55953000935 ",.01)

 ;;55953000935

 ;;9002226.02101,"1149,55953000935 ",.02)

 ;;55953000935

 ;;9002226.02101,"1149,55953000965 ",.01)

 ;;55953000965

 ;;9002226.02101,"1149,55953000965 ",.02)

 ;;55953000965

 ;;9002226.02101,"1149,55953001135 ",.01)

 ;;55953001135

 ;;9002226.02101,"1149,55953001135 ",.02)

 ;;55953001135

 ;;9002226.02101,"1149,55953001156 ",.01)

 ;;55953001156

 ;;9002226.02101,"1149,55953001156 ",.02)

 ;;55953001156

 ;;9002226.02101,"1149,55953009635 ",.01)

 ;;55953009635

 ;;9002226.02101,"1149,55953009635 ",.02)

 ;;55953009635

 ;;9002226.02101,"1149,55953009665 ",.01)

 ;;55953009665

 ;;9002226.02101,"1149,55953009665 ",.02)

 ;;55953009665

 ;;9002226.02101,"1149,55953011135 ",.01)

 ;;55953011135

 ;;9002226.02101,"1149,55953011135 ",.02)

 ;;55953011135

 ;;9002226.02101,"1149,55953011156 ",.01)

 ;;55953011156

 ;;9002226.02101,"1149,55953011156 ",.02)

 ;;55953011156

 ;;9002226.02101,"1149,55953038240 ",.01)

 ;;55953038240

 ;;9002226.02101,"1149,55953038240 ",.02)

 ;;55953038240

 ;;9002226.02101,"1149,57297046701 ",.01)

 ;;57297046701

 ;;9002226.02101,"1149,57297046701 ",.02)

 ;;57297046701

 ;;9002226.02101,"1149,57297046703 ",.01)

 ;;57297046703

 ;;9002226.02101,"1149,57297046703 ",.02)

 ;;57297046703

 ;;9002226.02101,"1149,57297046707 ",.01)

 ;;57297046707

 ;;9002226.02101,"1149,57297046707 ",.02)

 ;;57297046707

 ;;9002226.02101,"1149,57297046801 ",.01)

 ;;57297046801

 ;;9002226.02101,"1149,57297046801 ",.02)

 ;;57297046801

 ;;9002226.02101,"1149,57297046803 ",.01)

 ;;57297046803

 ;;9002226.02101,"1149,57297046803 ",.02)

 ;;57297046803

 ;;9002226.02101,"1149,57297046807 ",.01)

 ;;57297046807

 ;;9002226.02101,"1149,57297046807 ",.02)

 ;;57297046807

 ;;9002226.02101,"1149,57297046809 ",.01)

 ;;57297046809

 ;;9002226.02101,"1149,57297046809 ",.02)

 ;;57297046809

 ;;9002226.02101,"1149,57297046901 ",.01)

 ;;57297046901

 ;;9002226.02101,"1149,57297046901 ",.02)

 ;;57297046901

 ;;9002226.02101,"1149,57297046903 ",.01)

 ;;57297046903

 ;;9002226.02101,"1149,57297046903 ",.02)

 ;;57297046903

 ;;9002226.02101,"1149,57297046907 ",.01)

 ;;57297046907

 ;;9002226.02101,"1149,57297046907 ",.02)

 ;;57297046907

 ;;9002226.02101,"1149,57297046909 ",.01)

 ;;57297046909

 ;;9002226.02101,"1149,57297046909 ",.02)

 ;;57297046909

 ;;9002226.02101,"1149,57297047801 ",.01)

 ;;57297047801

 ;;9002226.02101,"1149,57297047801 ",.02)

 ;;57297047801

 ;;9002226.02101,"1149,57297047802 ",.01)

 ;;57297047802

 ;;9002226.02101,"1149,57297047802 ",.02)

 ;;57297047802

 ;;9002226.02101,"1149,57297047803 ",.01)

 ;;57297047803

 ;;9002226.02101,"1149,57297047803 ",.02)

 ;;57297047803

 ;;9002226.02101,"1149,57297047901 ",.01)

 ;;57297047901

 ;;9002226.02101,"1149,57297047901 ",.02)

 ;;57297047901

 ;;9002226.02101,"1149,57297047902 ",.01)

 ;;57297047902

 ;;9002226.02101,"1149,57297047902 ",.02)

 ;;57297047902

 ;;9002226.02101,"1149,57297047903 ",.01)

 ;;57297047903

 ;;9002226.02101,"1149,57297047903 ",.02)

 ;;57297047903

 ;;9002226.02101,"1149,57297048001 ",.01)

 ;;57297048001

 ;;9002226.02101,"1149,57297048001 ",.02)

 ;;57297048001

 ;;9002226.02101,"1149,57297048002 ",.01)

 ;;57297048002

 ;;9002226.02101,"1149,57297048002 ",.02)

 ;;57297048002

 ;;9002226.02101,"1149,57297048003 ",.01)

 ;;57297048003

 ;;9002226.02101,"1149,57297048003 ",.02)

 ;;57297048003

 ;;9002226.02101,"1149,57297048101 ",.01)

 ;;57297048101

 ;;9002226.02101,"1149,57297048101 ",.02)

 ;;57297048101

 ;;9002226.02101,"1149,57297048102 ",.01)

 ;;57297048102

 ;;9002226.02101,"1149,57297048102 ",.02)

 ;;57297048102

 ;;9002226.02101,"1149,57297048103 ",.01)

 ;;57297048103

 ;;9002226.02101,"1149,57297048103 ",.02)

 ;;57297048103

 ;;9002226.02101,"1149,57297048203 ",.01)

 ;;57297048203

 ;;9002226.02101,"1149,57297048203 ",.02)

 ;;57297048203

 ;;9002226.02101,"1149,57297048206 ",.01)

 ;;57297048206

 ;;9002226.02101,"1149,57297048206 ",.02)

 ;;57297048206

 ;;9002226.02101,"1149,57297048209 ",.01)

 ;;57297048209

 ;;9002226.02101,"1149,57297048209 ",.02)

 ;;57297048209

 ;;9002226.02101,"1149,57297048213 ",.01)

 ;;57297048213

 ;;9002226.02101,"1149,57297048213 ",.02)

 ;;57297048213

 ;;9002226.02101,"1149,57480080901 ",.01)

 ;;57480080901

 ;;9002226.02101,"1149,57480080901 ",.02)

 ;;57480080901

 ;;9002226.02101,"1149,57480080906 ",.01)

 ;;57480080906

 ;;9002226.02101,"1149,57480080906 ",.02)

 ;;57480080906

 ;;9002226.02101,"1149,57587090100 ",.01)

 ;;57587090100

 ;;9002226.02101,"1149,57587090100 ",.02)

 ;;57587090100

 ;;9002226.02101,"1149,57587090300 ",.01)

 ;;57587090300

 ;;9002226.02101,"1149,57587090300 ",.02)

 ;;57587090300

 ;;9002226.02101,"1149,57664011508 ",.01)

 ;;57664011508

 ;;9002226.02101,"1149,57664011508 ",.02)

 ;;57664011508

 ;;9002226.02101,"1149,57664011513 ",.01)

 ;;57664011513

 ;;9002226.02101,"1149,57664011513 ",.02)

 ;;57664011513

 ;;9002226.02101,"1149,57664011518 ",.01)

 ;;57664011518

 ;;9002226.02101,"1149,57664011518 ",.02)

 ;;57664011518

 ;;9002226.02101,"1149,57664011583 ",.01)

 ;;57664011583

 ;;9002226.02101,"1149,57664011583 ",.02)

 ;;57664011583

 ;;9002226.02101,"1149,57664011586 ",.01)

 ;;57664011586

 ;;9002226.02101,"1149,57664011586 ",.02)

 ;;57664011586

 ;;9002226.02101,"1149,57664011588 ",.01)

 ;;57664011588

 ;;9002226.02101,"1149,57664011588 ",.02)

 ;;57664011588

 ;;9002226.02101,"1149,57866393601 ",.01)

 ;;57866393601

 ;;9002226.02101,"1149,57866393601 ",.02)

 ;;57866393601

 ;;9002226.02101,"1149,57866394901 ",.01)

 ;;57866394901

 ;;9002226.02101,"1149,57866394901 ",.02)

 ;;57866394901

 ;;9002226.02101,"1149,57866640001 ",.01)

 ;;57866640001

 ;;9002226.02101,"1149,57866640001 ",.02)

 ;;57866640001

 ;;9002226.02101,"1149,57866650001 ",.01)

 ;;57866650001

 ;;9002226.02101,"1149,57866650001 ",.02)

 ;;57866650001

 ;;9002226.02101,"1149,57866654001 ",.01)

 ;;57866654001

 ;;9002226.02101,"1149,57866654001 ",.02)

 ;;57866654001

 ;;9002226.02101,"1149,57866654002 ",.01)

 ;;57866654002

 ;;9002226.02101,"1149,57866654002 ",.02)

 ;;57866654002

 ;;9002226.02101,"1149,57866654004 ",.01)

 ;;57866654004

 ;;9002226.02101,"1149,57866654004 ",.02)

 ;;57866654004

 ;;9002226.02101,"1149,57866660101 ",.01)

 ;;57866660101

 ;;9002226.02101,"1149,57866660101 ",.02)

 ;;57866660101

 ;;9002226.02101,"1149,58016000600 ",.01)

 ;;58016000600

 ;;9002226.02101,"1149,58016000600 ",.02)

 ;;58016000600

 ;;9002226.02101,"1149,58016000601 ",.01)

 ;;58016000601

 ;;9002226.02101,"1149,58016000601 ",.02)

 ;;58016000601

 ;;9002226.02101,"1149,58016000602 ",.01)

 ;;58016000602

 ;;9002226.02101,"1149,58016000602 ",.02)

 ;;58016000602

 ;;9002226.02101,"1149,58016000603 ",.01)

 ;;58016000603

 ;;9002226.02101,"1149,58016000603 ",.02)

 ;;58016000603

 ;;9002226.02101,"1149,58016000604 ",.01)

 ;;58016000604

 ;;9002226.02101,"1149,58016000604 ",.02)

 ;;58016000604

 ;;9002226.02101,"1149,58016000605 ",.01)

 ;;58016000605

 ;;9002226.02101,"1149,58016000605 ",.02)

 ;;58016000605

 ;;9002226.02101,"1149,58016000606 ",.01)

 ;;58016000606

 ;;9002226.02101,"1149,58016000606 ",.02)

 ;;58016000606

 ;;9002226.02101,"1149,58016000607 ",.01)

 ;;58016000607

 ;;9002226.02101,"1149,58016000607 ",.02)

 ;;58016000607

 ;;9002226.02101,"1149,58016000608 ",.01)

 ;;58016000608

 ;;9002226.02101,"1149,58016000608 ",.02)

 ;;58016000608

 ;;9002226.02101,"1149,58016000609 ",.01)

 ;;58016000609

 ;;9002226.02101,"1149,58016000609 ",.02)

 ;;58016000609

 ;;9002226.02101,"1149,58016000610 ",.01)

 ;;58016000610

 ;;9002226.02101,"1149,58016000610 ",.02)

 ;;58016000610

 ;;9002226.02101,"1149,58016000630 ",.01)

 ;;58016000630

 ;;9002226.02101,"1149,58016000630 ",.02)

 ;;58016000630

 ;;9002226.02101,"1149,58016000660 ",.01)

 ;;58016000660

 ;;9002226.02101,"1149,58016000660 ",.02)

 ;;58016000660

 ;;9002226.02101,"1149,58016000690 ",.01)

 ;;58016000690

 ;;9002226.02101,"1149,58016000690 ",.02)

 ;;58016000690

 ;;9002226.02101,"1149,58016000700 ",.01)

 ;;58016000700

 ;;9002226.02101,"1149,58016000700 ",.02)

 ;;58016000700

 ;;9002226.02101,"1149,58016000701 ",.01)

 ;;58016000701

 ;;9002226.02101,"1149,58016000701 ",.02)

 ;;58016000701

 ;;9002226.02101,"1149,58016000702 ",.01)

 ;;58016000702

 ;;9002226.02101,"1149,58016000702 ",.02)

 ;;58016000702

 ;;9002226.02101,"1149,58016000703 ",.01)

 ;;58016000703

 ;;9002226.02101,"1149,58016000703 ",.02)

 ;;58016000703

 ;;9002226.02101,"1149,58016000704 ",.01)

 ;;58016000704

 ;;9002226.02101,"1149,58016000704 ",.02)

 ;;58016000704

 ;;9002226.02101,"1149,58016000705 ",.01)

 ;;58016000705

 ;;9002226.02101,"1149,58016000705 ",.02)

 ;;58016000705

 ;;9002226.02101,"1149,58016000706 ",.01)

 ;;58016000706

 ;;9002226.02101,"1149,58016000706 ",.02)

 ;;58016000706

 ;;9002226.02101,"1149,58016000707 ",.01)

 ;;58016000707

 ;;9002226.02101,"1149,58016000707 ",.02)

 ;;58016000707

 ;;9002226.02101,"1149,58016000708 ",.01)

 ;;58016000708

 ;;9002226.02101,"1149,58016000708 ",.02)

 ;;58016000708

 ;;9002226.02101,"1149,58016000709 ",.01)

 ;;58016000709

 ;;9002226.02101,"1149,58016000709 ",.02)

 ;;58016000709

 ;;9002226.02101,"1149,58016000710 ",.01)

 ;;58016000710

 ;;9002226.02101,"1149,58016000710 ",.02)

 ;;58016000710

 ;;9002226.02101,"1149,58016000730 ",.01)

 ;;58016000730

 ;;9002226.02101,"1149,58016000730 ",.02)

 ;;58016000730

 ;;9002226.02101,"1149,58016000760 ",.01)

 ;;58016000760

 ;;9002226.02101,"1149,58016000760 ",.02)

 ;;58016000760

 ;;9002226.02101,"1149,58016000790 ",.01)

 ;;58016000790

 ;;9002226.02101,"1149,58016000790 ",.02)

 ;;58016000790

 ;;9002226.02101,"1149,58016000800 ",.01)

 ;;58016000800

 ;;9002226.02101,"1149,58016000800 ",.02)

 ;;58016000800

 ;;9002226.02101,"1149,58016000830 ",.01)

 ;;58016000830

 ;;9002226.02101,"1149,58016000830 ",.02)

 ;;58016000830

 ;;9002226.02101,"1149,58016000860 ",.01)

 ;;58016000860

 ;;9002226.02101,"1149,58016000860 ",.02)

 ;;58016000860

 ;;9002226.02101,"1149,58016000890 ",.01)

 ;;58016000890

 ;;9002226.02101,"1149,58016000890 ",.02)

 ;;58016000890

 ;;9002226.02101,"1149,58016054000 ",.01)

 ;;58016054000

 ;;9002226.02101,"1149,58016054000 ",.02)

 ;;58016054000

 ;;9002226.02101,"1149,58016054001 ",.01)

 ;;58016054001

 ;;9002226.02101,"1149,58016054001 ",.02)

 ;;58016054001

 ;;9002226.02101,"1149,58016054002 ",.01)

 ;;58016054002

 ;;9002226.02101,"1149,58016054002 ",.02)

 ;;58016054002

 ;;9002226.02101,"1149,58016054003 ",.01)

 ;;58016054003

 ;;9002226.02101,"1149,58016054003 ",.02)

 ;;58016054003

 ;;9002226.02101,"1149,58016054004 ",.01)

 ;;58016054004

 ;;9002226.02101,"1149,58016054004 ",.02)

 ;;58016054004

 ;;9002226.02101,"1149,58016054005 ",.01)

 ;;58016054005

 ;;9002226.02101,"1149,58016054005 ",.02)

 ;;58016054005

 ;;9002226.02101,"1149,58016054006 ",.01)

 ;;58016054006

 ;;9002226.02101,"1149,58016054006 ",.02)

 ;;58016054006

 ;;9002226.02101,"1149,58016054007 ",.01)

 ;;58016054007

 ;;9002226.02101,"1149,58016054007 ",.02)

 ;;58016054007

 ;;9002226.02101,"1149,58016054008 ",.01)

 ;;58016054008

 ;;9002226.02101,"1149,58016054008 ",.02)

 ;;58016054008

 ;;9002226.02101,"1149,58016054009 ",.01)

 ;;58016054009

 ;;9002226.02101,"1149,58016054009 ",.02)

 ;;58016054009

 ;;9002226.02101,"1149,58016054010 ",.01)

 ;;58016054010

 ;;9002226.02101,"1149,58016054010 ",.02)

 ;;58016054010

 ;;9002226.02101,"1149,58016054012 ",.01)

 ;;58016054012

 ;;9002226.02101,"1149,58016054012 ",.02)

 ;;58016054012

 ;;9002226.02101,"1149,58016054014 ",.01)

 ;;58016054014

 ;;9002226.02101,"1149,58016054014 ",.02)

 ;;58016054014

 ;;9002226.02101,"1149,58016054016 ",.01)

 ;;58016054016

 ;;9002226.02101,"1149,58016054016 ",.02)

 ;;58016054016

 ;;9002226.02101,"1149,58016054018 ",.01)

 ;;58016054018

 ;;9002226.02101,"1149,58016054018 ",.02)

 ;;58016054018

 ;;9002226.02101,"1149,58016054020 ",.01)

 ;;58016054020

 ;;9002226.02101,"1149,58016054020 ",.02)

 ;;58016054020

 ;;9002226.02101,"1149,58016054021 ",.01)

 ;;58016054021

 ;;9002226.02101,"1149,58016054021 ",.02)

 ;;58016054021

 ;;9002226.02101,"1149,58016054024 ",.01)

 ;;58016054024

BUD2ZA18  ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 16, 2012;

 +1       ;;10.0;IHS/RPMS UNIFORM DATA SYSTEM;;FEB 04, 2016;Build 50

 +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,"1149,55887036930 ",.01)

 +2       ;;55887036930

 +3       ;;9002226.02101,"1149,55887036930 ",.02)

 +4       ;;55887036930

 +5       ;;9002226.02101,"1149,55887036940 ",.01)

 +6       ;;55887036940

 +7       ;;9002226.02101,"1149,55887036940 ",.02)

 +8       ;;55887036940

 +9       ;;9002226.02101,"1149,55887036960 ",.01)

 +10      ;;55887036960

 +11      ;;9002226.02101,"1149,55887036960 ",.02)

 +12      ;;55887036960

 +13      ;;9002226.02101,"1149,55887036990 ",.01)

 +14      ;;55887036990

 +15      ;;9002226.02101,"1149,55887036990 ",.02)

 +16      ;;55887036990

 +17      ;;9002226.02101,"1149,55887085810 ",.01)

 +18      ;;55887085810

 +19      ;;9002226.02101,"1149,55887085810 ",.02)

 +20      ;;55887085810

 +21      ;;9002226.02101,"1149,55887085830 ",.01)

 +22      ;;55887085830

 +23      ;;9002226.02101,"1149,55887085830 ",.02)

 +24      ;;55887085830

 +25      ;;9002226.02101,"1149,55887085860 ",.01)

 +26      ;;55887085860

 +27      ;;9002226.02101,"1149,55887085860 ",.02)

 +28      ;;55887085860

 +29      ;;9002226.02101,"1149,55887085890 ",.01)

 +30      ;;55887085890

 +31      ;;9002226.02101,"1149,55887085890 ",.02)

 +32      ;;55887085890

 +33      ;;9002226.02101,"1149,55887086130 ",.01)

 +34      ;;55887086130

 +35      ;;9002226.02101,"1149,55887086130 ",.02)

 +36      ;;55887086130

 +37      ;;9002226.02101,"1149,55887086160 ",.01)

 +38      ;;55887086160

 +39      ;;9002226.02101,"1149,55887086160 ",.02)

 +40      ;;55887086160

 +41      ;;9002226.02101,"1149,55887086190 ",.01)

 +42      ;;55887086190

 +43      ;;9002226.02101,"1149,55887086190 ",.02)

 +44      ;;55887086190

 +45      ;;9002226.02101,"1149,55887097430 ",.01)

 +46      ;;55887097430

 +47      ;;9002226.02101,"1149,55887097430 ",.02)

 +48      ;;55887097430

 +49      ;;9002226.02101,"1149,55887097490 ",.01)

 +50      ;;55887097490

 +51      ;;9002226.02101,"1149,55887097490 ",.02)

 +52      ;;55887097490

 +53      ;;9002226.02101,"1149,55953000935 ",.01)

 +54      ;;55953000935

 +55      ;;9002226.02101,"1149,55953000935 ",.02)

 +56      ;;55953000935

 +57      ;;9002226.02101,"1149,55953000965 ",.01)

 +58      ;;55953000965

 +59      ;;9002226.02101,"1149,55953000965 ",.02)

 +60      ;;55953000965

 +61      ;;9002226.02101,"1149,55953001135 ",.01)

 +62      ;;55953001135

 +63      ;;9002226.02101,"1149,55953001135 ",.02)

 +64      ;;55953001135

 +65      ;;9002226.02101,"1149,55953001156 ",.01)

 +66      ;;55953001156

 +67      ;;9002226.02101,"1149,55953001156 ",.02)

 +68      ;;55953001156

 +69      ;;9002226.02101,"1149,55953009635 ",.01)

 +70      ;;55953009635

 +71      ;;9002226.02101,"1149,55953009635 ",.02)

 +72      ;;55953009635

 +73      ;;9002226.02101,"1149,55953009665 ",.01)

 +74      ;;55953009665

 +75      ;;9002226.02101,"1149,55953009665 ",.02)

 +76      ;;55953009665

 +77      ;;9002226.02101,"1149,55953011135 ",.01)

 +78      ;;55953011135

 +79      ;;9002226.02101,"1149,55953011135 ",.02)

 +80      ;;55953011135

 +81      ;;9002226.02101,"1149,55953011156 ",.01)

 +82      ;;55953011156

 +83      ;;9002226.02101,"1149,55953011156 ",.02)

 +84      ;;55953011156

 +85      ;;9002226.02101,"1149,55953038240 ",.01)

 +86      ;;55953038240

 +87      ;;9002226.02101,"1149,55953038240 ",.02)

 +88      ;;55953038240

 +89      ;;9002226.02101,"1149,57297046701 ",.01)

 +90      ;;57297046701

 +91      ;;9002226.02101,"1149,57297046701 ",.02)

 +92      ;;57297046701

 +93      ;;9002226.02101,"1149,57297046703 ",.01)

 +94      ;;57297046703

 +95      ;;9002226.02101,"1149,57297046703 ",.02)

 +96      ;;57297046703

 +97      ;;9002226.02101,"1149,57297046707 ",.01)

 +98      ;;57297046707

 +99      ;;9002226.02101,"1149,57297046707 ",.02)

 +100     ;;57297046707

 +101     ;;9002226.02101,"1149,57297046801 ",.01)

 +102     ;;57297046801

 +103     ;;9002226.02101,"1149,57297046801 ",.02)

 +104     ;;57297046801

 +105     ;;9002226.02101,"1149,57297046803 ",.01)

 +106     ;;57297046803

 +107     ;;9002226.02101,"1149,57297046803 ",.02)

 +108     ;;57297046803

 +109     ;;9002226.02101,"1149,57297046807 ",.01)

 +110     ;;57297046807

 +111     ;;9002226.02101,"1149,57297046807 ",.02)

 +112     ;;57297046807

 +113     ;;9002226.02101,"1149,57297046809 ",.01)

 +114     ;;57297046809

 +115     ;;9002226.02101,"1149,57297046809 ",.02)

 +116     ;;57297046809

 +117     ;;9002226.02101,"1149,57297046901 ",.01)

 +118     ;;57297046901

 +119     ;;9002226.02101,"1149,57297046901 ",.02)

 +120     ;;57297046901

 +121     ;;9002226.02101,"1149,57297046903 ",.01)

 +122     ;;57297046903

 +123     ;;9002226.02101,"1149,57297046903 ",.02)

 +124     ;;57297046903

 +125     ;;9002226.02101,"1149,57297046907 ",.01)

 +126     ;;57297046907

 +127     ;;9002226.02101,"1149,57297046907 ",.02)

 +128     ;;57297046907

 +129     ;;9002226.02101,"1149,57297046909 ",.01)

 +130     ;;57297046909

 +131     ;;9002226.02101,"1149,57297046909 ",.02)

 +132     ;;57297046909

 +133     ;;9002226.02101,"1149,57297047801 ",.01)

 +134     ;;57297047801

 +135     ;;9002226.02101,"1149,57297047801 ",.02)

 +136     ;;57297047801

 +137     ;;9002226.02101,"1149,57297047802 ",.01)

 +138     ;;57297047802

 +139     ;;9002226.02101,"1149,57297047802 ",.02)

 +140     ;;57297047802

 +141     ;;9002226.02101,"1149,57297047803 ",.01)

 +142     ;;57297047803

 +143     ;;9002226.02101,"1149,57297047803 ",.02)

 +144     ;;57297047803

 +145     ;;9002226.02101,"1149,57297047901 ",.01)

 +146     ;;57297047901

 +147     ;;9002226.02101,"1149,57297047901 ",.02)

 +148     ;;57297047901

 +149     ;;9002226.02101,"1149,57297047902 ",.01)

 +150     ;;57297047902

 +151     ;;9002226.02101,"1149,57297047902 ",.02)

 +152     ;;57297047902

 +153     ;;9002226.02101,"1149,57297047903 ",.01)

 +154     ;;57297047903

 +155     ;;9002226.02101,"1149,57297047903 ",.02)

 +156     ;;57297047903

 +157     ;;9002226.02101,"1149,57297048001 ",.01)

 +158     ;;57297048001

 +159     ;;9002226.02101,"1149,57297048001 ",.02)

 +160     ;;57297048001

 +161     ;;9002226.02101,"1149,57297048002 ",.01)

 +162     ;;57297048002

 +163     ;;9002226.02101,"1149,57297048002 ",.02)

 +164     ;;57297048002

 +165     ;;9002226.02101,"1149,57297048003 ",.01)

 +166     ;;57297048003

 +167     ;;9002226.02101,"1149,57297048003 ",.02)

 +168     ;;57297048003

 +169     ;;9002226.02101,"1149,57297048101 ",.01)

 +170     ;;57297048101

 +171     ;;9002226.02101,"1149,57297048101 ",.02)

 +172     ;;57297048101

 +173     ;;9002226.02101,"1149,57297048102 ",.01)

 +174     ;;57297048102

 +175     ;;9002226.02101,"1149,57297048102 ",.02)

 +176     ;;57297048102

 +177     ;;9002226.02101,"1149,57297048103 ",.01)

 +178     ;;57297048103

 +179     ;;9002226.02101,"1149,57297048103 ",.02)

 +180     ;;57297048103

 +181     ;;9002226.02101,"1149,57297048203 ",.01)

 +182     ;;57297048203

 +183     ;;9002226.02101,"1149,57297048203 ",.02)

 +184     ;;57297048203

 +185     ;;9002226.02101,"1149,57297048206 ",.01)

 +186     ;;57297048206

 +187     ;;9002226.02101,"1149,57297048206 ",.02)

 +188     ;;57297048206

 +189     ;;9002226.02101,"1149,57297048209 ",.01)

 +190     ;;57297048209

 +191     ;;9002226.02101,"1149,57297048209 ",.02)

 +192     ;;57297048209

 +193     ;;9002226.02101,"1149,57297048213 ",.01)

 +194     ;;57297048213

 +195     ;;9002226.02101,"1149,57297048213 ",.02)

 +196     ;;57297048213

 +197     ;;9002226.02101,"1149,57480080901 ",.01)

 +198     ;;57480080901

 +199     ;;9002226.02101,"1149,57480080901 ",.02)

 +200     ;;57480080901

 +201     ;;9002226.02101,"1149,57480080906 ",.01)

 +202     ;;57480080906

 +203     ;;9002226.02101,"1149,57480080906 ",.02)

 +204     ;;57480080906

 +205     ;;9002226.02101,"1149,57587090100 ",.01)

 +206     ;;57587090100

 +207     ;;9002226.02101,"1149,57587090100 ",.02)

 +208     ;;57587090100

 +209     ;;9002226.02101,"1149,57587090300 ",.01)

 +210     ;;57587090300

 +211     ;;9002226.02101,"1149,57587090300 ",.02)

 +212     ;;57587090300

 +213     ;;9002226.02101,"1149,57664011508 ",.01)

 +214     ;;57664011508

 +215     ;;9002226.02101,"1149,57664011508 ",.02)

 +216     ;;57664011508

 +217     ;;9002226.02101,"1149,57664011513 ",.01)

 +218     ;;57664011513

 +219     ;;9002226.02101,"1149,57664011513 ",.02)

 +220     ;;57664011513

 +221     ;;9002226.02101,"1149,57664011518 ",.01)

 +222     ;;57664011518

 +223     ;;9002226.02101,"1149,57664011518 ",.02)

 +224     ;;57664011518

 +225     ;;9002226.02101,"1149,57664011583 ",.01)

 +226     ;;57664011583

 +227     ;;9002226.02101,"1149,57664011583 ",.02)

 +228     ;;57664011583

 +229     ;;9002226.02101,"1149,57664011586 ",.01)

 +230     ;;57664011586

 +231     ;;9002226.02101,"1149,57664011586 ",.02)

 +232     ;;57664011586

 +233     ;;9002226.02101,"1149,57664011588 ",.01)

 +234     ;;57664011588

 +235     ;;9002226.02101,"1149,57664011588 ",.02)

 +236     ;;57664011588

 +237     ;;9002226.02101,"1149,57866393601 ",.01)

 +238     ;;57866393601

 +239     ;;9002226.02101,"1149,57866393601 ",.02)

 +240     ;;57866393601

 +241     ;;9002226.02101,"1149,57866394901 ",.01)

 +242     ;;57866394901

 +243     ;;9002226.02101,"1149,57866394901 ",.02)

 +244     ;;57866394901

 +245     ;;9002226.02101,"1149,57866640001 ",.01)

 +246     ;;57866640001

 +247     ;;9002226.02101,"1149,57866640001 ",.02)

 +248     ;;57866640001

 +249     ;;9002226.02101,"1149,57866650001 ",.01)

 +250     ;;57866650001

 +251     ;;9002226.02101,"1149,57866650001 ",.02)

 +252     ;;57866650001

 +253     ;;9002226.02101,"1149,57866654001 ",.01)

 +254     ;;57866654001

 +255     ;;9002226.02101,"1149,57866654001 ",.02)

 +256     ;;57866654001

 +257     ;;9002226.02101,"1149,57866654002 ",.01)

 +258     ;;57866654002

 +259     ;;9002226.02101,"1149,57866654002 ",.02)

 +260     ;;57866654002

 +261     ;;9002226.02101,"1149,57866654004 ",.01)

 +262     ;;57866654004

 +263     ;;9002226.02101,"1149,57866654004 ",.02)

 +264     ;;57866654004

 +265     ;;9002226.02101,"1149,57866660101 ",.01)

 +266     ;;57866660101

 +267     ;;9002226.02101,"1149,57866660101 ",.02)

 +268     ;;57866660101

 +269     ;;9002226.02101,"1149,58016000600 ",.01)

 +270     ;;58016000600

 +271     ;;9002226.02101,"1149,58016000600 ",.02)

 +272     ;;58016000600

 +273     ;;9002226.02101,"1149,58016000601 ",.01)

 +274     ;;58016000601

 +275     ;;9002226.02101,"1149,58016000601 ",.02)

 +276     ;;58016000601

 +277     ;;9002226.02101,"1149,58016000602 ",.01)

 +278     ;;58016000602

 +279     ;;9002226.02101,"1149,58016000602 ",.02)

 +280     ;;58016000602

 +281     ;;9002226.02101,"1149,58016000603 ",.01)

 +282     ;;58016000603

 +283     ;;9002226.02101,"1149,58016000603 ",.02)

 +284     ;;58016000603

 +285     ;;9002226.02101,"1149,58016000604 ",.01)

 +286     ;;58016000604

 +287     ;;9002226.02101,"1149,58016000604 ",.02)

 +288     ;;58016000604

 +289     ;;9002226.02101,"1149,58016000605 ",.01)

 +290     ;;58016000605

 +291     ;;9002226.02101,"1149,58016000605 ",.02)

 +292     ;;58016000605

 +293     ;;9002226.02101,"1149,58016000606 ",.01)

 +294     ;;58016000606

 +295     ;;9002226.02101,"1149,58016000606 ",.02)

 +296     ;;58016000606

 +297     ;;9002226.02101,"1149,58016000607 ",.01)

 +298     ;;58016000607

 +299     ;;9002226.02101,"1149,58016000607 ",.02)

 +300     ;;58016000607

 +301     ;;9002226.02101,"1149,58016000608 ",.01)

 +302     ;;58016000608

 +303     ;;9002226.02101,"1149,58016000608 ",.02)

 +304     ;;58016000608

 +305     ;;9002226.02101,"1149,58016000609 ",.01)

 +306     ;;58016000609

 +307     ;;9002226.02101,"1149,58016000609 ",.02)

 +308     ;;58016000609

 +309     ;;9002226.02101,"1149,58016000610 ",.01)

 +310     ;;58016000610

 +311     ;;9002226.02101,"1149,58016000610 ",.02)

 +312     ;;58016000610

 +313     ;;9002226.02101,"1149,58016000630 ",.01)

 +314     ;;58016000630

 +315     ;;9002226.02101,"1149,58016000630 ",.02)

 +316     ;;58016000630

 +317     ;;9002226.02101,"1149,58016000660 ",.01)

 +318     ;;58016000660

 +319     ;;9002226.02101,"1149,58016000660 ",.02)

 +320     ;;58016000660

 +321     ;;9002226.02101,"1149,58016000690 ",.01)

 +322     ;;58016000690

 +323     ;;9002226.02101,"1149,58016000690 ",.02)

 +324     ;;58016000690

 +325     ;;9002226.02101,"1149,58016000700 ",.01)

 +326     ;;58016000700

 +327     ;;9002226.02101,"1149,58016000700 ",.02)

 +328     ;;58016000700

 +329     ;;9002226.02101,"1149,58016000701 ",.01)

 +330     ;;58016000701

 +331     ;;9002226.02101,"1149,58016000701 ",.02)

 +332     ;;58016000701

 +333     ;;9002226.02101,"1149,58016000702 ",.01)

 +334     ;;58016000702

 +335     ;;9002226.02101,"1149,58016000702 ",.02)

 +336     ;;58016000702

 +337     ;;9002226.02101,"1149,58016000703 ",.01)

 +338     ;;58016000703

 +339     ;;9002226.02101,"1149,58016000703 ",.02)

 +340     ;;58016000703

 +341     ;;9002226.02101,"1149,58016000704 ",.01)

 +342     ;;58016000704

 +343     ;;9002226.02101,"1149,58016000704 ",.02)

 +344     ;;58016000704

 +345     ;;9002226.02101,"1149,58016000705 ",.01)

 +346     ;;58016000705

 +347     ;;9002226.02101,"1149,58016000705 ",.02)

 +348     ;;58016000705

 +349     ;;9002226.02101,"1149,58016000706 ",.01)

 +350     ;;58016000706

 +351     ;;9002226.02101,"1149,58016000706 ",.02)

 +352     ;;58016000706

 +353     ;;9002226.02101,"1149,58016000707 ",.01)

 +354     ;;58016000707

 +355     ;;9002226.02101,"1149,58016000707 ",.02)

 +356     ;;58016000707

 +357     ;;9002226.02101,"1149,58016000708 ",.01)

 +358     ;;58016000708

 +359     ;;9002226.02101,"1149,58016000708 ",.02)

 +360     ;;58016000708

 +361     ;;9002226.02101,"1149,58016000709 ",.01)

 +362     ;;58016000709

 +363     ;;9002226.02101,"1149,58016000709 ",.02)

 +364     ;;58016000709

 +365     ;;9002226.02101,"1149,58016000710 ",.01)

 +366     ;;58016000710

 +367     ;;9002226.02101,"1149,58016000710 ",.02)

 +368     ;;58016000710

 +369     ;;9002226.02101,"1149,58016000730 ",.01)

 +370     ;;58016000730

 +371     ;;9002226.02101,"1149,58016000730 ",.02)

 +372     ;;58016000730

 +373     ;;9002226.02101,"1149,58016000760 ",.01)

 +374     ;;58016000760

 +375     ;;9002226.02101,"1149,58016000760 ",.02)

 +376     ;;58016000760

 +377     ;;9002226.02101,"1149,58016000790 ",.01)

 +378     ;;58016000790

 +379     ;;9002226.02101,"1149,58016000790 ",.02)

 +380     ;;58016000790

 +381     ;;9002226.02101,"1149,58016000800 ",.01)

 +382     ;;58016000800

 +383     ;;9002226.02101,"1149,58016000800 ",.02)

 +384     ;;58016000800

 +385     ;;9002226.02101,"1149,58016000830 ",.01)

 +386     ;;58016000830

 +387     ;;9002226.02101,"1149,58016000830 ",.02)

 +388     ;;58016000830

 +389     ;;9002226.02101,"1149,58016000860 ",.01)

 +390     ;;58016000860

 +391     ;;9002226.02101,"1149,58016000860 ",.02)

 +392     ;;58016000860

 +393     ;;9002226.02101,"1149,58016000890 ",.01)

 +394     ;;58016000890

 +395     ;;9002226.02101,"1149,58016000890 ",.02)

 +396     ;;58016000890

 +397     ;;9002226.02101,"1149,58016054000 ",.01)

 +398     ;;58016054000

 +399     ;;9002226.02101,"1149,58016054000 ",.02)

 +400     ;;58016054000

 +401     ;;9002226.02101,"1149,58016054001 ",.01)

 +402     ;;58016054001

 +403     ;;9002226.02101,"1149,58016054001 ",.02)

 +404     ;;58016054001

 +405     ;;9002226.02101,"1149,58016054002 ",.01)

 +406     ;;58016054002

 +407     ;;9002226.02101,"1149,58016054002 ",.02)

 +408     ;;58016054002

 +409     ;;9002226.02101,"1149,58016054003 ",.01)

 +410     ;;58016054003

 +411     ;;9002226.02101,"1149,58016054003 ",.02)

 +412     ;;58016054003

 +413     ;;9002226.02101,"1149,58016054004 ",.01)

 +414     ;;58016054004

 +415     ;;9002226.02101,"1149,58016054004 ",.02)

 +416     ;;58016054004

 +417     ;;9002226.02101,"1149,58016054005 ",.01)

 +418     ;;58016054005

 +419     ;;9002226.02101,"1149,58016054005 ",.02)

 +420     ;;58016054005

 +421     ;;9002226.02101,"1149,58016054006 ",.01)

 +422     ;;58016054006

 +423     ;;9002226.02101,"1149,58016054006 ",.02)

 +424     ;;58016054006

 +425     ;;9002226.02101,"1149,58016054007 ",.01)

 +426     ;;58016054007

 +427     ;;9002226.02101,"1149,58016054007 ",.02)

 +428     ;;58016054007

 +429     ;;9002226.02101,"1149,58016054008 ",.01)

 +430     ;;58016054008

 +431     ;;9002226.02101,"1149,58016054008 ",.02)

 +432     ;;58016054008

 +433     ;;9002226.02101,"1149,58016054009 ",.01)

 +434     ;;58016054009

 +435     ;;9002226.02101,"1149,58016054009 ",.02)

 +436     ;;58016054009

 +437     ;;9002226.02101,"1149,58016054010 ",.01)

 +438     ;;58016054010

 +439     ;;9002226.02101,"1149,58016054010 ",.02)

 +440     ;;58016054010

 +441     ;;9002226.02101,"1149,58016054012 ",.01)

 +442     ;;58016054012

 +443     ;;9002226.02101,"1149,58016054012 ",.02)

 +444     ;;58016054012

 +445     ;;9002226.02101,"1149,58016054014 ",.01)

 +446     ;;58016054014

 +447     ;;9002226.02101,"1149,58016054014 ",.02)

 +448     ;;58016054014

 +449     ;;9002226.02101,"1149,58016054016 ",.01)

 +450     ;;58016054016

 +451     ;;9002226.02101,"1149,58016054016 ",.02)

 +452     ;;58016054016

 +453     ;;9002226.02101,"1149,58016054018 ",.01)

 +454     ;;58016054018

 +455     ;;9002226.02101,"1149,58016054018 ",.02)

 +456     ;;58016054018

 +457     ;;9002226.02101,"1149,58016054020 ",.01)

 +458     ;;58016054020

 +459     ;;9002226.02101,"1149,58016054020 ",.02)

 +460     ;;58016054020

 +461     ;;9002226.02101,"1149,58016054021 ",.01)

 +462     ;;58016054021

 +463     ;;9002226.02101,"1149,58016054021 ",.02)

 +464     ;;58016054021

 +465     ;;9002226.02101,"1149,58016054024 ",.01)

 +466     ;;58016054024

BUD2ZA18.m