Routine: ATXXA28

ATXXA28 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;

 ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48

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,"T63.814A ")

 ;;10391

 ;;21,"T63.821A ")

 ;;10392

 ;;21,"T63.822A ")

 ;;10393

 ;;21,"T63.823A ")

 ;;10394

 ;;21,"T63.824A ")

 ;;10395

 ;;21,"T63.831A ")

 ;;10396

 ;;21,"T63.832A ")

 ;;10397

 ;;21,"T63.833A ")

 ;;10398

 ;;21,"T63.834A ")

 ;;10399

 ;;21,"T63.891A ")

 ;;10400

 ;;21,"T63.892A ")

 ;;10401

 ;;21,"T63.893A ")

 ;;10402

 ;;21,"T63.894A ")

 ;;10403

 ;;21,"T63.91XA ")

 ;;10404

 ;;21,"T63.92XA ")

 ;;10405

 ;;21,"T63.93XA ")

 ;;10406

 ;;21,"T63.94XA ")

 ;;10407

 ;;21,"T64.01XA ")

 ;;10408

 ;;21,"T64.02XA ")

 ;;10409

 ;;21,"T64.03XA ")

 ;;10410

 ;;21,"T64.04XA ")

 ;;10411

 ;;21,"T64.81XA ")

 ;;10412

 ;;21,"T64.82XA ")

 ;;10413

 ;;21,"T64.83XA ")

 ;;10414

 ;;21,"T64.84XA ")

 ;;10415

 ;;21,"T65.0X1A ")

 ;;10416

 ;;21,"T65.0X2A ")

 ;;10417

 ;;21,"T65.0X3A ")

 ;;10418

 ;;21,"T65.0X4A ")

 ;;10419

 ;;21,"T65.1X1A ")

 ;;10420

 ;;21,"T65.1X2A ")

 ;;10421

 ;;21,"T65.1X3A ")

 ;;10422

 ;;21,"T65.1X4A ")

 ;;10423

 ;;21,"T65.211A ")

 ;;10424

 ;;21,"T65.212A ")

 ;;10425

 ;;21,"T65.213A ")

 ;;10426

 ;;21,"T65.214A ")

 ;;10427

 ;;21,"T65.221A ")

 ;;10428

 ;;21,"T65.222A ")

 ;;10429

 ;;21,"T65.223A ")

 ;;10430

 ;;21,"T65.224A ")

 ;;10431

 ;;21,"T65.291A ")

 ;;10432

 ;;21,"T65.292A ")

 ;;10433

 ;;21,"T65.293A ")

 ;;10434

 ;;21,"T65.294A ")

 ;;10435

 ;;21,"T65.3X1A ")

 ;;10436

 ;;21,"T65.3X2A ")

 ;;10437

 ;;21,"T65.3X3A ")

 ;;10438

 ;;21,"T65.3X4A ")

 ;;10439

 ;;21,"T65.4X1A ")

 ;;10440

 ;;21,"T65.4X2A ")

 ;;10441

 ;;21,"T65.4X3A ")

 ;;10442

 ;;21,"T65.4X4A ")

 ;;10443

 ;;21,"T65.5X1A ")

 ;;10444

 ;;21,"T65.5X2A ")

 ;;10445

 ;;21,"T65.5X3A ")

 ;;10446

 ;;21,"T65.5X4A ")

 ;;10447

 ;;21,"T65.6X1A ")

 ;;10448

 ;;21,"T65.6X2A ")

 ;;10449

 ;;21,"T65.6X3A ")

 ;;10450

 ;;21,"T65.6X4A ")

 ;;10451

 ;;21,"T65.811A ")

 ;;10452

 ;;21,"T65.812A ")

 ;;10453

 ;;21,"T65.813A ")

 ;;10454

 ;;21,"T65.814A ")

 ;;10455

 ;;21,"T65.821A ")

 ;;10456

 ;;21,"T65.822A ")

 ;;10457

 ;;21,"T65.823A ")

 ;;10458

 ;;21,"T65.824A ")

 ;;10459

 ;;21,"T65.831A ")

 ;;10460

 ;;21,"T65.832A ")

 ;;10461

 ;;21,"T65.833A ")

 ;;10462

 ;;21,"T65.834A ")

 ;;10463

 ;;21,"T65.891A ")

 ;;10464

 ;;21,"T65.892A ")

 ;;10465

 ;;21,"T65.893A ")

 ;;10466

 ;;21,"T65.894A ")

 ;;10467

 ;;21,"T65.91XA ")

 ;;10468

 ;;21,"T65.92XA ")

 ;;10469

 ;;21,"T65.93XA ")

 ;;10470

 ;;21,"T65.94XA ")

 ;;10471

 ;;21,"T66.XXXA ")

 ;;10472

 ;;21,"T67.0XXA ")

 ;;10473

 ;;21,"T67.1XXA ")

 ;;10474

 ;;21,"T67.2XXA ")

 ;;10475

 ;;21,"T67.3XXA ")

 ;;10476

 ;;21,"T67.4XXA ")

 ;;10477

 ;;21,"T67.5XXA ")

 ;;10478

 ;;21,"T67.6XXA ")

 ;;10479

 ;;21,"T67.7XXA ")

 ;;10480

 ;;21,"T67.8XXA ")

 ;;10481

 ;;21,"T67.9XXA ")

 ;;10482

 ;;21,"T68.XXXA ")

 ;;10483

 ;;21,"T69.011A ")

 ;;10484

 ;;21,"T69.012A ")

 ;;10485

 ;;21,"T69.019A ")

 ;;10486

 ;;21,"T69.021A ")

 ;;10487

 ;;21,"T69.022A ")

 ;;10488

 ;;21,"T69.029A ")

 ;;10489

 ;;21,"T69.1XXA ")

 ;;10490

 ;;21,"T69.8XXA ")

 ;;10491

 ;;21,"T69.9XXA ")

 ;;10492

 ;;21,"T70.0XXA ")

 ;;10493

 ;;21,"T70.1XXA ")

 ;;10494

 ;;21,"T70.20XA ")

 ;;10495

 ;;21,"T70.29XA ")

 ;;10496

 ;;21,"T70.3XXA ")

 ;;10497

 ;;21,"T70.4XXA ")

 ;;10498

 ;;21,"T70.8XXA ")

 ;;10499

 ;;21,"T70.9XXA ")

 ;;10500

 ;;21,"T71.111A ")

 ;;10501

 ;;21,"T71.112A ")

 ;;10502

 ;;21,"T71.113A ")

 ;;10503

 ;;21,"T71.114A ")

 ;;10504

 ;;21,"T71.121A ")

 ;;10505

 ;;21,"T71.122A ")

 ;;10506

 ;;21,"T71.123A ")

 ;;10507

 ;;21,"T71.124A ")

 ;;10508

 ;;21,"T71.131A ")

 ;;10509

 ;;21,"T71.132A ")

 ;;10510

 ;;21,"T71.133A ")

 ;;10511

 ;;21,"T71.134A ")

 ;;10512

 ;;21,"T71.141A ")

 ;;10513

 ;;21,"T71.143A ")

 ;;10514

 ;;21,"T71.144A ")

 ;;10515

 ;;21,"T71.151A ")

 ;;10516

 ;;21,"T71.152A ")

 ;;10517

 ;;21,"T71.153A ")

 ;;10518

 ;;21,"T71.154A ")

 ;;10519

 ;;21,"T71.161A ")

 ;;10520

 ;;21,"T71.162A ")

 ;;10521

 ;;21,"T71.163A ")

 ;;10522

 ;;21,"T71.164A ")

 ;;10523

 ;;21,"T71.191A ")

 ;;10524

 ;;21,"T71.192A ")

 ;;10525

 ;;21,"T71.193A ")

 ;;10526

 ;;21,"T71.194A ")

 ;;10527

 ;;21,"T71.20XA ")

 ;;10528

 ;;21,"T71.21XA ")

 ;;10529

 ;;21,"T71.221A ")

 ;;10530

 ;;21,"T71.222A ")

 ;;10531

 ;;21,"T71.223A ")

 ;;10532

 ;;21,"T71.224A ")

 ;;10533

 ;;21,"T71.231A ")

 ;;10534

 ;;21,"T71.232A ")

 ;;10535

 ;;21,"T71.233A ")

 ;;10536

 ;;21,"T71.234A ")

 ;;10537

 ;;21,"T71.29XA ")

 ;;10538

 ;;21,"T71.9XXA ")

 ;;10539

 ;;21,"T73.0XXA ")

 ;;10540

 ;;21,"T73.1XXA ")

 ;;10541

 ;;21,"T73.2XXA ")

 ;;10542

 ;;21,"T73.3XXA ")

 ;;10543

 ;;21,"T73.8XXA ")

 ;;10544

 ;;21,"T73.9XXA ")

 ;;10545

 ;;21,"T74.01XA ")

 ;;10546

 ;;21,"T74.02XA ")

 ;;10547

 ;;21,"T74.11XA ")

 ;;10548

 ;;21,"T74.12XA ")

 ;;10549

 ;;21,"T74.21XA ")

 ;;10550

 ;;21,"T74.22XA ")

 ;;10551

 ;;21,"T74.31XA ")

 ;;10552

 ;;21,"T74.32XA ")

 ;;10553

 ;;21,"T74.4XXA ")

 ;;10554

 ;;21,"T74.91XA ")

 ;;10555

 ;;21,"T74.92XA ")

 ;;10556

 ;;21,"T75.00XA ")

 ;;10557

 ;;21,"T75.01XA ")

 ;;10558

 ;;21,"T75.09XA ")

 ;;10559

 ;;21,"T75.1XXA ")

 ;;10560

 ;;21,"T75.20XA ")

 ;;10561

 ;;21,"T75.21XA ")

 ;;10562

 ;;21,"T75.22XA ")

 ;;10563

 ;;21,"T75.23XA ")

 ;;10564

 ;;21,"T75.29XA ")

 ;;10565

 ;;21,"T75.3XXA ")

 ;;10566

 ;;21,"T75.4XXA ")

 ;;10567

 ;;21,"T75.81XA ")

 ;;10568

 ;;21,"T75.82XA ")

 ;;10569

 ;;21,"T75.89XA ")

 ;;10570

 ;;21,"T76.01XA ")

 ;;10571

 ;;21,"T76.02XA ")

 ;;10572

 ;;21,"T76.11XA ")

 ;;10573

 ;;21,"T76.12XA ")

 ;;10574

 ;;21,"T76.21XA ")

 ;;10575

 ;;21,"T76.22XA ")

 ;;10576

 ;;21,"T76.31XA ")

 ;;10577

 ;;21,"T76.32XA ")

 ;;10578

 ;;21,"T76.91XA ")

 ;;10579

 ;;21,"T76.92XA ")

 ;;10580

 ;;21,"T79.0XXA ")

 ;;10581

 ;;21,"T79.1XXA ")

 ;;10582

 ;;21,"T79.2XXA ")

 ;;10583

 ;;21,"T79.4XXA ")

 ;;10584

 ;;21,"T79.5XXA ")

 ;;10585

 ;;21,"T79.6XXA ")

 ;;10586

 ;;21,"T79.7XXA ")

 ;;10587

 ;;21,"T79.8XXA ")

 ;;10588

 ;;21,"T79.9XXA ")

 ;;10589

 ;;21,"T79.A0XA ")

 ;;10590

 ;;21,"T79.A11A ")

 ;;10591

 ;;21,"T79.A12A ")

 ;;10592

 ;;21,"T79.A19A ")

 ;;10593

 ;;21,"T79.A21A ")

 ;;10594

 ;;21,"T79.A22A ")

 ;;10595

 ;;21,"T79.A29A ")

 ;;10596

 ;;21,"T79.A3XA ")

 ;;10597

 ;;21,"T79.A9XA ")

 ;;10598

 ;;9002226,873,.01)

 ;;BGP INJURY DIAGNOSES

 ;;9002226,873,.02)

