ATXXB32.m

ATXXB32 ;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

 Q

 ;

TMP ;;TAXONOMY (WITH BULLETIN)

 ;;21,"BP4HZZZ ")

 ;;12235

 ;;21,"BP4LZZ1 ")

 ;;12236

 ;;21,"BP4LZZZ ")

 ;;12237

 ;;21,"BP4MZZ1 ")

 ;;12238

 ;;21,"BP4MZZZ ")

 ;;12239

 ;;21,"BP4NZZ1 ")

 ;;12240

 ;;21,"BP4NZZZ ")

 ;;12241

 ;;21,"BP4PZZ1 ")

 ;;12242

 ;;21,"BP4PZZZ ")

 ;;12243

 ;;21,"BQ000ZZ ")

 ;;12244

 ;;21,"BQ001ZZ ")

 ;;12245

 ;;21,"BQ00YZZ ")

 ;;12246

 ;;21,"BQ00ZZ1 ")

 ;;12247

 ;;21,"BQ00ZZZ ")

 ;;12248

 ;;21,"BQ010ZZ ")

 ;;12249

 ;;21,"BQ011ZZ ")

 ;;12250

 ;;21,"BQ01YZZ ")

 ;;12251

 ;;21,"BQ01ZZ1 ")

 ;;12252

 ;;21,"BQ01ZZZ ")

 ;;12253

 ;;21,"BQ03ZZ1 ")

 ;;12254

 ;;21,"BQ03ZZZ ")

 ;;12255

 ;;21,"BQ04ZZ1 ")

 ;;12256

 ;;21,"BQ04ZZZ ")

 ;;12257

 ;;21,"BQ070ZZ ")

 ;;12258

 ;;21,"BQ071ZZ ")

 ;;12259

 ;;21,"BQ07YZZ ")

 ;;12260

 ;;21,"BQ07ZZZ ")

 ;;12261

 ;;21,"BQ080ZZ ")

 ;;12262

 ;;21,"BQ081ZZ ")

 ;;12263

 ;;21,"BQ08YZZ ")

 ;;12264

 ;;21,"BQ08ZZZ ")

 ;;12265

 ;;21,"BQ0DZZZ ")

 ;;12266

 ;;21,"BQ0FZZZ ")

 ;;12267

 ;;21,"BQ0G0ZZ ")

 ;;12268

 ;;21,"BQ0G1ZZ ")

 ;;12269

 ;;21,"BQ0GYZZ ")

 ;;12270

 ;;21,"BQ0GZZZ ")

 ;;12271

 ;;21,"BQ0H0ZZ ")

 ;;12272

 ;;21,"BQ0H1ZZ ")

 ;;12273

 ;;21,"BQ0HYZZ ")

 ;;12274

 ;;21,"BQ0HZZZ ")

 ;;12275

 ;;21,"BQ0JZZZ ")

 ;;12276

 ;;21,"BQ0KZZZ ")

 ;;12277

 ;;21,"BQ0LZZZ ")

 ;;12278

 ;;21,"BQ0MZZZ ")

 ;;12279

 ;;21,"BQ0PZZZ ")

 ;;12280

 ;;21,"BQ0QZZZ ")

 ;;12281

 ;;21,"BQ0VZZZ ")

 ;;12282

 ;;21,"BQ0WZZZ ")

 ;;12283

 ;;21,"BQ0X0ZZ ")

 ;;12284

 ;;21,"BQ0X1ZZ ")

 ;;12285

 ;;21,"BQ0XYZZ ")

 ;;12286

 ;;21,"BQ0Y0ZZ ")

 ;;12287

 ;;21,"BQ0Y1ZZ ")

 ;;12288

 ;;21,"BQ0YYZZ ")

 ;;12289

 ;;21,"BQ100ZZ ")

 ;;12290

 ;;21,"BQ101ZZ ")

 ;;12291

 ;;21,"BQ10YZZ ")

 ;;12292

 ;;21,"BQ10ZZZ ")

 ;;12293

 ;;21,"BQ110ZZ ")

 ;;12294

 ;;21,"BQ111ZZ ")

 ;;12295

 ;;21,"BQ11YZZ ")

 ;;12296

 ;;21,"BQ11ZZZ ")

 ;;12297

 ;;21,"BQ13ZZZ ")

 ;;12298

 ;;21,"BQ14ZZZ ")

 ;;12299

 ;;21,"BQ170ZZ ")

 ;;12300

 ;;21,"BQ171ZZ ")

 ;;12301

 ;;21,"BQ17YZZ ")

 ;;12302

 ;;21,"BQ17ZZZ ")

 ;;12303

 ;;21,"BQ180ZZ ")

 ;;12304

 ;;21,"BQ181ZZ ")

 ;;12305

 ;;21,"BQ18YZZ ")

 ;;12306

 ;;21,"BQ18ZZZ ")

 ;;12307

 ;;21,"BQ1DZZZ ")

 ;;12308

 ;;21,"BQ1FZZZ ")

 ;;12309

 ;;21,"BQ1G0ZZ ")

 ;;12310

 ;;21,"BQ1G1ZZ ")

 ;;12311

 ;;21,"BQ1GYZZ ")

 ;;12312

 ;;21,"BQ1GZZZ ")

 ;;12313

 ;;21,"BQ1H0ZZ ")

 ;;12314

 ;;21,"BQ1H1ZZ ")

 ;;12315

 ;;21,"BQ1HYZZ ")

 ;;12316

 ;;21,"BQ1HZZZ ")

 ;;12317

 ;;21,"BQ1JZZZ ")

 ;;12318

 ;;21,"BQ1KZZZ ")

 ;;12319

 ;;21,"BQ1LZZZ ")

 ;;12320

 ;;21,"BQ1MZZZ ")

 ;;12321

 ;;21,"BQ1PZZZ ")

 ;;12322

 ;;21,"BQ1QZZZ ")

 ;;12323

 ;;21,"BQ1VZZZ ")

 ;;12324

 ;;21,"BQ1WZZZ ")

 ;;12325

 ;;21,"BQ1X0ZZ ")

 ;;12326

 ;;21,"BQ1X1ZZ ")

 ;;12327

 ;;21,"BQ1XYZZ ")

 ;;12328

 ;;21,"BQ1XZZZ ")

 ;;12329

 ;;21,"BQ1Y0ZZ ")

 ;;12330

 ;;21,"BQ1Y1ZZ ")

 ;;12331

 ;;21,"BQ1YYZZ ")

 ;;12332

 ;;21,"BQ1YZZZ ")

 ;;12333

 ;;21,"BQ200ZZ ")

 ;;12334

 ;;21,"BQ201ZZ ")

 ;;12335

 ;;21,"BQ20YZZ ")

 ;;12336

 ;;21,"BQ20ZZZ ")

 ;;12337

 ;;21,"BQ210ZZ ")

 ;;12338

 ;;21,"BQ211ZZ ")

 ;;12339

 ;;21,"BQ21YZZ ")

 ;;12340

 ;;21,"BQ21ZZZ ")

 ;;12341

 ;;21,"BQ230ZZ ")

 ;;12342

 ;;21,"BQ231ZZ ")

 ;;12343

 ;;21,"BQ23YZZ ")

 ;;12344

 ;;21,"BQ23ZZZ ")

 ;;12345

 ;;21,"BQ240ZZ ")

 ;;12346

 ;;21,"BQ241ZZ ")

 ;;12347

 ;;21,"BQ24YZZ ")

 ;;12348

 ;;21,"BQ24ZZZ ")

 ;;12349

 ;;21,"BQ270ZZ ")

 ;;12350

 ;;21,"BQ271ZZ ")

 ;;12351

 ;;21,"BQ27YZZ ")

 ;;12352

 ;;21,"BQ27ZZZ ")

 ;;12353

 ;;21,"BQ280ZZ ")

 ;;12354

 ;;21,"BQ281ZZ ")

 ;;12355

 ;;21,"BQ28YZZ ")

 ;;12356

 ;;21,"BQ28ZZZ ")

 ;;12357

 ;;21,"BQ2B0ZZ ")

 ;;12358

 ;;21,"BQ2B1ZZ ")

 ;;12359

 ;;21,"BQ2BYZZ ")

 ;;12360

 ;;21,"BQ2C0ZZ ")

 ;;12361

 ;;21,"BQ2C1ZZ ")

 ;;12362

 ;;21,"BQ2CYZZ ")

 ;;12363

 ;;21,"BQ2D0ZZ ")

 ;;12364

 ;;21,"BQ2D1ZZ ")

 ;;12365

 ;;21,"BQ2DYZZ ")

 ;;12366

 ;;21,"BQ2DZZZ ")

 ;;12367

 ;;21,"BQ2F0ZZ ")

 ;;12368

 ;;21,"BQ2F1ZZ ")

 ;;12369

 ;;21,"BQ2FYZZ ")

 ;;12370

 ;;21,"BQ2FZZZ ")

 ;;12371

 ;;21,"BQ2G0ZZ ")

 ;;12372

 ;;21,"BQ2G1ZZ ")

 ;;12373

 ;;21,"BQ2GYZZ ")

 ;;12374

 ;;21,"BQ2GZZZ ")

 ;;12375

 ;;21,"BQ2H0ZZ ")

 ;;12376

 ;;21,"BQ2H1ZZ ")

 ;;12377

 ;;21,"BQ2HYZZ ")

 ;;12378

 ;;21,"BQ2HZZZ ")

 ;;12379

 ;;21,"BQ2J0ZZ ")

 ;;12380

 ;;21,"BQ2J1ZZ ")

 ;;12381

 ;;21,"BQ2JYZZ ")

 ;;12382

 ;;21,"BQ2JZZZ ")

 ;;12383

 ;;21,"BQ2K0ZZ ")

 ;;12384

 ;;21,"BQ2K1ZZ ")

 ;;12385

 ;;21,"BQ2KYZZ ")

 ;;12386

 ;;21,"BQ2KZZZ ")

 ;;12387

 ;;21,"BQ2L0ZZ ")

 ;;12388

 ;;21,"BQ2L1ZZ ")

 ;;12389

 ;;21,"BQ2LYZZ ")

 ;;12390

 ;;21,"BQ2LZZZ ")

 ;;12391

 ;;21,"BQ2M0ZZ ")

 ;;12392

 ;;21,"BQ2M1ZZ ")

 ;;12393

 ;;21,"BQ2MYZZ ")

 ;;12394

 ;;21,"BQ2MZZZ ")

 ;;12395

 ;;21,"BQ2P0ZZ ")

 ;;12396

 ;;21,"BQ2P1ZZ ")

 ;;12397

 ;;21,"BQ2PYZZ ")

 ;;12398

 ;;21,"BQ2PZZZ ")

 ;;12399

 ;;21,"BQ2Q0ZZ ")

 ;;12400

 ;;21,"BQ2Q1ZZ ")

 ;;12401

 ;;21,"BQ2QYZZ ")

 ;;12402

 ;;21,"BQ2QZZZ ")

 ;;12403

 ;;21,"BQ2R0ZZ ")

 ;;12404

 ;;21,"BQ2R1ZZ ")

 ;;12405

 ;;21,"BQ2RYZZ ")

 ;;12406

 ;;21,"BQ2RZZZ ")

 ;;12407

 ;;21,"BQ2S0ZZ ")

 ;;12408

 ;;21,"BQ2S1ZZ ")

 ;;12409

 ;;21,"BQ2SYZZ ")

 ;;12410

 ;;21,"BQ2SZZZ ")

 ;;12411

 ;;21,"BQ2V0ZZ ")

 ;;12412

 ;;21,"BQ2V1ZZ ")

 ;;12413

 ;;21,"BQ2VYZZ ")

 ;;12414

 ;;21,"BQ2VZZZ ")

 ;;12415

 ;;21,"BQ2W0ZZ ")

 ;;12416

 ;;21,"BQ2W1ZZ ")

 ;;12417

 ;;21,"BQ2WYZZ ")

 ;;12418

 ;;21,"BQ2WZZZ ")

 ;;12419

 ;;21,"BQ2X0ZZ ")

 ;;12420

 ;;21,"BQ2X1ZZ ")

 ;;12421

 ;;21,"BQ2XYZZ ")

 ;;12422

 ;;21,"BQ2XZZZ ")

 ;;12423

 ;;21,"BQ2Y0ZZ ")

 ;;12424

 ;;21,"BQ2Y1ZZ ")

 ;;12425

 ;;21,"BQ2YYZZ ")

 ;;12426

 ;;21,"BQ2YZZZ ")

 ;;12427

 ;;21,"BQ30Y0Z ")

 ;;12428

 ;;21,"BQ30YZZ ")

 ;;12429

 ;;21,"BQ30ZZZ ")

 ;;12430

 ;;21,"BQ31Y0Z ")

 ;;12431

 ;;21,"BQ31YZZ ")

 ;;12432

 ;;21,"BQ31ZZZ ")

 ;;12433

 ;;21,"BQ33Y0Z ")

 ;;12434

 ;;21,"BQ33YZZ ")

 ;;12435

 ;;21,"BQ33ZZZ ")

 ;;12436

 ;;21,"BQ34Y0Z ")

 ;;12437

 ;;21,"BQ34YZZ ")

 ;;12438

 ;;21,"BQ34ZZZ ")

 ;;12439

 ;;21,"BQ37Y0Z ")

 ;;12440

 ;;21,"BQ37YZZ ")

 ;;12441

 ;;21,"BQ37ZZZ ")

 ;;12442

 ;;21,"BQ38Y0Z ")

 ;;12443

 ;;21,"BQ38YZZ ")

 ;;12444

 ;;21,"BQ38ZZZ ")

 ;;12445

 ;;21,"BQ3DY0Z ")

 ;;12446

 ;;21,"BQ3DYZZ ")

 ;;12447

 ;;21,"BQ3DZZZ ")

 ;;12448

 ;;21,"BQ3FY0Z ")

 ;;12449

 ;;21,"BQ3FYZZ ")

 ;;12450

 ;;21,"BQ3FZZZ ")

 ;;12451

 ;;21,"BQ3GY0Z ")

 ;;12452

 ;;21,"BQ3GYZZ ")

 ;;12453

 ;;21,"BQ3GZZZ ")

 ;;12454

 ;;21,"BQ3HY0Z ")

 ;;12455

 ;;21,"BQ3HYZZ ")

 ;;12456

 ;;21,"BQ3HZZZ ")

 ;;12457

 ;;21,"BQ3JY0Z ")

 ;;12458

 ;;21,"BQ3JYZZ ")

 ;;12459

 ;;21,"BQ3JZZZ ")

 ;;12460

 ;;21,"BQ3KY0Z ")

 ;;12461

 ;;21,"BQ3KYZZ ")

 ;;12462

 ;;21,"BQ3KZZZ ")

 ;;12463

 ;;21,"BQ3LY0Z ")

 ;;12464

 ;;21,"BQ3LYZZ ")

 ;;12465

 ;;21,"BQ3LZZZ ")

 ;;12466

 ;;21,"BQ3MY0Z ")

 ;;12467

 ;;21,"BQ3MYZZ ")

 ;;12468

 ;;21,"BQ3MZZZ ")

 ;;12469

 ;;21,"BQ3PY0Z ")

 ;;12470

 ;;21,"BQ3PYZZ ")

 ;;12471

 ;;21,"BQ3PZZZ ")

 ;;12472

 ;;21,"BQ3QY0Z ")

 ;;12473

 ;;21,"BQ3QYZZ ")

 ;;12474

 ;;21,"BQ3QZZZ ")

 ;;12475

 ;;21,"BQ3VY0Z ")

 ;;12476

 ;;21,"BQ3VYZZ ")

 ;;12477

 ;;21,"BQ3VZZZ ")

 ;;12478

 ;;21,"BQ3WY0Z ")

 ;;12479

 ;;21,"BQ3WYZZ ")

 ;;12480

 ;;21,"BQ3WZZZ ")

 ;;12481

 ;;21,"BQ40ZZZ ")

 ;;12482

 ;;21,"BQ41ZZZ ")

 ;;12483

 ;;21,"BQ42ZZZ ")

 ;;12484

 ;;21,"BQ47ZZZ ")

 ;;12485

 ;;21,"BQ48ZZZ ")

 ;;12486

 ;;21,"BQ49ZZZ ")

 ;;12487

 ;;21,"BR00ZZ1 ")

 ;;12488

 ;;21,"BR00ZZZ ")

 ;;12489

 ;;21,"BR010ZZ ")

 ;;12490

 ;;21,"BR011ZZ ")

 ;;12491

 ;;21,"BR01YZZ ")

 ;;12492

 ;;21,"BR01ZZZ ")

 ;;12493

 ;;21,"BR020ZZ ")

 ;;12494

 ;;21,"BR021ZZ ")

 ;;12495

 ;;21,"BR02YZZ ")

 ;;12496

 ;;21,"BR02ZZZ ")

 ;;12497

 ;;21,"BR030ZZ ")

 ;;12498

 ;;21,"BR031ZZ ")

 ;;12499

 ;;21,"BR03YZZ ")

 ;;12500

 ;;21,"BR03ZZZ ")

 ;;12501

 ;;21,"BR040ZZ ")

 ;;12502

 ;;21,"BR041ZZ ")

 ;;12503

 ;;21,"BR04YZZ ")

 ;;12504

 ;;21,"BR04ZZZ ")

 ;;12505

 ;;21,"BR050ZZ ")

 ;;12506

 ;;21,"BR051ZZ ")

 ;;12507

 ;;21,"BR05YZZ ")

 ;;12508

 ;;21,"BR05ZZZ ")

 ;;12509

 ;;21,"BR060ZZ ")

 ;;12510

 ;;21,"BR061ZZ ")

 ;;12511

 ;;21,"BR06YZZ ")

 ;;12512

 ;;21,"BR06ZZZ ")

 ;;12513

 ;;21,"BR07ZZ1 ")

 ;;12514

 ;;21,"BR07ZZZ ")

 ;;12515

 ;;21,"BR08ZZZ ")

 ;;12516

 ;;21,"BR09ZZ1 ")

 ;;12517

 ;;21,"BR09ZZZ ")

 ;;12518

 ;;21,"BR0BZZZ ")

 ;;12519

 ;;21,"BR0CZZZ ")

 ;;12520

 ;;21,"BR0D0ZZ ")

 ;;12521

 ;;21,"BR0D1ZZ ")

 ;;12522

 ;;21,"BR0DYZZ ")

 ;;12523

 ;;21,"BR0DZZZ ")

 ;;12524

 ;;21,"BR0FZZZ ")

 ;;12525

 ;;21,"BR0GZZ1 ")

 ;;12526

 ;;21,"BR0GZZZ ")

 ;;12527

 ;;21,"BR0HZZZ ")

 ;;12528

 ;;21,"BR100ZZ ")

 ;;12529

 ;;21,"BR101ZZ ")

 ;;12530

 ;;21,"BR10YZZ ")

 ;;12531

 ;;21,"BR10ZZZ ")

 ;;12532

 ;;21,"BR110ZZ ")

 ;;12533

 ;;21,"BR111ZZ ")

 ;;12534

 ;;21,"BR11YZZ ")

 ;;12535

 ;;21,"BR11ZZZ ")

 ;;12536

 ;;21,"BR120ZZ ")

 ;;12537

 ;;21,"BR121ZZ ")

 ;;12538

 ;;21,"BR12YZZ ")

 ;;12539

 ;;21,"BR12ZZZ ")

 ;;12540

 ;;21,"BR130ZZ ")

 ;;12541

 ;;21,"BR131ZZ ")

 ;;12542

 ;;21,"BR13YZZ ")

 ;;12543

 ;;21,"BR13ZZZ ")

 ;;12544

 ;;21,"BR140ZZ ")

 ;;12545

 ;;21,"BR141ZZ ")

 ;;12546

 ;;21,"BR14YZZ ")

 ;;12547

 ;;21,"BR14ZZZ ")

 ;;12548

 ;;21,"BR150ZZ ")

 ;;12549

 ;;21,"BR151ZZ ")

 ;;12550

 ;;21,"BR15YZZ ")

 ;;12551

 ;;21,"BR15ZZZ ")

 ;;12552

 ;;21,"BR160ZZ ")

 ;;12553

 ;;21,"BR161ZZ ")

 ;;12554

 ;;21,"BR16YZZ ")

 ;;12555

 ;;21,"BR16ZZZ ")

 ;;12556

 ;;21,"BR170ZZ ")

 ;;12557

 ;;21,"BR171ZZ ")

 ;;12558

 ;;21,"BR17YZZ ")

 ;;12559

 ;;21,"BR17ZZZ ")

 ;;12560

 ;;21,"BR180ZZ ")

 ;;12561

 ;;21,"BR181ZZ ")

 ;;12562

 ;;21,"BR18YZZ ")

 ;;12563

 ;;21,"BR18ZZZ ")

 ;;12564

 ;;21,"BR190ZZ ")

 ;;12565

 ;;21,"BR191ZZ ")

 ;;12566

 ;;21,"BR19YZZ ")

 ;;12567

 ;;21,"BR19ZZZ ")

 ;;12568

 ;;21,"BR1B0ZZ ")

 ;;12569

 ;;21,"BR1B1ZZ ")

 ;;12570

 ;;21,"BR1BYZZ ")

 ;;12571

 ;;21,"BR1BZZZ ")

 ;;12572

 ;;21,"BR1C0ZZ ")

 ;;12573

 ;;21,"BR1C1ZZ ")

 ;;12574

 ;;21,"BR1CYZZ ")

 ;;12575

 ;;21,"BR1CZZZ ")

 ;;12576

 ;;21,"BR1D0ZZ ")

 ;;12577

 ;;21,"BR1D1ZZ ")

 ;;12578

 ;;21,"BR1DYZZ ")

 ;;12579

 ;;21,"BR1DZZZ ")

 ;;12580

 ;;21,"BR1F0ZZ ")

 ;;12581

 ;;21,"BR1F1ZZ ")

 ;;12582

 ;;21,"BR1FYZZ ")

 ;;12583

 ;;21,"BR1FZZZ ")

 ;;12584

 ;;21,"BR1G0ZZ ")

 ;;12585

 ;;21,"BR1G1ZZ ")

 ;;12586

 ;;21,"BR1GYZZ ")

 ;;12587

 ;;21,"BR1GZZZ ")

 ;;12588

 ;;21,"BR1H0ZZ ")

 ;;12589

 ;;21,"BR1H1ZZ ")

 ;;12590

 ;;21,"BR1HYZZ ")

 ;;12591

 ;;21,"BR1HZZZ ")

 ;;12592

 ;;21,"BR200ZZ ")

 ;;12593

 ;;21,"BR201ZZ ")

 ;;12594

 ;;21,"BR20YZZ ")

 ;;12595

 ;;21,"BR20ZZZ ")

 ;;12596

 ;;21,"BR270ZZ ")

 ;;12597

 ;;21,"BR271ZZ ")

 ;;12598

 ;;21,"BR27YZZ ")

 ;;12599

 ;;21,"BR27ZZZ ")

 ;;12600

 ;;21,"BR290ZZ ")

 ;;12601

 ;;21,"BR291ZZ ")

 ;;12602

 ;;21,"BR29YZZ ")

 ;;12603

 ;;21,"BR29ZZZ ")

 ;;12604

 ;;21,"BR2C0ZZ ")

 ;;12605

 ;;21,"BR2C1ZZ ")

 ;;12606

 ;;21,"BR2CYZZ ")

 ;;12607

 ;;21,"BR2CZZZ ")

 ;;12608

 ;;21,"BR2D0ZZ ")

 ;;12609

 ;;21,"BR2D1ZZ ")

 ;;12610

 ;;21,"BR2DYZZ ")

 ;;12611

 ;;21,"BR2DZZZ ")

 ;;12612

 ;;21,"BR2F0ZZ ")

 ;;12613

 ;;21,"BR2F1ZZ ")

 ;;12614

 ;;21,"BR2FYZZ ")

 ;;12615

 ;;21,"BR2FZZZ ")

 ;;12616

 ;;21,"BR30Y0Z ")

 ;;12617

 ;;21,"BR30YZZ ")

 ;;12618

