Routine: BGPM3ACV

BGPM3ACV ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON APR 21, 2011;

 ;;11.0;IHS CLINICAL REPORTING;**4**;JAN 06, 2011;Build 84

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,"786,24236064002 ",.02)

 ;;24236064002

 ;;9002226.02101,"786,24236064402 ",.01)

 ;;24236064402

 ;;9002226.02101,"786,24236064402 ",.02)

 ;;24236064402

 ;;9002226.02101,"786,24236067702 ",.01)

 ;;24236067702

 ;;9002226.02101,"786,24236067702 ",.02)

 ;;24236067702

 ;;9002226.02101,"786,24236069502 ",.01)

 ;;24236069502

 ;;9002226.02101,"786,24236069502 ",.02)

 ;;24236069502

 ;;9002226.02101,"786,24236072402 ",.01)

 ;;24236072402

 ;;9002226.02101,"786,24236072402 ",.02)

 ;;24236072402

 ;;9002226.02101,"786,24236074502 ",.01)

 ;;24236074502

 ;;9002226.02101,"786,24236074502 ",.02)

 ;;24236074502

 ;;9002226.02101,"786,24236075602 ",.01)

 ;;24236075602

 ;;9002226.02101,"786,24236075602 ",.02)

 ;;24236075602

 ;;9002226.02101,"786,24236093702 ",.01)

 ;;24236093702

 ;;9002226.02101,"786,24236093702 ",.02)

 ;;24236093702

 ;;9002226.02101,"786,24385073478 ",.01)

 ;;24385073478

 ;;9002226.02101,"786,24385073478 ",.02)

 ;;24385073478

 ;;9002226.02101,"786,24385083978 ",.01)

 ;;24385083978

 ;;9002226.02101,"786,24385083978 ",.02)

 ;;24385083978

 ;;9002226.02101,"786,24658013005 ",.01)

 ;;24658013005

 ;;9002226.02101,"786,24658013005 ",.02)

 ;;24658013005

 ;;9002226.02101,"786,24658013018 ",.01)

 ;;24658013018

 ;;9002226.02101,"786,24658013018 ",.02)

 ;;24658013018

 ;;9002226.02101,"786,24658013060 ",.01)

 ;;24658013060

 ;;9002226.02101,"786,24658013060 ",.02)

 ;;24658013060

 ;;9002226.02101,"786,24658021010 ",.01)

 ;;24658021010

 ;;9002226.02101,"786,24658021010 ",.02)

 ;;24658021010

 ;;9002226.02101,"786,24658021030 ",.01)

 ;;24658021030

 ;;9002226.02101,"786,24658021030 ",.02)

 ;;24658021030

 ;;9002226.02101,"786,24658021045 ",.01)

 ;;24658021045

 ;;9002226.02101,"786,24658021045 ",.02)

 ;;24658021045

 ;;9002226.02101,"786,24658021090 ",.01)

 ;;24658021090

 ;;9002226.02101,"786,24658021090 ",.02)

 ;;24658021090

 ;;9002226.02101,"786,24658021110 ",.01)

 ;;24658021110

 ;;9002226.02101,"786,24658021110 ",.02)

 ;;24658021110

 ;;9002226.02101,"786,24658021130 ",.01)

 ;;24658021130

 ;;9002226.02101,"786,24658021130 ",.02)

 ;;24658021130

 ;;9002226.02101,"786,24658021145 ",.01)

 ;;24658021145

 ;;9002226.02101,"786,24658021145 ",.02)

 ;;24658021145

 ;;9002226.02101,"786,24658021190 ",.01)

 ;;24658021190

 ;;9002226.02101,"786,24658021190 ",.02)

 ;;24658021190

 ;;9002226.02101,"786,24658021210 ",.01)

 ;;24658021210

 ;;9002226.02101,"786,24658021210 ",.02)

 ;;24658021210

 ;;9002226.02101,"786,24658021230 ",.01)

 ;;24658021230

 ;;9002226.02101,"786,24658021230 ",.02)

 ;;24658021230

 ;;9002226.02101,"786,24658021245 ",.01)

 ;;24658021245

 ;;9002226.02101,"786,24658021245 ",.02)

 ;;24658021245

 ;;9002226.02101,"786,24658021290 ",.01)

 ;;24658021290

 ;;9002226.02101,"786,24658021290 ",.02)

 ;;24658021290

 ;;9002226.02101,"786,24658021310 ",.01)

 ;;24658021310

 ;;9002226.02101,"786,24658021310 ",.02)

 ;;24658021310

 ;;9002226.02101,"786,24658021330 ",.01)

 ;;24658021330

 ;;9002226.02101,"786,24658021330 ",.02)

 ;;24658021330

 ;;9002226.02101,"786,24658021345 ",.01)

 ;;24658021345

 ;;9002226.02101,"786,24658021345 ",.02)

 ;;24658021345

 ;;9002226.02101,"786,24658021390 ",.01)

 ;;24658021390

 ;;9002226.02101,"786,24658021390 ",.02)

 ;;24658021390

 ;;9002226.02101,"786,24658021410 ",.01)

 ;;24658021410

 ;;9002226.02101,"786,24658021410 ",.02)

 ;;24658021410

 ;;9002226.02101,"786,24658021430 ",.01)

 ;;24658021430

 ;;9002226.02101,"786,24658021430 ",.02)

 ;;24658021430

 ;;9002226.02101,"786,24658021445 ",.01)

 ;;24658021445

 ;;9002226.02101,"786,24658021445 ",.02)

 ;;24658021445

 ;;9002226.02101,"786,24658021490 ",.01)

 ;;24658021490

 ;;9002226.02101,"786,24658021490 ",.02)

 ;;24658021490

 ;;9002226.02101,"786,26053006401 ",.01)

 ;;26053006401

 ;;9002226.02101,"786,26053006401 ",.02)

 ;;26053006401

 ;;9002226.02101,"786,26053006501 ",.01)

 ;;26053006501

 ;;9002226.02101,"786,26053006501 ",.02)

 ;;26053006501

 ;;9002226.02101,"786,26053006601 ",.01)

 ;;26053006601

 ;;9002226.02101,"786,26053006601 ",.02)

 ;;26053006601

 ;;9002226.02101,"786,26053017701 ",.01)

 ;;26053017701

 ;;9002226.02101,"786,26053017701 ",.02)

 ;;26053017701

 ;;9002226.02101,"786,26053018301 ",.01)

 ;;26053018301

 ;;9002226.02101,"786,26053018301 ",.02)

 ;;26053018301

 ;;9002226.02101,"786,26053031001 ",.01)

 ;;26053031001

 ;;9002226.02101,"786,26053031001 ",.02)

 ;;26053031001

 ;;9002226.02101,"786,26053031201 ",.01)

 ;;26053031201

 ;;9002226.02101,"786,26053031201 ",.02)

 ;;26053031201

 ;;9002226.02101,"786,26053041501 ",.01)

 ;;26053041501

 ;;9002226.02101,"786,26053041501 ",.02)

 ;;26053041501

 ;;9002226.02101,"786,30768000061 ",.01)

 ;;30768000061

 ;;9002226.02101,"786,30768000061 ",.02)

 ;;30768000061

 ;;9002226.02101,"786,31722022505 ",.01)

 ;;31722022505

 ;;9002226.02101,"786,31722022505 ",.02)

 ;;31722022505

 ;;9002226.02101,"786,31722022560 ",.01)

 ;;31722022560

 ;;9002226.02101,"786,31722022560 ",.02)

 ;;31722022560

 ;;9002226.02101,"786,33358015530 ",.01)

 ;;33358015530

 ;;9002226.02101,"786,33358015530 ",.02)

 ;;33358015530

 ;;9002226.02101,"786,33358022330 ",.01)

 ;;33358022330

 ;;9002226.02101,"786,33358022330 ",.02)

 ;;33358022330

 ;;9002226.02101,"786,33358022500 ",.01)

 ;;33358022500

 ;;9002226.02101,"786,33358022500 ",.02)

 ;;33358022500

 ;;9002226.02101,"786,33358022530 ",.01)

 ;;33358022530

 ;;9002226.02101,"786,33358022530 ",.02)

 ;;33358022530

 ;;9002226.02101,"786,33358022560 ",.01)

 ;;33358022560

 ;;9002226.02101,"786,33358022560 ",.02)

 ;;33358022560

 ;;9002226.02101,"786,33358022630 ",.01)

 ;;33358022630

 ;;9002226.02101,"786,33358022630 ",.02)

 ;;33358022630

 ;;9002226.02101,"786,33358043130 ",.01)

 ;;33358043130

 ;;9002226.02101,"786,33358043130 ",.02)

 ;;33358043130

 ;;9002226.02101,"786,37205007878 ",.01)

 ;;37205007878

 ;;9002226.02101,"786,37205007878 ",.02)

 ;;37205007878

 ;;9002226.02101,"786,38245026679 ",.01)

 ;;38245026679

 ;;9002226.02101,"786,38245026679 ",.02)

 ;;38245026679

 ;;9002226.02101,"786,38245026680 ",.01)

 ;;38245026680

 ;;9002226.02101,"786,38245026680 ",.02)

 ;;38245026680

 ;;9002226.02101,"786,38245030028 ",.01)

 ;;38245030028

 ;;9002226.02101,"786,38245030028 ",.02)

 ;;38245030028

 ;;9002226.02101,"786,38245030080 ",.01)

 ;;38245030080

 ;;9002226.02101,"786,38245030080 ",.02)

 ;;38245030080

 ;;9002226.02101,"786,39686001423 ",.01)

 ;;39686001423

 ;;9002226.02101,"786,39686001423 ",.02)

 ;;39686001423

 ;;9002226.02101,"786,42043017009 ",.01)

 ;;42043017009

 ;;9002226.02101,"786,42043017009 ",.02)

 ;;42043017009

 ;;9002226.02101,"786,42043017109 ",.01)

 ;;42043017109

 ;;9002226.02101,"786,42043017109 ",.02)

 ;;42043017109

 ;;9002226.02101,"786,43063000801 ",.01)

 ;;43063000801

 ;;9002226.02101,"786,43063000801 ",.02)

 ;;43063000801

 ;;9002226.02101,"786,43063008030 ",.01)

 ;;43063008030

 ;;9002226.02101,"786,43063008030 ",.02)

 ;;43063008030

 ;;9002226.02101,"786,43063008090 ",.01)

 ;;43063008090

 ;;9002226.02101,"786,43063008090 ",.02)

 ;;43063008090

 ;;9002226.02101,"786,43292012356 ",.01)

 ;;43292012356

 ;;9002226.02101,"786,43292012356 ",.02)

 ;;43292012356

 ;;9002226.02101,"786,43292022328 ",.01)

 ;;43292022328

 ;;9002226.02101,"786,43292022328 ",.02)

 ;;43292022328

 ;;9002226.02101,"786,43292055740 ",.01)

 ;;43292055740

 ;;9002226.02101,"786,43292055740 ",.02)

 ;;43292055740

 ;;9002226.02101,"786,43353000730 ",.01)

 ;;43353000730

 ;;9002226.02101,"786,43353000730 ",.02)

 ;;43353000730

 ;;9002226.02101,"786,43353000733 ",.01)

 ;;43353000733

 ;;9002226.02101,"786,43353000733 ",.02)

 ;;43353000733

 ;;9002226.02101,"786,43353000760 ",.01)

 ;;43353000760

 ;;9002226.02101,"786,43353000760 ",.02)

 ;;43353000760

 ;;9002226.02101,"786,43353009060 ",.01)

 ;;43353009060

 ;;9002226.02101,"786,43353009060 ",.02)

 ;;43353009060

 ;;9002226.02101,"786,43353009080 ",.01)

 ;;43353009080

 ;;9002226.02101,"786,43353009080 ",.02)

 ;;43353009080

 ;;9002226.02101,"786,43353022715 ",.01)

 ;;43353022715

 ;;9002226.02101,"786,43353022715 ",.02)

 ;;43353022715

 ;;9002226.02101,"786,43353022730 ",.01)

 ;;43353022730

 ;;9002226.02101,"786,43353022730 ",.02)

 ;;43353022730

 ;;9002226.02101,"786,43353022745 ",.01)

 ;;43353022745

 ;;9002226.02101,"786,43353022745 ",.02)

 ;;43353022745

 ;;9002226.02101,"786,43353022760 ",.01)

 ;;43353022760

 ;;9002226.02101,"786,43353022760 ",.02)

 ;;43353022760

 ;;9002226.02101,"786,43353022815 ",.01)

 ;;43353022815

 ;;9002226.02101,"786,43353022815 ",.02)

 ;;43353022815

 ;;9002226.02101,"786,43353022830 ",.01)

 ;;43353022830

 ;;9002226.02101,"786,43353022830 ",.02)

 ;;43353022830

 ;;9002226.02101,"786,43353022845 ",.01)

 ;;43353022845

 ;;9002226.02101,"786,43353022845 ",.02)

 ;;43353022845

 ;;9002226.02101,"786,43353022860 ",.01)

 ;;43353022860

 ;;9002226.02101,"786,43353022860 ",.02)

 ;;43353022860

 ;;9002226.02101,"786,43353039460 ",.01)

 ;;43353039460

 ;;9002226.02101,"786,43353039460 ",.02)

 ;;43353039460

 ;;9002226.02101,"786,43353040230 ",.01)

 ;;43353040230

 ;;9002226.02101,"786,43353040230 ",.02)

 ;;43353040230

 ;;9002226.02101,"786,43683015230 ",.01)

 ;;43683015230

 ;;9002226.02101,"786,43683015230 ",.02)

 ;;43683015230

 ;;9002226.02101,"786,43797026903 ",.01)

 ;;43797026903

 ;;9002226.02101,"786,43797026903 ",.02)

 ;;43797026903

 ;;9002226.02101,"786,43806024040 ",.01)

 ;;43806024040

 ;;9002226.02101,"786,43806024040 ",.02)

 ;;43806024040

 ;;9002226.02101,"786,43806038240 ",.01)

 ;;43806038240

 ;;9002226.02101,"786,43806038240 ",.02)

 ;;43806038240

 ;;9002226.02101,"786,43806041140 ",.01)

 ;;43806041140

 ;;9002226.02101,"786,43806041140 ",.02)

 ;;43806041140

 ;;9002226.02101,"786,43806041240 ",.01)

 ;;43806041240

 ;;9002226.02101,"786,43806041240 ",.02)

 ;;43806041240

 ;;9002226.02101,"786,43806067035 ",.01)

 ;;43806067035

 ;;9002226.02101,"786,43806067035 ",.02)

 ;;43806067035

 ;;9002226.02101,"786,43806067041 ",.01)

 ;;43806067041

 ;;9002226.02101,"786,43806067041 ",.02)

 ;;43806067041

 ;;9002226.02101,"786,43806067070 ",.01)

 ;;43806067070

 ;;9002226.02101,"786,43806067070 ",.02)

 ;;43806067070

 ;;9002226.02101,"786,43869415600 ",.01)

 ;;43869415600

 ;;9002226.02101,"786,43869415600 ",.02)

 ;;43869415600

 ;;9002226.02101,"786,45802009301 ",.01)

 ;;45802009301

 ;;9002226.02101,"786,45802009301 ",.02)

 ;;45802009301

 ;;9002226.02101,"786,45802009365 ",.01)

 ;;45802009365

 ;;9002226.02101,"786,45802009365 ",.02)

 ;;45802009365

 ;;9002226.02101,"786,45802009375 ",.01)

 ;;45802009375

 ;;9002226.02101,"786,45802009375 ",.02)

 ;;45802009375

 ;;9002226.02101,"786,45802029265 ",.01)

 ;;45802029265

 ;;9002226.02101,"786,45802029265 ",.02)

 ;;45802029265

 ;;9002226.02101,"786,45802029275 ",.01)

 ;;45802029275

 ;;9002226.02101,"786,45802029275 ",.02)

 ;;45802029275

 ;;9002226.02101,"786,45802038401 ",.01)

 ;;45802038401

 ;;9002226.02101,"786,45802038401 ",.02)

 ;;45802038401

 ;;9002226.02101,"786,45802038465 ",.01)

 ;;45802038465

 ;;9002226.02101,"786,45802038465 ",.02)

 ;;45802038465

 ;;9002226.02101,"786,45802038475 ",.01)

 ;;45802038475

 ;;9002226.02101,"786,45802038475 ",.02)

 ;;45802038475

 ;;9002226.02101,"786,45802038493 ",.01)

 ;;45802038493

 ;;9002226.02101,"786,45802038493 ",.02)

 ;;45802038493

 ;;9002226.02101,"786,45802087901 ",.01)

 ;;45802087901

 ;;9002226.02101,"786,45802087901 ",.02)

 ;;45802087901

 ;;9002226.02101,"786,45802087965 ",.01)

 ;;45802087965

 ;;9002226.02101,"786,45802087965 ",.02)

 ;;45802087965

 ;;9002226.02101,"786,45802087975 ",.01)

 ;;45802087975

 ;;9002226.02101,"786,45802087975 ",.02)

 ;;45802087975

 ;;9002226.02101,"786,45802087993 ",.01)

 ;;45802087993