;;@

 ;;9002226,873,.04)

;;n

 ;;9002226,873,.06)

;;@

 ;;9002226,873,.08)

;;0

 ;;9002226,873,.09)

 ;;3130515

 ;;9002226,873,.11)

;;@

 ;;9002226,873,.12)

 ;;31

 ;;9002226,873,.13)

;;1

 ;;9002226,873,.14)

;;@

 ;;9002226,873,.15)

 ;;80

 ;;9002226,873,.16)

;;@

 ;;9002226,873,.17)

;;@

 ;;9002226,873,3101)

;;@

 ;;9002226.02101,"873,800.00 ",.01)

 ;;800.00

 ;;9002226.02101,"873,800.00 ",.02)

 ;;999.9

 ;;9002226.02101,"873,800.00 ",.03)

;;1

 ;;9002226.02101,"873,S00.00XA ",.01)

 ;;S00.00XA

 ;;9002226.02101,"873,S00.00XA ",.02)

 ;;S00.00XA

 ;;9002226.02101,"873,S00.00XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.01XA ",.01)

 ;;S00.01XA

 ;;9002226.02101,"873,S00.01XA ",.02)

 ;;S00.01XA

 ;;9002226.02101,"873,S00.01XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.03XA ",.01)

 ;;S00.03XA

 ;;9002226.02101,"873,S00.03XA ",.02)

 ;;S00.03XA

 ;;9002226.02101,"873,S00.03XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.04XA ",.01)

 ;;S00.04XA

 ;;9002226.02101,"873,S00.04XA ",.02)

 ;;S00.04XA

 ;;9002226.02101,"873,S00.04XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.05XA ",.01)

 ;;S00.05XA

 ;;9002226.02101,"873,S00.05XA ",.02)

 ;;S00.05XA

 ;;9002226.02101,"873,S00.05XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.07XA ",.01)

 ;;S00.07XA

 ;;9002226.02101,"873,S00.07XA ",.02)

 ;;S00.07XA

 ;;9002226.02101,"873,S00.07XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.10XA ",.01)

 ;;S00.10XA

 ;;9002226.02101,"873,S00.10XA ",.02)

 ;;S00.10XA

 ;;9002226.02101,"873,S00.10XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.11XA ",.01)

 ;;S00.11XA

 ;;9002226.02101,"873,S00.11XA ",.02)

 ;;S00.11XA

 ;;9002226.02101,"873,S00.11XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.12XA ",.01)

 ;;S00.12XA

 ;;9002226.02101,"873,S00.12XA ",.02)

 ;;S00.12XA

 ;;9002226.02101,"873,S00.12XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.201A ",.01)

 ;;S00.201A

 ;;9002226.02101,"873,S00.201A ",.02)

 ;;S00.201A

 ;;9002226.02101,"873,S00.201A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.202A ",.01)

 ;;S00.202A

 ;;9002226.02101,"873,S00.202A ",.02)

 ;;S00.202A

 ;;9002226.02101,"873,S00.202A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.209A ",.01)

 ;;S00.209A

 ;;9002226.02101,"873,S00.209A ",.02)

 ;;S00.209A

 ;;9002226.02101,"873,S00.209A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.211A ",.01)

 ;;S00.211A

 ;;9002226.02101,"873,S00.211A ",.02)

 ;;S00.211A

 ;;9002226.02101,"873,S00.211A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.212A ",.01)

 ;;S00.212A

 ;;9002226.02101,"873,S00.212A ",.02)

 ;;S00.212A

 ;;9002226.02101,"873,S00.212A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.219A ",.01)

 ;;S00.219A

 ;;9002226.02101,"873,S00.219A ",.02)

 ;;S00.219A

 ;;9002226.02101,"873,S00.219A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.241A ",.01)

 ;;S00.241A

 ;;9002226.02101,"873,S00.241A ",.02)

 ;;S00.241A

 ;;9002226.02101,"873,S00.241A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.242A ",.01)

 ;;S00.242A

 ;;9002226.02101,"873,S00.242A ",.02)

 ;;S00.242A

 ;;9002226.02101,"873,S00.242A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.249A ",.01)

 ;;S00.249A

 ;;9002226.02101,"873,S00.249A ",.02)

 ;;S00.249A

 ;;9002226.02101,"873,S00.249A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.251A ",.01)

 ;;S00.251A

 ;;9002226.02101,"873,S00.251A ",.02)

 ;;S00.251A

 ;;9002226.02101,"873,S00.251A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.252A ",.01)

 ;;S00.252A

 ;;9002226.02101,"873,S00.252A ",.02)

 ;;S00.252A

 ;;9002226.02101,"873,S00.252A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.259A ",.01)

 ;;S00.259A

 ;;9002226.02101,"873,S00.259A ",.02)

 ;;S00.259A

 ;;9002226.02101,"873,S00.259A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.271A ",.01)

 ;;S00.271A

 ;;9002226.02101,"873,S00.271A ",.02)

 ;;S00.271A

 ;;9002226.02101,"873,S00.271A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.272A ",.01)

 ;;S00.272A

 ;;9002226.02101,"873,S00.272A ",.02)

 ;;S00.272A

 ;;9002226.02101,"873,S00.272A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.279A ",.01)

 ;;S00.279A

 ;;9002226.02101,"873,S00.279A ",.02)

 ;;S00.279A

 ;;9002226.02101,"873,S00.279A ",.03)

 ;;30

 ;;9002226.02101,"873,S00.30XA ",.01)

 ;;S00.30XA

 ;;9002226.02101,"873,S00.30XA ",.02)

 ;;S00.30XA

 ;;9002226.02101,"873,S00.30XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.31XA ",.01)

 ;;S00.31XA

 ;;9002226.02101,"873,S00.31XA ",.02)

 ;;S00.31XA

 ;;9002226.02101,"873,S00.31XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.33XA ",.01)

 ;;S00.33XA

 ;;9002226.02101,"873,S00.33XA ",.02)

 ;;S00.33XA

 ;;9002226.02101,"873,S00.33XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.34XA ",.01)

 ;;S00.34XA

 ;;9002226.02101,"873,S00.34XA ",.02)

 ;;S00.34XA

 ;;9002226.02101,"873,S00.34XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.35XA ",.01)

 ;;S00.35XA

 ;;9002226.02101,"873,S00.35XA ",.02)

 ;;S00.35XA

 ;;9002226.02101,"873,S00.35XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.37XA ",.01)

 ;;S00.37XA

 ;;9002226.02101,"873,S00.37XA ",.02)

 ;;S00.37XA

 ;;9002226.02101,"873,S00.37XA ",.03)

 ;;30

 ;;9002226.02101,"873,S00.401A ",.01)

 ;;S00.401A

 ;;9002226.02101,"873,S00.401A ",.02)

 ;;S00.401A

