Routine: BUD2ZD4

BUD2ZD4 ;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,"1327,00615350831 ",.01)

 ;;00615350831

 ;;9002226.02101,"1327,00615350831 ",.02)

 ;;00615350831

 ;;9002226.02101,"1327,00615350839 ",.01)

 ;;00615350839

 ;;9002226.02101,"1327,00615350839 ",.02)

 ;;00615350839

 ;;9002226.02101,"1327,00615356831 ",.01)

 ;;00615356831

 ;;9002226.02101,"1327,00615356831 ",.02)

 ;;00615356831

 ;;9002226.02101,"1327,00615356839 ",.01)

 ;;00615356839

 ;;9002226.02101,"1327,00615356839 ",.02)

 ;;00615356839

 ;;9002226.02101,"1327,00677117201 ",.01)

 ;;00677117201

 ;;9002226.02101,"1327,00677117201 ",.02)

 ;;00677117201

 ;;9002226.02101,"1327,00820013401 ",.01)

 ;;00820013401

 ;;9002226.02101,"1327,00820013401 ",.02)

 ;;00820013401

 ;;9002226.02101,"1327,00820013410 ",.01)

 ;;00820013410

 ;;9002226.02101,"1327,00820013410 ",.02)

 ;;00820013410

 ;;9002226.02101,"1327,00820013701 ",.01)

 ;;00820013701

 ;;9002226.02101,"1327,00820013701 ",.02)

 ;;00820013701

 ;;9002226.02101,"1327,00820013710 ",.01)

 ;;00820013710

 ;;9002226.02101,"1327,00820013710 ",.02)

 ;;00820013710

 ;;9002226.02101,"1327,00820014301 ",.01)

 ;;00820014301

 ;;9002226.02101,"1327,00820014301 ",.02)

 ;;00820014301

 ;;9002226.02101,"1327,00820014304 ",.01)

 ;;00820014304

 ;;9002226.02101,"1327,00820014304 ",.02)

 ;;00820014304

 ;;9002226.02101,"1327,00820014310 ",.01)

 ;;00820014310

 ;;9002226.02101,"1327,00820014310 ",.02)

 ;;00820014310

 ;;9002226.02101,"1327,00869153009 ",.01)

 ;;00869153009

 ;;9002226.02101,"1327,00869153009 ",.02)

 ;;00869153009

 ;;9002226.02101,"1327,00904034759 ",.01)

 ;;00904034759

 ;;9002226.02101,"1327,00904034759 ",.02)

 ;;00904034759

 ;;9002226.02101,"1327,00904058260 ",.01)

 ;;00904058260

 ;;9002226.02101,"1327,00904058260 ",.02)

 ;;00904058260

 ;;9002226.02101,"1327,00904058560 ",.01)

 ;;00904058560

 ;;9002226.02101,"1327,00904058560 ",.02)

 ;;00904058560

 ;;9002226.02101,"1327,00904200940 ",.01)

 ;;00904200940

 ;;9002226.02101,"1327,00904200940 ",.02)

 ;;00904200940

 ;;9002226.02101,"1327,00904200960 ",.01)

 ;;00904200960

 ;;9002226.02101,"1327,00904200960 ",.02)

 ;;00904200960

 ;;9002226.02101,"1327,00904200970 ",.01)

 ;;00904200970

 ;;9002226.02101,"1327,00904200970 ",.02)

 ;;00904200970

 ;;9002226.02101,"1327,00904200980 ",.01)

 ;;00904200980

 ;;9002226.02101,"1327,00904200980 ",.02)

 ;;00904200980

 ;;9002226.02101,"1327,00904201159 ",.01)

 ;;00904201159

 ;;9002226.02101,"1327,00904201159 ",.02)

 ;;00904201159

 ;;9002226.02101,"1327,00904201360 ",.01)

 ;;00904201360

 ;;9002226.02101,"1327,00904201360 ",.02)

 ;;00904201360

 ;;9002226.02101,"1327,00904201372 ",.01)

 ;;00904201372

 ;;9002226.02101,"1327,00904201372 ",.02)

 ;;00904201372

 ;;9002226.02101,"1327,00904201380 ",.01)

 ;;00904201380

 ;;9002226.02101,"1327,00904201380 ",.02)

 ;;00904201380

 ;;9002226.02101,"1327,00904201559 ",.01)

 ;;00904201559

 ;;9002226.02101,"1327,00904201559 ",.02)

 ;;00904201559

 ;;9002226.02101,"1327,00904201959 ",.01)

 ;;00904201959

 ;;9002226.02101,"1327,00904201959 ",.02)

 ;;00904201959

 ;;9002226.02101,"1327,00904201980 ",.01)

 ;;00904201980

 ;;9002226.02101,"1327,00904201980 ",.02)

 ;;00904201980

 ;;9002226.02101,"1327,00904404061 ",.01)

 ;;00904404061

 ;;9002226.02101,"1327,00904404061 ",.02)

 ;;00904404061

 ;;9002226.02101,"1327,00904404073 ",.01)

 ;;00904404073

 ;;9002226.02101,"1327,00904404073 ",.02)

 ;;00904404073

 ;;9002226.02101,"1327,00904537840 ",.01)

 ;;00904537840

 ;;9002226.02101,"1327,00904537840 ",.02)

 ;;00904537840

 ;;9002226.02101,"1327,00904537846 ",.01)

 ;;00904537846

 ;;9002226.02101,"1327,00904537846 ",.02)

 ;;00904537846

 ;;9002226.02101,"1327,00904537852 ",.01)

 ;;00904537852

 ;;9002226.02101,"1327,00904537852 ",.02)

 ;;00904537852

 ;;9002226.02101,"1327,00904537860 ",.01)

 ;;00904537860

 ;;9002226.02101,"1327,00904537860 ",.02)

 ;;00904537860

 ;;9002226.02101,"1327,00904537861 ",.01)

 ;;00904537861

 ;;9002226.02101,"1327,00904537861 ",.02)

 ;;00904537861

 ;;9002226.02101,"1327,04116709325 ",.01)

 ;;04116709325

 ;;9002226.02101,"1327,04116709325 ",.02)

 ;;04116709325

 ;;9002226.02101,"1327,10056053576 ",.01)

 ;;10056053576

 ;;9002226.02101,"1327,10056053576 ",.02)

 ;;10056053576

 ;;9002226.02101,"1327,10135012601 ",.01)

 ;;10135012601

 ;;9002226.02101,"1327,10135012601 ",.02)

 ;;10135012601

 ;;9002226.02101,"1327,10135012603 ",.01)

 ;;10135012603

 ;;9002226.02101,"1327,10135012603 ",.02)

 ;;10135012603

 ;;9002226.02101,"1327,10135012610 ",.01)

 ;;10135012610

 ;;9002226.02101,"1327,10135012610 ",.02)

 ;;10135012610

 ;;9002226.02101,"1327,10135012613 ",.01)

 ;;10135012613

 ;;9002226.02101,"1327,10135012613 ",.02)

 ;;10135012613

 ;;9002226.02101,"1327,10135012616 ",.01)

 ;;10135012616

 ;;9002226.02101,"1327,10135012616 ",.02)

 ;;10135012616

 ;;9002226.02101,"1327,10135012620 ",.01)

 ;;10135012620

 ;;9002226.02101,"1327,10135012620 ",.02)

 ;;10135012620

 ;;9002226.02101,"1327,10135012627 ",.01)

 ;;10135012627

 ;;9002226.02101,"1327,10135012627 ",.02)

 ;;10135012627

 ;;9002226.02101,"1327,10135012630 ",.01)

 ;;10135012630

 ;;9002226.02101,"1327,10135012630 ",.02)

 ;;10135012630

 ;;9002226.02101,"1327,10135012650 ",.01)

 ;;10135012650

 ;;9002226.02101,"1327,10135012650 ",.02)

 ;;10135012650

 ;;9002226.02101,"1327,10135012657 ",.01)

 ;;10135012657

 ;;9002226.02101,"1327,10135012657 ",.02)

 ;;10135012657

 ;;9002226.02101,"1327,10135012660 ",.01)

 ;;10135012660

 ;;9002226.02101,"1327,10135012660 ",.02)

 ;;10135012660

 ;;9002226.02101,"1327,10135012669 ",.01)

 ;;10135012669

 ;;9002226.02101,"1327,10135012669 ",.02)

 ;;10135012669

 ;;9002226.02101,"1327,10135012675 ",.01)

 ;;10135012675

 ;;9002226.02101,"1327,10135012675 ",.02)

 ;;10135012675

 ;;9002226.02101,"1327,10135012690 ",.01)

 ;;10135012690

 ;;9002226.02101,"1327,10135012690 ",.02)

 ;;10135012690

 ;;9002226.02101,"1327,10135012699 ",.01)

 ;;10135012699

 ;;9002226.02101,"1327,10135012699 ",.02)

 ;;10135012699

 ;;9002226.02101,"1327,10135015001 ",.01)

 ;;10135015001

 ;;9002226.02101,"1327,10135015001 ",.02)

 ;;10135015001

 ;;9002226.02101,"1327,10135015005 ",.01)

 ;;10135015005

 ;;9002226.02101,"1327,10135015005 ",.02)

 ;;10135015005

 ;;9002226.02101,"1327,10135015010 ",.01)

 ;;10135015010

 ;;9002226.02101,"1327,10135015010 ",.02)

 ;;10135015010

 ;;9002226.02101,"1327,10135015013 ",.01)

 ;;10135015013

 ;;9002226.02101,"1327,10135015013 ",.02)

 ;;10135015013

 ;;9002226.02101,"1327,10135015020 ",.01)

 ;;10135015020

 ;;9002226.02101,"1327,10135015020 ",.02)

 ;;10135015020

 ;;9002226.02101,"1327,10135015024 ",.01)

 ;;10135015024

 ;;9002226.02101,"1327,10135015024 ",.02)

 ;;10135015024

 ;;9002226.02101,"1327,10135015030 ",.01)

 ;;10135015030

 ;;9002226.02101,"1327,10135015030 ",.02)

 ;;10135015030

 ;;9002226.02101,"1327,10135015057 ",.01)

 ;;10135015057

 ;;9002226.02101,"1327,10135015057 ",.02)

 ;;10135015057

 ;;9002226.02101,"1327,10135015069 ",.01)

 ;;10135015069

 ;;9002226.02101,"1327,10135015069 ",.02)

 ;;10135015069

 ;;9002226.02101,"1327,10135017101 ",.01)

 ;;10135017101

 ;;9002226.02101,"1327,10135017101 ",.02)

 ;;10135017101

 ;;9002226.02101,"1327,10135017110 ",.01)

 ;;10135017110

 ;;9002226.02101,"1327,10135017110 ",.02)

 ;;10135017110

 ;;9002226.02101,"1327,10135017160 ",.01)

 ;;10135017160

 ;;9002226.02101,"1327,10135017160 ",.02)

 ;;10135017160

 ;;9002226.02101,"1327,10135017164 ",.01)

 ;;10135017164

 ;;9002226.02101,"1327,10135017164 ",.02)

 ;;10135017164

 ;;9002226.02101,"1327,10135017201 ",.01)

 ;;10135017201

 ;;9002226.02101,"1327,10135017201 ",.02)

 ;;10135017201

 ;;9002226.02101,"1327,10135017210 ",.01)

 ;;10135017210

 ;;9002226.02101,"1327,10135017210 ",.02)

 ;;10135017210

 ;;9002226.02101,"1327,10135017301 ",.01)

 ;;10135017301

 ;;9002226.02101,"1327,10135017301 ",.02)

 ;;10135017301

 ;;9002226.02101,"1327,10135017303 ",.01)

 ;;10135017303

 ;;9002226.02101,"1327,10135017303 ",.02)

 ;;10135017303

 ;;9002226.02101,"1327,10135017305 ",.01)

 ;;10135017305

 ;;9002226.02101,"1327,10135017305 ",.02)

 ;;10135017305

 ;;9002226.02101,"1327,10135017310 ",.01)

 ;;10135017310

 ;;9002226.02101,"1327,10135017310 ",.02)

 ;;10135017310

 ;;9002226.02101,"1327,10135017336 ",.01)

 ;;10135017336

 ;;9002226.02101,"1327,10135017336 ",.02)

 ;;10135017336

 ;;9002226.02101,"1327,10135017353 ",.01)

 ;;10135017353

 ;;9002226.02101,"1327,10135017353 ",.02)

 ;;10135017353

 ;;9002226.02101,"1327,10135017362 ",.01)

 ;;10135017362

 ;;9002226.02101,"1327,10135017362 ",.02)

 ;;10135017362

 ;;9002226.02101,"1327,10135017369 ",.01)

 ;;10135017369

 ;;9002226.02101,"1327,10135017369 ",.02)

 ;;10135017369

 ;;9002226.02101,"1327,10135017401 ",.01)

 ;;10135017401

 ;;9002226.02101,"1327,10135017401 ",.02)

 ;;10135017401

 ;;9002226.02101,"1327,10135017410 ",.01)

 ;;10135017410

 ;;9002226.02101,"1327,10135017410 ",.02)

 ;;10135017410

 ;;9002226.02101,"1327,10135024036 ",.01)

 ;;10135024036

 ;;9002226.02101,"1327,10135024036 ",.02)

 ;;10135024036

 ;;9002226.02101,"1327,10135038715 ",.01)

 ;;10135038715

 ;;9002226.02101,"1327,10135038715 ",.02)

 ;;10135038715

 ;;9002226.02101,"1327,10135038727 ",.01)

 ;;10135038727

 ;;9002226.02101,"1327,10135038727 ",.02)

 ;;10135038727

 ;;9002226.02101,"1327,10135038815 ",.01)

 ;;10135038815

 ;;9002226.02101,"1327,10135038815 ",.02)

 ;;10135038815

 ;;9002226.02101,"1327,10135038827 ",.01)

 ;;10135038827

 ;;9002226.02101,"1327,10135038827 ",.02)

 ;;10135038827

 ;;9002226.02101,"1327,10244056210 ",.01)

 ;;10244056210

 ;;9002226.02101,"1327,10244056210 ",.02)

 ;;10244056210

 ;;9002226.02101,"1327,10244056211 ",.01)

 ;;10244056211

 ;;9002226.02101,"1327,10244056211 ",.02)

 ;;10244056211

 ;;9002226.02101,"1327,10244056261 ",.01)

 ;;10244056261

 ;;9002226.02101,"1327,10244056261 ",.02)

 ;;10244056261

 ;;9002226.02101,"1327,10244056262 ",.01)

 ;;10244056262

 ;;9002226.02101,"1327,10244056262 ",.02)

 ;;10244056262

 ;;9002226.02101,"1327,10244056265 ",.01)

 ;;10244056265

 ;;9002226.02101,"1327,10244056265 ",.02)

 ;;10244056265

 ;;9002226.02101,"1327,10267240401 ",.01)

 ;;10267240401

 ;;9002226.02101,"1327,10267240401 ",.02)

 ;;10267240401

 ;;9002226.02101,"1327,11383005011 ",.01)

 ;;11383005011

 ;;9002226.02101,"1327,11383005011 ",.02)

 ;;11383005011

 ;;9002226.02101,"1327,11383005023 ",.01)

 ;;11383005023

 ;;9002226.02101,"1327,11383005023 ",.02)

 ;;11383005023

 ;;9002226.02101,"1327,11383007225 ",.01)

 ;;11383007225

 ;;9002226.02101,"1327,11383007225 ",.02)

 ;;11383007225

 ;;9002226.02101,"1327,11383014811 ",.01)

 ;;11383014811

 ;;9002226.02101,"1327,11383014811 ",.02)

 ;;11383014811

 ;;9002226.02101,"1327,11383014825 ",.01)

 ;;11383014825

 ;;9002226.02101,"1327,11383014825 ",.02)

 ;;11383014825

 ;;9002226.02101,"1327,11383014851 ",.01)

 ;;11383014851

 ;;9002226.02101,"1327,11383014851 ",.02)

 ;;11383014851

 ;;9002226.02101,"1327,11383015814 ",.01)

 ;;11383015814

 ;;9002226.02101,"1327,11383015814 ",.02)

 ;;11383015814

 ;;9002226.02101,"1327,11383015826 ",.01)

 ;;11383015826

 ;;9002226.02101,"1327,11383015826 ",.02)

 ;;11383015826

 ;;9002226.02101,"1327,11383025236 ",.01)

 ;;11383025236

 ;;9002226.02101,"1327,11383025236 ",.02)

 ;;11383025236

 ;;9002226.02101,"1327,11530000202 ",.01)

 ;;11530000202

 ;;9002226.02101,"1327,11530000202 ",.02)

 ;;11530000202

 ;;9002226.02101,"1327,11530000206 ",.01)

 ;;11530000206

 ;;9002226.02101,"1327,11530000206 ",.02)

 ;;11530000206

 ;;9002226.02101,"1327,11534015511 ",.01)

 ;;11534015511

 ;;9002226.02101,"1327,11534015511 ",.02)

 ;;11534015511

 ;;9002226.02101,"1327,11673027468 ",.01)

 ;;11673027468

 ;;9002226.02101,"1327,11673027468 ",.02)

 ;;11673027468

 ;;9002226.02101,"1327,11673027748 ",.01)

 ;;11673027748

 ;;9002226.02101,"1327,11673027748 ",.02)

 ;;11673027748

 ;;9002226.02101,"1327,11673041687 ",.01)

 ;;11673041687

 ;;9002226.02101,"1327,11673041687 ",.02)

 ;;11673041687

 ;;9002226.02101,"1327,11673041690 ",.01)

 ;;11673041690

 ;;9002226.02101,"1327,11673041690 ",.02)

 ;;11673041690

 ;;9002226.02101,"1327,11673046708 ",.01)

 ;;11673046708

 ;;9002226.02101,"1327,11673046708 ",.02)

 ;;11673046708

 ;;9002226.02101,"1327,11673046768 ",.01)

 ;;11673046768

 ;;9002226.02101,"1327,11673046768 ",.02)

 ;;11673046768

 ;;9002226.02101,"1327,11673053576 ",.01)

 ;;11673053576

 ;;9002226.02101,"1327,11673053576 ",.02)

 ;;11673053576

 ;;9002226.02101,"1327,11673056317 ",.01)

 ;;11673056317

 ;;9002226.02101,"1327,11673056317 ",.02)

 ;;11673056317

 ;;9002226.02101,"1327,11673056332 ",.01)

 ;;11673056332

 ;;9002226.02101,"1327,11673056332 ",.02)

 ;;11673056332

 ;;9002226.02101,"1327,11822316901 ",.01)

 ;;11822316901

 ;;9002226.02101,"1327,11822316901 ",.02)

 ;;11822316901

 ;;9002226.02101,"1327,11845070601 ",.01)

 ;;11845070601

 ;;9002226.02101,"1327,11845070601 ",.02)

 ;;11845070601

 ;;9002226.02101,"1327,11845070604 ",.01)

 ;;11845070604

 ;;9002226.02101,"1327,11845070604 ",.02)

 ;;11845070604

 ;;9002226.02101,"1327,11845070629 ",.01)

 ;;11845070629

 ;;9002226.02101,"1327,11845070629 ",.02)

 ;;11845070629

 ;;9002226.02101,"1327,11845084701 ",.01)

 ;;11845084701

 ;;9002226.02101,"1327,11845084701 ",.02)

 ;;11845084701

 ;;9002226.02101,"1327,11845089004 ",.01)

 ;;11845089004

 ;;9002226.02101,"1327,11845089004 ",.02)

 ;;11845089004

 ;;9002226.02101,"1327,11845089901 ",.01)

 ;;11845089901

 ;;9002226.02101,"1327,11845089901 ",.02)

 ;;11845089901

 ;;9002226.02101,"1327,11845093001 ",.01)

 ;;11845093001

 ;;9002226.02101,"1327,11845093001 ",.02)

 ;;11845093001

 ;;9002226.02101,"1327,11845094236 ",.01)

 ;;11845094236

