Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: ATXXA25

ATXXA25.m

Go to the documentation of this file.
ATXXA25 ;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,"T34.831A ")
 ;;9251
 ;;21,"T34.832A ")
 ;;9252
 ;;21,"T34.839A ")
 ;;9253
 ;;21,"T34.90XA ")
 ;;9254
 ;;21,"T34.99XA ")
 ;;9255
 ;;21,"T36.0X1A ")
 ;;9256
 ;;21,"T36.0X2A ")
 ;;9257
 ;;21,"T36.0X3A ")
 ;;9258
 ;;21,"T36.0X4A ")
 ;;9259
 ;;21,"T36.1X1A ")
 ;;9260
 ;;21,"T36.1X2A ")
 ;;9261
 ;;21,"T36.1X3A ")
 ;;9262
 ;;21,"T36.1X4A ")
 ;;9263
 ;;21,"T36.2X1A ")
 ;;9264
 ;;21,"T36.2X2A ")
 ;;9265
 ;;21,"T36.2X3A ")
 ;;9266
 ;;21,"T36.2X4A ")
 ;;9267
 ;;21,"T36.3X1A ")
 ;;9268
 ;;21,"T36.3X2A ")
 ;;9269
 ;;21,"T36.3X3A ")
 ;;9270
 ;;21,"T36.3X4A ")
 ;;9271
 ;;21,"T36.4X1A ")
 ;;9272
 ;;21,"T36.4X2A ")
 ;;9273
 ;;21,"T36.4X3A ")
 ;;9274
 ;;21,"T36.4X4A ")
 ;;9275
 ;;21,"T36.5X1A ")
 ;;9276
 ;;21,"T36.5X2A ")
 ;;9277
 ;;21,"T36.5X3A ")
 ;;9278
 ;;21,"T36.5X4A ")
 ;;9279
 ;;21,"T36.6X1A ")
 ;;9280
 ;;21,"T36.6X2A ")
 ;;9281
 ;;21,"T36.6X3A ")
 ;;9282
 ;;21,"T36.6X4A ")
 ;;9283
 ;;21,"T36.7X1A ")
 ;;9284
 ;;21,"T36.7X2A ")
 ;;9285
 ;;21,"T36.7X3A ")
 ;;9286
 ;;21,"T36.7X4A ")
 ;;9287
 ;;21,"T36.8X1A ")
 ;;9288
 ;;21,"T36.8X2A ")
 ;;9289
 ;;21,"T36.8X3A ")
 ;;9290
 ;;21,"T36.8X4A ")
 ;;9291
 ;;21,"T36.91XA ")
 ;;9292
 ;;21,"T36.92XA ")
 ;;9293
 ;;21,"T36.93XA ")
 ;;9294
 ;;21,"T36.94XA ")
 ;;9295
 ;;21,"T37.0X1A ")
 ;;9296
 ;;21,"T37.0X2A ")
 ;;9297
 ;;21,"T37.0X3A ")
 ;;9298
 ;;21,"T37.0X4A ")
 ;;9299
 ;;21,"T37.1X1A ")
 ;;9300
 ;;21,"T37.1X2A ")
 ;;9301
 ;;21,"T37.1X3A ")
 ;;9302
 ;;21,"T37.1X4A ")
 ;;9303
 ;;21,"T37.2X1A ")
 ;;9304
 ;;21,"T37.2X2A ")
 ;;9305
 ;;21,"T37.2X3A ")
 ;;9306
 ;;21,"T37.2X4A ")
 ;;9307
 ;;21,"T37.3X1A ")
 ;;9308
 ;;21,"T37.3X2A ")
 ;;9309
 ;;21,"T37.3X3A ")
 ;;9310
 ;;21,"T37.3X4A ")
 ;;9311
 ;;21,"T37.4X1A ")
 ;;9312
 ;;21,"T37.4X2A ")
 ;;9313
 ;;21,"T37.4X3A ")
 ;;9314
 ;;21,"T37.4X4A ")
 ;;9315
 ;;21,"T37.5X1A ")
 ;;9316
 ;;21,"T37.5X2A ")
 ;;9317
 ;;21,"T37.5X3A ")
 ;;9318
 ;;21,"T37.5X4A ")
 ;;9319
 ;;21,"T37.8X1A ")
 ;;9320
 ;;21,"T37.8X2A ")
 ;;9321
 ;;21,"T37.8X3A ")
 ;;9322
 ;;21,"T37.8X4A ")
 ;;9323
 ;;21,"T37.91XA ")
 ;;9324
 ;;21,"T37.92XA ")
 ;;9325
 ;;21,"T37.93XA ")
 ;;9326
 ;;21,"T37.94XA ")
 ;;9327
 ;;21,"T38.0X1A ")
 ;;9328
 ;;21,"T38.0X2A ")
 ;;9329
 ;;21,"T38.0X3A ")
 ;;9330
 ;;21,"T38.0X4A ")
 ;;9331
 ;;21,"T38.1X1A ")
 ;;9332
 ;;21,"T38.1X2A ")
 ;;9333
 ;;21,"T38.1X3A ")
 ;;9334
 ;;21,"T38.1X4A ")
 ;;9335
 ;;21,"T38.2X1A ")
 ;;9336
 ;;21,"T38.2X2A ")
 ;;9337
 ;;21,"T38.2X3A ")
 ;;9338
 ;;21,"T38.2X4A ")
 ;;9339
 ;;21,"T38.3X1A ")
 ;;9340
 ;;21,"T38.3X2A ")
 ;;9341
 ;;21,"T38.3X3A ")
 ;;9342
 ;;21,"T38.3X4A ")
 ;;9343
 ;;21,"T38.4X1A ")
 ;;9344
 ;;21,"T38.4X2A ")
 ;;9345
 ;;21,"T38.4X3A ")
 ;;9346
 ;;21,"T38.4X4A ")
 ;;9347
 ;;21,"T38.5X1A ")
 ;;9348
 ;;21,"T38.5X2A ")
 ;;9349
 ;;21,"T38.5X3A ")
 ;;9350
 ;;21,"T38.5X4A ")
 ;;9351
 ;;21,"T38.6X1A ")
 ;;9352
 ;;21,"T38.6X2A ")
 ;;9353
 ;;21,"T38.6X3A ")
 ;;9354
 ;;21,"T38.6X4A ")
 ;;9355
 ;;21,"T38.7X1A ")
 ;;9356
 ;;21,"T38.7X2A ")
 ;;9357
 ;;21,"T38.7X3A ")
 ;;9358
 ;;21,"T38.7X4A ")
 ;;9359
 ;;21,"T38.801A ")
 ;;9360
 ;;21,"T38.802A ")
 ;;9361
 ;;21,"T38.803A ")
 ;;9362
 ;;21,"T38.804A ")
 ;;9363
 ;;21,"T38.811A ")
 ;;9364
 ;;21,"T38.812A ")
 ;;9365
 ;;21,"T38.813A ")
 ;;9366
 ;;21,"T38.814A ")
 ;;9367
 ;;21,"T38.891A ")
 ;;9368
 ;;21,"T38.892A ")
 ;;9369
 ;;21,"T38.893A ")
 ;;9370
 ;;21,"T38.894A ")
 ;;9371
 ;;21,"T38.901A ")
 ;;9372
 ;;21,"T38.902A ")
 ;;9373
 ;;21,"T38.903A ")
 ;;9374
 ;;21,"T38.904A ")
 ;;9375
 ;;21,"T38.991A ")
 ;;9376
 ;;21,"T38.992A ")
 ;;9377
 ;;21,"T38.993A ")
 ;;9378
 ;;21,"T38.994A ")
 ;;9379
 ;;21,"T39.011A ")
 ;;9380
 ;;21,"T39.012A ")
 ;;9381
 ;;21,"T39.013A ")
 ;;9382
 ;;21,"T39.014A ")
 ;;9383
 ;;21,"T39.091A ")
 ;;9384
 ;;21,"T39.092A ")
 ;;9385
 ;;21,"T39.093A ")
 ;;9386
 ;;21,"T39.094A ")
 ;;9387
 ;;21,"T39.1X1A ")
 ;;9388
 ;;21,"T39.1X2A ")
 ;;9389
 ;;21,"T39.1X3A ")
 ;;9390
 ;;21,"T39.1X4A ")
 ;;9391
 ;;21,"T39.2X1A ")
 ;;9392
 ;;21,"T39.2X2A ")
 ;;9393
 ;;21,"T39.2X3A ")
 ;;9394
 ;;21,"T39.2X4A ")
 ;;9395
 ;;21,"T39.311A ")
 ;;9396
 ;;21,"T39.312A ")
 ;;9397
 ;;21,"T39.313A ")
 ;;9398
 ;;21,"T39.314A ")
 ;;9399
 ;;21,"T39.391A ")
 ;;9400
 ;;21,"T39.392A ")
 ;;9401
 ;;21,"T39.393A ")
 ;;9402
 ;;21,"T39.394A ")
 ;;9403
 ;;21,"T39.4X1A ")
 ;;9404
 ;;21,"T39.4X2A ")
 ;;9405
 ;;21,"T39.4X3A ")
 ;;9406
 ;;21,"T39.4X4A ")
 ;;9407
 ;;21,"T39.8X1A ")
 ;;9408
 ;;21,"T39.8X2A ")
 ;;9409
 ;;21,"T39.8X3A ")
 ;;9410
 ;;21,"T39.8X4A ")
 ;;9411
 ;;21,"T39.91XA ")
 ;;9412
 ;;21,"T39.92XA ")
 ;;9413
 ;;21,"T39.93XA ")
 ;;9414
 ;;21,"T39.94XA ")
 ;;9415
 ;;21,"T40.0X1A ")
 ;;9416
 ;;21,"T40.0X2A ")
 ;;9417
 ;;21,"T40.0X3A ")
 ;;9418
 ;;21,"T40.0X4A ")
 ;;9419
 ;;21,"T40.1X1A ")
 ;;9420
 ;;21,"T40.1X2A ")
 ;;9421
 ;;21,"T40.1X3A ")
 ;;9422
 ;;21,"T40.1X4A ")
 ;;9423
 ;;21,"T40.2X1A ")
 ;;9424
 ;;21,"T40.2X2A ")
 ;;9425
 ;;21,"T40.2X3A ")
 ;;9426
 ;;21,"T40.2X4A ")
 ;;9427
 ;;21,"T40.3X1A ")
 ;;9428
 ;;21,"T40.3X2A ")
 ;;9429
 ;;21,"T40.3X3A ")
 ;;9430
 ;;21,"T40.3X4A ")
 ;;9431
 ;;21,"T40.4X1A ")
 ;;9432
 ;;21,"T40.4X2A ")
 ;;9433
 ;;21,"T40.4X3A ")
 ;;9434
 ;;21,"T40.4X4A ")
 ;;9435
 ;;21,"T40.5X1A ")
 ;;9436
 ;;21,"T40.5X2A ")
 ;;9437
 ;;21,"T40.5X3A ")
 ;;9438
 ;;21,"T40.5X4A ")
 ;;9439
 ;;21,"T40.601A ")
 ;;9440
 ;;21,"T40.602A ")
 ;;9441
 ;;21,"T40.603A ")
 ;;9442
 ;;21,"T40.604A ")
 ;;9443
 ;;21,"T40.691A ")
 ;;9444
 ;;21,"T40.692A ")
 ;;9445
 ;;21,"T40.693A ")
 ;;9446
 ;;21,"T40.694A ")
 ;;9447
 ;;21,"T40.7X1A ")
 ;;9448
 ;;21,"T40.7X2A ")
 ;;9449
 ;;21,"T40.7X3A ")
 ;;9450
 ;;21,"T40.7X4A ")
 ;;9451
 ;;21,"T40.8X1A ")
 ;;9452
 ;;21,"T40.8X2A ")
 ;;9453
 ;;21,"T40.8X3A ")
 ;;9454
 ;;21,"T40.8X4A ")
 ;;9455
 ;;21,"T40.901A ")
 ;;9456
 ;;21,"T40.902A ")
 ;;9457
 ;;21,"T40.903A ")
 ;;9458
 ;;21,"T40.904A ")
 ;;9459
 ;;21,"T40.991A ")
 ;;9460
 ;;21,"T40.992A ")
 ;;9461
 ;;21,"T40.993A ")
 ;;9462
 ;;21,"T40.994A ")
 ;;9463
 ;;21,"T41.0X1A ")
 ;;9464
 ;;21,"T41.0X2A ")
 ;;9465
 ;;21,"T41.0X3A ")
 ;;9466
 ;;21,"T41.0X4A ")
 ;;9467
 ;;21,"T41.1X1A ")
 ;;9468
 ;;21,"T41.1X2A ")
 ;;9469
 ;;21,"T41.1X3A ")
 ;;9470
 ;;21,"T41.1X4A ")
 ;;9471
 ;;21,"T41.201A ")
 ;;9472
 ;;21,"T41.202A ")
 ;;9473
 ;;21,"T41.203A ")
 ;;9474
 ;;21,"T41.204A ")
 ;;9475
 ;;21,"T41.291A ")
 ;;9476
 ;;21,"T41.292A ")
 ;;9477
 ;;21,"T41.293A ")
 ;;9478
 ;;21,"T41.294A ")
 ;;9479
 ;;21,"T41.3X1A ")
 ;;9480
 ;;21,"T41.3X2A ")
 ;;9481
 ;;21,"T41.3X3A ")
 ;;9482
 ;;21,"T41.3X4A ")
 ;;9483
 ;;21,"T41.41XA ")
 ;;9484
 ;;21,"T41.42XA ")
 ;;9485
 ;;21,"T41.43XA ")
 ;;9486
 ;;21,"T41.44XA ")
 ;;9487
 ;;21,"T41.5X1A ")
 ;;9488
 ;;21,"T41.5X2A ")
 ;;9489
 ;;21,"T41.5X3A ")
 ;;9490
 ;;21,"T41.5X4A ")
 ;;9491
 ;;21,"T42.0X1A ")
 ;;9492
 ;;21,"T42.0X2A ")
 ;;9493
 ;;21,"T42.0X3A ")
 ;;9494
 ;;21,"T42.0X4A ")
 ;;9495
 ;;21,"T42.1X1A ")
 ;;9496
 ;;21,"T42.1X2A ")
 ;;9497
 ;;21,"T42.1X3A ")
 ;;9498
 ;;21,"T42.1X4A ")
 ;;9499
 ;;21,"T42.2X1A ")
 ;;9500
 ;;21,"T42.2X2A ")
 ;;9501
 ;;21,"T42.2X3A ")
 ;;9502
 ;;21,"T42.2X4A ")
 ;;9503
 ;;21,"T42.3X1A ")
 ;;9504
 ;;21,"T42.3X2A ")
 ;;9505
 ;;21,"T42.3X3A ")
 ;;9506
 ;;21,"T42.3X4A ")
 ;;9507
 ;;21,"T42.4X1A ")
 ;;9508
 ;;21,"T42.4X2A ")
 ;;9509
 ;;21,"T42.4X3A ")
 ;;9510
 ;;21,"T42.4X4A ")
 ;;9511
 ;;21,"T42.5X1A ")
 ;;9512
 ;;21,"T42.5X2A ")
 ;;9513
 ;;21,"T42.5X3A ")
 ;;9514
 ;;21,"T42.5X4A ")
 ;;9515
 ;;21,"T42.6X1A ")
 ;;9516
 ;;21,"T42.6X2A ")
 ;;9517
 ;;21,"T42.6X3A ")
 ;;9518
 ;;21,"T42.6X4A ")
 ;;9519
 ;;21,"T42.71XA ")
 ;;9520
 ;;21,"T42.72XA ")
 ;;9521
 ;;21,"T42.73XA ")
 ;;9522
 ;;21,"T42.74XA ")
 ;;9523
 ;;21,"T42.8X1A ")
 ;;9524
 ;;21,"T42.8X2A ")
 ;;9525
 ;;21,"T42.8X3A ")
 ;;9526
 ;;21,"T42.8X4A ")
 ;;9527
 ;;21,"T43.011A ")
 ;;9528
 ;;21,"T43.012A ")
 ;;9529
 ;;21,"T43.013A ")
 ;;9530
 ;;21,"T43.014A ")
 ;;9531
 ;;21,"T43.021A ")
 ;;9532
 ;;21,"T43.022A ")
 ;;9533
 ;;21,"T43.023A ")
 ;;9534
 ;;21,"T43.024A ")
 ;;9535
 ;;21,"T43.1X1A ")
 ;;9536
 ;;21,"T43.1X2A ")
 ;;9537
 ;;21,"T43.1X3A ")
 ;;9538
 ;;21,"T43.1X4A ")
 ;;9539
 ;;21,"T43.201A ")
 ;;9540
 ;;21,"T43.202A ")
 ;;9541
 ;;21,"T43.203A ")
 ;;9542
 ;;21,"T43.204A ")
 ;;9543
 ;;21,"T43.211A ")
 ;;9544
 ;;21,"T43.212A ")
 ;;9545
 ;;21,"T43.213A ")
 ;;9546
 ;;21,"T43.214A ")
 ;;9547
 ;;21,"T43.221A ")
 ;;9548
 ;;21,"T43.222A ")
 ;;9549
 ;;21,"T43.223A ")
 ;;9550
 ;;21,"T43.224A ")
 ;;9551
 ;;21,"T43.291A ")
 ;;9552
 ;;21,"T43.292A ")
 ;;9553
 ;;21,"T43.293A ")
 ;;9554
 ;;21,"T43.294A ")
 ;;9555
 ;;21,"T43.3X1A ")
 ;;9556
 ;;21,"T43.3X2A ")
 ;;9557
 ;;21,"T43.3X3A ")
 ;;9558
 ;;21,"T43.3X4A ")
 ;;9559
 ;;21,"T43.4X1A ")
 ;;9560
 ;;21,"T43.4X2A ")
 ;;9561
 ;;21,"T43.4X3A ")
 ;;9562
 ;;21,"T43.4X4A ")
 ;;9563
 ;;21,"T43.501A ")
 ;;9564
 ;;21,"T43.502A ")
 ;;9565
 ;;21,"T43.503A ")
 ;;9566
 ;;21,"T43.504A ")
 ;;9567
 ;;21,"T43.591A ")
 ;;9568
 ;;21,"T43.592A ")
 ;;9569
 ;;21,"T43.593A ")
 ;;9570
 ;;21,"T43.594A ")
 ;;9571
 ;;21,"T43.601A ")
 ;;9572
 ;;21,"T43.602A ")
 ;;9573
 ;;21,"T43.603A ")
 ;;9574
 ;;21,"T43.604A ")
 ;;9575
 ;;21,"T43.611A ")
 ;;9576
 ;;21,"T43.612A ")
 ;;9577
 ;;21,"T43.613A ")
 ;;9578
 ;;21,"T43.614A ")
 ;;9579
 ;;21,"T43.621A ")
 ;;9580
 ;;21,"T43.622A ")
 ;;9581
 ;;21,"T43.623A ")
 ;;9582
 ;;21,"T43.624A ")
 ;;9583
 ;;21,"T43.631A ")
 ;;9584
 ;;21,"T43.632A ")
 ;;9585
 ;;21,"T43.633A ")
 ;;9586
 ;;21,"T43.634A ")
 ;;9587
 ;;21,"T43.691A ")
 ;;9588
 ;;21,"T43.692A ")
 ;;9589
 ;;21,"T43.693A ")
 ;;9590
 ;;21,"T43.694A ")
 ;;9591
 ;;21,"T43.8X1A ")
 ;;9592
 ;;21,"T43.8X2A ")
 ;;9593
 ;;21,"T43.8X3A ")
 ;;9594
 ;;21,"T43.8X4A ")
 ;;9595
 ;;21,"T43.91XA ")
 ;;9596
 ;;21,"T43.92XA ")
 ;;9597
 ;;21,"T43.93XA ")
 ;;9598
 ;;21,"T43.94XA ")
 ;;9599
 ;;21,"T44.0X1A ")
 ;;9600
 ;;21,"T44.0X2A ")
 ;;9601
 ;;21,"T44.0X3A ")
 ;;9602
 ;;21,"T44.0X4A ")
 ;;9603
 ;;21,"T44.1X1A ")
 ;;9604
 ;;21,"T44.1X2A ")
 ;;9605
 ;;21,"T44.1X3A ")
 ;;9606
 ;;21,"T44.1X4A ")
 ;;9607
 ;;21,"T44.2X1A ")
 ;;9608
 ;;21,"T44.2X2A ")
 ;;9609
 ;;21,"T44.2X3A ")
 ;;9610
 ;;21,"T44.2X4A ")
 ;;9611
 ;;21,"T44.3X1A ")
 ;;9612
 ;;21,"T44.3X2A ")
 ;;9613
 ;;21,"T44.3X3A ")
 ;;9614
 ;;21,"T44.3X4A ")
 ;;9615
 ;;21,"T44.4X1A ")
 ;;9616
 ;;21,"T44.4X2A ")
 ;;9617
 ;;21,"T44.4X3A ")
 ;;9618
 ;;21,"T44.4X4A ")
 ;;9619
 ;;21,"T44.5X1A ")
 ;;9620
 ;;21,"T44.5X2A ")
 ;;9621
 ;;21,"T44.5X3A ")
 ;;9622
 ;;21,"T44.5X4A ")
 ;;9623
 ;;21,"T44.6X1A ")
 ;;9624
 ;;21,"T44.6X2A ")
 ;;9625
 ;;21,"T44.6X3A ")
 ;;9626
 ;;21,"T44.6X4A ")
 ;;9627
 ;;21,"T44.7X1A ")
 ;;9628
 ;;21,"T44.7X2A ")
 ;;9629
 ;;21,"T44.7X3A ")
 ;;9630
 ;;21,"T44.7X4A ")
 ;;9631
 ;;21,"T44.8X1A ")
 ;;9632
 ;;21,"T44.8X2A ")
 ;;9633
 ;;21,"T44.8X3A ")
 ;;9634