Routine: BGPM5BDU

BGPM5BDU ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON SEP 12, 2011;

 ;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106

START ;

 K:'$G(ATXPGMC) ^TMP("ATX",$J)

 S ATXPGMC=$G(ATXPGMC)+1

 F ATXI=1:1 S X=$P($T(TMP+ATXI),";;",2,99) Q:X=""  S X="^TMP(""ATX"",$J,"_X,ATXI=ATXI+1,Y=$P($T(TMP+ATXI),";;",2,99) S @X=Y

TMP ;;TAXONOMY (WITH BULLETIN)

 ;;9002226.02101,"1044,65243038406 ",.02)

 ;;65243038406

 ;;9002226.02101,"1044,65243038409 ",.01)

 ;;65243038409

 ;;9002226.02101,"1044,65243038409 ",.02)

 ;;65243038409

 ;;9002226.02101,"1044,65243038418 ",.01)

 ;;65243038418

 ;;9002226.02101,"1044,65243038418 ",.02)

 ;;65243038418

 ;;9002226.02101,"1044,65243038445 ",.01)

 ;;65243038445

 ;;9002226.02101,"1044,65243038445 ",.02)

 ;;65243038445

 ;;9002226.02101,"1044,65243038603 ",.01)

 ;;65243038603

 ;;9002226.02101,"1044,65243038603 ",.02)

 ;;65243038603

 ;;9002226.02101,"1044,65243038606 ",.01)

 ;;65243038606

 ;;9002226.02101,"1044,65243038606 ",.02)

 ;;65243038606

 ;;9002226.02101,"1044,65243038609 ",.01)

 ;;65243038609

 ;;9002226.02101,"1044,65243038609 ",.02)

 ;;65243038609

 ;;9002226.02101,"1044,65387033504 ",.01)

 ;;65387033504

 ;;9002226.02101,"1044,65387033504 ",.02)

 ;;65387033504

 ;;9002226.02101,"1044,65387033506 ",.01)

 ;;65387033506

 ;;9002226.02101,"1044,65387033506 ",.02)

 ;;65387033506

 ;;9002226.02101,"1044,65387033509 ",.01)

 ;;65387033509

 ;;9002226.02101,"1044,65387033509 ",.02)

 ;;65387033509

 ;;9002226.02101,"1044,65427049201 ",.01)

 ;;65427049201

 ;;9002226.02101,"1044,65427049201 ",.02)

 ;;65427049201

 ;;9002226.02101,"1044,65427049202 ",.01)

 ;;65427049202

 ;;9002226.02101,"1044,65427049202 ",.02)

 ;;65427049202

 ;;9002226.02101,"1044,65427049203 ",.01)

 ;;65427049203

 ;;9002226.02101,"1044,65427049203 ",.02)

 ;;65427049203

 ;;9002226.02101,"1044,65427049204 ",.01)

 ;;65427049204

 ;;9002226.02101,"1044,65427049204 ",.02)

 ;;65427049204

 ;;9002226.02101,"1044,65427049205 ",.01)

 ;;65427049205

 ;;9002226.02101,"1044,65427049205 ",.02)

 ;;65427049205

 ;;9002226.02101,"1044,65427049301 ",.01)

 ;;65427049301

 ;;9002226.02101,"1044,65427049301 ",.02)

 ;;65427049301

 ;;9002226.02101,"1044,65427049302 ",.01)

 ;;65427049302

 ;;9002226.02101,"1044,65427049302 ",.02)

 ;;65427049302

 ;;9002226.02101,"1044,65427049303 ",.01)

 ;;65427049303

 ;;9002226.02101,"1044,65427049303 ",.02)

 ;;65427049303

 ;;9002226.02101,"1044,65427049304 ",.01)

 ;;65427049304

 ;;9002226.02101,"1044,65427049304 ",.02)

 ;;65427049304

 ;;9002226.02101,"1044,65427049305 ",.01)

 ;;65427049305

 ;;9002226.02101,"1044,65427049305 ",.02)

 ;;65427049305

 ;;9002226.02101,"1044,65427049701 ",.01)

 ;;65427049701

 ;;9002226.02101,"1044,65427049701 ",.02)

 ;;65427049701

 ;;9002226.02101,"1044,65427049702 ",.01)

 ;;65427049702

 ;;9002226.02101,"1044,65427049702 ",.02)

 ;;65427049702

 ;;9002226.02101,"1044,65427049703 ",.01)

 ;;65427049703

 ;;9002226.02101,"1044,65427049703 ",.02)

 ;;65427049703

 ;;9002226.02101,"1044,65427049704 ",.01)

 ;;65427049704

 ;;9002226.02101,"1044,65427049704 ",.02)

 ;;65427049704

 ;;9002226.02101,"1044,65427049705 ",.01)

 ;;65427049705

 ;;9002226.02101,"1044,65427049705 ",.02)

 ;;65427049705

 ;;9002226.02101,"1044,65580030103 ",.01)

 ;;65580030103

 ;;9002226.02101,"1044,65580030103 ",.02)

 ;;65580030103

 ;;9002226.02101,"1044,65580030109 ",.01)

 ;;65580030109

 ;;9002226.02101,"1044,65580030109 ",.02)

 ;;65580030109

 ;;9002226.02101,"1044,65580030203 ",.01)

 ;;65580030203

 ;;9002226.02101,"1044,65580030203 ",.02)

 ;;65580030203

 ;;9002226.02101,"1044,65580030209 ",.01)

 ;;65580030209

 ;;9002226.02101,"1044,65580030209 ",.02)

 ;;65580030209

 ;;9002226.02101,"1044,65580030303 ",.01)

 ;;65580030303

 ;;9002226.02101,"1044,65580030303 ",.02)

 ;;65580030303

 ;;9002226.02101,"1044,65580030309 ",.01)

 ;;65580030309

 ;;9002226.02101,"1044,65580030309 ",.02)

 ;;65580030309

 ;;9002226.02101,"1044,65580030403 ",.01)

 ;;65580030403

 ;;9002226.02101,"1044,65580030403 ",.02)

 ;;65580030403

 ;;9002226.02101,"1044,65580030409 ",.01)

 ;;65580030409

 ;;9002226.02101,"1044,65580030409 ",.02)

 ;;65580030409

 ;;9002226.02101,"1044,65841009701 ",.01)

 ;;65841009701

 ;;9002226.02101,"1044,65841009701 ",.02)

 ;;65841009701

 ;;9002226.02101,"1044,65841009705 ",.01)

 ;;65841009705

 ;;9002226.02101,"1044,65841009705 ",.02)

 ;;65841009705

 ;;9002226.02101,"1044,65841009706 ",.01)

 ;;65841009706

 ;;9002226.02101,"1044,65841009706 ",.02)

 ;;65841009706

 ;;9002226.02101,"1044,65841009710 ",.01)

 ;;65841009710

 ;;9002226.02101,"1044,65841009710 ",.02)

 ;;65841009710

 ;;9002226.02101,"1044,65841009716 ",.01)

 ;;65841009716

 ;;9002226.02101,"1044,65841009716 ",.02)

 ;;65841009716

 ;;9002226.02101,"1044,65841009801 ",.01)

 ;;65841009801

 ;;9002226.02101,"1044,65841009801 ",.02)

 ;;65841009801

 ;;9002226.02101,"1044,65841009805 ",.01)

 ;;65841009805

 ;;9002226.02101,"1044,65841009805 ",.02)

 ;;65841009805

 ;;9002226.02101,"1044,65841009806 ",.01)

 ;;65841009806

 ;;9002226.02101,"1044,65841009806 ",.02)

 ;;65841009806

 ;;9002226.02101,"1044,65841009810 ",.01)

 ;;65841009810

 ;;9002226.02101,"1044,65841009810 ",.02)

 ;;65841009810

 ;;9002226.02101,"1044,65841009816 ",.01)

 ;;65841009816

 ;;9002226.02101,"1044,65841009816 ",.02)

 ;;65841009816

 ;;9002226.02101,"1044,65841009901 ",.01)

 ;;65841009901

 ;;9002226.02101,"1044,65841009901 ",.02)

 ;;65841009901

 ;;9002226.02101,"1044,65841009905 ",.01)

 ;;65841009905

 ;;9002226.02101,"1044,65841009905 ",.02)

 ;;65841009905

 ;;9002226.02101,"1044,65841009906 ",.01)

 ;;65841009906

 ;;9002226.02101,"1044,65841009906 ",.02)

 ;;65841009906

 ;;9002226.02101,"1044,65841009910 ",.01)

 ;;65841009910

 ;;9002226.02101,"1044,65841009910 ",.02)

 ;;65841009910

 ;;9002226.02101,"1044,65841009916 ",.01)

 ;;65841009916

 ;;9002226.02101,"1044,65841009916 ",.02)

 ;;65841009916

 ;;9002226.02101,"1044,65841060101 ",.01)

 ;;65841060101

 ;;9002226.02101,"1044,65841060101 ",.02)

 ;;65841060101

 ;;9002226.02101,"1044,65841060105 ",.01)

 ;;65841060105

 ;;9002226.02101,"1044,65841060105 ",.02)

 ;;65841060105

 ;;9002226.02101,"1044,65841060106 ",.01)

 ;;65841060106

 ;;9002226.02101,"1044,65841060106 ",.02)

 ;;65841060106

 ;;9002226.02101,"1044,65841060110 ",.01)

 ;;65841060110

 ;;9002226.02101,"1044,65841060110 ",.02)

 ;;65841060110

 ;;9002226.02101,"1044,65841060116 ",.01)

 ;;65841060116

 ;;9002226.02101,"1044,65841060116 ",.02)

 ;;65841060116

 ;;9002226.02101,"1044,65841067101 ",.01)

 ;;65841067101

 ;;9002226.02101,"1044,65841067101 ",.02)

 ;;65841067101

 ;;9002226.02101,"1044,65841067105 ",.01)

 ;;65841067105

 ;;9002226.02101,"1044,65841067105 ",.02)

 ;;65841067105

 ;;9002226.02101,"1044,65841067106 ",.01)

 ;;65841067106

 ;;9002226.02101,"1044,65841067106 ",.02)

 ;;65841067106

 ;;9002226.02101,"1044,65841067110 ",.01)

 ;;65841067110

 ;;9002226.02101,"1044,65841067110 ",.02)

 ;;65841067110

 ;;9002226.02101,"1044,65841067114 ",.01)

 ;;65841067114

 ;;9002226.02101,"1044,65841067114 ",.02)

 ;;65841067114

 ;;9002226.02101,"1044,65841067116 ",.01)

 ;;65841067116

 ;;9002226.02101,"1044,65841067116 ",.02)

 ;;65841067116

 ;;9002226.02101,"1044,65841067201 ",.01)

 ;;65841067201

 ;;9002226.02101,"1044,65841067201 ",.02)

 ;;65841067201

 ;;9002226.02101,"1044,65841067205 ",.01)

 ;;65841067205

 ;;9002226.02101,"1044,65841067205 ",.02)

 ;;65841067205

 ;;9002226.02101,"1044,65841067206 ",.01)

 ;;65841067206

 ;;9002226.02101,"1044,65841067206 ",.02)

 ;;65841067206

 ;;9002226.02101,"1044,65841067210 ",.01)

 ;;65841067210

 ;;9002226.02101,"1044,65841067210 ",.02)

 ;;65841067210

 ;;9002226.02101,"1044,65841067214 ",.01)

 ;;65841067214

 ;;9002226.02101,"1044,65841067214 ",.02)

 ;;65841067214

 ;;9002226.02101,"1044,65841067216 ",.01)

 ;;65841067216

 ;;9002226.02101,"1044,65841067216 ",.02)

 ;;65841067216

 ;;9002226.02101,"1044,65841067301 ",.01)

 ;;65841067301

 ;;9002226.02101,"1044,65841067301 ",.02)

 ;;65841067301

 ;;9002226.02101,"1044,65841067305 ",.01)

 ;;65841067305

 ;;9002226.02101,"1044,65841067305 ",.02)

 ;;65841067305

 ;;9002226.02101,"1044,65841067306 ",.01)

 ;;65841067306

 ;;9002226.02101,"1044,65841067306 ",.02)

 ;;65841067306

 ;;9002226.02101,"1044,65841067310 ",.01)

 ;;65841067310

 ;;9002226.02101,"1044,65841067310 ",.02)

 ;;65841067310

 ;;9002226.02101,"1044,65841067314 ",.01)

 ;;65841067314

 ;;9002226.02101,"1044,65841067314 ",.02)

 ;;65841067314

 ;;9002226.02101,"1044,65841067316 ",.01)

 ;;65841067316

 ;;9002226.02101,"1044,65841067316 ",.02)

 ;;65841067316

 ;;9002226.02101,"1044,65841067401 ",.01)

 ;;65841067401

 ;;9002226.02101,"1044,65841067401 ",.02)

 ;;65841067401

 ;;9002226.02101,"1044,65841067405 ",.01)

 ;;65841067405

 ;;9002226.02101,"1044,65841067405 ",.02)

 ;;65841067405

 ;;9002226.02101,"1044,65841067406 ",.01)

 ;;65841067406

 ;;9002226.02101,"1044,65841067406 ",.02)

 ;;65841067406

 ;;9002226.02101,"1044,65841067410 ",.01)

 ;;65841067410

 ;;9002226.02101,"1044,65841067410 ",.02)

 ;;65841067410

 ;;9002226.02101,"1044,65841067414 ",.01)

 ;;65841067414

 ;;9002226.02101,"1044,65841067414 ",.02)

 ;;65841067414

 ;;9002226.02101,"1044,65841067416 ",.01)

 ;;65841067416

 ;;9002226.02101,"1044,65841067416 ",.02)

 ;;65841067416

 ;;9002226.02101,"1044,65841067501 ",.01)

 ;;65841067501

 ;;9002226.02101,"1044,65841067501 ",.02)

 ;;65841067501

 ;;9002226.02101,"1044,65841067505 ",.01)

 ;;65841067505

 ;;9002226.02101,"1044,65841067505 ",.02)

 ;;65841067505

 ;;9002226.02101,"1044,65841067506 ",.01)

 ;;65841067506

 ;;9002226.02101,"1044,65841067506 ",.02)

 ;;65841067506

 ;;9002226.02101,"1044,65841067510 ",.01)

 ;;65841067510

 ;;9002226.02101,"1044,65841067510 ",.02)

 ;;65841067510

 ;;9002226.02101,"1044,65841067514 ",.01)

 ;;65841067514

 ;;9002226.02101,"1044,65841067514 ",.02)

 ;;65841067514

 ;;9002226.02101,"1044,65841067516 ",.01)

 ;;65841067516

 ;;9002226.02101,"1044,65841067516 ",.02)

 ;;65841067516

 ;;9002226.02101,"1044,65841075101 ",.01)

 ;;65841075101

 ;;9002226.02101,"1044,65841075101 ",.02)

 ;;65841075101

 ;;9002226.02101,"1044,65841075105 ",.01)

 ;;65841075105

 ;;9002226.02101,"1044,65841075105 ",.02)

 ;;65841075105

 ;;9002226.02101,"1044,65841075106 ",.01)

 ;;65841075106

 ;;9002226.02101,"1044,65841075106 ",.02)

 ;;65841075106

 ;;9002226.02101,"1044,65841075110 ",.01)

 ;;65841075110

 ;;9002226.02101,"1044,65841075110 ",.02)

 ;;65841075110

 ;;9002226.02101,"1044,65841075116 ",.01)

 ;;65841075116

 ;;9002226.02101,"1044,65841075116 ",.02)

 ;;65841075116

 ;;9002226.02101,"1044,65841075201 ",.01)

 ;;65841075201

 ;;9002226.02101,"1044,65841075201 ",.02)

 ;;65841075201

 ;;9002226.02101,"1044,65841075205 ",.01)

 ;;65841075205

 ;;9002226.02101,"1044,65841075205 ",.02)

 ;;65841075205

 ;;9002226.02101,"1044,65841075206 ",.01)

 ;;65841075206

 ;;9002226.02101,"1044,65841075206 ",.02)

 ;;65841075206

 ;;9002226.02101,"1044,65841075210 ",.01)

 ;;65841075210

 ;;9002226.02101,"1044,65841075210 ",.02)

 ;;65841075210

 ;;9002226.02101,"1044,65841075216 ",.01)

 ;;65841075216

 ;;9002226.02101,"1044,65841075216 ",.02)

 ;;65841075216

 ;;9002226.02101,"1044,65841075301 ",.01)

 ;;65841075301

 ;;9002226.02101,"1044,65841075301 ",.02)

 ;;65841075301

 ;;9002226.02101,"1044,65841075305 ",.01)

 ;;65841075305

 ;;9002226.02101,"1044,65841075305 ",.02)

 ;;65841075305

 ;;9002226.02101,"1044,65841075306 ",.01)

 ;;65841075306

 ;;9002226.02101,"1044,65841075306 ",.02)

 ;;65841075306

 ;;9002226.02101,"1044,65841075310 ",.01)

 ;;65841075310

 ;;9002226.02101,"1044,65841075310 ",.02)

 ;;65841075310

 ;;9002226.02101,"1044,65841075316 ",.01)

 ;;65841075316

 ;;9002226.02101,"1044,65841075316 ",.02)

 ;;65841075316

 ;;9002226.02101,"1044,65862000101 ",.01)

 ;;65862000101

 ;;9002226.02101,"1044,65862000101 ",.02)

 ;;65862000101

 ;;9002226.02101,"1044,65862000105 ",.01)

 ;;65862000105

 ;;9002226.02101,"1044,65862000105 ",.02)

 ;;65862000105

 ;;9002226.02101,"1044,65862000129 ",.01)

 ;;65862000129

 ;;9002226.02101,"1044,65862000129 ",.02)

 ;;65862000129

