Routine: BGPM3AAZ

BGPM3AAZ ;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)

 ;;21,"67544031815 ")

 ;;1755

 ;;21,"67544031830 ")

 ;;1756

 ;;21,"67544031831 ")

 ;;1757

 ;;21,"67544031845 ")

 ;;1758

 ;;21,"67544031853 ")

 ;;1759

 ;;21,"67544065131 ")

 ;;919

 ;;21,"67544085932 ")

 ;;1517

 ;;21,"67544086032 ")

 ;;1760

 ;;21,"67544091719 ")

 ;;2347

 ;;21,"67544097132 ")

 ;;1761

 ;;21,"67544099030 ")

 ;;2131

 ;;21,"68071020230 ")

 ;;1881

 ;;21,"68080402777 ")

 ;;1882

 ;;21,"68080414677 ")

 ;;1518

 ;;21,"68080414877 ")

 ;;2132

 ;;21,"68084002701 ")

 ;;1883

 ;;21,"68084002711 ")

 ;;1884

 ;;21,"68084014677 ")

 ;;1519

 ;;21,"68084402777 ")

 ;;1885

 ;;21,"68084414777 ")

 ;;1989

 ;;21,"68115003430 ")

 ;;157

 ;;21,"68115003456 ")

 ;;158

 ;;21,"68115003530 ")

 ;;852

 ;;21,"68115003599 ")

 ;;853

 ;;21,"68115035930 ")

 ;;1520

 ;;21,"68115039930 ")

 ;;1762

 ;;21,"68115043320 ")

 ;;433

 ;;21,"68115043330 ")

 ;;434

 ;;21,"68115061436 ")

 ;;780

 ;;21,"68115065900 ")

 ;;2348

 ;;21,"68382005201 ")

 ;;1521

 ;;21,"68382005210 ")

 ;;1522

 ;;21,"68382005301 ")

 ;;1763

 ;;21,"68382005310 ")

 ;;1764

 ;;21,"68382005401 ")

 ;;1990

 ;;21,"68382005410 ")

 ;;1991

 ;;21,"68382005501 ")

 ;;2133

 ;;21,"68382005510 ")

 ;;2134

 ;;21,"68382005601 ")

 ;;2349

 ;;21,"68382005610 ")

 ;;2350

 ;;21,"68382005701 ")

 ;;2444

 ;;21,"68382005710 ")

 ;;2445

 ;;21,"68382005801 ")

 ;;2510

 ;;21,"68382005901 ")

 ;;1585

 ;;21,"68382006401 ")

 ;;1886

 ;;21,"68382006410 ")

 ;;1887

 ;;21,"70030041190 ")

 ;;435

 ;;21,"70030041687 ")

 ;;159

 ;;21,"70030046768 ")

 ;;781

 ;;21,"70030064278 ")

 ;;436

 ;;9002226,775,.01)

 ;;BGPMU ANTITHROMBOTIC NDCS

 ;;9002226,775,.02)

 ;;Drug Anthrombotic NDCs

 ;;9002226,775,.04)

;;n

 ;;9002226,775,.06)

;;@

 ;;9002226,775,.08)

;;@

 ;;9002226,775,.09)

 ;;3110217

 ;;9002226,775,.11)

;;@

 ;;9002226,775,.12)

;;@

 ;;9002226,775,.13)

;;1

 ;;9002226,775,.14)

;;@

 ;;9002226,775,.15)

;;@

 ;;9002226,775,.16)

;;@

 ;;9002226,775,.17)

;;@

 ;;9002226,775,3101)