BGPM3ACV  ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON APR 21, 2011;

 +1       ;;11.0;IHS CLINICAL REPORTING;**4**;JAN 06, 2011;Build 84

 +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,"786,24236064002 ",.02)

 +2       ;;24236064002

 +3       ;;9002226.02101,"786,24236064402 ",.01)

 +4       ;;24236064402

 +5       ;;9002226.02101,"786,24236064402 ",.02)

 +6       ;;24236064402

 +7       ;;9002226.02101,"786,24236067702 ",.01)

 +8       ;;24236067702

 +9       ;;9002226.02101,"786,24236067702 ",.02)

 +10      ;;24236067702

 +11      ;;9002226.02101,"786,24236069502 ",.01)

 +12      ;;24236069502

 +13      ;;9002226.02101,"786,24236069502 ",.02)

 +14      ;;24236069502

 +15      ;;9002226.02101,"786,24236072402 ",.01)

 +16      ;;24236072402

 +17      ;;9002226.02101,"786,24236072402 ",.02)

 +18      ;;24236072402

 +19      ;;9002226.02101,"786,24236074502 ",.01)

 +20      ;;24236074502

 +21      ;;9002226.02101,"786,24236074502 ",.02)

 +22      ;;24236074502

 +23      ;;9002226.02101,"786,24236075602 ",.01)

 +24      ;;24236075602

 +25      ;;9002226.02101,"786,24236075602 ",.02)

 +26      ;;24236075602

 +27      ;;9002226.02101,"786,24236093702 ",.01)

 +28      ;;24236093702

 +29      ;;9002226.02101,"786,24236093702 ",.02)

 +30      ;;24236093702

 +31      ;;9002226.02101,"786,24385073478 ",.01)

 +32      ;;24385073478

 +33      ;;9002226.02101,"786,24385073478 ",.02)

 +34      ;;24385073478

 +35      ;;9002226.02101,"786,24385083978 ",.01)

 +36      ;;24385083978

 +37      ;;9002226.02101,"786,24385083978 ",.02)

 +38      ;;24385083978

 +39      ;;9002226.02101,"786,24658013005 ",.01)

 +40      ;;24658013005

 +41      ;;9002226.02101,"786,24658013005 ",.02)

 +42      ;;24658013005

 +43      ;;9002226.02101,"786,24658013018 ",.01)

 +44      ;;24658013018

 +45      ;;9002226.02101,"786,24658013018 ",.02)

 +46      ;;24658013018

 +47      ;;9002226.02101,"786,24658013060 ",.01)

 +48      ;;24658013060

 +49      ;;9002226.02101,"786,24658013060 ",.02)

 +50      ;;24658013060

 +51      ;;9002226.02101,"786,24658021010 ",.01)

 +52      ;;24658021010

 +53      ;;9002226.02101,"786,24658021010 ",.02)

 +54      ;;24658021010

 +55      ;;9002226.02101,"786,24658021030 ",.01)

 +56      ;;24658021030

 +57      ;;9002226.02101,"786,24658021030 ",.02)

 +58      ;;24658021030

 +59      ;;9002226.02101,"786,24658021045 ",.01)

 +60      ;;24658021045

 +61      ;;9002226.02101,"786,24658021045 ",.02)

 +62      ;;24658021045

 +63      ;;9002226.02101,"786,24658021090 ",.01)

 +64      ;;24658021090

 +65      ;;9002226.02101,"786,24658021090 ",.02)

 +66      ;;24658021090

 +67      ;;9002226.02101,"786,24658021110 ",.01)

 +68      ;;24658021110

 +69      ;;9002226.02101,"786,24658021110 ",.02)

 +70      ;;24658021110

 +71      ;;9002226.02101,"786,24658021130 ",.01)

 +72      ;;24658021130

 +73      ;;9002226.02101,"786,24658021130 ",.02)

 +74      ;;24658021130

 +75      ;;9002226.02101,"786,24658021145 ",.01)

 +76      ;;24658021145

 +77      ;;9002226.02101,"786,24658021145 ",.02)

 +78      ;;24658021145

 +79      ;;9002226.02101,"786,24658021190 ",.01)

 +80      ;;24658021190

 +81      ;;9002226.02101,"786,24658021190 ",.02)

 +82      ;;24658021190

 +83      ;;9002226.02101,"786,24658021210 ",.01)

 +84      ;;24658021210

 +85      ;;9002226.02101,"786,24658021210 ",.02)

 +86      ;;24658021210

 +87      ;;9002226.02101,"786,24658021230 ",.01)

 +88      ;;24658021230

 +89      ;;9002226.02101,"786,24658021230 ",.02)

 +90      ;;24658021230

 +91      ;;9002226.02101,"786,24658021245 ",.01)

 +92      ;;24658021245

 +93      ;;9002226.02101,"786,24658021245 ",.02)

 +94      ;;24658021245

 +95      ;;9002226.02101,"786,24658021290 ",.01)

 +96      ;;24658021290

 +97      ;;9002226.02101,"786,24658021290 ",.02)

 +98      ;;24658021290

 +99      ;;9002226.02101,"786,24658021310 ",.01)

 +100     ;;24658021310

 +101     ;;9002226.02101,"786,24658021310 ",.02)

 +102     ;;24658021310

 +103     ;;9002226.02101,"786,24658021330 ",.01)

 +104     ;;24658021330

 +105     ;;9002226.02101,"786,24658021330 ",.02)

 +106     ;;24658021330

 +107     ;;9002226.02101,"786,24658021345 ",.01)

 +108     ;;24658021345

 +109     ;;9002226.02101,"786,24658021345 ",.02)

 +110     ;;24658021345

 +111     ;;9002226.02101,"786,24658021390 ",.01)

 +112     ;;24658021390

 +113     ;;9002226.02101,"786,24658021390 ",.02)

 +114     ;;24658021390

 +115     ;;9002226.02101,"786,24658021410 ",.01)

 +116     ;;24658021410

 +117     ;;9002226.02101,"786,24658021410 ",.02)

 +118     ;;24658021410

 +119     ;;9002226.02101,"786,24658021430 ",.01)

 +120     ;;24658021430

 +121     ;;9002226.02101,"786,24658021430 ",.02)

 +122     ;;24658021430

 +123     ;;9002226.02101,"786,24658021445 ",.01)

 +124     ;;24658021445

 +125     ;;9002226.02101,"786,24658021445 ",.02)

 +126     ;;24658021445

 +127     ;;9002226.02101,"786,24658021490 ",.01)

 +128     ;;24658021490

 +129     ;;9002226.02101,"786,24658021490 ",.02)

 +130     ;;24658021490

 +131     ;;9002226.02101,"786,26053006401 ",.01)

 +132     ;;26053006401

 +133     ;;9002226.02101,"786,26053006401 ",.02)

 +134     ;;26053006401

 +135     ;;9002226.02101,"786,26053006501 ",.01)

 +136     ;;26053006501

 +137     ;;9002226.02101,"786,26053006501 ",.02)

 +138     ;;26053006501

 +139     ;;9002226.02101,"786,26053006601 ",.01)

 +140     ;;26053006601

 +141     ;;9002226.02101,"786,26053006601 ",.02)

 +142     ;;26053006601

 +143     ;;9002226.02101,"786,26053017701 ",.01)

 +144     ;;26053017701

 +145     ;;9002226.02101,"786,26053017701 ",.02)

 +146     ;;26053017701

 +147     ;;9002226.02101,"786,26053018301 ",.01)

 +148     ;;26053018301

 +149     ;;9002226.02101,"786,26053018301 ",.02)

 +150     ;;26053018301

 +151     ;;9002226.02101,"786,26053031001 ",.01)

 +152     ;;26053031001

 +153     ;;9002226.02101,"786,26053031001 ",.02)

 +154     ;;26053031001

 +155     ;;9002226.02101,"786,26053031201 ",.01)

 +156     ;;26053031201

 +157     ;;9002226.02101,"786,26053031201 ",.02)

 +158     ;;26053031201

 +159     ;;9002226.02101,"786,26053041501 ",.01)

 +160     ;;26053041501

 +161     ;;9002226.02101,"786,26053041501 ",.02)

 +162     ;;26053041501

 +163     ;;9002226.02101,"786,30768000061 ",.01)

 +164     ;;30768000061

 +165     ;;9002226.02101,"786,30768000061 ",.02)

 +166     ;;30768000061

 +167     ;;9002226.02101,"786,31722022505 ",.01)

 +168     ;;31722022505

 +169     ;;9002226.02101,"786,31722022505 ",.02)

 +170     ;;31722022505

 +171     ;;9002226.02101,"786,31722022560 ",.01)

 +172     ;;31722022560

 +173     ;;9002226.02101,"786,31722022560 ",.02)

 +174     ;;31722022560

 +175     ;;9002226.02101,"786,33358015530 ",.01)

 +176     ;;33358015530

 +177     ;;9002226.02101,"786,33358015530 ",.02)

 +178     ;;33358015530

 +179     ;;9002226.02101,"786,33358022330 ",.01)

 +180     ;;33358022330

 +181     ;;9002226.02101,"786,33358022330 ",.02)

 +182     ;;33358022330

 +183     ;;9002226.02101,"786,33358022500 ",.01)

 +184     ;;33358022500

 +185     ;;9002226.02101,"786,33358022500 ",.02)

 +186     ;;33358022500

 +187     ;;9002226.02101,"786,33358022530 ",.01)

 +188     ;;33358022530

 +189     ;;9002226.02101,"786,33358022530 ",.02)

 +190     ;;33358022530

 +191     ;;9002226.02101,"786,33358022560 ",.01)

 +192     ;;33358022560

 +193     ;;9002226.02101,"786,33358022560 ",.02)

 +194     ;;33358022560

 +195     ;;9002226.02101,"786,33358022630 ",.01)

 +196     ;;33358022630

 +197     ;;9002226.02101,"786,33358022630 ",.02)

 +198     ;;33358022630

 +199     ;;9002226.02101,"786,33358043130 ",.01)

 +200     ;;33358043130

 +201     ;;9002226.02101,"786,33358043130 ",.02)

 +202     ;;33358043130

 +203     ;;9002226.02101,"786,37205007878 ",.01)

 +204     ;;37205007878

 +205     ;;9002226.02101,"786,37205007878 ",.02)

 +206     ;;37205007878

 +207     ;;9002226.02101,"786,38245026679 ",.01)

 +208     ;;38245026679

 +209     ;;9002226.02101,"786,38245026679 ",.02)

 +210     ;;38245026679

 +211     ;;9002226.02101,"786,38245026680 ",.01)

 +212     ;;38245026680

 +213     ;;9002226.02101,"786,38245026680 ",.02)

 +214     ;;38245026680

 +215     ;;9002226.02101,"786,38245030028 ",.01)

 +216     ;;38245030028

 +217     ;;9002226.02101,"786,38245030028 ",.02)

 +218     ;;38245030028

 +219     ;;9002226.02101,"786,38245030080 ",.01)

 +220     ;;38245030080

 +221     ;;9002226.02101,"786,38245030080 ",.02)

 +222     ;;38245030080

 +223     ;;9002226.02101,"786,39686001423 ",.01)

 +224     ;;39686001423

 +225     ;;9002226.02101,"786,39686001423 ",.02)

 +226     ;;39686001423

 +227     ;;9002226.02101,"786,42043017009 ",.01)

 +228     ;;42043017009

 +229     ;;9002226.02101,"786,42043017009 ",.02)

 +230     ;;42043017009

 +231     ;;9002226.02101,"786,42043017109 ",.01)

 +232     ;;42043017109

 +233     ;;9002226.02101,"786,42043017109 ",.02)

 +234     ;;42043017109

 +235     ;;9002226.02101,"786,43063000801 ",.01)

 +236     ;;43063000801

 +237     ;;9002226.02101,"786,43063000801 ",.02)

 +238     ;;43063000801

 +239     ;;9002226.02101,"786,43063008030 ",.01)

 +240     ;;43063008030

 +241     ;;9002226.02101,"786,43063008030 ",.02)

 +242     ;;43063008030

 +243     ;;9002226.02101,"786,43063008090 ",.01)

 +244     ;;43063008090

 +245     ;;9002226.02101,"786,43063008090 ",.02)

 +246     ;;43063008090

 +247     ;;9002226.02101,"786,43292012356 ",.01)

 +248     ;;43292012356

 +249     ;;9002226.02101,"786,43292012356 ",.02)

 +250     ;;43292012356

 +251     ;;9002226.02101,"786,43292022328 ",.01)

 +252     ;;43292022328

 +253     ;;9002226.02101,"786,43292022328 ",.02)

 +254     ;;43292022328

 +255     ;;9002226.02101,"786,43292055740 ",.01)

 +256     ;;43292055740

 +257     ;;9002226.02101,"786,43292055740 ",.02)

 +258     ;;43292055740

 +259     ;;9002226.02101,"786,43353000730 ",.01)

 +260     ;;43353000730

 +261     ;;9002226.02101,"786,43353000730 ",.02)

 +262     ;;43353000730

 +263     ;;9002226.02101,"786,43353000733 ",.01)

 +264     ;;43353000733

 +265     ;;9002226.02101,"786,43353000733 ",.02)

 +266     ;;43353000733

 +267     ;;9002226.02101,"786,43353000760 ",.01)

 +268     ;;43353000760

 +269     ;;9002226.02101,"786,43353000760 ",.02)

 +270     ;;43353000760

 +271     ;;9002226.02101,"786,43353009060 ",.01)

 +272     ;;43353009060

 +273     ;;9002226.02101,"786,43353009060 ",.02)

 +274     ;;43353009060

 +275     ;;9002226.02101,"786,43353009080 ",.01)

 +276     ;;43353009080

 +277     ;;9002226.02101,"786,43353009080 ",.02)

 +278     ;;43353009080

 +279     ;;9002226.02101,"786,43353022715 ",.01)

 +280     ;;43353022715

 +281     ;;9002226.02101,"786,43353022715 ",.02)

 +282     ;;43353022715

 +283     ;;9002226.02101,"786,43353022730 ",.01)

 +284     ;;43353022730

 +285     ;;9002226.02101,"786,43353022730 ",.02)

 +286     ;;43353022730

 +287     ;;9002226.02101,"786,43353022745 ",.01)

 +288     ;;43353022745

 +289     ;;9002226.02101,"786,43353022745 ",.02)

 +290     ;;43353022745

 +291     ;;9002226.02101,"786,43353022760 ",.01)

 +292     ;;43353022760

 +293     ;;9002226.02101,"786,43353022760 ",.02)

 +294     ;;43353022760

 +295     ;;9002226.02101,"786,43353022815 ",.01)

 +296     ;;43353022815

 +297     ;;9002226.02101,"786,43353022815 ",.02)

 +298     ;;43353022815

 +299     ;;9002226.02101,"786,43353022830 ",.01)

 +300     ;;43353022830

 +301     ;;9002226.02101,"786,43353022830 ",.02)

 +302     ;;43353022830

 +303     ;;9002226.02101,"786,43353022845 ",.01)

 +304     ;;43353022845

 +305     ;;9002226.02101,"786,43353022845 ",.02)

 +306     ;;43353022845

 +307     ;;9002226.02101,"786,43353022860 ",.01)

 +308     ;;43353022860

 +309     ;;9002226.02101,"786,43353022860 ",.02)

 +310     ;;43353022860

 +311     ;;9002226.02101,"786,43353039460 ",.01)

 +312     ;;43353039460

 +313     ;;9002226.02101,"786,43353039460 ",.02)

 +314     ;;43353039460

 +315     ;;9002226.02101,"786,43353040230 ",.01)

 +316     ;;43353040230

 +317     ;;9002226.02101,"786,43353040230 ",.02)

 +318     ;;43353040230

 +319     ;;9002226.02101,"786,43683015230 ",.01)

 +320     ;;43683015230

 +321     ;;9002226.02101,"786,43683015230 ",.02)

 +322     ;;43683015230

 +323     ;;9002226.02101,"786,43797026903 ",.01)

 +324     ;;43797026903

 +325     ;;9002226.02101,"786,43797026903 ",.02)

 +326     ;;43797026903

 +327     ;;9002226.02101,"786,43806024040 ",.01)

 +328     ;;43806024040

 +329     ;;9002226.02101,"786,43806024040 ",.02)

 +330     ;;43806024040

 +331     ;;9002226.02101,"786,43806038240 ",.01)

 +332     ;;43806038240

 +333     ;;9002226.02101,"786,43806038240 ",.02)

 +334     ;;43806038240

 +335     ;;9002226.02101,"786,43806041140 ",.01)

 +336     ;;43806041140

 +337     ;;9002226.02101,"786,43806041140 ",.02)

 +338     ;;43806041140

 +339     ;;9002226.02101,"786,43806041240 ",.01)

 +340     ;;43806041240

 +341     ;;9002226.02101,"786,43806041240 ",.02)

 +342     ;;43806041240

 +343     ;;9002226.02101,"786,43806067035 ",.01)

 +344     ;;43806067035

 +345     ;;9002226.02101,"786,43806067035 ",.02)

 +346     ;;43806067035

 +347     ;;9002226.02101,"786,43806067041 ",.01)

 +348     ;;43806067041

 +349     ;;9002226.02101,"786,43806067041 ",.02)

 +350     ;;43806067041

 +351     ;;9002226.02101,"786,43806067070 ",.01)

 +352     ;;43806067070

 +353     ;;9002226.02101,"786,43806067070 ",.02)

 +354     ;;43806067070

 +355     ;;9002226.02101,"786,43869415600 ",.01)

 +356     ;;43869415600

 +357     ;;9002226.02101,"786,43869415600 ",.02)

 +358     ;;43869415600

 +359     ;;9002226.02101,"786,45802009301 ",.01)

 +360     ;;45802009301

 +361     ;;9002226.02101,"786,45802009301 ",.02)

 +362     ;;45802009301

 +363     ;;9002226.02101,"786,45802009365 ",.01)

 +364     ;;45802009365

 +365     ;;9002226.02101,"786,45802009365 ",.02)

 +366     ;;45802009365

 +367     ;;9002226.02101,"786,45802009375 ",.01)

 +368     ;;45802009375

 +369     ;;9002226.02101,"786,45802009375 ",.02)

 +370     ;;45802009375

 +371     ;;9002226.02101,"786,45802029265 ",.01)

 +372     ;;45802029265

 +373     ;;9002226.02101,"786,45802029265 ",.02)

 +374     ;;45802029265

 +375     ;;9002226.02101,"786,45802029275 ",.01)

 +376     ;;45802029275

 +377     ;;9002226.02101,"786,45802029275 ",.02)

 +378     ;;45802029275

 +379     ;;9002226.02101,"786,45802038401 ",.01)

 +380     ;;45802038401

 +381     ;;9002226.02101,"786,45802038401 ",.02)

 +382     ;;45802038401

 +383     ;;9002226.02101,"786,45802038465 ",.01)

 +384     ;;45802038465

 +385     ;;9002226.02101,"786,45802038465 ",.02)

 +386     ;;45802038465

 +387     ;;9002226.02101,"786,45802038475 ",.01)

 +388     ;;45802038475

 +389     ;;9002226.02101,"786,45802038475 ",.02)

 +390     ;;45802038475

 +391     ;;9002226.02101,"786,45802038493 ",.01)

 +392     ;;45802038493

 +393     ;;9002226.02101,"786,45802038493 ",.02)

 +394     ;;45802038493

 +395     ;;9002226.02101,"786,45802087901 ",.01)

 +396     ;;45802087901

 +397     ;;9002226.02101,"786,45802087901 ",.02)

 +398     ;;45802087901

 +399     ;;9002226.02101,"786,45802087965 ",.01)

 +400     ;;45802087965

 +401     ;;9002226.02101,"786,45802087965 ",.02)

 +402     ;;45802087965

 +403     ;;9002226.02101,"786,45802087975 ",.01)

 +404     ;;45802087975

 +405     ;;9002226.02101,"786,45802087975 ",.02)

 +406     ;;45802087975

 +407     ;;9002226.02101,"786,45802087993 ",.01)

 +408     ;;45802087993

BGPM3ACV.m