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

ATXXA10.m

Go to the documentation of this file.
ATXXA10 ;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,"S53.011A ")
 ;;3484
 ;;21,"S53.012A ")
 ;;3485
 ;;21,"S53.013A ")
 ;;3486
 ;;21,"S53.014A ")
 ;;3487
 ;;21,"S53.015A ")
 ;;3488
 ;;21,"S53.016A ")
 ;;3489
 ;;21,"S53.021A ")
 ;;3490
 ;;21,"S53.022A ")
 ;;3491
 ;;21,"S53.023A ")
 ;;3492
 ;;21,"S53.024A ")
 ;;3493
 ;;21,"S53.025A ")
 ;;3494
 ;;21,"S53.026A ")
 ;;3495
 ;;21,"S53.031A ")
 ;;3496
 ;;21,"S53.032A ")
 ;;3497
 ;;21,"S53.033A ")
 ;;3498
 ;;21,"S53.091A ")
 ;;3499
 ;;21,"S53.092A ")
 ;;3500
 ;;21,"S53.093A ")
 ;;3501
 ;;21,"S53.094A ")
 ;;3502
 ;;21,"S53.095A ")
 ;;3503
 ;;21,"S53.096A ")
 ;;3504
 ;;21,"S53.101A ")
 ;;3505
 ;;21,"S53.102A ")
 ;;3506
 ;;21,"S53.103A ")
 ;;3507
 ;;21,"S53.104A ")
 ;;3508
 ;;21,"S53.105A ")
 ;;3509
 ;;21,"S53.106A ")
 ;;3510
 ;;21,"S53.111A ")
 ;;3511
 ;;21,"S53.112A ")
 ;;3512
 ;;21,"S53.113A ")
 ;;3513
 ;;21,"S53.114A ")
 ;;3514
 ;;21,"S53.115A ")
 ;;3515
 ;;21,"S53.116A ")
 ;;3516
 ;;21,"S53.121A ")
 ;;3517
 ;;21,"S53.122A ")
 ;;3518
 ;;21,"S53.123A ")
 ;;3519
 ;;21,"S53.124A ")
 ;;3520
 ;;21,"S53.125A ")
 ;;3521
 ;;21,"S53.126A ")
 ;;3522
 ;;21,"S53.131A ")
 ;;3523
 ;;21,"S53.132A ")
 ;;3524
 ;;21,"S53.133A ")
 ;;3525
 ;;21,"S53.134A ")
 ;;3526
 ;;21,"S53.135A ")
 ;;3527
 ;;21,"S53.136A ")
 ;;3528
 ;;21,"S53.141A ")
 ;;3529
 ;;21,"S53.142A ")
 ;;3530
 ;;21,"S53.143A ")
 ;;3531
 ;;21,"S53.144A ")
 ;;3532
 ;;21,"S53.145A ")
 ;;3533
 ;;21,"S53.146A ")
 ;;3534
 ;;21,"S53.191A ")
 ;;3535
 ;;21,"S53.192A ")
 ;;3536
 ;;21,"S53.193A ")
 ;;3537
 ;;21,"S53.194A ")
 ;;3538
 ;;21,"S53.195A ")
 ;;3539
 ;;21,"S53.196A ")
 ;;3540
 ;;21,"S53.20XA ")
 ;;3541
 ;;21,"S53.21XA ")
 ;;3542
 ;;21,"S53.22XA ")
 ;;3543
 ;;21,"S53.30XA ")
 ;;3544
 ;;21,"S53.31XA ")
 ;;3545
 ;;21,"S53.32XA ")
 ;;3546
 ;;21,"S53.401A ")
 ;;3547
 ;;21,"S53.402A ")
 ;;3548
 ;;21,"S53.409A ")
 ;;3549
 ;;21,"S53.411A ")
 ;;3550
 ;;21,"S53.412A ")
 ;;3551
 ;;21,"S53.419A ")
 ;;3552
 ;;21,"S53.421A ")
 ;;3553
 ;;21,"S53.422A ")
 ;;3554
 ;;21,"S53.429A ")
 ;;3555
 ;;21,"S53.431A ")
 ;;3556
 ;;21,"S53.432A ")
 ;;3557
 ;;21,"S53.439A ")
 ;;3558
 ;;21,"S53.441A ")
 ;;3559
 ;;21,"S53.442A ")
 ;;3560
 ;;21,"S53.449A ")
 ;;3561
 ;;21,"S53.491A ")
 ;;3562
 ;;21,"S53.492A ")
 ;;3563
 ;;21,"S53.499A ")
 ;;3564
 ;;21,"S54.00XA ")
 ;;3565
 ;;21,"S54.01XA ")
 ;;3566
 ;;21,"S54.02XA ")
 ;;3567
 ;;21,"S54.10XA ")
 ;;3568
 ;;21,"S54.11XA ")
 ;;3569
 ;;21,"S54.12XA ")
 ;;3570
 ;;21,"S54.20XA ")
 ;;3571
 ;;21,"S54.21XA ")
 ;;3572
 ;;21,"S54.22XA ")
 ;;3573
 ;;21,"S54.30XA ")
 ;;3574
 ;;21,"S54.31XA ")
 ;;3575
 ;;21,"S54.32XA ")
 ;;3576
 ;;21,"S54.8X1A ")
 ;;3577
 ;;21,"S54.8X2A ")
 ;;3578
 ;;21,"S54.8X9A ")
 ;;3579
 ;;21,"S54.90XA ")
 ;;3580
 ;;21,"S54.91XA ")
 ;;3581
 ;;21,"S54.92XA ")
 ;;3582
 ;;21,"S55.001A ")
 ;;3583
 ;;21,"S55.002A ")
 ;;3584
 ;;21,"S55.009A ")
 ;;3585
 ;;21,"S55.011A ")
 ;;3586
 ;;21,"S55.012A ")
 ;;3587
 ;;21,"S55.019A ")
 ;;3588
 ;;21,"S55.091A ")
 ;;3589
 ;;21,"S55.092A ")
 ;;3590
 ;;21,"S55.099A ")
 ;;3591
 ;;21,"S55.101A ")
 ;;3592
 ;;21,"S55.102A ")
 ;;3593
 ;;21,"S55.109A ")
 ;;3594
 ;;21,"S55.111A ")
 ;;3595
 ;;21,"S55.112A ")
 ;;3596
 ;;21,"S55.119A ")
 ;;3597
 ;;21,"S55.191A ")
 ;;3598
 ;;21,"S55.192A ")
 ;;3599
 ;;21,"S55.199A ")
 ;;3600
 ;;21,"S55.201A ")
 ;;3601
 ;;21,"S55.202A ")
 ;;3602
 ;;21,"S55.209A ")
 ;;3603
 ;;21,"S55.211A ")
 ;;3604
 ;;21,"S55.212A ")
 ;;3605
 ;;21,"S55.219A ")
 ;;3606
 ;;21,"S55.291A ")
 ;;3607
 ;;21,"S55.292A ")
 ;;3608
 ;;21,"S55.299A ")
 ;;3609
 ;;21,"S55.801A ")
 ;;3610
 ;;21,"S55.802A ")
 ;;3611
 ;;21,"S55.809A ")
 ;;3612
 ;;21,"S55.811A ")
 ;;3613
 ;;21,"S55.812A ")
 ;;3614
 ;;21,"S55.819A ")
 ;;3615
 ;;21,"S55.891A ")
 ;;3616
 ;;21,"S55.892A ")
 ;;3617
 ;;21,"S55.899A ")
 ;;3618
 ;;21,"S55.901A ")
 ;;3619
 ;;21,"S55.902A ")
 ;;3620
 ;;21,"S55.909A ")
 ;;3621
 ;;21,"S55.911A ")
 ;;3622
 ;;21,"S55.912A ")
 ;;3623
 ;;21,"S55.919A ")
 ;;3624
 ;;21,"S55.991A ")
 ;;3625
 ;;21,"S55.992A ")
 ;;3626
 ;;21,"S55.999A ")
 ;;3627
 ;;21,"S56.001A ")
 ;;3628
 ;;21,"S56.002A ")
 ;;3629
 ;;21,"S56.009A ")
 ;;3630
 ;;21,"S56.011A ")
 ;;3631
 ;;21,"S56.012A ")
 ;;3632
 ;;21,"S56.019A ")
 ;;3633
 ;;21,"S56.021A ")
 ;;3634
 ;;21,"S56.022A ")
 ;;3635
 ;;21,"S56.029A ")
 ;;3636
 ;;21,"S56.091A ")
 ;;3637
 ;;21,"S56.092A ")
 ;;3638
 ;;21,"S56.099A ")
 ;;3639
 ;;21,"S56.101A ")
 ;;3640
 ;;21,"S56.102A ")
 ;;3641
 ;;21,"S56.103A ")
 ;;3642
 ;;21,"S56.104A ")
 ;;3643
 ;;21,"S56.105A ")
 ;;3644
 ;;21,"S56.106A ")
 ;;3645
 ;;21,"S56.107A ")
 ;;3646
 ;;21,"S56.108A ")
 ;;3647
 ;;21,"S56.109A ")
 ;;3648
 ;;21,"S56.111A ")
 ;;3649
 ;;21,"S56.112A ")
 ;;3650
 ;;21,"S56.113A ")
 ;;3651
 ;;21,"S56.114A ")
 ;;3652
 ;;21,"S56.115A ")
 ;;3653
 ;;21,"S56.116A ")
 ;;3654
 ;;21,"S56.117A ")
 ;;3655
 ;;21,"S56.118A ")
 ;;3656
 ;;21,"S56.119A ")
 ;;3657
 ;;21,"S56.121A ")
 ;;3658
 ;;21,"S56.122A ")
 ;;3659
 ;;21,"S56.123A ")
 ;;3660
 ;;21,"S56.124A ")
 ;;3661
 ;;21,"S56.125A ")
 ;;3662
 ;;21,"S56.126A ")
 ;;3663
 ;;21,"S56.127A ")
 ;;3664
 ;;21,"S56.128A ")
 ;;3665
 ;;21,"S56.129A ")
 ;;3666
 ;;21,"S56.191A ")
 ;;3667
 ;;21,"S56.192A ")
 ;;3668
 ;;21,"S56.193A ")
 ;;3669
 ;;21,"S56.194A ")
 ;;3670
 ;;21,"S56.195A ")
 ;;3671
 ;;21,"S56.196A ")
 ;;3672
 ;;21,"S56.197A ")
 ;;3673
 ;;21,"S56.198A ")
 ;;3674
 ;;21,"S56.199A ")
 ;;3675
 ;;21,"S56.201A ")
 ;;3676
 ;;21,"S56.202A ")
 ;;3677
 ;;21,"S56.209A ")
 ;;3678
 ;;21,"S56.211A ")
 ;;3679
 ;;21,"S56.212A ")
 ;;3680
 ;;21,"S56.219A ")
 ;;3681
 ;;21,"S56.221A ")
 ;;3682
 ;;21,"S56.222A ")
 ;;3683
 ;;21,"S56.229A ")
 ;;3684
 ;;21,"S56.291A ")
 ;;3685
 ;;21,"S56.292A ")
 ;;3686
 ;;21,"S56.299A ")
 ;;3687
 ;;21,"S56.301A ")
 ;;3688
 ;;21,"S56.302A ")
 ;;3689
 ;;21,"S56.309A ")
 ;;3690
 ;;21,"S56.311A ")
 ;;3691
 ;;21,"S56.312A ")
 ;;3692
 ;;21,"S56.319A ")
 ;;3693
 ;;21,"S56.321A ")
 ;;3694
 ;;21,"S56.322A ")
 ;;3695
 ;;21,"S56.329A ")
 ;;3696
 ;;21,"S56.391A ")
 ;;3697
 ;;21,"S56.392A ")
 ;;3698
 ;;21,"S56.399A ")
 ;;3699
 ;;21,"S56.401A ")
 ;;3700
 ;;21,"S56.402A ")
 ;;3701
 ;;21,"S56.403A ")
 ;;3702
 ;;21,"S56.404A ")
 ;;3703
 ;;21,"S56.405A ")
 ;;3704
 ;;21,"S56.406A ")
 ;;3705
 ;;21,"S56.407A ")
 ;;3706
 ;;21,"S56.408A ")
 ;;3707
 ;;21,"S56.409A ")
 ;;3708
 ;;21,"S56.411A ")
 ;;3709
 ;;21,"S56.412A ")
 ;;3710
 ;;21,"S56.413A ")
 ;;3711
 ;;21,"S56.414A ")
 ;;3712
 ;;21,"S56.415A ")
 ;;3713
 ;;21,"S56.416A ")
 ;;3714
 ;;21,"S56.417A ")
 ;;3715
 ;;21,"S56.418A ")
 ;;3716
 ;;21,"S56.419A ")
 ;;3717
 ;;21,"S56.421A ")
 ;;3718
 ;;21,"S56.422A ")
 ;;3719
 ;;21,"S56.423A ")
 ;;3720
 ;;21,"S56.424A ")
 ;;3721
 ;;21,"S56.425A ")
 ;;3722
 ;;21,"S56.426A ")
 ;;3723
 ;;21,"S56.427A ")
 ;;3724
 ;;21,"S56.428A ")
 ;;3725
 ;;21,"S56.429A ")
 ;;3726
 ;;21,"S56.491A ")
 ;;3727
 ;;21,"S56.492A ")
 ;;3728
 ;;21,"S56.493A ")
 ;;3729
 ;;21,"S56.494A ")
 ;;3730
 ;;21,"S56.495A ")
 ;;3731
 ;;21,"S56.496A ")
 ;;3732
 ;;21,"S56.497A ")
 ;;3733
 ;;21,"S56.498A ")
 ;;3734
 ;;21,"S56.499A ")
 ;;3735
 ;;21,"S56.501A ")
 ;;3736
 ;;21,"S56.502A ")
 ;;3737
 ;;21,"S56.509A ")
 ;;3738
 ;;21,"S56.511A ")
 ;;3739
 ;;21,"S56.512A ")
 ;;3740
 ;;21,"S56.519A ")
 ;;3741
 ;;21,"S56.521A ")
 ;;3742
 ;;21,"S56.522A ")
 ;;3743
 ;;21,"S56.529A ")
 ;;3744
 ;;21,"S56.591A ")
 ;;3745
 ;;21,"S56.592A ")
 ;;3746
 ;;21,"S56.599A ")
 ;;3747
 ;;21,"S56.801A ")
 ;;3748
 ;;21,"S56.802A ")
 ;;3749
 ;;21,"S56.809A ")
 ;;3750
 ;;21,"S56.811A ")
 ;;3751
 ;;21,"S56.812A ")
 ;;3752
 ;;21,"S56.819A ")
 ;;3753
 ;;21,"S56.821A ")
 ;;3754
 ;;21,"S56.822A ")
 ;;3755
 ;;21,"S56.829A ")
 ;;3756
 ;;21,"S56.891A ")
 ;;3757
 ;;21,"S56.892A ")
 ;;3758
 ;;21,"S56.899A ")
 ;;3759
 ;;21,"S56.901A ")
 ;;3760
 ;;21,"S56.902A ")
 ;;3761
 ;;21,"S56.909A ")
 ;;3762
 ;;21,"S56.911A ")
 ;;3763
 ;;21,"S56.912A ")
 ;;3764
 ;;21,"S56.919A ")
 ;;3765
 ;;21,"S56.921A ")
 ;;3766
 ;;21,"S56.922A ")
 ;;3767
 ;;21,"S56.929A ")
 ;;3768
 ;;21,"S56.991A ")
 ;;3769
 ;;21,"S56.992A ")
 ;;3770
 ;;21,"S56.999A ")
 ;;3771
 ;;21,"S57.00XA ")
 ;;3772
 ;;21,"S57.01XA ")
 ;;3773
 ;;21,"S57.02XA ")
 ;;3774
 ;;21,"S57.80XA ")
 ;;3775
 ;;21,"S57.81XA ")
 ;;3776
 ;;21,"S57.82XA ")
 ;;3777
 ;;21,"S58.011A ")
 ;;3778
 ;;21,"S58.012A ")
 ;;3779
 ;;21,"S58.019A ")
 ;;3780
 ;;21,"S58.021A ")
 ;;3781
 ;;21,"S58.022A ")
 ;;3782
 ;;21,"S58.029A ")
 ;;3783
 ;;21,"S58.111A ")
 ;;3784
 ;;21,"S58.112A ")
 ;;3785
 ;;21,"S58.119A ")
 ;;3786
 ;;21,"S58.121A ")
 ;;3787
 ;;21,"S58.122A ")
 ;;3788
 ;;21,"S58.129A ")
 ;;3789
 ;;21,"S58.911A ")
 ;;3790
 ;;21,"S58.912A ")
 ;;3791
 ;;21,"S58.919A ")
 ;;3792
 ;;21,"S58.921A ")
 ;;3793
 ;;21,"S58.922A ")
 ;;3794
 ;;21,"S58.929A ")
 ;;3795
 ;;21,"S59.001A ")
 ;;3796
 ;;21,"S59.002A ")
 ;;3797
 ;;21,"S59.009A ")
 ;;3798
 ;;21,"S59.011A ")
 ;;3799
 ;;21,"S59.012A ")
 ;;3800
 ;;21,"S59.019A ")
 ;;3801
 ;;21,"S59.021A ")
 ;;3802
 ;;21,"S59.022A ")
 ;;3803
 ;;21,"S59.029A ")
 ;;3804
 ;;21,"S59.031A ")
 ;;3805
 ;;21,"S59.032A ")
 ;;3806
 ;;21,"S59.039A ")
 ;;3807
 ;;21,"S59.041A ")
 ;;3808
 ;;21,"S59.042A ")
 ;;3809
 ;;21,"S59.049A ")
 ;;3810
 ;;21,"S59.091A ")
 ;;3811
 ;;21,"S59.092A ")
 ;;3812
 ;;21,"S59.099A ")
 ;;3813
 ;;21,"S59.101A ")
 ;;3814
 ;;21,"S59.102A ")
 ;;3815
 ;;21,"S59.109A ")
 ;;3816
 ;;21,"S59.111A ")
 ;;3817
 ;;21,"S59.112A ")
 ;;3818
 ;;21,"S59.119A ")
 ;;3819
 ;;21,"S59.121A ")
 ;;3820
 ;;21,"S59.122A ")
 ;;3821
 ;;21,"S59.129A ")
 ;;3822
 ;;21,"S59.131A ")
 ;;3823
 ;;21,"S59.132A ")
 ;;3824
 ;;21,"S59.139A ")
 ;;3825
 ;;21,"S59.141A ")
 ;;3826
 ;;21,"S59.142A ")
 ;;3827
 ;;21,"S59.149A ")
 ;;3828
 ;;21,"S59.191A ")
 ;;3829
 ;;21,"S59.192A ")
 ;;3830
 ;;21,"S59.199A ")
 ;;3831
 ;;21,"S59.201A ")
 ;;3832
 ;;21,"S59.202A ")
 ;;3833
 ;;21,"S59.209A ")
 ;;3834
 ;;21,"S59.211A ")
 ;;3835
 ;;21,"S59.212A ")
 ;;3836
 ;;21,"S59.219A ")
 ;;3837
 ;;21,"S59.221A ")
 ;;3838
 ;;21,"S59.222A ")
 ;;3839
 ;;21,"S59.229A ")
 ;;3840
 ;;21,"S59.231A ")
 ;;3841
 ;;21,"S59.232A ")
 ;;3842
 ;;21,"S59.239A ")
 ;;3843
 ;;21,"S59.241A ")
 ;;3844
 ;;21,"S59.242A ")
 ;;3845
 ;;21,"S59.249A ")
 ;;3846
 ;;21,"S59.291A ")
 ;;3847
 ;;21,"S59.292A ")
 ;;3848
 ;;21,"S59.299A ")
 ;;3849
 ;;21,"S59.801A ")
 ;;3850
 ;;21,"S59.802A ")
 ;;3851
 ;;21,"S59.809A ")
 ;;3852
 ;;21,"S59.811A ")
 ;;3853
 ;;21,"S59.812A ")
 ;;3854
 ;;21,"S59.819A ")
 ;;3855
 ;;21,"S59.901A ")
 ;;3856
 ;;21,"S59.902A ")
 ;;3857
 ;;21,"S59.909A ")
 ;;3858
 ;;21,"S59.911A ")
 ;;3859
 ;;21,"S59.912A ")
 ;;3860
 ;;21,"S59.919A ")
 ;;3861
 ;;21,"S60.00XA ")
 ;;3862
 ;;21,"S60.011A ")
 ;;3863
 ;;21,"S60.012A ")
 ;;3864
 ;;21,"S60.019A ")
 ;;3865
 ;;21,"S60.021A ")
 ;;3866
 ;;21,"S60.022A ")
 ;;3867