BUD2ZD4   ;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,"1327,00615350831 ",.01)

 +2       ;;00615350831

 +3       ;;9002226.02101,"1327,00615350831 ",.02)

 +4       ;;00615350831

 +5       ;;9002226.02101,"1327,00615350839 ",.01)

 +6       ;;00615350839

 +7       ;;9002226.02101,"1327,00615350839 ",.02)

 +8       ;;00615350839

 +9       ;;9002226.02101,"1327,00615356831 ",.01)

 +10      ;;00615356831

 +11      ;;9002226.02101,"1327,00615356831 ",.02)

 +12      ;;00615356831

 +13      ;;9002226.02101,"1327,00615356839 ",.01)

 +14      ;;00615356839

 +15      ;;9002226.02101,"1327,00615356839 ",.02)

 +16      ;;00615356839

 +17      ;;9002226.02101,"1327,00677117201 ",.01)

 +18      ;;00677117201

 +19      ;;9002226.02101,"1327,00677117201 ",.02)

 +20      ;;00677117201

 +21      ;;9002226.02101,"1327,00820013401 ",.01)

 +22      ;;00820013401

 +23      ;;9002226.02101,"1327,00820013401 ",.02)

 +24      ;;00820013401

 +25      ;;9002226.02101,"1327,00820013410 ",.01)

 +26      ;;00820013410

 +27      ;;9002226.02101,"1327,00820013410 ",.02)

 +28      ;;00820013410

 +29      ;;9002226.02101,"1327,00820013701 ",.01)

 +30      ;;00820013701

 +31      ;;9002226.02101,"1327,00820013701 ",.02)

 +32      ;;00820013701

 +33      ;;9002226.02101,"1327,00820013710 ",.01)

 +34      ;;00820013710

 +35      ;;9002226.02101,"1327,00820013710 ",.02)

 +36      ;;00820013710

 +37      ;;9002226.02101,"1327,00820014301 ",.01)

 +38      ;;00820014301

 +39      ;;9002226.02101,"1327,00820014301 ",.02)

 +40      ;;00820014301

 +41      ;;9002226.02101,"1327,00820014304 ",.01)

 +42      ;;00820014304

 +43      ;;9002226.02101,"1327,00820014304 ",.02)

 +44      ;;00820014304

 +45      ;;9002226.02101,"1327,00820014310 ",.01)

 +46      ;;00820014310

 +47      ;;9002226.02101,"1327,00820014310 ",.02)

 +48      ;;00820014310

 +49      ;;9002226.02101,"1327,00869153009 ",.01)

 +50      ;;00869153009

 +51      ;;9002226.02101,"1327,00869153009 ",.02)

 +52      ;;00869153009

 +53      ;;9002226.02101,"1327,00904034759 ",.01)

 +54      ;;00904034759

 +55      ;;9002226.02101,"1327,00904034759 ",.02)

 +56      ;;00904034759

 +57      ;;9002226.02101,"1327,00904058260 ",.01)

 +58      ;;00904058260

 +59      ;;9002226.02101,"1327,00904058260 ",.02)

 +60      ;;00904058260

 +61      ;;9002226.02101,"1327,00904058560 ",.01)

 +62      ;;00904058560

 +63      ;;9002226.02101,"1327,00904058560 ",.02)

 +64      ;;00904058560

 +65      ;;9002226.02101,"1327,00904200940 ",.01)

 +66      ;;00904200940

 +67      ;;9002226.02101,"1327,00904200940 ",.02)

 +68      ;;00904200940

 +69      ;;9002226.02101,"1327,00904200960 ",.01)

 +70      ;;00904200960

 +71      ;;9002226.02101,"1327,00904200960 ",.02)

 +72      ;;00904200960

 +73      ;;9002226.02101,"1327,00904200970 ",.01)

 +74      ;;00904200970

 +75      ;;9002226.02101,"1327,00904200970 ",.02)

 +76      ;;00904200970

 +77      ;;9002226.02101,"1327,00904200980 ",.01)

 +78      ;;00904200980

 +79      ;;9002226.02101,"1327,00904200980 ",.02)

 +80      ;;00904200980

 +81      ;;9002226.02101,"1327,00904201159 ",.01)

 +82      ;;00904201159

 +83      ;;9002226.02101,"1327,00904201159 ",.02)

 +84      ;;00904201159

 +85      ;;9002226.02101,"1327,00904201360 ",.01)

 +86      ;;00904201360

 +87      ;;9002226.02101,"1327,00904201360 ",.02)

 +88      ;;00904201360

 +89      ;;9002226.02101,"1327,00904201372 ",.01)

 +90      ;;00904201372

 +91      ;;9002226.02101,"1327,00904201372 ",.02)

 +92      ;;00904201372

 +93      ;;9002226.02101,"1327,00904201380 ",.01)

 +94      ;;00904201380

 +95      ;;9002226.02101,"1327,00904201380 ",.02)

 +96      ;;00904201380

 +97      ;;9002226.02101,"1327,00904201559 ",.01)

 +98      ;;00904201559

 +99      ;;9002226.02101,"1327,00904201559 ",.02)

 +100     ;;00904201559

 +101     ;;9002226.02101,"1327,00904201959 ",.01)

 +102     ;;00904201959

 +103     ;;9002226.02101,"1327,00904201959 ",.02)

 +104     ;;00904201959

 +105     ;;9002226.02101,"1327,00904201980 ",.01)

 +106     ;;00904201980

 +107     ;;9002226.02101,"1327,00904201980 ",.02)

 +108     ;;00904201980

 +109     ;;9002226.02101,"1327,00904404061 ",.01)

 +110     ;;00904404061

 +111     ;;9002226.02101,"1327,00904404061 ",.02)

 +112     ;;00904404061

 +113     ;;9002226.02101,"1327,00904404073 ",.01)

 +114     ;;00904404073

 +115     ;;9002226.02101,"1327,00904404073 ",.02)

 +116     ;;00904404073

 +117     ;;9002226.02101,"1327,00904537840 ",.01)

 +118     ;;00904537840

 +119     ;;9002226.02101,"1327,00904537840 ",.02)

 +120     ;;00904537840

 +121     ;;9002226.02101,"1327,00904537846 ",.01)

 +122     ;;00904537846

 +123     ;;9002226.02101,"1327,00904537846 ",.02)

 +124     ;;00904537846

 +125     ;;9002226.02101,"1327,00904537852 ",.01)

 +126     ;;00904537852

 +127     ;;9002226.02101,"1327,00904537852 ",.02)

 +128     ;;00904537852

 +129     ;;9002226.02101,"1327,00904537860 ",.01)

 +130     ;;00904537860

 +131     ;;9002226.02101,"1327,00904537860 ",.02)

 +132     ;;00904537860

 +133     ;;9002226.02101,"1327,00904537861 ",.01)

 +134     ;;00904537861

 +135     ;;9002226.02101,"1327,00904537861 ",.02)

 +136     ;;00904537861

 +137     ;;9002226.02101,"1327,04116709325 ",.01)

 +138     ;;04116709325

 +139     ;;9002226.02101,"1327,04116709325 ",.02)

 +140     ;;04116709325

 +141     ;;9002226.02101,"1327,10056053576 ",.01)

 +142     ;;10056053576

 +143     ;;9002226.02101,"1327,10056053576 ",.02)

 +144     ;;10056053576

 +145     ;;9002226.02101,"1327,10135012601 ",.01)

 +146     ;;10135012601

 +147     ;;9002226.02101,"1327,10135012601 ",.02)

 +148     ;;10135012601

 +149     ;;9002226.02101,"1327,10135012603 ",.01)

 +150     ;;10135012603

 +151     ;;9002226.02101,"1327,10135012603 ",.02)

 +152     ;;10135012603

 +153     ;;9002226.02101,"1327,10135012610 ",.01)

 +154     ;;10135012610

 +155     ;;9002226.02101,"1327,10135012610 ",.02)

 +156     ;;10135012610

 +157     ;;9002226.02101,"1327,10135012613 ",.01)

 +158     ;;10135012613

 +159     ;;9002226.02101,"1327,10135012613 ",.02)

 +160     ;;10135012613

 +161     ;;9002226.02101,"1327,10135012616 ",.01)

 +162     ;;10135012616

 +163     ;;9002226.02101,"1327,10135012616 ",.02)

 +164     ;;10135012616

 +165     ;;9002226.02101,"1327,10135012620 ",.01)

 +166     ;;10135012620

 +167     ;;9002226.02101,"1327,10135012620 ",.02)

 +168     ;;10135012620

 +169     ;;9002226.02101,"1327,10135012627 ",.01)

 +170     ;;10135012627

 +171     ;;9002226.02101,"1327,10135012627 ",.02)

 +172     ;;10135012627

 +173     ;;9002226.02101,"1327,10135012630 ",.01)

 +174     ;;10135012630

 +175     ;;9002226.02101,"1327,10135012630 ",.02)

 +176     ;;10135012630

 +177     ;;9002226.02101,"1327,10135012650 ",.01)

 +178     ;;10135012650

 +179     ;;9002226.02101,"1327,10135012650 ",.02)

 +180     ;;10135012650

 +181     ;;9002226.02101,"1327,10135012657 ",.01)

 +182     ;;10135012657

 +183     ;;9002226.02101,"1327,10135012657 ",.02)

 +184     ;;10135012657

 +185     ;;9002226.02101,"1327,10135012660 ",.01)

 +186     ;;10135012660

 +187     ;;9002226.02101,"1327,10135012660 ",.02)

 +188     ;;10135012660

 +189     ;;9002226.02101,"1327,10135012669 ",.01)

 +190     ;;10135012669

 +191     ;;9002226.02101,"1327,10135012669 ",.02)

 +192     ;;10135012669

 +193     ;;9002226.02101,"1327,10135012675 ",.01)

 +194     ;;10135012675

 +195     ;;9002226.02101,"1327,10135012675 ",.02)

 +196     ;;10135012675

 +197     ;;9002226.02101,"1327,10135012690 ",.01)

 +198     ;;10135012690

 +199     ;;9002226.02101,"1327,10135012690 ",.02)

 +200     ;;10135012690

 +201     ;;9002226.02101,"1327,10135012699 ",.01)

 +202     ;;10135012699

 +203     ;;9002226.02101,"1327,10135012699 ",.02)

 +204     ;;10135012699

 +205     ;;9002226.02101,"1327,10135015001 ",.01)

 +206     ;;10135015001

 +207     ;;9002226.02101,"1327,10135015001 ",.02)

 +208     ;;10135015001

 +209     ;;9002226.02101,"1327,10135015005 ",.01)

 +210     ;;10135015005

 +211     ;;9002226.02101,"1327,10135015005 ",.02)

 +212     ;;10135015005

 +213     ;;9002226.02101,"1327,10135015010 ",.01)

 +214     ;;10135015010

 +215     ;;9002226.02101,"1327,10135015010 ",.02)

 +216     ;;10135015010

 +217     ;;9002226.02101,"1327,10135015013 ",.01)

 +218     ;;10135015013

 +219     ;;9002226.02101,"1327,10135015013 ",.02)

 +220     ;;10135015013

 +221     ;;9002226.02101,"1327,10135015020 ",.01)

 +222     ;;10135015020

 +223     ;;9002226.02101,"1327,10135015020 ",.02)

 +224     ;;10135015020

 +225     ;;9002226.02101,"1327,10135015024 ",.01)

 +226     ;;10135015024

 +227     ;;9002226.02101,"1327,10135015024 ",.02)

 +228     ;;10135015024

 +229     ;;9002226.02101,"1327,10135015030 ",.01)

 +230     ;;10135015030

 +231     ;;9002226.02101,"1327,10135015030 ",.02)

 +232     ;;10135015030

 +233     ;;9002226.02101,"1327,10135015057 ",.01)

 +234     ;;10135015057

 +235     ;;9002226.02101,"1327,10135015057 ",.02)

 +236     ;;10135015057

 +237     ;;9002226.02101,"1327,10135015069 ",.01)

 +238     ;;10135015069

 +239     ;;9002226.02101,"1327,10135015069 ",.02)

 +240     ;;10135015069

 +241     ;;9002226.02101,"1327,10135017101 ",.01)

 +242     ;;10135017101

 +243     ;;9002226.02101,"1327,10135017101 ",.02)

 +244     ;;10135017101

 +245     ;;9002226.02101,"1327,10135017110 ",.01)

 +246     ;;10135017110

 +247     ;;9002226.02101,"1327,10135017110 ",.02)

 +248     ;;10135017110

 +249     ;;9002226.02101,"1327,10135017160 ",.01)

 +250     ;;10135017160

 +251     ;;9002226.02101,"1327,10135017160 ",.02)

 +252     ;;10135017160

 +253     ;;9002226.02101,"1327,10135017164 ",.01)

 +254     ;;10135017164

 +255     ;;9002226.02101,"1327,10135017164 ",.02)

 +256     ;;10135017164

 +257     ;;9002226.02101,"1327,10135017201 ",.01)

 +258     ;;10135017201

 +259     ;;9002226.02101,"1327,10135017201 ",.02)

 +260     ;;10135017201

 +261     ;;9002226.02101,"1327,10135017210 ",.01)

 +262     ;;10135017210

 +263     ;;9002226.02101,"1327,10135017210 ",.02)

 +264     ;;10135017210

 +265     ;;9002226.02101,"1327,10135017301 ",.01)

 +266     ;;10135017301

 +267     ;;9002226.02101,"1327,10135017301 ",.02)

 +268     ;;10135017301

 +269     ;;9002226.02101,"1327,10135017303 ",.01)

 +270     ;;10135017303

 +271     ;;9002226.02101,"1327,10135017303 ",.02)

 +272     ;;10135017303

 +273     ;;9002226.02101,"1327,10135017305 ",.01)

 +274     ;;10135017305

 +275     ;;9002226.02101,"1327,10135017305 ",.02)

 +276     ;;10135017305

 +277     ;;9002226.02101,"1327,10135017310 ",.01)

 +278     ;;10135017310

 +279     ;;9002226.02101,"1327,10135017310 ",.02)

 +280     ;;10135017310

 +281     ;;9002226.02101,"1327,10135017336 ",.01)

 +282     ;;10135017336

 +283     ;;9002226.02101,"1327,10135017336 ",.02)

 +284     ;;10135017336

 +285     ;;9002226.02101,"1327,10135017353 ",.01)

 +286     ;;10135017353

 +287     ;;9002226.02101,"1327,10135017353 ",.02)

 +288     ;;10135017353

 +289     ;;9002226.02101,"1327,10135017362 ",.01)

 +290     ;;10135017362

 +291     ;;9002226.02101,"1327,10135017362 ",.02)

 +292     ;;10135017362

 +293     ;;9002226.02101,"1327,10135017369 ",.01)

 +294     ;;10135017369

 +295     ;;9002226.02101,"1327,10135017369 ",.02)

 +296     ;;10135017369

 +297     ;;9002226.02101,"1327,10135017401 ",.01)

 +298     ;;10135017401

 +299     ;;9002226.02101,"1327,10135017401 ",.02)

 +300     ;;10135017401

 +301     ;;9002226.02101,"1327,10135017410 ",.01)

 +302     ;;10135017410

 +303     ;;9002226.02101,"1327,10135017410 ",.02)

 +304     ;;10135017410

 +305     ;;9002226.02101,"1327,10135024036 ",.01)

 +306     ;;10135024036

 +307     ;;9002226.02101,"1327,10135024036 ",.02)

 +308     ;;10135024036

 +309     ;;9002226.02101,"1327,10135038715 ",.01)

 +310     ;;10135038715

 +311     ;;9002226.02101,"1327,10135038715 ",.02)

 +312     ;;10135038715

 +313     ;;9002226.02101,"1327,10135038727 ",.01)

 +314     ;;10135038727

 +315     ;;9002226.02101,"1327,10135038727 ",.02)

 +316     ;;10135038727

 +317     ;;9002226.02101,"1327,10135038815 ",.01)

 +318     ;;10135038815

 +319     ;;9002226.02101,"1327,10135038815 ",.02)

 +320     ;;10135038815

 +321     ;;9002226.02101,"1327,10135038827 ",.01)

 +322     ;;10135038827

 +323     ;;9002226.02101,"1327,10135038827 ",.02)

 +324     ;;10135038827

 +325     ;;9002226.02101,"1327,10244056210 ",.01)

 +326     ;;10244056210

 +327     ;;9002226.02101,"1327,10244056210 ",.02)

 +328     ;;10244056210

 +329     ;;9002226.02101,"1327,10244056211 ",.01)

 +330     ;;10244056211

 +331     ;;9002226.02101,"1327,10244056211 ",.02)

 +332     ;;10244056211

 +333     ;;9002226.02101,"1327,10244056261 ",.01)

 +334     ;;10244056261

 +335     ;;9002226.02101,"1327,10244056261 ",.02)

 +336     ;;10244056261

 +337     ;;9002226.02101,"1327,10244056262 ",.01)

 +338     ;;10244056262

 +339     ;;9002226.02101,"1327,10244056262 ",.02)

 +340     ;;10244056262

 +341     ;;9002226.02101,"1327,10244056265 ",.01)

 +342     ;;10244056265

 +343     ;;9002226.02101,"1327,10244056265 ",.02)

 +344     ;;10244056265

 +345     ;;9002226.02101,"1327,10267240401 ",.01)

 +346     ;;10267240401

 +347     ;;9002226.02101,"1327,10267240401 ",.02)

 +348     ;;10267240401

 +349     ;;9002226.02101,"1327,11383005011 ",.01)

 +350     ;;11383005011

 +351     ;;9002226.02101,"1327,11383005011 ",.02)

 +352     ;;11383005011

 +353     ;;9002226.02101,"1327,11383005023 ",.01)

 +354     ;;11383005023

 +355     ;;9002226.02101,"1327,11383005023 ",.02)

 +356     ;;11383005023

 +357     ;;9002226.02101,"1327,11383007225 ",.01)

 +358     ;;11383007225

 +359     ;;9002226.02101,"1327,11383007225 ",.02)

 +360     ;;11383007225

 +361     ;;9002226.02101,"1327,11383014811 ",.01)

 +362     ;;11383014811

 +363     ;;9002226.02101,"1327,11383014811 ",.02)

 +364     ;;11383014811

 +365     ;;9002226.02101,"1327,11383014825 ",.01)

 +366     ;;11383014825

 +367     ;;9002226.02101,"1327,11383014825 ",.02)

 +368     ;;11383014825

 +369     ;;9002226.02101,"1327,11383014851 ",.01)

 +370     ;;11383014851

 +371     ;;9002226.02101,"1327,11383014851 ",.02)

 +372     ;;11383014851

 +373     ;;9002226.02101,"1327,11383015814 ",.01)

 +374     ;;11383015814

 +375     ;;9002226.02101,"1327,11383015814 ",.02)

 +376     ;;11383015814

 +377     ;;9002226.02101,"1327,11383015826 ",.01)

 +378     ;;11383015826

 +379     ;;9002226.02101,"1327,11383015826 ",.02)

 +380     ;;11383015826

 +381     ;;9002226.02101,"1327,11383025236 ",.01)

 +382     ;;11383025236

 +383     ;;9002226.02101,"1327,11383025236 ",.02)

 +384     ;;11383025236

 +385     ;;9002226.02101,"1327,11530000202 ",.01)

 +386     ;;11530000202

 +387     ;;9002226.02101,"1327,11530000202 ",.02)

 +388     ;;11530000202

 +389     ;;9002226.02101,"1327,11530000206 ",.01)

 +390     ;;11530000206

 +391     ;;9002226.02101,"1327,11530000206 ",.02)

 +392     ;;11530000206

 +393     ;;9002226.02101,"1327,11534015511 ",.01)

 +394     ;;11534015511

 +395     ;;9002226.02101,"1327,11534015511 ",.02)

 +396     ;;11534015511

 +397     ;;9002226.02101,"1327,11673027468 ",.01)

 +398     ;;11673027468

 +399     ;;9002226.02101,"1327,11673027468 ",.02)

 +400     ;;11673027468

 +401     ;;9002226.02101,"1327,11673027748 ",.01)

 +402     ;;11673027748

 +403     ;;9002226.02101,"1327,11673027748 ",.02)

 +404     ;;11673027748

 +405     ;;9002226.02101,"1327,11673041687 ",.01)

 +406     ;;11673041687

 +407     ;;9002226.02101,"1327,11673041687 ",.02)

 +408     ;;11673041687

 +409     ;;9002226.02101,"1327,11673041690 ",.01)

 +410     ;;11673041690

 +411     ;;9002226.02101,"1327,11673041690 ",.02)

 +412     ;;11673041690

 +413     ;;9002226.02101,"1327,11673046708 ",.01)

 +414     ;;11673046708

 +415     ;;9002226.02101,"1327,11673046708 ",.02)

 +416     ;;11673046708

 +417     ;;9002226.02101,"1327,11673046768 ",.01)

 +418     ;;11673046768

 +419     ;;9002226.02101,"1327,11673046768 ",.02)

 +420     ;;11673046768

 +421     ;;9002226.02101,"1327,11673053576 ",.01)

 +422     ;;11673053576

 +423     ;;9002226.02101,"1327,11673053576 ",.02)

 +424     ;;11673053576

 +425     ;;9002226.02101,"1327,11673056317 ",.01)

 +426     ;;11673056317

 +427     ;;9002226.02101,"1327,11673056317 ",.02)

 +428     ;;11673056317

 +429     ;;9002226.02101,"1327,11673056332 ",.01)

 +430     ;;11673056332

 +431     ;;9002226.02101,"1327,11673056332 ",.02)

 +432     ;;11673056332

 +433     ;;9002226.02101,"1327,11822316901 ",.01)

 +434     ;;11822316901

 +435     ;;9002226.02101,"1327,11822316901 ",.02)

 +436     ;;11822316901

 +437     ;;9002226.02101,"1327,11845070601 ",.01)

 +438     ;;11845070601

 +439     ;;9002226.02101,"1327,11845070601 ",.02)

 +440     ;;11845070601

 +441     ;;9002226.02101,"1327,11845070604 ",.01)

 +442     ;;11845070604

 +443     ;;9002226.02101,"1327,11845070604 ",.02)

 +444     ;;11845070604

 +445     ;;9002226.02101,"1327,11845070629 ",.01)

 +446     ;;11845070629

 +447     ;;9002226.02101,"1327,11845070629 ",.02)

 +448     ;;11845070629

 +449     ;;9002226.02101,"1327,11845084701 ",.01)

 +450     ;;11845084701

 +451     ;;9002226.02101,"1327,11845084701 ",.02)

 +452     ;;11845084701

 +453     ;;9002226.02101,"1327,11845089004 ",.01)

 +454     ;;11845089004

 +455     ;;9002226.02101,"1327,11845089004 ",.02)

 +456     ;;11845089004

 +457     ;;9002226.02101,"1327,11845089901 ",.01)

 +458     ;;11845089901

 +459     ;;9002226.02101,"1327,11845089901 ",.02)

 +460     ;;11845089901

 +461     ;;9002226.02101,"1327,11845093001 ",.01)

 +462     ;;11845093001

 +463     ;;9002226.02101,"1327,11845093001 ",.02)

 +464     ;;11845093001

 +465     ;;9002226.02101,"1327,11845094236 ",.01)

 +466     ;;11845094236

BUD2ZD4.m