BGPM5BDU  ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON SEP 12, 2011;

 +1       ;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106

 +2       ;

START     ;

 +1        IF '$GET(ATXPGMC)

               KILL ^TMP("ATX",$JOB)

 +2        SET ATXPGMC=$GET(ATXPGMC)+1

 +3        FOR ATXI=1:1

               SET X=$PIECE($TEXT(TMP+ATXI),";;",2,99)

               IF X=""

                   QUIT

               SET X="^TMP(""ATX"",$J,"_X

               SET ATXI=ATXI+1

               SET Y=$PIECE($TEXT(TMP+ATXI),";;",2,99)

               SET @X=Y

 +4        QUIT

 +5       ;

TMP       ;;TAXONOMY (WITH BULLETIN)

 +1       ;;9002226.02101,"1044,65243038406 ",.02)

 +2       ;;65243038406

 +3       ;;9002226.02101,"1044,65243038409 ",.01)

 +4       ;;65243038409

 +5       ;;9002226.02101,"1044,65243038409 ",.02)

 +6       ;;65243038409

 +7       ;;9002226.02101,"1044,65243038418 ",.01)

 +8       ;;65243038418

 +9       ;;9002226.02101,"1044,65243038418 ",.02)

 +10      ;;65243038418

 +11      ;;9002226.02101,"1044,65243038445 ",.01)

 +12      ;;65243038445

 +13      ;;9002226.02101,"1044,65243038445 ",.02)

 +14      ;;65243038445

 +15      ;;9002226.02101,"1044,65243038603 ",.01)

 +16      ;;65243038603

 +17      ;;9002226.02101,"1044,65243038603 ",.02)

 +18      ;;65243038603

 +19      ;;9002226.02101,"1044,65243038606 ",.01)

 +20      ;;65243038606

 +21      ;;9002226.02101,"1044,65243038606 ",.02)

 +22      ;;65243038606

 +23      ;;9002226.02101,"1044,65243038609 ",.01)

 +24      ;;65243038609

 +25      ;;9002226.02101,"1044,65243038609 ",.02)

 +26      ;;65243038609

 +27      ;;9002226.02101,"1044,65387033504 ",.01)

 +28      ;;65387033504

 +29      ;;9002226.02101,"1044,65387033504 ",.02)

 +30      ;;65387033504

 +31      ;;9002226.02101,"1044,65387033506 ",.01)

 +32      ;;65387033506

 +33      ;;9002226.02101,"1044,65387033506 ",.02)

 +34      ;;65387033506

 +35      ;;9002226.02101,"1044,65387033509 ",.01)

 +36      ;;65387033509

 +37      ;;9002226.02101,"1044,65387033509 ",.02)

 +38      ;;65387033509

 +39      ;;9002226.02101,"1044,65427049201 ",.01)

 +40      ;;65427049201

 +41      ;;9002226.02101,"1044,65427049201 ",.02)

 +42      ;;65427049201

 +43      ;;9002226.02101,"1044,65427049202 ",.01)

 +44      ;;65427049202

 +45      ;;9002226.02101,"1044,65427049202 ",.02)

 +46      ;;65427049202

 +47      ;;9002226.02101,"1044,65427049203 ",.01)

 +48      ;;65427049203

 +49      ;;9002226.02101,"1044,65427049203 ",.02)

 +50      ;;65427049203

 +51      ;;9002226.02101,"1044,65427049204 ",.01)

 +52      ;;65427049204

 +53      ;;9002226.02101,"1044,65427049204 ",.02)

 +54      ;;65427049204

 +55      ;;9002226.02101,"1044,65427049205 ",.01)

 +56      ;;65427049205

 +57      ;;9002226.02101,"1044,65427049205 ",.02)

 +58      ;;65427049205

 +59      ;;9002226.02101,"1044,65427049301 ",.01)

 +60      ;;65427049301

 +61      ;;9002226.02101,"1044,65427049301 ",.02)

 +62      ;;65427049301

 +63      ;;9002226.02101,"1044,65427049302 ",.01)

 +64      ;;65427049302

 +65      ;;9002226.02101,"1044,65427049302 ",.02)

 +66      ;;65427049302

 +67      ;;9002226.02101,"1044,65427049303 ",.01)

 +68      ;;65427049303

 +69      ;;9002226.02101,"1044,65427049303 ",.02)

 +70      ;;65427049303

 +71      ;;9002226.02101,"1044,65427049304 ",.01)

 +72      ;;65427049304

 +73      ;;9002226.02101,"1044,65427049304 ",.02)

 +74      ;;65427049304

 +75      ;;9002226.02101,"1044,65427049305 ",.01)

 +76      ;;65427049305

 +77      ;;9002226.02101,"1044,65427049305 ",.02)

 +78      ;;65427049305

 +79      ;;9002226.02101,"1044,65427049701 ",.01)

 +80      ;;65427049701

 +81      ;;9002226.02101,"1044,65427049701 ",.02)

 +82      ;;65427049701

 +83      ;;9002226.02101,"1044,65427049702 ",.01)

 +84      ;;65427049702

 +85      ;;9002226.02101,"1044,65427049702 ",.02)

 +86      ;;65427049702

 +87      ;;9002226.02101,"1044,65427049703 ",.01)

 +88      ;;65427049703

 +89      ;;9002226.02101,"1044,65427049703 ",.02)

 +90      ;;65427049703

 +91      ;;9002226.02101,"1044,65427049704 ",.01)

 +92      ;;65427049704

 +93      ;;9002226.02101,"1044,65427049704 ",.02)

 +94      ;;65427049704

 +95      ;;9002226.02101,"1044,65427049705 ",.01)

 +96      ;;65427049705

 +97      ;;9002226.02101,"1044,65427049705 ",.02)

 +98      ;;65427049705

 +99      ;;9002226.02101,"1044,65580030103 ",.01)

 +100     ;;65580030103

 +101     ;;9002226.02101,"1044,65580030103 ",.02)

 +102     ;;65580030103

 +103     ;;9002226.02101,"1044,65580030109 ",.01)

 +104     ;;65580030109

 +105     ;;9002226.02101,"1044,65580030109 ",.02)

 +106     ;;65580030109

 +107     ;;9002226.02101,"1044,65580030203 ",.01)

 +108     ;;65580030203

 +109     ;;9002226.02101,"1044,65580030203 ",.02)

 +110     ;;65580030203

 +111     ;;9002226.02101,"1044,65580030209 ",.01)

 +112     ;;65580030209

 +113     ;;9002226.02101,"1044,65580030209 ",.02)

 +114     ;;65580030209

 +115     ;;9002226.02101,"1044,65580030303 ",.01)

 +116     ;;65580030303

 +117     ;;9002226.02101,"1044,65580030303 ",.02)

 +118     ;;65580030303

 +119     ;;9002226.02101,"1044,65580030309 ",.01)

 +120     ;;65580030309

 +121     ;;9002226.02101,"1044,65580030309 ",.02)

 +122     ;;65580030309

 +123     ;;9002226.02101,"1044,65580030403 ",.01)

 +124     ;;65580030403

 +125     ;;9002226.02101,"1044,65580030403 ",.02)

 +126     ;;65580030403

 +127     ;;9002226.02101,"1044,65580030409 ",.01)

 +128     ;;65580030409

 +129     ;;9002226.02101,"1044,65580030409 ",.02)

 +130     ;;65580030409

 +131     ;;9002226.02101,"1044,65841009701 ",.01)

 +132     ;;65841009701

 +133     ;;9002226.02101,"1044,65841009701 ",.02)

 +134     ;;65841009701

 +135     ;;9002226.02101,"1044,65841009705 ",.01)

 +136     ;;65841009705

 +137     ;;9002226.02101,"1044,65841009705 ",.02)

 +138     ;;65841009705

 +139     ;;9002226.02101,"1044,65841009706 ",.01)

 +140     ;;65841009706

 +141     ;;9002226.02101,"1044,65841009706 ",.02)

 +142     ;;65841009706

 +143     ;;9002226.02101,"1044,65841009710 ",.01)

 +144     ;;65841009710

 +145     ;;9002226.02101,"1044,65841009710 ",.02)

 +146     ;;65841009710

 +147     ;;9002226.02101,"1044,65841009716 ",.01)

 +148     ;;65841009716

 +149     ;;9002226.02101,"1044,65841009716 ",.02)

 +150     ;;65841009716

 +151     ;;9002226.02101,"1044,65841009801 ",.01)

 +152     ;;65841009801

 +153     ;;9002226.02101,"1044,65841009801 ",.02)

 +154     ;;65841009801

 +155     ;;9002226.02101,"1044,65841009805 ",.01)

 +156     ;;65841009805

 +157     ;;9002226.02101,"1044,65841009805 ",.02)

 +158     ;;65841009805

 +159     ;;9002226.02101,"1044,65841009806 ",.01)

 +160     ;;65841009806

 +161     ;;9002226.02101,"1044,65841009806 ",.02)

 +162     ;;65841009806

 +163     ;;9002226.02101,"1044,65841009810 ",.01)

 +164     ;;65841009810

 +165     ;;9002226.02101,"1044,65841009810 ",.02)

 +166     ;;65841009810

 +167     ;;9002226.02101,"1044,65841009816 ",.01)

 +168     ;;65841009816

 +169     ;;9002226.02101,"1044,65841009816 ",.02)

 +170     ;;65841009816

 +171     ;;9002226.02101,"1044,65841009901 ",.01)

 +172     ;;65841009901

 +173     ;;9002226.02101,"1044,65841009901 ",.02)

 +174     ;;65841009901

 +175     ;;9002226.02101,"1044,65841009905 ",.01)

 +176     ;;65841009905

 +177     ;;9002226.02101,"1044,65841009905 ",.02)

 +178     ;;65841009905

 +179     ;;9002226.02101,"1044,65841009906 ",.01)

 +180     ;;65841009906

 +181     ;;9002226.02101,"1044,65841009906 ",.02)

 +182     ;;65841009906

 +183     ;;9002226.02101,"1044,65841009910 ",.01)

 +184     ;;65841009910

 +185     ;;9002226.02101,"1044,65841009910 ",.02)

 +186     ;;65841009910

 +187     ;;9002226.02101,"1044,65841009916 ",.01)

 +188     ;;65841009916

 +189     ;;9002226.02101,"1044,65841009916 ",.02)

 +190     ;;65841009916

 +191     ;;9002226.02101,"1044,65841060101 ",.01)

 +192     ;;65841060101

 +193     ;;9002226.02101,"1044,65841060101 ",.02)

 +194     ;;65841060101

 +195     ;;9002226.02101,"1044,65841060105 ",.01)

 +196     ;;65841060105

 +197     ;;9002226.02101,"1044,65841060105 ",.02)

 +198     ;;65841060105

 +199     ;;9002226.02101,"1044,65841060106 ",.01)

 +200     ;;65841060106

 +201     ;;9002226.02101,"1044,65841060106 ",.02)

 +202     ;;65841060106

 +203     ;;9002226.02101,"1044,65841060110 ",.01)

 +204     ;;65841060110

 +205     ;;9002226.02101,"1044,65841060110 ",.02)

 +206     ;;65841060110

 +207     ;;9002226.02101,"1044,65841060116 ",.01)

 +208     ;;65841060116

 +209     ;;9002226.02101,"1044,65841060116 ",.02)

 +210     ;;65841060116

 +211     ;;9002226.02101,"1044,65841067101 ",.01)

 +212     ;;65841067101

 +213     ;;9002226.02101,"1044,65841067101 ",.02)

 +214     ;;65841067101

 +215     ;;9002226.02101,"1044,65841067105 ",.01)

 +216     ;;65841067105

 +217     ;;9002226.02101,"1044,65841067105 ",.02)

 +218     ;;65841067105

 +219     ;;9002226.02101,"1044,65841067106 ",.01)

 +220     ;;65841067106

 +221     ;;9002226.02101,"1044,65841067106 ",.02)

 +222     ;;65841067106

 +223     ;;9002226.02101,"1044,65841067110 ",.01)

 +224     ;;65841067110

 +225     ;;9002226.02101,"1044,65841067110 ",.02)

 +226     ;;65841067110

 +227     ;;9002226.02101,"1044,65841067114 ",.01)

 +228     ;;65841067114

 +229     ;;9002226.02101,"1044,65841067114 ",.02)

 +230     ;;65841067114

 +231     ;;9002226.02101,"1044,65841067116 ",.01)

 +232     ;;65841067116

 +233     ;;9002226.02101,"1044,65841067116 ",.02)

 +234     ;;65841067116

 +235     ;;9002226.02101,"1044,65841067201 ",.01)

 +236     ;;65841067201

 +237     ;;9002226.02101,"1044,65841067201 ",.02)

 +238     ;;65841067201

 +239     ;;9002226.02101,"1044,65841067205 ",.01)

 +240     ;;65841067205

 +241     ;;9002226.02101,"1044,65841067205 ",.02)

 +242     ;;65841067205

 +243     ;;9002226.02101,"1044,65841067206 ",.01)

 +244     ;;65841067206

 +245     ;;9002226.02101,"1044,65841067206 ",.02)

 +246     ;;65841067206

 +247     ;;9002226.02101,"1044,65841067210 ",.01)

 +248     ;;65841067210

 +249     ;;9002226.02101,"1044,65841067210 ",.02)

 +250     ;;65841067210

 +251     ;;9002226.02101,"1044,65841067214 ",.01)

 +252     ;;65841067214

 +253     ;;9002226.02101,"1044,65841067214 ",.02)

 +254     ;;65841067214

 +255     ;;9002226.02101,"1044,65841067216 ",.01)

 +256     ;;65841067216

 +257     ;;9002226.02101,"1044,65841067216 ",.02)

 +258     ;;65841067216

 +259     ;;9002226.02101,"1044,65841067301 ",.01)

 +260     ;;65841067301

 +261     ;;9002226.02101,"1044,65841067301 ",.02)

 +262     ;;65841067301

 +263     ;;9002226.02101,"1044,65841067305 ",.01)

 +264     ;;65841067305

 +265     ;;9002226.02101,"1044,65841067305 ",.02)

 +266     ;;65841067305

 +267     ;;9002226.02101,"1044,65841067306 ",.01)

 +268     ;;65841067306

 +269     ;;9002226.02101,"1044,65841067306 ",.02)

 +270     ;;65841067306

 +271     ;;9002226.02101,"1044,65841067310 ",.01)

 +272     ;;65841067310

 +273     ;;9002226.02101,"1044,65841067310 ",.02)

 +274     ;;65841067310

 +275     ;;9002226.02101,"1044,65841067314 ",.01)

 +276     ;;65841067314

 +277     ;;9002226.02101,"1044,65841067314 ",.02)

 +278     ;;65841067314

 +279     ;;9002226.02101,"1044,65841067316 ",.01)

 +280     ;;65841067316

 +281     ;;9002226.02101,"1044,65841067316 ",.02)

 +282     ;;65841067316

 +283     ;;9002226.02101,"1044,65841067401 ",.01)

 +284     ;;65841067401

 +285     ;;9002226.02101,"1044,65841067401 ",.02)

 +286     ;;65841067401

 +287     ;;9002226.02101,"1044,65841067405 ",.01)

 +288     ;;65841067405

 +289     ;;9002226.02101,"1044,65841067405 ",.02)

 +290     ;;65841067405

 +291     ;;9002226.02101,"1044,65841067406 ",.01)

 +292     ;;65841067406

 +293     ;;9002226.02101,"1044,65841067406 ",.02)

 +294     ;;65841067406

 +295     ;;9002226.02101,"1044,65841067410 ",.01)

 +296     ;;65841067410

 +297     ;;9002226.02101,"1044,65841067410 ",.02)

 +298     ;;65841067410

 +299     ;;9002226.02101,"1044,65841067414 ",.01)

 +300     ;;65841067414

 +301     ;;9002226.02101,"1044,65841067414 ",.02)

 +302     ;;65841067414

 +303     ;;9002226.02101,"1044,65841067416 ",.01)

 +304     ;;65841067416

 +305     ;;9002226.02101,"1044,65841067416 ",.02)

 +306     ;;65841067416

 +307     ;;9002226.02101,"1044,65841067501 ",.01)

 +308     ;;65841067501

 +309     ;;9002226.02101,"1044,65841067501 ",.02)

 +310     ;;65841067501

 +311     ;;9002226.02101,"1044,65841067505 ",.01)

 +312     ;;65841067505

 +313     ;;9002226.02101,"1044,65841067505 ",.02)

 +314     ;;65841067505

 +315     ;;9002226.02101,"1044,65841067506 ",.01)

 +316     ;;65841067506

 +317     ;;9002226.02101,"1044,65841067506 ",.02)

 +318     ;;65841067506

 +319     ;;9002226.02101,"1044,65841067510 ",.01)

 +320     ;;65841067510

 +321     ;;9002226.02101,"1044,65841067510 ",.02)

 +322     ;;65841067510

 +323     ;;9002226.02101,"1044,65841067514 ",.01)

 +324     ;;65841067514

 +325     ;;9002226.02101,"1044,65841067514 ",.02)

 +326     ;;65841067514

 +327     ;;9002226.02101,"1044,65841067516 ",.01)

 +328     ;;65841067516

 +329     ;;9002226.02101,"1044,65841067516 ",.02)

 +330     ;;65841067516

 +331     ;;9002226.02101,"1044,65841075101 ",.01)

 +332     ;;65841075101

 +333     ;;9002226.02101,"1044,65841075101 ",.02)

 +334     ;;65841075101

 +335     ;;9002226.02101,"1044,65841075105 ",.01)

 +336     ;;65841075105

 +337     ;;9002226.02101,"1044,65841075105 ",.02)

 +338     ;;65841075105

 +339     ;;9002226.02101,"1044,65841075106 ",.01)

 +340     ;;65841075106

 +341     ;;9002226.02101,"1044,65841075106 ",.02)

 +342     ;;65841075106

 +343     ;;9002226.02101,"1044,65841075110 ",.01)

 +344     ;;65841075110

 +345     ;;9002226.02101,"1044,65841075110 ",.02)

 +346     ;;65841075110

 +347     ;;9002226.02101,"1044,65841075116 ",.01)

 +348     ;;65841075116

 +349     ;;9002226.02101,"1044,65841075116 ",.02)

 +350     ;;65841075116

 +351     ;;9002226.02101,"1044,65841075201 ",.01)

 +352     ;;65841075201

 +353     ;;9002226.02101,"1044,65841075201 ",.02)

 +354     ;;65841075201

 +355     ;;9002226.02101,"1044,65841075205 ",.01)

 +356     ;;65841075205

 +357     ;;9002226.02101,"1044,65841075205 ",.02)

 +358     ;;65841075205

 +359     ;;9002226.02101,"1044,65841075206 ",.01)

 +360     ;;65841075206

 +361     ;;9002226.02101,"1044,65841075206 ",.02)

 +362     ;;65841075206

 +363     ;;9002226.02101,"1044,65841075210 ",.01)

 +364     ;;65841075210

 +365     ;;9002226.02101,"1044,65841075210 ",.02)

 +366     ;;65841075210

 +367     ;;9002226.02101,"1044,65841075216 ",.01)

 +368     ;;65841075216

 +369     ;;9002226.02101,"1044,65841075216 ",.02)

 +370     ;;65841075216

 +371     ;;9002226.02101,"1044,65841075301 ",.01)

 +372     ;;65841075301

 +373     ;;9002226.02101,"1044,65841075301 ",.02)

 +374     ;;65841075301

 +375     ;;9002226.02101,"1044,65841075305 ",.01)

 +376     ;;65841075305

 +377     ;;9002226.02101,"1044,65841075305 ",.02)

 +378     ;;65841075305

 +379     ;;9002226.02101,"1044,65841075306 ",.01)

 +380     ;;65841075306

 +381     ;;9002226.02101,"1044,65841075306 ",.02)

 +382     ;;65841075306

 +383     ;;9002226.02101,"1044,65841075310 ",.01)

 +384     ;;65841075310

 +385     ;;9002226.02101,"1044,65841075310 ",.02)

 +386     ;;65841075310

 +387     ;;9002226.02101,"1044,65841075316 ",.01)

 +388     ;;65841075316

 +389     ;;9002226.02101,"1044,65841075316 ",.02)

 +390     ;;65841075316

 +391     ;;9002226.02101,"1044,65862000101 ",.01)

 +392     ;;65862000101

 +393     ;;9002226.02101,"1044,65862000101 ",.02)

 +394     ;;65862000101

 +395     ;;9002226.02101,"1044,65862000105 ",.01)

 +396     ;;65862000105

 +397     ;;9002226.02101,"1044,65862000105 ",.02)

 +398     ;;65862000105

 +399     ;;9002226.02101,"1044,65862000129 ",.01)

 +400     ;;65862000129

 +401     ;;9002226.02101,"1044,65862000129 ",.02)

 +402     ;;65862000129

BGPM5BDU.m