;;@

 ;;9002226.02101,"775,00002012502 ",.01)

 ;;00002012502

 ;;9002226.02101,"775,00002012502 ",.02)

 ;;00002012502

 ;;9002226.02101,"775,00002012504 ",.01)

 ;;00002012504

 ;;9002226.02101,"775,00002012504 ",.02)

 ;;00002012504

 ;;9002226.02101,"775,00002013202 ",.01)

 ;;00002013202

 ;;9002226.02101,"775,00002013202 ",.02)

 ;;00002013202

 ;;9002226.02101,"775,00002013204 ",.01)

 ;;00002013204

 ;;9002226.02101,"775,00002013204 ",.02)

 ;;00002013204

 ;;9002226.02101,"775,00002061102 ",.01)

 ;;00002061102

 ;;9002226.02101,"775,00002061102 ",.02)

 ;;00002061102

 ;;9002226.02101,"775,00002200502 ",.01)

 ;;00002200502

 ;;9002226.02101,"775,00002200502 ",.02)

 ;;00002200502

 ;;9002226.02101,"775,00002200533 ",.01)

 ;;00002200533

 ;;9002226.02101,"775,00002200533 ",.02)

 ;;00002200533

 ;;9002226.02101,"775,00002721601 ",.01)

 ;;00002721601

 ;;9002226.02101,"775,00002721601 ",.02)

 ;;00002721601

 ;;9002226.02101,"775,00002721701 ",.01)

 ;;00002721701

 ;;9002226.02101,"775,00002721701 ",.02)

 ;;00002721701

 ;;9002226.02101,"775,00003296320 ",.01)

 ;;00003296320

 ;;9002226.02101,"775,00003296320 ",.02)

 ;;00003296320

 ;;9002226.02101,"775,00007440701 ",.01)

 ;;00007440701

 ;;9002226.02101,"775,00007440701 ",.02)

 ;;00007440701

 ;;9002226.02101,"775,00007440754 ",.01)

 ;;00007440754

 ;;9002226.02101,"775,00007440754 ",.02)

 ;;00007440754

 ;;9002226.02101,"775,00008027501 ",.01)

 ;;00008027501

 ;;9002226.02101,"775,00008027501 ",.02)

 ;;00008027501

 ;;9002226.02101,"775,00008027502 ",.01)

 ;;00008027502

 ;;9002226.02101,"775,00008027502 ",.02)

 ;;00008027502

 ;;9002226.02101,"775,00008027550 ",.01)

 ;;00008027550

 ;;9002226.02101,"775,00008027550 ",.02)

 ;;00008027550

 ;;9002226.02101,"775,00008027601 ",.01)

 ;;00008027601

 ;;9002226.02101,"775,00008027601 ",.02)

 ;;00008027601

 ;;9002226.02101,"775,00008027701 ",.01)

 ;;00008027701

 ;;9002226.02101,"775,00008027701 ",.02)

 ;;00008027701

 ;;9002226.02101,"775,00008027702 ",.01)

 ;;00008027702

 ;;9002226.02101,"775,00008027702 ",.02)

 ;;00008027702

 ;;9002226.02101,"775,00008027703 ",.01)

 ;;00008027703

 ;;9002226.02101,"775,00008027703 ",.02)

 ;;00008027703

 ;;9002226.02101,"775,00008027801 ",.01)

 ;;00008027801

 ;;9002226.02101,"775,00008027801 ",.02)

 ;;00008027801

 ;;9002226.02101,"775,00008027802 ",.01)

 ;;00008027802

 ;;9002226.02101,"775,00008027802 ",.02)

 ;;00008027802

 ;;9002226.02101,"775,00008029301 ",.01)

 ;;00008029301

 ;;9002226.02101,"775,00008029301 ",.02)

 ;;00008029301

 ;;9002226.02101,"775,00008031302 ",.01)

 ;;00008031302

 ;;9002226.02101,"775,00008031302 ",.02)

 ;;00008031302

 ;;9002226.02101,"775,00008048201 ",.01)

 ;;00008048201

 ;;9002226.02101,"775,00008048201 ",.02)

 ;;00008048201

 ;;9002226.02101,"775,00008048701 ",.01)

 ;;00008048701

 ;;9002226.02101,"775,00008048701 ",.02)

 ;;00008048701

 ;;9002226.02101,"775,00008048703 ",.01)

 ;;00008048703

 ;;9002226.02101,"775,00008048703 ",.02)

 ;;00008048703

 ;;9002226.02101,"775,00008252901 ",.01)

 ;;00008252901

 ;;9002226.02101,"775,00008252901 ",.02)

 ;;00008252901

 ;;9002226.02101,"775,00008252902 ",.01)

 ;;00008252902

 ;;9002226.02101,"775,00008252902 ",.02)

 ;;00008252902

 ;;9002226.02101,"775,00008252903 ",.01)

 ;;00008252903

 ;;9002226.02101,"775,00008252903 ",.02)

 ;;00008252903

 ;;9002226.02101,"775,00008252950 ",.01)

 ;;00008252950

 ;;9002226.02101,"775,00008252950 ",.02)

 ;;00008252950

 ;;9002226.02101,"775,00008252951 ",.01)

 ;;00008252951

 ;;9002226.02101,"775,00008252951 ",.02)

 ;;00008252951

 ;;9002226.02101,"775,00008252952 ",.01)

 ;;00008252952

 ;;9002226.02101,"775,00008252952 ",.02)

 ;;00008252952

 ;;9002226.02101,"775,00009026801 ",.01)

 ;;00009026801

 ;;9002226.02101,"775,00009026801 ",.02)

 ;;00009026801

 ;;9002226.02101,"775,00009026802 ",.01)

 ;;00009026802

 ;;9002226.02101,"775,00009026802 ",.02)

 ;;00009026802

 ;;9002226.02101,"775,00009026807 ",.01)

 ;;00009026807

 ;;9002226.02101,"775,00009026807 ",.02)

 ;;00009026807

 ;;9002226.02101,"775,00009026812 ",.01)

 ;;00009026812

 ;;9002226.02101,"775,00009026812 ",.02)

 ;;00009026812

 ;;9002226.02101,"775,00009029101 ",.01)

 ;;00009029101

 ;;9002226.02101,"775,00009029101 ",.02)

 ;;00009029101

 ;;9002226.02101,"775,00009029102 ",.01)

 ;;00009029102

 ;;9002226.02101,"775,00009029102 ",.02)

 ;;00009029102

 ;;9002226.02101,"775,00009031701 ",.01)

 ;;00009031701

 ;;9002226.02101,"775,00009031701 ",.02)

 ;;00009031701

 ;;9002226.02101,"775,00009031702 ",.01)

 ;;00009031702

 ;;9002226.02101,"775,00009031702 ",.02)

 ;;00009031702

 ;;9002226.02101,"775,00009031708 ",.01)

 ;;00009031708

 ;;9002226.02101,"775,00009031708 ",.02)

 ;;00009031708

 ;;9002226.02101,"775,00009031709 ",.01)

 ;;00009031709

 ;;9002226.02101,"775,00009031709 ",.02)

 ;;00009031709

 ;;9002226.02101,"775,00009031710 ",.01)

 ;;00009031710

 ;;9002226.02101,"775,00009031710 ",.02)

 ;;00009031710

 ;;9002226.02101,"775,00009031711 ",.01)

 ;;00009031711

 ;;9002226.02101,"775,00009031711 ",.02)

 ;;00009031711

 ;;9002226.02101,"775,00024072212 ",.01)

 ;;00024072212

 ;;9002226.02101,"775,00024072212 ",.02)

 ;;00024072212

 ;;9002226.02101,"775,00024072213 ",.01)

 ;;00024072213

 ;;9002226.02101,"775,00024072213 ",.02)

 ;;00024072213

 ;;9002226.02101,"775,00024072216 ",.01)

 ;;00024072216

 ;;9002226.02101,"775,00024072216 ",.02)

 ;;00024072216

 ;;9002226.02101,"775,00024072217 ",.01)

 ;;00024072217

 ;;9002226.02101,"775,00024072217 ",.02)

 ;;00024072217

 ;;9002226.02101,"775,00024072233 ",.01)

 ;;00024072233

 ;;9002226.02101,"775,00024072233 ",.02)

 ;;00024072233

 ;;9002226.02101,"775,00024073302 ",.01)

 ;;00024073302

 ;;9002226.02101,"775,00024073302 ",.02)

 ;;00024073302

 ;;9002226.02101,"775,00024073303 ",.01)

 ;;00024073303

 ;;9002226.02101,"775,00024073303 ",.02)

 ;;00024073303

 ;;9002226.02101,"775,00024073304 ",.01)

 ;;00024073304

 ;;9002226.02101,"775,00024073304 ",.02)

 ;;00024073304

 ;;9002226.02101,"775,00024073305 ",.01)

 ;;00024073305

 ;;9002226.02101,"775,00024073305 ",.02)

 ;;00024073305

 ;;9002226.02101,"775,00024073312 ",.01)

 ;;00024073312

 ;;9002226.02101,"775,00024073312 ",.02)

 ;;00024073312

 ;;9002226.02101,"775,00024073357 ",.01)

 ;;00024073357

 ;;9002226.02101,"775,00024073357 ",.02)

 ;;00024073357

 ;;9002226.02101,"775,00024074212 ",.01)

 ;;00024074212

 ;;9002226.02101,"775,00024074212 ",.02)

 ;;00024074212

 ;;9002226.02101,"775,00024102506 ",.01)

 ;;00024102506

 ;;9002226.02101,"775,00024102506 ",.02)

 ;;00024102506

 ;;9002226.02101,"775,00047060632 ",.01)

 ;;00047060632

 ;;9002226.02101,"775,00047060632 ",.02)

 ;;00047060632

 ;;9002226.02101,"775,00047060640 ",.01)

 ;;00047060640

 ;;9002226.02101,"775,00047060640 ",.02)

 ;;00047060640

 ;;9002226.02101,"775,00047060641 ",.01)

 ;;00047060641

 ;;9002226.02101,"775,00047060641 ",.02)

 ;;00047060641

 ;;9002226.02101,"775,00052081110 ",.01)

 ;;00052081110

 ;;9002226.02101,"775,00052081110 ",.02)

 ;;00052081110

 ;;9002226.02101,"775,00052081175 ",.01)

 ;;00052081175

 ;;9002226.02101,"775,00052081175 ",.02)

 ;;00052081175

 ;;9002226.02101,"775,00052081210 ",.01)

 ;;00052081210

 ;;9002226.02101,"775,00052081210 ",.02)

 ;;00052081210

 ;;9002226.02101,"775,00052081225 ",.01)

 ;;00052081225

 ;;9002226.02101,"775,00052081225 ",.02)

 ;;00052081225

 ;;9002226.02101,"775,00052081250 ",.01)

 ;;00052081250

 ;;9002226.02101,"775,00052081250 ",.02)

 ;;00052081250

 ;;9002226.02101,"775,00052081302 ",.01)

 ;;00052081302

 ;;9002226.02101,"775,00052081302 ",.02)

 ;;00052081302

 ;;9002226.02101,"775,00052081305 ",.01)

 ;;00052081305

 ;;9002226.02101,"775,00052081305 ",.02)

 ;;00052081305

 ;;9002226.02101,"775,00052081325 ",.01)

 ;;00052081325

 ;;9002226.02101,"775,00052081325 ",.02)

 ;;00052081325

 ;;9002226.02101,"775,00052081504 ",.01)

 ;;00052081504

 ;;9002226.02101,"775,00052081504 ",.02)

 ;;00052081504

 ;;9002226.02101,"775,00052081525 ",.01)

 ;;00052081525

 ;;9002226.02101,"775,00052081525 ",.02)

 ;;00052081525

 ;;9002226.02101,"775,00052081550 ",.01)

 ;;00052081550

 ;;9002226.02101,"775,00052081550 ",.02)

 ;;00052081550

 ;;9002226.02101,"775,00052081625 ",.01)

 ;;00052081625

 ;;9002226.02101,"775,00052081625 ",.02)

 ;;00052081625

 ;;9002226.02101,"775,00056017170 ",.01)

 ;;00056017170

 ;;9002226.02101,"775,00056017170 ",.02)

 ;;00056017170

 ;;9002226.02101,"775,00056017175 ",.01)

 ;;00056017175

 ;;9002226.02101,"775,00056017175 ",.02)

 ;;00056017175

 ;;9002226.02101,"775,00056017190 ",.01)

 ;;00056017190

 ;;9002226.02101,"775,00056017190 ",.02)

 ;;00056017190

 ;;9002226.02101,"775,00067014582 ",.01)

 ;;00067014582

 ;;9002226.02101,"775,00067014582 ",.02)

 ;;00067014582

 ;;9002226.02101,"775,00074115212 ",.01)

 ;;00074115212

 ;;9002226.02101,"775,00074115212 ",.02)

 ;;00074115212

 ;;9002226.02101,"775,00074115214 ",.01)

 ;;00074115214

 ;;9002226.02101,"775,00074115214 ",.02)

 ;;00074115214

 ;;9002226.02101,"775,00074115270 ",.01)

 ;;00074115270

 ;;9002226.02101,"775,00074115270 ",.02)

 ;;00074115270

 ;;9002226.02101,"775,00074115271 ",.01)

 ;;00074115271

 ;;9002226.02101,"775,00074115271 ",.02)

 ;;00074115271

 ;;9002226.02101,"775,00074115273 ",.01)

 ;;00074115273

 ;;9002226.02101,"775,00074115273 ",.02)

 ;;00074115273

 ;;9002226.02101,"775,00074115278 ",.01)

 ;;00074115278

 ;;9002226.02101,"775,00074115278 ",.02)

 ;;00074115278

 ;;9002226.02101,"775,00074128125 ",.01)

 ;;00074128125

 ;;9002226.02101,"775,00074128125 ",.02)

 ;;00074128125

 ;;9002226.02101,"775,00074131602 ",.01)

 ;;00074131602

 ;;9002226.02101,"775,00074131602 ",.02)

 ;;00074131602