ATXXB32   ;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,"BP4HZZZ ")

 +2       ;;12235

 +3       ;;21,"BP4LZZ1 ")

 +4       ;;12236

 +5       ;;21,"BP4LZZZ ")

 +6       ;;12237

 +7       ;;21,"BP4MZZ1 ")

 +8       ;;12238

 +9       ;;21,"BP4MZZZ ")

 +10      ;;12239

 +11      ;;21,"BP4NZZ1 ")

 +12      ;;12240

 +13      ;;21,"BP4NZZZ ")

 +14      ;;12241

 +15      ;;21,"BP4PZZ1 ")

 +16      ;;12242

 +17      ;;21,"BP4PZZZ ")

 +18      ;;12243

 +19      ;;21,"BQ000ZZ ")

 +20      ;;12244

 +21      ;;21,"BQ001ZZ ")

 +22      ;;12245

 +23      ;;21,"BQ00YZZ ")

 +24      ;;12246

 +25      ;;21,"BQ00ZZ1 ")

 +26      ;;12247

 +27      ;;21,"BQ00ZZZ ")

 +28      ;;12248

 +29      ;;21,"BQ010ZZ ")

 +30      ;;12249

 +31      ;;21,"BQ011ZZ ")

 +32      ;;12250

 +33      ;;21,"BQ01YZZ ")

 +34      ;;12251

 +35      ;;21,"BQ01ZZ1 ")

 +36      ;;12252

 +37      ;;21,"BQ01ZZZ ")

 +38      ;;12253

 +39      ;;21,"BQ03ZZ1 ")

 +40      ;;12254

 +41      ;;21,"BQ03ZZZ ")

 +42      ;;12255

 +43      ;;21,"BQ04ZZ1 ")

 +44      ;;12256

 +45      ;;21,"BQ04ZZZ ")

 +46      ;;12257

 +47      ;;21,"BQ070ZZ ")

 +48      ;;12258

 +49      ;;21,"BQ071ZZ ")

 +50      ;;12259

 +51      ;;21,"BQ07YZZ ")

 +52      ;;12260

 +53      ;;21,"BQ07ZZZ ")

 +54      ;;12261

 +55      ;;21,"BQ080ZZ ")

 +56      ;;12262

 +57      ;;21,"BQ081ZZ ")

 +58      ;;12263

 +59      ;;21,"BQ08YZZ ")

 +60      ;;12264

 +61      ;;21,"BQ08ZZZ ")

 +62      ;;12265

 +63      ;;21,"BQ0DZZZ ")

 +64      ;;12266

 +65      ;;21,"BQ0FZZZ ")

 +66      ;;12267

 +67      ;;21,"BQ0G0ZZ ")

 +68      ;;12268

 +69      ;;21,"BQ0G1ZZ ")

 +70      ;;12269

 +71      ;;21,"BQ0GYZZ ")

 +72      ;;12270

 +73      ;;21,"BQ0GZZZ ")

 +74      ;;12271

 +75      ;;21,"BQ0H0ZZ ")

 +76      ;;12272

 +77      ;;21,"BQ0H1ZZ ")

 +78      ;;12273

 +79      ;;21,"BQ0HYZZ ")

 +80      ;;12274

 +81      ;;21,"BQ0HZZZ ")

 +82      ;;12275

 +83      ;;21,"BQ0JZZZ ")

 +84      ;;12276

 +85      ;;21,"BQ0KZZZ ")

 +86      ;;12277

 +87      ;;21,"BQ0LZZZ ")

 +88      ;;12278

 +89      ;;21,"BQ0MZZZ ")

 +90      ;;12279

 +91      ;;21,"BQ0PZZZ ")

 +92      ;;12280

 +93      ;;21,"BQ0QZZZ ")

 +94      ;;12281

 +95      ;;21,"BQ0VZZZ ")

 +96      ;;12282

 +97      ;;21,"BQ0WZZZ ")

 +98      ;;12283

 +99      ;;21,"BQ0X0ZZ ")

 +100     ;;12284

 +101     ;;21,"BQ0X1ZZ ")

 +102     ;;12285

 +103     ;;21,"BQ0XYZZ ")

 +104     ;;12286

 +105     ;;21,"BQ0Y0ZZ ")

 +106     ;;12287

 +107     ;;21,"BQ0Y1ZZ ")

 +108     ;;12288

 +109     ;;21,"BQ0YYZZ ")

 +110     ;;12289

 +111     ;;21,"BQ100ZZ ")

 +112     ;;12290

 +113     ;;21,"BQ101ZZ ")

 +114     ;;12291

 +115     ;;21,"BQ10YZZ ")

 +116     ;;12292

 +117     ;;21,"BQ10ZZZ ")

 +118     ;;12293

 +119     ;;21,"BQ110ZZ ")

 +120     ;;12294

 +121     ;;21,"BQ111ZZ ")

 +122     ;;12295

 +123     ;;21,"BQ11YZZ ")

 +124     ;;12296

 +125     ;;21,"BQ11ZZZ ")

 +126     ;;12297

 +127     ;;21,"BQ13ZZZ ")

 +128     ;;12298

 +129     ;;21,"BQ14ZZZ ")

 +130     ;;12299

 +131     ;;21,"BQ170ZZ ")

 +132     ;;12300

 +133     ;;21,"BQ171ZZ ")

 +134     ;;12301

 +135     ;;21,"BQ17YZZ ")

 +136     ;;12302

 +137     ;;21,"BQ17ZZZ ")

 +138     ;;12303

 +139     ;;21,"BQ180ZZ ")

 +140     ;;12304

 +141     ;;21,"BQ181ZZ ")

 +142     ;;12305

 +143     ;;21,"BQ18YZZ ")

 +144     ;;12306

 +145     ;;21,"BQ18ZZZ ")

 +146     ;;12307

 +147     ;;21,"BQ1DZZZ ")

 +148     ;;12308

 +149     ;;21,"BQ1FZZZ ")

 +150     ;;12309

 +151     ;;21,"BQ1G0ZZ ")

 +152     ;;12310

 +153     ;;21,"BQ1G1ZZ ")

 +154     ;;12311

 +155     ;;21,"BQ1GYZZ ")

 +156     ;;12312

 +157     ;;21,"BQ1GZZZ ")

 +158     ;;12313

 +159     ;;21,"BQ1H0ZZ ")

 +160     ;;12314

 +161     ;;21,"BQ1H1ZZ ")

 +162     ;;12315

 +163     ;;21,"BQ1HYZZ ")

 +164     ;;12316

 +165     ;;21,"BQ1HZZZ ")

 +166     ;;12317

 +167     ;;21,"BQ1JZZZ ")

 +168     ;;12318

 +169     ;;21,"BQ1KZZZ ")

 +170     ;;12319

 +171     ;;21,"BQ1LZZZ ")

 +172     ;;12320

 +173     ;;21,"BQ1MZZZ ")

 +174     ;;12321

 +175     ;;21,"BQ1PZZZ ")

 +176     ;;12322

 +177     ;;21,"BQ1QZZZ ")

 +178     ;;12323

 +179     ;;21,"BQ1VZZZ ")

 +180     ;;12324

 +181     ;;21,"BQ1WZZZ ")

 +182     ;;12325

 +183     ;;21,"BQ1X0ZZ ")

 +184     ;;12326

 +185     ;;21,"BQ1X1ZZ ")

 +186     ;;12327

 +187     ;;21,"BQ1XYZZ ")

 +188     ;;12328

 +189     ;;21,"BQ1XZZZ ")

 +190     ;;12329

 +191     ;;21,"BQ1Y0ZZ ")

 +192     ;;12330

 +193     ;;21,"BQ1Y1ZZ ")

 +194     ;;12331

 +195     ;;21,"BQ1YYZZ ")

 +196     ;;12332

 +197     ;;21,"BQ1YZZZ ")

 +198     ;;12333

 +199     ;;21,"BQ200ZZ ")

 +200     ;;12334

 +201     ;;21,"BQ201ZZ ")

 +202     ;;12335

 +203     ;;21,"BQ20YZZ ")

 +204     ;;12336

 +205     ;;21,"BQ20ZZZ ")

 +206     ;;12337

 +207     ;;21,"BQ210ZZ ")

 +208     ;;12338

 +209     ;;21,"BQ211ZZ ")

 +210     ;;12339

 +211     ;;21,"BQ21YZZ ")

 +212     ;;12340

 +213     ;;21,"BQ21ZZZ ")

 +214     ;;12341

 +215     ;;21,"BQ230ZZ ")

 +216     ;;12342

 +217     ;;21,"BQ231ZZ ")

 +218     ;;12343

 +219     ;;21,"BQ23YZZ ")

 +220     ;;12344

 +221     ;;21,"BQ23ZZZ ")

 +222     ;;12345

 +223     ;;21,"BQ240ZZ ")

 +224     ;;12346

 +225     ;;21,"BQ241ZZ ")

 +226     ;;12347

 +227     ;;21,"BQ24YZZ ")

 +228     ;;12348

 +229     ;;21,"BQ24ZZZ ")

 +230     ;;12349

 +231     ;;21,"BQ270ZZ ")

 +232     ;;12350

 +233     ;;21,"BQ271ZZ ")

 +234     ;;12351

 +235     ;;21,"BQ27YZZ ")

 +236     ;;12352

 +237     ;;21,"BQ27ZZZ ")

 +238     ;;12353

 +239     ;;21,"BQ280ZZ ")

 +240     ;;12354

 +241     ;;21,"BQ281ZZ ")

 +242     ;;12355

 +243     ;;21,"BQ28YZZ ")

 +244     ;;12356

 +245     ;;21,"BQ28ZZZ ")

 +246     ;;12357

 +247     ;;21,"BQ2B0ZZ ")

 +248     ;;12358

 +249     ;;21,"BQ2B1ZZ ")

 +250     ;;12359

 +251     ;;21,"BQ2BYZZ ")

 +252     ;;12360

 +253     ;;21,"BQ2C0ZZ ")

 +254     ;;12361

 +255     ;;21,"BQ2C1ZZ ")

 +256     ;;12362

 +257     ;;21,"BQ2CYZZ ")

 +258     ;;12363

 +259     ;;21,"BQ2D0ZZ ")

 +260     ;;12364

 +261     ;;21,"BQ2D1ZZ ")

 +262     ;;12365

 +263     ;;21,"BQ2DYZZ ")

 +264     ;;12366

 +265     ;;21,"BQ2DZZZ ")

 +266     ;;12367

 +267     ;;21,"BQ2F0ZZ ")

 +268     ;;12368

 +269     ;;21,"BQ2F1ZZ ")

 +270     ;;12369

 +271     ;;21,"BQ2FYZZ ")

 +272     ;;12370

 +273     ;;21,"BQ2FZZZ ")

 +274     ;;12371

 +275     ;;21,"BQ2G0ZZ ")

 +276     ;;12372

 +277     ;;21,"BQ2G1ZZ ")

 +278     ;;12373

 +279     ;;21,"BQ2GYZZ ")

 +280     ;;12374

 +281     ;;21,"BQ2GZZZ ")

 +282     ;;12375

 +283     ;;21,"BQ2H0ZZ ")

 +284     ;;12376

 +285     ;;21,"BQ2H1ZZ ")

 +286     ;;12377

 +287     ;;21,"BQ2HYZZ ")

 +288     ;;12378

 +289     ;;21,"BQ2HZZZ ")

 +290     ;;12379

 +291     ;;21,"BQ2J0ZZ ")

 +292     ;;12380

 +293     ;;21,"BQ2J1ZZ ")

 +294     ;;12381

 +295     ;;21,"BQ2JYZZ ")

 +296     ;;12382

 +297     ;;21,"BQ2JZZZ ")

 +298     ;;12383

 +299     ;;21,"BQ2K0ZZ ")

 +300     ;;12384

 +301     ;;21,"BQ2K1ZZ ")

 +302     ;;12385

 +303     ;;21,"BQ2KYZZ ")

 +304     ;;12386

 +305     ;;21,"BQ2KZZZ ")

 +306     ;;12387

 +307     ;;21,"BQ2L0ZZ ")

 +308     ;;12388

 +309     ;;21,"BQ2L1ZZ ")

 +310     ;;12389

 +311     ;;21,"BQ2LYZZ ")

 +312     ;;12390

 +313     ;;21,"BQ2LZZZ ")

 +314     ;;12391

 +315     ;;21,"BQ2M0ZZ ")

 +316     ;;12392

 +317     ;;21,"BQ2M1ZZ ")

 +318     ;;12393

 +319     ;;21,"BQ2MYZZ ")

 +320     ;;12394

 +321     ;;21,"BQ2MZZZ ")

 +322     ;;12395

 +323     ;;21,"BQ2P0ZZ ")

 +324     ;;12396

 +325     ;;21,"BQ2P1ZZ ")

 +326     ;;12397

 +327     ;;21,"BQ2PYZZ ")

 +328     ;;12398

 +329     ;;21,"BQ2PZZZ ")

 +330     ;;12399

 +331     ;;21,"BQ2Q0ZZ ")

 +332     ;;12400

 +333     ;;21,"BQ2Q1ZZ ")

 +334     ;;12401

 +335     ;;21,"BQ2QYZZ ")

 +336     ;;12402

 +337     ;;21,"BQ2QZZZ ")

 +338     ;;12403

 +339     ;;21,"BQ2R0ZZ ")

 +340     ;;12404

 +341     ;;21,"BQ2R1ZZ ")

 +342     ;;12405

 +343     ;;21,"BQ2RYZZ ")

 +344     ;;12406

 +345     ;;21,"BQ2RZZZ ")

 +346     ;;12407

 +347     ;;21,"BQ2S0ZZ ")

 +348     ;;12408

 +349     ;;21,"BQ2S1ZZ ")

 +350     ;;12409

 +351     ;;21,"BQ2SYZZ ")

 +352     ;;12410

 +353     ;;21,"BQ2SZZZ ")

 +354     ;;12411

 +355     ;;21,"BQ2V0ZZ ")

 +356     ;;12412

 +357     ;;21,"BQ2V1ZZ ")

 +358     ;;12413

 +359     ;;21,"BQ2VYZZ ")

 +360     ;;12414

 +361     ;;21,"BQ2VZZZ ")

 +362     ;;12415

 +363     ;;21,"BQ2W0ZZ ")

 +364     ;;12416

 +365     ;;21,"BQ2W1ZZ ")

 +366     ;;12417

 +367     ;;21,"BQ2WYZZ ")

 +368     ;;12418

 +369     ;;21,"BQ2WZZZ ")

 +370     ;;12419

 +371     ;;21,"BQ2X0ZZ ")

 +372     ;;12420

 +373     ;;21,"BQ2X1ZZ ")

 +374     ;;12421

 +375     ;;21,"BQ2XYZZ ")

 +376     ;;12422

 +377     ;;21,"BQ2XZZZ ")

 +378     ;;12423

 +379     ;;21,"BQ2Y0ZZ ")

 +380     ;;12424

 +381     ;;21,"BQ2Y1ZZ ")

 +382     ;;12425

 +383     ;;21,"BQ2YYZZ ")

 +384     ;;12426

 +385     ;;21,"BQ2YZZZ ")

 +386     ;;12427

 +387     ;;21,"BQ30Y0Z ")

 +388     ;;12428

 +389     ;;21,"BQ30YZZ ")

 +390     ;;12429

 +391     ;;21,"BQ30ZZZ ")

 +392     ;;12430

 +393     ;;21,"BQ31Y0Z ")

 +394     ;;12431

 +395     ;;21,"BQ31YZZ ")

 +396     ;;12432

 +397     ;;21,"BQ31ZZZ ")

 +398     ;;12433

 +399     ;;21,"BQ33Y0Z ")

 +400     ;;12434

 +401     ;;21,"BQ33YZZ ")

 +402     ;;12435

 +403     ;;21,"BQ33ZZZ ")

 +404     ;;12436

 +405     ;;21,"BQ34Y0Z ")

 +406     ;;12437

 +407     ;;21,"BQ34YZZ ")

 +408     ;;12438

 +409     ;;21,"BQ34ZZZ ")

 +410     ;;12439

 +411     ;;21,"BQ37Y0Z ")

 +412     ;;12440

 +413     ;;21,"BQ37YZZ ")

 +414     ;;12441

 +415     ;;21,"BQ37ZZZ ")

 +416     ;;12442

 +417     ;;21,"BQ38Y0Z ")

 +418     ;;12443

 +419     ;;21,"BQ38YZZ ")

 +420     ;;12444

 +421     ;;21,"BQ38ZZZ ")

 +422     ;;12445

 +423     ;;21,"BQ3DY0Z ")

 +424     ;;12446

 +425     ;;21,"BQ3DYZZ ")

 +426     ;;12447

 +427     ;;21,"BQ3DZZZ ")

 +428     ;;12448

 +429     ;;21,"BQ3FY0Z ")

 +430     ;;12449

 +431     ;;21,"BQ3FYZZ ")

 +432     ;;12450

 +433     ;;21,"BQ3FZZZ ")

 +434     ;;12451

 +435     ;;21,"BQ3GY0Z ")

 +436     ;;12452

 +437     ;;21,"BQ3GYZZ ")

 +438     ;;12453

 +439     ;;21,"BQ3GZZZ ")

 +440     ;;12454

 +441     ;;21,"BQ3HY0Z ")

 +442     ;;12455

 +443     ;;21,"BQ3HYZZ ")

 +444     ;;12456

 +445     ;;21,"BQ3HZZZ ")

 +446     ;;12457

 +447     ;;21,"BQ3JY0Z ")

 +448     ;;12458

 +449     ;;21,"BQ3JYZZ ")

 +450     ;;12459

 +451     ;;21,"BQ3JZZZ ")

 +452     ;;12460

 +453     ;;21,"BQ3KY0Z ")

 +454     ;;12461

 +455     ;;21,"BQ3KYZZ ")

 +456     ;;12462

 +457     ;;21,"BQ3KZZZ ")

 +458     ;;12463

 +459     ;;21,"BQ3LY0Z ")

 +460     ;;12464

 +461     ;;21,"BQ3LYZZ ")

 +462     ;;12465

 +463     ;;21,"BQ3LZZZ ")

 +464     ;;12466

 +465     ;;21,"BQ3MY0Z ")

 +466     ;;12467

 +467     ;;21,"BQ3MYZZ ")

 +468     ;;12468

 +469     ;;21,"BQ3MZZZ ")

 +470     ;;12469

 +471     ;;21,"BQ3PY0Z ")

 +472     ;;12470

 +473     ;;21,"BQ3PYZZ ")

 +474     ;;12471

 +475     ;;21,"BQ3PZZZ ")

 +476     ;;12472

 +477     ;;21,"BQ3QY0Z ")

 +478     ;;12473

 +479     ;;21,"BQ3QYZZ ")

 +480     ;;12474

 +481     ;;21,"BQ3QZZZ ")

 +482     ;;12475

 +483     ;;21,"BQ3VY0Z ")

 +484     ;;12476

 +485     ;;21,"BQ3VYZZ ")

 +486     ;;12477

 +487     ;;21,"BQ3VZZZ ")

 +488     ;;12478

 +489     ;;21,"BQ3WY0Z ")

 +490     ;;12479

 +491     ;;21,"BQ3WYZZ ")

 +492     ;;12480

 +493     ;;21,"BQ3WZZZ ")

 +494     ;;12481

 +495     ;;21,"BQ40ZZZ ")

 +496     ;;12482

 +497     ;;21,"BQ41ZZZ ")

 +498     ;;12483

 +499     ;;21,"BQ42ZZZ ")

 +500     ;;12484

 +501     ;;21,"BQ47ZZZ ")

 +502     ;;12485

 +503     ;;21,"BQ48ZZZ ")

 +504     ;;12486

 +505     ;;21,"BQ49ZZZ ")

 +506     ;;12487

 +507     ;;21,"BR00ZZ1 ")

 +508     ;;12488

 +509     ;;21,"BR00ZZZ ")

 +510     ;;12489

 +511     ;;21,"BR010ZZ ")

 +512     ;;12490

 +513     ;;21,"BR011ZZ ")

 +514     ;;12491

 +515     ;;21,"BR01YZZ ")

 +516     ;;12492

 +517     ;;21,"BR01ZZZ ")

 +518     ;;12493

 +519     ;;21,"BR020ZZ ")

 +520     ;;12494

 +521     ;;21,"BR021ZZ ")

 +522     ;;12495

 +523     ;;21,"BR02YZZ ")

 +524     ;;12496

 +525     ;;21,"BR02ZZZ ")

 +526     ;;12497

 +527     ;;21,"BR030ZZ ")

 +528     ;;12498

 +529     ;;21,"BR031ZZ ")

 +530     ;;12499

 +531     ;;21,"BR03YZZ ")

 +532     ;;12500

 +533     ;;21,"BR03ZZZ ")

 +534     ;;12501

 +535     ;;21,"BR040ZZ ")

 +536     ;;12502

 +537     ;;21,"BR041ZZ ")

 +538     ;;12503

 +539     ;;21,"BR04YZZ ")

 +540     ;;12504

 +541     ;;21,"BR04ZZZ ")

 +542     ;;12505

 +543     ;;21,"BR050ZZ ")

 +544     ;;12506

 +545     ;;21,"BR051ZZ ")

 +546     ;;12507

 +547     ;;21,"BR05YZZ ")