ATXXA28   ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;

 +1       ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48

 +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,"T63.814A ")

 +2       ;;10391

 +3       ;;21,"T63.821A ")

 +4       ;;10392

 +5       ;;21,"T63.822A ")

 +6       ;;10393

 +7       ;;21,"T63.823A ")

 +8       ;;10394

 +9       ;;21,"T63.824A ")

 +10      ;;10395

 +11      ;;21,"T63.831A ")

 +12      ;;10396

 +13      ;;21,"T63.832A ")

 +14      ;;10397

 +15      ;;21,"T63.833A ")

 +16      ;;10398

 +17      ;;21,"T63.834A ")

 +18      ;;10399

 +19      ;;21,"T63.891A ")

 +20      ;;10400

 +21      ;;21,"T63.892A ")

 +22      ;;10401

 +23      ;;21,"T63.893A ")

 +24      ;;10402

 +25      ;;21,"T63.894A ")

 +26      ;;10403

 +27      ;;21,"T63.91XA ")

 +28      ;;10404

 +29      ;;21,"T63.92XA ")

 +30      ;;10405

 +31      ;;21,"T63.93XA ")

 +32      ;;10406

 +33      ;;21,"T63.94XA ")

 +34      ;;10407

 +35      ;;21,"T64.01XA ")

 +36      ;;10408

 +37      ;;21,"T64.02XA ")

 +38      ;;10409

 +39      ;;21,"T64.03XA ")

 +40      ;;10410

 +41      ;;21,"T64.04XA ")

 +42      ;;10411

 +43      ;;21,"T64.81XA ")

 +44      ;;10412

 +45      ;;21,"T64.82XA ")

 +46      ;;10413

 +47      ;;21,"T64.83XA ")

 +48      ;;10414

 +49      ;;21,"T64.84XA ")

 +50      ;;10415

 +51      ;;21,"T65.0X1A ")

 +52      ;;10416

 +53      ;;21,"T65.0X2A ")

 +54      ;;10417

 +55      ;;21,"T65.0X3A ")

 +56      ;;10418

 +57      ;;21,"T65.0X4A ")

 +58      ;;10419

 +59      ;;21,"T65.1X1A ")

 +60      ;;10420

 +61      ;;21,"T65.1X2A ")

 +62      ;;10421

 +63      ;;21,"T65.1X3A ")

 +64      ;;10422

 +65      ;;21,"T65.1X4A ")

 +66      ;;10423

 +67      ;;21,"T65.211A ")

 +68      ;;10424

 +69      ;;21,"T65.212A ")

 +70      ;;10425

 +71      ;;21,"T65.213A ")

 +72      ;;10426

 +73      ;;21,"T65.214A ")

 +74      ;;10427

 +75      ;;21,"T65.221A ")

 +76      ;;10428

 +77      ;;21,"T65.222A ")

 +78      ;;10429

 +79      ;;21,"T65.223A ")

 +80      ;;10430

 +81      ;;21,"T65.224A ")

 +82      ;;10431

 +83      ;;21,"T65.291A ")

 +84      ;;10432

 +85      ;;21,"T65.292A ")

 +86      ;;10433

 +87      ;;21,"T65.293A ")

 +88      ;;10434

 +89      ;;21,"T65.294A ")

 +90      ;;10435

 +91      ;;21,"T65.3X1A ")

 +92      ;;10436

 +93      ;;21,"T65.3X2A ")

 +94      ;;10437

 +95      ;;21,"T65.3X3A ")

 +96      ;;10438

 +97      ;;21,"T65.3X4A ")

 +98      ;;10439

 +99      ;;21,"T65.4X1A ")

 +100     ;;10440

 +101     ;;21,"T65.4X2A ")

 +102     ;;10441

 +103     ;;21,"T65.4X3A ")

 +104     ;;10442

 +105     ;;21,"T65.4X4A ")

 +106     ;;10443

 +107     ;;21,"T65.5X1A ")

 +108     ;;10444

 +109     ;;21,"T65.5X2A ")

 +110     ;;10445

 +111     ;;21,"T65.5X3A ")

 +112     ;;10446

 +113     ;;21,"T65.5X4A ")

 +114     ;;10447

 +115     ;;21,"T65.6X1A ")

 +116     ;;10448

 +117     ;;21,"T65.6X2A ")

 +118     ;;10449

 +119     ;;21,"T65.6X3A ")

 +120     ;;10450

 +121     ;;21,"T65.6X4A ")

 +122     ;;10451

 +123     ;;21,"T65.811A ")

 +124     ;;10452

 +125     ;;21,"T65.812A ")

 +126     ;;10453

 +127     ;;21,"T65.813A ")

 +128     ;;10454

 +129     ;;21,"T65.814A ")

 +130     ;;10455

 +131     ;;21,"T65.821A ")

 +132     ;;10456

 +133     ;;21,"T65.822A ")

 +134     ;;10457

 +135     ;;21,"T65.823A ")

 +136     ;;10458

 +137     ;;21,"T65.824A ")

 +138     ;;10459

 +139     ;;21,"T65.831A ")

 +140     ;;10460

 +141     ;;21,"T65.832A ")

 +142     ;;10461

 +143     ;;21,"T65.833A ")

 +144     ;;10462

 +145     ;;21,"T65.834A ")

 +146     ;;10463

 +147     ;;21,"T65.891A ")

 +148     ;;10464

 +149     ;;21,"T65.892A ")

 +150     ;;10465

 +151     ;;21,"T65.893A ")

 +152     ;;10466

 +153     ;;21,"T65.894A ")

 +154     ;;10467

 +155     ;;21,"T65.91XA ")

 +156     ;;10468

 +157     ;;21,"T65.92XA ")

 +158     ;;10469

 +159     ;;21,"T65.93XA ")

 +160     ;;10470

 +161     ;;21,"T65.94XA ")

 +162     ;;10471

 +163     ;;21,"T66.XXXA ")

 +164     ;;10472

 +165     ;;21,"T67.0XXA ")

 +166     ;;10473

 +167     ;;21,"T67.1XXA ")

 +168     ;;10474

 +169     ;;21,"T67.2XXA ")

 +170     ;;10475

 +171     ;;21,"T67.3XXA ")

 +172     ;;10476

 +173     ;;21,"T67.4XXA ")

 +174     ;;10477

 +175     ;;21,"T67.5XXA ")

 +176     ;;10478

 +177     ;;21,"T67.6XXA ")

 +178     ;;10479

 +179     ;;21,"T67.7XXA ")

 +180     ;;10480

 +181     ;;21,"T67.8XXA ")

 +182     ;;10481

 +183     ;;21,"T67.9XXA ")

 +184     ;;10482

 +185     ;;21,"T68.XXXA ")

 +186     ;;10483

 +187     ;;21,"T69.011A ")

 +188     ;;10484

 +189     ;;21,"T69.012A ")

 +190     ;;10485

 +191     ;;21,"T69.019A ")

 +192     ;;10486

 +193     ;;21,"T69.021A ")

 +194     ;;10487

 +195     ;;21,"T69.022A ")

 +196     ;;10488

 +197     ;;21,"T69.029A ")

 +198     ;;10489

 +199     ;;21,"T69.1XXA ")

 +200     ;;10490

 +201     ;;21,"T69.8XXA ")

 +202     ;;10491

 +203     ;;21,"T69.9XXA ")

 +204     ;;10492

 +205     ;;21,"T70.0XXA ")

 +206     ;;10493

 +207     ;;21,"T70.1XXA ")

 +208     ;;10494

 +209     ;;21,"T70.20XA ")

 +210     ;;10495

 +211     ;;21,"T70.29XA ")

 +212     ;;10496

 +213     ;;21,"T70.3XXA ")

 +214     ;;10497

 +215     ;;21,"T70.4XXA ")

 +216     ;;10498

 +217     ;;21,"T70.8XXA ")

 +218     ;;10499

 +219     ;;21,"T70.9XXA ")

 +220     ;;10500

 +221     ;;21,"T71.111A ")

 +222     ;;10501

 +223     ;;21,"T71.112A ")

 +224     ;;10502

 +225     ;;21,"T71.113A ")

 +226     ;;10503

 +227     ;;21,"T71.114A ")

 +228     ;;10504

 +229     ;;21,"T71.121A ")

 +230     ;;10505

 +231     ;;21,"T71.122A ")

 +232     ;;10506

 +233     ;;21,"T71.123A ")

 +234     ;;10507

 +235     ;;21,"T71.124A ")

 +236     ;;10508

 +237     ;;21,"T71.131A ")

 +238     ;;10509

 +239     ;;21,"T71.132A ")

 +240     ;;10510

 +241     ;;21,"T71.133A ")

 +242     ;;10511

 +243     ;;21,"T71.134A ")

 +244     ;;10512

 +245     ;;21,"T71.141A ")

 +246     ;;10513

 +247     ;;21,"T71.143A ")

 +248     ;;10514

 +249     ;;21,"T71.144A ")

 +250     ;;10515

 +251     ;;21,"T71.151A ")

 +252     ;;10516

 +253     ;;21,"T71.152A ")

 +254     ;;10517

 +255     ;;21,"T71.153A ")

 +256     ;;10518

 +257     ;;21,"T71.154A ")

 +258     ;;10519

 +259     ;;21,"T71.161A ")

 +260     ;;10520

 +261     ;;21,"T71.162A ")

 +262     ;;10521

 +263     ;;21,"T71.163A ")

 +264     ;;10522

 +265     ;;21,"T71.164A ")

 +266     ;;10523

 +267     ;;21,"T71.191A ")

 +268     ;;10524

 +269     ;;21,"T71.192A ")

 +270     ;;10525

 +271     ;;21,"T71.193A ")

 +272     ;;10526

 +273     ;;21,"T71.194A ")

 +274     ;;10527

 +275     ;;21,"T71.20XA ")

 +276     ;;10528

 +277     ;;21,"T71.21XA ")

 +278     ;;10529

 +279     ;;21,"T71.221A ")

 +280     ;;10530

 +281     ;;21,"T71.222A ")

 +282     ;;10531

 +283     ;;21,"T71.223A ")

 +284     ;;10532

 +285     ;;21,"T71.224A ")

 +286     ;;10533

 +287     ;;21,"T71.231A ")

 +288     ;;10534

 +289     ;;21,"T71.232A ")

 +290     ;;10535

 +291     ;;21,"T71.233A ")

 +292     ;;10536

 +293     ;;21,"T71.234A ")

 +294     ;;10537

 +295     ;;21,"T71.29XA ")

 +296     ;;10538

 +297     ;;21,"T71.9XXA ")

 +298     ;;10539

 +299     ;;21,"T73.0XXA ")

 +300     ;;10540

 +301     ;;21,"T73.1XXA ")

 +302     ;;10541

 +303     ;;21,"T73.2XXA ")

 +304     ;;10542

 +305     ;;21,"T73.3XXA ")

 +306     ;;10543

 +307     ;;21,"T73.8XXA ")

 +308     ;;10544

 +309     ;;21,"T73.9XXA ")

 +310     ;;10545

 +311     ;;21,"T74.01XA ")

 +312     ;;10546

 +313     ;;21,"T74.02XA ")

 +314     ;;10547

 +315     ;;21,"T74.11XA ")

 +316     ;;10548

 +317     ;;21,"T74.12XA ")

 +318     ;;10549

 +319     ;;21,"T74.21XA ")

 +320     ;;10550

 +321     ;;21,"T74.22XA ")

 +322     ;;10551

 +323     ;;21,"T74.31XA ")

 +324     ;;10552

 +325     ;;21,"T74.32XA ")

 +326     ;;10553

 +327     ;;21,"T74.4XXA ")

 +328     ;;10554

 +329     ;;21,"T74.91XA ")

 +330     ;;10555

 +331     ;;21,"T74.92XA ")

 +332     ;;10556

 +333     ;;21,"T75.00XA ")

 +334     ;;10557

 +335     ;;21,"T75.01XA ")

 +336     ;;10558

 +337     ;;21,"T75.09XA ")

 +338     ;;10559

 +339     ;;21,"T75.1XXA ")

 +340     ;;10560

 +341     ;;21,"T75.20XA ")

 +342     ;;10561

 +343     ;;21,"T75.21XA ")

 +344     ;;10562

 +345     ;;21,"T75.22XA ")

 +346     ;;10563

 +347     ;;21,"T75.23XA ")

 +348     ;;10564

 +349     ;;21,"T75.29XA ")

 +350     ;;10565

 +351     ;;21,"T75.3XXA ")

 +352     ;;10566

 +353     ;;21,"T75.4XXA ")

 +354     ;;10567

 +355     ;;21,"T75.81XA ")

 +356     ;;10568

 +357     ;;21,"T75.82XA ")

 +358     ;;10569

 +359     ;;21,"T75.89XA ")

 +360     ;;10570

 +361     ;;21,"T76.01XA ")

 +362     ;;10571

 +363     ;;21,"T76.02XA ")

 +364     ;;10572

 +365     ;;21,"T76.11XA ")

 +366     ;;10573

 +367     ;;21,"T76.12XA ")

 +368     ;;10574

 +369     ;;21,"T76.21XA ")

 +370     ;;10575

 +371     ;;21,"T76.22XA ")

 +372     ;;10576

 +373     ;;21,"T76.31XA ")

 +374     ;;10577

 +375     ;;21,"T76.32XA ")

 +376     ;;10578

 +377     ;;21,"T76.91XA ")

 +378     ;;10579

 +379     ;;21,"T76.92XA ")

 +380     ;;10580

 +381     ;;21,"T79.0XXA ")

 +382     ;;10581

 +383     ;;21,"T79.1XXA ")

 +384     ;;10582

 +385     ;;21,"T79.2XXA ")

 +386     ;;10583

 +387     ;;21,"T79.4XXA ")

 +388     ;;10584

 +389     ;;21,"T79.5XXA ")

 +390     ;;10585

 +391     ;;21,"T79.6XXA ")

 +392     ;;10586

 +393     ;;21,"T79.7XXA ")

 +394     ;;10587

 +395     ;;21,"T79.8XXA ")

 +396     ;;10588

 +397     ;;21,"T79.9XXA ")

 +398     ;;10589

 +399     ;;21,"T79.A0XA ")

 +400     ;;10590

 +401     ;;21,"T79.A11A ")

 +402     ;;10591

 +403     ;;21,"T79.A12A ")

 +404     ;;10592

 +405     ;;21,"T79.A19A ")

 +406     ;;10593

 +407     ;;21,"T79.A21A ")

 +408     ;;10594

 +409     ;;21,"T79.A22A ")

 +410     ;;10595

 +411     ;;21,"T79.A29A ")

 +412     ;;10596

 +413     ;;21,"T79.A3XA ")

 +414     ;;10597

 +415     ;;21,"T79.A9XA ")

 +416     ;;10598

 +417     ;;9002226,873,.01)

 +418     ;;BGP INJURY DIAGNOSES

 +419     ;;9002226,873,.02)

 +420     ;;@

 +421     ;;9002226,873,.04)

 +422     ;;n

 +423     ;;9002226,873,.06)

 +424     ;;@

 +425     ;;9002226,873,.08)

 +426     ;;0

 +427     ;;9002226,873,.09)

 +428     ;;3130515

 +429     ;;9002226,873,.11)

 +430     ;;@

 +431     ;;9002226,873,.12)

 +432     ;;31

 +433     ;;9002226,873,.13)

 +434     ;;1

 +435     ;;9002226,873,.14)

 +436     ;;@

 +437     ;;9002226,873,.15)

 +438     ;;80

 +439     ;;9002226,873,.16)

 +440     ;;@

 +441     ;;9002226,873,.17)

 +442     ;;@

 +443     ;;9002226,873,3101)

 +444     ;;@

 +445     ;;9002226.02101,"873,800.00 ",.01)

 +446     ;;800.00

 +447     ;;9002226.02101,"873,800.00 ",.02)

 +448     ;;999.9

 +449     ;;9002226.02101,"873,800.00 ",.03)

 +450     ;;1

 +451     ;;9002226.02101,"873,S00.00XA ",.01)

 +452     ;;S00.00XA

 +453     ;;9002226.02101,"873,S00.00XA ",.02)

 +454     ;;S00.00XA

 +455     ;;9002226.02101,"873,S00.00XA ",.03)

 +456     ;;30

 +457     ;;9002226.02101,"873,S00.01XA ",.01)

 +458     ;;S00.01XA

 +459     ;;9002226.02101,"873,S00.01XA ",.02)

 +460     ;;S00.01XA

 +461     ;;9002226.02101,"873,S00.01XA ",.03)

 +462     ;;30

 +463     ;;9002226.02101,"873,S00.03XA ",.01)

 +464     ;;S00.03XA

 +465     ;;9002226.02101,"873,S00.03XA ",.02)

 +466     ;;S00.03XA

 +467     ;;9002226.02101,"873,S00.03XA ",.03)

 +468     ;;30

 +469     ;;9002226.02101,"873,S00.04XA ",.01)

 +470     ;;S00.04XA

 +471     ;;9002226.02101,"873,S00.04XA ",.02)

 +472     ;;S00.04XA

 +473     ;;9002226.02101,"873,S00.04XA ",.03)

 +474     ;;30

 +475     ;;9002226.02101,"873,S00.05XA ",.01)

 +476     ;;S00.05XA

 +477     ;;9002226.02101,"873,S00.05XA ",.02)

 +478     ;;S00.05XA

 +479     ;;9002226.02101,"873,S00.05XA ",.03)

 +480     ;;30

 +481     ;;9002226.02101,"873,S00.07XA ",.01)

 +482     ;;S00.07XA

 +483     ;;9002226.02101,"873,S00.07XA ",.02)

 +484     ;;S00.07XA

 +485     ;;9002226.02101,"873,S00.07XA ",.03)

 +486     ;;30

 +487     ;;9002226.02101,"873,S00.10XA ",.01)

 +488     ;;S00.10XA

 +489     ;;9002226.02101,"873,S00.10XA ",.02)

 +490     ;;S00.10XA

 +491     ;;9002226.02101,"873,S00.10XA ",.03)

 +492     ;;30

 +493     ;;9002226.02101,"873,S00.11XA ",.01)

 +494     ;;S00.11XA

 +495     ;;9002226.02101,"873,S00.11XA ",.02)

 +496     ;;S00.11XA

 +497     ;;9002226.02101,"873,S00.11XA ",.03)

 +498     ;;30

 +499     ;;9002226.02101,"873,S00.12XA ",.01)

 +500     ;;S00.12XA

 +501     ;;9002226.02101,"873,S00.12XA ",.02)

 +502     ;;S00.12XA

 +503     ;;9002226.02101,"873,S00.12XA ",.03)

 +504     ;;30

 +505     ;;9002226.02101,"873,S00.201A ",.01)

 +506     ;;S00.201A

 +507     ;;9002226.02101,"873,S00.201A ",.02)

 +508     ;;S00.201A

 +509     ;;9002226.02101,"873,S00.201A ",.03)

 +510     ;;30

 +511     ;;9002226.02101,"873,S00.202A ",.01)

 +512     ;;S00.202A

 +513     ;;9002226.02101,"873,S00.202A ",.02)

 +514     ;;S00.202A

 +515     ;;9002226.02101,"873,S00.202A ",.03)

 +516     ;;30

 +517     ;;9002226.02101,"873,S00.209A ",.01)

 +518     ;;S00.209A

 +519     ;;9002226.02101,"873,S00.209A ",.02)

 +520     ;;S00.209A

 +521     ;;9002226.02101,"873,S00.209A ",.03)

 +522     ;;30

 +523     ;;9002226.02101,"873,S00.211A ",.01)

 +524     ;;S00.211A

 +525     ;;9002226.02101,"873,S00.211A ",.02)

 +526     ;;S00.211A

 +527     ;;9002226.02101,"873,S00.211A ",.03)

 +528     ;;30

 +529     ;;9002226.02101,"873,S00.212A ",.01)

 +530     ;;S00.212A

 +531     ;;9002226.02101,"873,S00.212A ",.02)

 +532     ;;S00.212A

 +533     ;;9002226.02101,"873,S00.212A ",.03)

 +534     ;;30

 +535     ;;9002226.02101,"873,S00.219A ",.01)

 +536     ;;S00.219A

 +537     ;;9002226.02101,"873,S00.219A ",.02)

 +538     ;;S00.219A

 +539     ;;9002226.02101,"873,S00.219A ",.03)

 +540     ;;30

 +541     ;;9002226.02101,"873,S00.241A ",.01)

 +542     ;;S00.241A

 +543     ;;9002226.02101,"873,S00.241A ",.02)

 +544     ;;S00.241A

 +545     ;;9002226.02101,"873,S00.241A ",.03)

 +546     ;;30

 +547     ;;9002226.02101,"873,S00.242A ",.01)

 +548     ;;S00.242A

 +549     ;;9002226.02101,"873,S00.242A ",.02)

 +550     ;;S00.242A

 +551     ;;9002226.02101,"873,S00.242A ",.03)

 +552     ;;30

 +553     ;;9002226.02101,"873,S00.249A ",.01)

 +554     ;;S00.249A

 +555     ;;9002226.02101,"873,S00.249A ",.02)

 +556     ;;S00.249A

 +557     ;;9002226.02101,"873,S00.249A ",.03)

 +558     ;;30

 +559     ;;9002226.02101,"873,S00.251A ",.01)

 +560     ;;S00.251A

 +561     ;;9002226.02101,"873,S00.251A ",.02)

 +562     ;;S00.251A

 +563     ;;9002226.02101,"873,S00.251A ",.03)

 +564     ;;30

 +565     ;;9002226.02101,"873,S00.252A ",.01)

 +566     ;;S00.252A

 +567     ;;9002226.02101,"873,S00.252A ",.02)

 +568     ;;S00.252A

 +569     ;;9002226.02101,"873,S00.252A ",.03)

 +570     ;;30

 +571     ;;9002226.02101,"873,S00.259A ",.01)

 +572     ;;S00.259A

 +573     ;;9002226.02101,"873,S00.259A ",.02)

 +574     ;;S00.259A

 +575     ;;9002226.02101,"873,S00.259A ",.03)

 +576     ;;30

 +577     ;;9002226.02101,"873,S00.271A ",.01)

 +578     ;;S00.271A

 +579     ;;9002226.02101,"873,S00.271A ",.02)

 +580     ;;S00.271A

 +581     ;;9002226.02101,"873,S00.271A ",.03)

 +582     ;;30

 +583     ;;9002226.02101,"873,S00.272A ",.01)

 +584     ;;S00.272A

 +585     ;;9002226.02101,"873,S00.272A ",.02)

 +586     ;;S00.272A

 +587     ;;9002226.02101,"873,S00.272A ",.03)

 +588     ;;30

 +589     ;;9002226.02101,"873,S00.279A ",.01)

 +590     ;;S00.279A

 +591     ;;9002226.02101,"873,S00.279A ",.02)

 +592     ;;S00.279A

 +593     ;;9002226.02101,"873,S00.279A ",.03)

 +594     ;;30

 +595     ;;9002226.02101,"873,S00.30XA ",.01)

 +596     ;;S00.30XA

 +597     ;;9002226.02101,"873,S00.30XA ",.02)

 +598     ;;S00.30XA

 +599     ;;9002226.02101,"873,S00.30XA ",.03)

 +600     ;;30

 +601     ;;9002226.02101,"873,S00.31XA ",.01)

 +602     ;;S00.31XA

 +603     ;;9002226.02101,"873,S00.31XA ",.02)

 +604     ;;S00.31XA

 +605     ;;9002226.02101,"873,S00.31XA ",.03)

 +606     ;;30

 +607     ;;9002226.02101,"873,S00.33XA ",.01)

 +608     ;;S00.33XA

 +609     ;;9002226.02101,"873,S00.33XA ",.02)

 +610     ;;S00.33XA

 +611     ;;9002226.02101,"873,S00.33XA ",.03)

 +612     ;;30

 +613     ;;9002226.02101,"873,S00.34XA ",.01)

 +614     ;;S00.34XA

 +615     ;;9002226.02101,"873,S00.34XA ",.02)

 +616     ;;S00.34XA

 +617     ;;9002226.02101,"873,S00.34XA ",.03)

 +618     ;;30

 +619     ;;9002226.02101,"873,S00.35XA ",.01)

 +620     ;;S00.35XA

 +621     ;;9002226.02101,"873,S00.35XA ",.02)

 +622     ;;S00.35XA

 +623     ;;9002226.02101,"873,S00.35XA ",.03)

 +624     ;;30

 +625     ;;9002226.02101,"873,S00.37XA ",.01)

 +626     ;;S00.37XA

 +627     ;;9002226.02101,"873,S00.37XA ",.02)

 +628     ;;S00.37XA

 +629     ;;9002226.02101,"873,S00.37XA ",.03)

 +630     ;;30

 +631     ;;9002226.02101,"873,S00.401A ",.01)

 +632     ;;S00.401A

 +633     ;;9002226.02101,"873,S00.401A ",.02)

 +634     ;;S00.401A

ATXXA28.m