BGPM3AAZ  ;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       ;;21,"67544031815 ")

 +2       ;;1755

 +3       ;;21,"67544031830 ")

 +4       ;;1756

 +5       ;;21,"67544031831 ")

 +6       ;;1757

 +7       ;;21,"67544031845 ")

 +8       ;;1758

 +9       ;;21,"67544031853 ")

 +10      ;;1759

 +11      ;;21,"67544065131 ")

 +12      ;;919

 +13      ;;21,"67544085932 ")

 +14      ;;1517

 +15      ;;21,"67544086032 ")

 +16      ;;1760

 +17      ;;21,"67544091719 ")

 +18      ;;2347

 +19      ;;21,"67544097132 ")

 +20      ;;1761

 +21      ;;21,"67544099030 ")

 +22      ;;2131

 +23      ;;21,"68071020230 ")

 +24      ;;1881

 +25      ;;21,"68080402777 ")

 +26      ;;1882

 +27      ;;21,"68080414677 ")

 +28      ;;1518

 +29      ;;21,"68080414877 ")

 +30      ;;2132

 +31      ;;21,"68084002701 ")

 +32      ;;1883

 +33      ;;21,"68084002711 ")

 +34      ;;1884

 +35      ;;21,"68084014677 ")

 +36      ;;1519

 +37      ;;21,"68084402777 ")

 +38      ;;1885

 +39      ;;21,"68084414777 ")

 +40      ;;1989

 +41      ;;21,"68115003430 ")

 +42      ;;157

 +43      ;;21,"68115003456 ")

 +44      ;;158

 +45      ;;21,"68115003530 ")

 +46      ;;852

 +47      ;;21,"68115003599 ")

 +48      ;;853

 +49      ;;21,"68115035930 ")

 +50      ;;1520

 +51      ;;21,"68115039930 ")

 +52      ;;1762

 +53      ;;21,"68115043320 ")

 +54      ;;433

 +55      ;;21,"68115043330 ")

 +56      ;;434

 +57      ;;21,"68115061436 ")

 +58      ;;780

 +59      ;;21,"68115065900 ")

 +60      ;;2348

 +61      ;;21,"68382005201 ")

 +62      ;;1521

 +63      ;;21,"68382005210 ")

 +64      ;;1522

 +65      ;;21,"68382005301 ")

 +66      ;;1763

 +67      ;;21,"68382005310 ")

 +68      ;;1764

 +69      ;;21,"68382005401 ")

 +70      ;;1990

 +71      ;;21,"68382005410 ")

 +72      ;;1991

 +73      ;;21,"68382005501 ")

 +74      ;;2133

 +75      ;;21,"68382005510 ")

 +76      ;;2134

 +77      ;;21,"68382005601 ")

 +78      ;;2349

 +79      ;;21,"68382005610 ")

 +80      ;;2350

 +81      ;;21,"68382005701 ")

 +82      ;;2444

 +83      ;;21,"68382005710 ")

 +84      ;;2445

 +85      ;;21,"68382005801 ")

 +86      ;;2510

 +87      ;;21,"68382005901 ")

 +88      ;;1585

 +89      ;;21,"68382006401 ")

 +90      ;;1886

 +91      ;;21,"68382006410 ")

 +92      ;;1887

 +93      ;;21,"70030041190 ")

 +94      ;;435

 +95      ;;21,"70030041687 ")

 +96      ;;159

 +97      ;;21,"70030046768 ")

 +98      ;;781

 +99      ;;21,"70030064278 ")

 +100     ;;436

 +101     ;;9002226,775,.01)

 +102     ;;BGPMU ANTITHROMBOTIC NDCS

 +103     ;;9002226,775,.02)

 +104     ;;Drug Anthrombotic NDCs

 +105     ;;9002226,775,.04)

 +106     ;;n

 +107     ;;9002226,775,.06)

 +108     ;;@

 +109     ;;9002226,775,.08)

 +110     ;;@

 +111     ;;9002226,775,.09)

 +112     ;;3110217

 +113     ;;9002226,775,.11)

 +114     ;;@

 +115     ;;9002226,775,.12)

 +116     ;;@

 +117     ;;9002226,775,.13)

 +118     ;;1

 +119     ;;9002226,775,.14)

 +120     ;;@

 +121     ;;9002226,775,.15)

 +122     ;;@

 +123     ;;9002226,775,.16)

 +124     ;;@

 +125     ;;9002226,775,.17)

 +126     ;;@

 +127     ;;9002226,775,3101)

 +128     ;;@

 +129     ;;9002226.02101,"775,00002012502 ",.01)

 +130     ;;00002012502

 +131     ;;9002226.02101,"775,00002012502 ",.02)

 +132     ;;00002012502

 +133     ;;9002226.02101,"775,00002012504 ",.01)

 +134     ;;00002012504

 +135     ;;9002226.02101,"775,00002012504 ",.02)

 +136     ;;00002012504

 +137     ;;9002226.02101,"775,00002013202 ",.01)

 +138     ;;00002013202

 +139     ;;9002226.02101,"775,00002013202 ",.02)

 +140     ;;00002013202

 +141     ;;9002226.02101,"775,00002013204 ",.01)

 +142     ;;00002013204

 +143     ;;9002226.02101,"775,00002013204 ",.02)

 +144     ;;00002013204

 +145     ;;9002226.02101,"775,00002061102 ",.01)

 +146     ;;00002061102

 +147     ;;9002226.02101,"775,00002061102 ",.02)

 +148     ;;00002061102

 +149     ;;9002226.02101,"775,00002200502 ",.01)

 +150     ;;00002200502

 +151     ;;9002226.02101,"775,00002200502 ",.02)

 +152     ;;00002200502

 +153     ;;9002226.02101,"775,00002200533 ",.01)

 +154     ;;00002200533

 +155     ;;9002226.02101,"775,00002200533 ",.02)

 +156     ;;00002200533

 +157     ;;9002226.02101,"775,00002721601 ",.01)

 +158     ;;00002721601

 +159     ;;9002226.02101,"775,00002721601 ",.02)

 +160     ;;00002721601

 +161     ;;9002226.02101,"775,00002721701 ",.01)

 +162     ;;00002721701

 +163     ;;9002226.02101,"775,00002721701 ",.02)

 +164     ;;00002721701

 +165     ;;9002226.02101,"775,00003296320 ",.01)

 +166     ;;00003296320

 +167     ;;9002226.02101,"775,00003296320 ",.02)

 +168     ;;00003296320

 +169     ;;9002226.02101,"775,00007440701 ",.01)

 +170     ;;00007440701

 +171     ;;9002226.02101,"775,00007440701 ",.02)

 +172     ;;00007440701

 +173     ;;9002226.02101,"775,00007440754 ",.01)

 +174     ;;00007440754

 +175     ;;9002226.02101,"775,00007440754 ",.02)

 +176     ;;00007440754

 +177     ;;9002226.02101,"775,00008027501 ",.01)

 +178     ;;00008027501

 +179     ;;9002226.02101,"775,00008027501 ",.02)

 +180     ;;00008027501

 +181     ;;9002226.02101,"775,00008027502 ",.01)

 +182     ;;00008027502

 +183     ;;9002226.02101,"775,00008027502 ",.02)

 +184     ;;00008027502

 +185     ;;9002226.02101,"775,00008027550 ",.01)

 +186     ;;00008027550

 +187     ;;9002226.02101,"775,00008027550 ",.02)

 +188     ;;00008027550

 +189     ;;9002226.02101,"775,00008027601 ",.01)

 +190     ;;00008027601

 +191     ;;9002226.02101,"775,00008027601 ",.02)

 +192     ;;00008027601

 +193     ;;9002226.02101,"775,00008027701 ",.01)

 +194     ;;00008027701

 +195     ;;9002226.02101,"775,00008027701 ",.02)

 +196     ;;00008027701

 +197     ;;9002226.02101,"775,00008027702 ",.01)

 +198     ;;00008027702

 +199     ;;9002226.02101,"775,00008027702 ",.02)

 +200     ;;00008027702

 +201     ;;9002226.02101,"775,00008027703 ",.01)

 +202     ;;00008027703

 +203     ;;9002226.02101,"775,00008027703 ",.02)

 +204     ;;00008027703

 +205     ;;9002226.02101,"775,00008027801 ",.01)

 +206     ;;00008027801

 +207     ;;9002226.02101,"775,00008027801 ",.02)

 +208     ;;00008027801

 +209     ;;9002226.02101,"775,00008027802 ",.01)

 +210     ;;00008027802

 +211     ;;9002226.02101,"775,00008027802 ",.02)

 +212     ;;00008027802

 +213     ;;9002226.02101,"775,00008029301 ",.01)

 +214     ;;00008029301

 +215     ;;9002226.02101,"775,00008029301 ",.02)

 +216     ;;00008029301

 +217     ;;9002226.02101,"775,00008031302 ",.01)

 +218     ;;00008031302

 +219     ;;9002226.02101,"775,00008031302 ",.02)

 +220     ;;00008031302

 +221     ;;9002226.02101,"775,00008048201 ",.01)

 +222     ;;00008048201

 +223     ;;9002226.02101,"775,00008048201 ",.02)

 +224     ;;00008048201

 +225     ;;9002226.02101,"775,00008048701 ",.01)

 +226     ;;00008048701

 +227     ;;9002226.02101,"775,00008048701 ",.02)

 +228     ;;00008048701

 +229     ;;9002226.02101,"775,00008048703 ",.01)

 +230     ;;00008048703

 +231     ;;9002226.02101,"775,00008048703 ",.02)

 +232     ;;00008048703

 +233     ;;9002226.02101,"775,00008252901 ",.01)

 +234     ;;00008252901

 +235     ;;9002226.02101,"775,00008252901 ",.02)

 +236     ;;00008252901

 +237     ;;9002226.02101,"775,00008252902 ",.01)

 +238     ;;00008252902

 +239     ;;9002226.02101,"775,00008252902 ",.02)

 +240     ;;00008252902

 +241     ;;9002226.02101,"775,00008252903 ",.01)

 +242     ;;00008252903

 +243     ;;9002226.02101,"775,00008252903 ",.02)

 +244     ;;00008252903

 +245     ;;9002226.02101,"775,00008252950 ",.01)

 +246     ;;00008252950

 +247     ;;9002226.02101,"775,00008252950 ",.02)

 +248     ;;00008252950

 +249     ;;9002226.02101,"775,00008252951 ",.01)

 +250     ;;00008252951

 +251     ;;9002226.02101,"775,00008252951 ",.02)

 +252     ;;00008252951

 +253     ;;9002226.02101,"775,00008252952 ",.01)

 +254     ;;00008252952

 +255     ;;9002226.02101,"775,00008252952 ",.02)

 +256     ;;00008252952

 +257     ;;9002226.02101,"775,00009026801 ",.01)

 +258     ;;00009026801

 +259     ;;9002226.02101,"775,00009026801 ",.02)

 +260     ;;00009026801

 +261     ;;9002226.02101,"775,00009026802 ",.01)

 +262     ;;00009026802

 +263     ;;9002226.02101,"775,00009026802 ",.02)

 +264     ;;00009026802

 +265     ;;9002226.02101,"775,00009026807 ",.01)

 +266     ;;00009026807

 +267     ;;9002226.02101,"775,00009026807 ",.02)

 +268     ;;00009026807

 +269     ;;9002226.02101,"775,00009026812 ",.01)

 +270     ;;00009026812

 +271     ;;9002226.02101,"775,00009026812 ",.02)

 +272     ;;00009026812

 +273     ;;9002226.02101,"775,00009029101 ",.01)

 +274     ;;00009029101

 +275     ;;9002226.02101,"775,00009029101 ",.02)

 +276     ;;00009029101

 +277     ;;9002226.02101,"775,00009029102 ",.01)

 +278     ;;00009029102

 +279     ;;9002226.02101,"775,00009029102 ",.02)

 +280     ;;00009029102

 +281     ;;9002226.02101,"775,00009031701 ",.01)

 +282     ;;00009031701

 +283     ;;9002226.02101,"775,00009031701 ",.02)

 +284     ;;00009031701

 +285     ;;9002226.02101,"775,00009031702 ",.01)

 +286     ;;00009031702

 +287     ;;9002226.02101,"775,00009031702 ",.02)

 +288     ;;00009031702

 +289     ;;9002226.02101,"775,00009031708 ",.01)

 +290     ;;00009031708

 +291     ;;9002226.02101,"775,00009031708 ",.02)

 +292     ;;00009031708

 +293     ;;9002226.02101,"775,00009031709 ",.01)

 +294     ;;00009031709

 +295     ;;9002226.02101,"775,00009031709 ",.02)

 +296     ;;00009031709

 +297     ;;9002226.02101,"775,00009031710 ",.01)

 +298     ;;00009031710

 +299     ;;9002226.02101,"775,00009031710 ",.02)

 +300     ;;00009031710

 +301     ;;9002226.02101,"775,00009031711 ",.01)

 +302     ;;00009031711

 +303     ;;9002226.02101,"775,00009031711 ",.02)

 +304     ;;00009031711

 +305     ;;9002226.02101,"775,00024072212 ",.01)

 +306     ;;00024072212

 +307     ;;9002226.02101,"775,00024072212 ",.02)

 +308     ;;00024072212

 +309     ;;9002226.02101,"775,00024072213 ",.01)

 +310     ;;00024072213

 +311     ;;9002226.02101,"775,00024072213 ",.02)

 +312     ;;00024072213

 +313     ;;9002226.02101,"775,00024072216 ",.01)

 +314     ;;00024072216

 +315     ;;9002226.02101,"775,00024072216 ",.02)

 +316     ;;00024072216

 +317     ;;9002226.02101,"775,00024072217 ",.01)

 +318     ;;00024072217

 +319     ;;9002226.02101,"775,00024072217 ",.02)

 +320     ;;00024072217

 +321     ;;9002226.02101,"775,00024072233 ",.01)

 +322     ;;00024072233

 +323     ;;9002226.02101,"775,00024072233 ",.02)

 +324     ;;00024072233

 +325     ;;9002226.02101,"775,00024073302 ",.01)

 +326     ;;00024073302

 +327     ;;9002226.02101,"775,00024073302 ",.02)

 +328     ;;00024073302

 +329     ;;9002226.02101,"775,00024073303 ",.01)

 +330     ;;00024073303

 +331     ;;9002226.02101,"775,00024073303 ",.02)

 +332     ;;00024073303

 +333     ;;9002226.02101,"775,00024073304 ",.01)

 +334     ;;00024073304

 +335     ;;9002226.02101,"775,00024073304 ",.02)

 +336     ;;00024073304

 +337     ;;9002226.02101,"775,00024073305 ",.01)

 +338     ;;00024073305

 +339     ;;9002226.02101,"775,00024073305 ",.02)

 +340     ;;00024073305

 +341     ;;9002226.02101,"775,00024073312 ",.01)

 +342     ;;00024073312

 +343     ;;9002226.02101,"775,00024073312 ",.02)

 +344     ;;00024073312

 +345     ;;9002226.02101,"775,00024073357 ",.01)

 +346     ;;00024073357

 +347     ;;9002226.02101,"775,00024073357 ",.02)

 +348     ;;00024073357

 +349     ;;9002226.02101,"775,00024074212 ",.01)

 +350     ;;00024074212

 +351     ;;9002226.02101,"775,00024074212 ",.02)

 +352     ;;00024074212

 +353     ;;9002226.02101,"775,00024102506 ",.01)

 +354     ;;00024102506

 +355     ;;9002226.02101,"775,00024102506 ",.02)

 +356     ;;00024102506

 +357     ;;9002226.02101,"775,00047060632 ",.01)

 +358     ;;00047060632

 +359     ;;9002226.02101,"775,00047060632 ",.02)

 +360     ;;00047060632

 +361     ;;9002226.02101,"775,00047060640 ",.01)

 +362     ;;00047060640

 +363     ;;9002226.02101,"775,00047060640 ",.02)

 +364     ;;00047060640

 +365     ;;9002226.02101,"775,00047060641 ",.01)

 +366     ;;00047060641

 +367     ;;9002226.02101,"775,00047060641 ",.02)

 +368     ;;00047060641

 +369     ;;9002226.02101,"775,00052081110 ",.01)

 +370     ;;00052081110

 +371     ;;9002226.02101,"775,00052081110 ",.02)

 +372     ;;00052081110

 +373     ;;9002226.02101,"775,00052081175 ",.01)

 +374     ;;00052081175

 +375     ;;9002226.02101,"775,00052081175 ",.02)

 +376     ;;00052081175

 +377     ;;9002226.02101,"775,00052081210 ",.01)

 +378     ;;00052081210

 +379     ;;9002226.02101,"775,00052081210 ",.02)

 +380     ;;00052081210

 +381     ;;9002226.02101,"775,00052081225 ",.01)

 +382     ;;00052081225

 +383     ;;9002226.02101,"775,00052081225 ",.02)

 +384     ;;00052081225

 +385     ;;9002226.02101,"775,00052081250 ",.01)

 +386     ;;00052081250

 +387     ;;9002226.02101,"775,00052081250 ",.02)

 +388     ;;00052081250

 +389     ;;9002226.02101,"775,00052081302 ",.01)

 +390     ;;00052081302

 +391     ;;9002226.02101,"775,00052081302 ",.02)

 +392     ;;00052081302

 +393     ;;9002226.02101,"775,00052081305 ",.01)

 +394     ;;00052081305

 +395     ;;9002226.02101,"775,00052081305 ",.02)

 +396     ;;00052081305

 +397     ;;9002226.02101,"775,00052081325 ",.01)

 +398     ;;00052081325

 +399     ;;9002226.02101,"775,00052081325 ",.02)

 +400     ;;00052081325

 +401     ;;9002226.02101,"775,00052081504 ",.01)

 +402     ;;00052081504

 +403     ;;9002226.02101,"775,00052081504 ",.02)

 +404     ;;00052081504

 +405     ;;9002226.02101,"775,00052081525 ",.01)

 +406     ;;00052081525

 +407     ;;9002226.02101,"775,00052081525 ",.02)

 +408     ;;00052081525

 +409     ;;9002226.02101,"775,00052081550 ",.01)

 +410     ;;00052081550

 +411     ;;9002226.02101,"775,00052081550 ",.02)

 +412     ;;00052081550

 +413     ;;9002226.02101,"775,00052081625 ",.01)

 +414     ;;00052081625

 +415     ;;9002226.02101,"775,00052081625 ",.02)

 +416     ;;00052081625

 +417     ;;9002226.02101,"775,00056017170 ",.01)

 +418     ;;00056017170

 +419     ;;9002226.02101,"775,00056017170 ",.02)

 +420     ;;00056017170

 +421     ;;9002226.02101,"775,00056017175 ",.01)

 +422     ;;00056017175

 +423     ;;9002226.02101,"775,00056017175 ",.02)

 +424     ;;00056017175

 +425     ;;9002226.02101,"775,00056017190 ",.01)

 +426     ;;00056017190

 +427     ;;9002226.02101,"775,00056017190 ",.02)

 +428     ;;00056017190

 +429     ;;9002226.02101,"775,00067014582 ",.01)

 +430     ;;00067014582

 +431     ;;9002226.02101,"775,00067014582 ",.02)

 +432     ;;00067014582

 +433     ;;9002226.02101,"775,00074115212 ",.01)

 +434     ;;00074115212

 +435     ;;9002226.02101,"775,00074115212 ",.02)

 +436     ;;00074115212

 +437     ;;9002226.02101,"775,00074115214 ",.01)

 +438     ;;00074115214

 +439     ;;9002226.02101,"775,00074115214 ",.02)

 +440     ;;00074115214

 +441     ;;9002226.02101,"775,00074115270 ",.01)

 +442     ;;00074115270

 +443     ;;9002226.02101,"775,00074115270 ",.02)

 +444     ;;00074115270

 +445     ;;9002226.02101,"775,00074115271 ",.01)

 +446     ;;00074115271

 +447     ;;9002226.02101,"775,00074115271 ",.02)

 +448     ;;00074115271

 +449     ;;9002226.02101,"775,00074115273 ",.01)

 +450     ;;00074115273

 +451     ;;9002226.02101,"775,00074115273 ",.02)

 +452     ;;00074115273

 +453     ;;9002226.02101,"775,00074115278 ",.01)

 +454     ;;00074115278

 +455     ;;9002226.02101,"775,00074115278 ",.02)

 +456     ;;00074115278

 +457     ;;9002226.02101,"775,00074128125 ",.01)

 +458     ;;00074128125

 +459     ;;9002226.02101,"775,00074128125 ",.02)

 +460     ;;00074128125

 +461     ;;9002226.02101,"775,00074131602 ",.01)

 +462     ;;00074131602

 +463     ;;9002226.02101,"775,00074131602 ",.02)

 +464     ;;00074131602

BGPM3AAZ.m