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

ATXXA26.m

Go to the documentation of this file.
ATXXA26 ;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,"T44.8X4A ")
 ;;9635
 ;;21,"T44.901A ")
 ;;9636
 ;;21,"T44.902A ")
 ;;9637
 ;;21,"T44.903A ")
 ;;9638
 ;;21,"T44.904A ")
 ;;9639
 ;;21,"T44.991A ")
 ;;9640
 ;;21,"T44.992A ")
 ;;9641
 ;;21,"T44.993A ")
 ;;9642
 ;;21,"T44.994A ")
 ;;9643
 ;;21,"T45.0X1A ")
 ;;9644
 ;;21,"T45.0X2A ")
 ;;9645
 ;;21,"T45.0X3A ")
 ;;9646
 ;;21,"T45.0X4A ")
 ;;9647
 ;;21,"T45.1X1A ")
 ;;9648
 ;;21,"T45.1X2A ")
 ;;9649
 ;;21,"T45.1X3A ")
 ;;9650
 ;;21,"T45.1X4A ")
 ;;9651
 ;;21,"T45.2X1A ")
 ;;9652
 ;;21,"T45.2X2A ")
 ;;9653
 ;;21,"T45.2X3A ")
 ;;9654
 ;;21,"T45.2X4A ")
 ;;9655
 ;;21,"T45.3X1A ")
 ;;9656
 ;;21,"T45.3X2A ")
 ;;9657
 ;;21,"T45.3X3A ")
 ;;9658
 ;;21,"T45.3X4A ")
 ;;9659
 ;;21,"T45.4X1A ")
 ;;9660
 ;;21,"T45.4X2A ")
 ;;9661
 ;;21,"T45.4X3A ")
 ;;9662
 ;;21,"T45.4X4A ")
 ;;9663
 ;;21,"T45.511A ")
 ;;9664
 ;;21,"T45.512A ")
 ;;9665
 ;;21,"T45.513A ")
 ;;9666
 ;;21,"T45.514A ")
 ;;9667
 ;;21,"T45.521A ")
 ;;9668
 ;;21,"T45.522A ")
 ;;9669
 ;;21,"T45.523A ")
 ;;9670
 ;;21,"T45.524A ")
 ;;9671
 ;;21,"T45.601A ")
 ;;9672
 ;;21,"T45.602A ")
 ;;9673
 ;;21,"T45.603A ")
 ;;9674
 ;;21,"T45.604A ")
 ;;9675
 ;;21,"T45.611A ")
 ;;9676
 ;;21,"T45.612A ")
 ;;9677
 ;;21,"T45.613A ")
 ;;9678
 ;;21,"T45.614A ")
 ;;9679
 ;;21,"T45.621A ")
 ;;9680
 ;;21,"T45.622A ")
 ;;9681
 ;;21,"T45.623A ")
 ;;9682
 ;;21,"T45.624A ")
 ;;9683
 ;;21,"T45.691A ")
 ;;9684
 ;;21,"T45.692A ")
 ;;9685
 ;;21,"T45.693A ")
 ;;9686
 ;;21,"T45.694A ")
 ;;9687
 ;;21,"T45.7X1A ")
 ;;9688
 ;;21,"T45.7X2A ")
 ;;9689
 ;;21,"T45.7X3A ")
 ;;9690
 ;;21,"T45.7X4A ")
 ;;9691
 ;;21,"T45.8X1A ")
 ;;9692
 ;;21,"T45.8X2A ")
 ;;9693
 ;;21,"T45.8X3A ")
 ;;9694
 ;;21,"T45.8X4A ")
 ;;9695
 ;;21,"T45.91XA ")
 ;;9696
 ;;21,"T45.92XA ")
 ;;9697
 ;;21,"T45.93XA ")
 ;;9698
 ;;21,"T45.94XA ")
 ;;9699
 ;;21,"T46.0X1A ")
 ;;9700
 ;;21,"T46.0X2A ")
 ;;9701
 ;;21,"T46.0X3A ")
 ;;9702
 ;;21,"T46.0X4A ")
 ;;9703
 ;;21,"T46.1X1A ")
 ;;9704
 ;;21,"T46.1X2A ")
 ;;9705
 ;;21,"T46.1X3A ")
 ;;9706
 ;;21,"T46.1X4A ")
 ;;9707
 ;;21,"T46.2X1A ")
 ;;9708
 ;;21,"T46.2X2A ")
 ;;9709
 ;;21,"T46.2X3A ")
 ;;9710
 ;;21,"T46.2X4A ")
 ;;9711
 ;;21,"T46.3X1A ")
 ;;9712
 ;;21,"T46.3X2A ")
 ;;9713
 ;;21,"T46.3X3A ")
 ;;9714
 ;;21,"T46.3X4A ")
 ;;9715
 ;;21,"T46.4X1A ")
 ;;9716
 ;;21,"T46.4X2A ")
 ;;9717
 ;;21,"T46.4X3A ")
 ;;9718
 ;;21,"T46.4X4A ")
 ;;9719
 ;;21,"T46.5X1A ")
 ;;9720
 ;;21,"T46.5X2A ")
 ;;9721
 ;;21,"T46.5X3A ")
 ;;9722
 ;;21,"T46.5X4A ")
 ;;9723
 ;;21,"T46.6X1A ")
 ;;9724
 ;;21,"T46.6X2A ")
 ;;9725
 ;;21,"T46.6X3A ")
 ;;9726
 ;;21,"T46.6X4A ")
 ;;9727
 ;;21,"T46.7X1A ")
 ;;9728
 ;;21,"T46.7X2A ")
 ;;9729
 ;;21,"T46.7X3A ")
 ;;9730
 ;;21,"T46.7X4A ")
 ;;9731
 ;;21,"T46.8X1A ")
 ;;9732
 ;;21,"T46.8X2A ")
 ;;9733
 ;;21,"T46.8X3A ")
 ;;9734
 ;;21,"T46.8X4A ")
 ;;9735
 ;;21,"T46.901A ")
 ;;9736
 ;;21,"T46.902A ")
 ;;9737
 ;;21,"T46.903A ")
 ;;9738
 ;;21,"T46.904A ")
 ;;9739
 ;;21,"T46.991A ")
 ;;9740
 ;;21,"T46.992A ")
 ;;9741
 ;;21,"T46.993A ")
 ;;9742
 ;;21,"T46.994A ")
 ;;9743
 ;;21,"T47.0X1A ")
 ;;9744
 ;;21,"T47.0X2A ")
 ;;9745
 ;;21,"T47.0X3A ")
 ;;9746
 ;;21,"T47.0X4A ")
 ;;9747
 ;;21,"T47.1X1A ")
 ;;9748
 ;;21,"T47.1X2A ")
 ;;9749
 ;;21,"T47.1X3A ")
 ;;9750
 ;;21,"T47.1X4A ")
 ;;9751
 ;;21,"T47.2X1A ")
 ;;9752
 ;;21,"T47.2X2A ")
 ;;9753
 ;;21,"T47.2X3A ")
 ;;9754
 ;;21,"T47.2X4A ")
 ;;9755
 ;;21,"T47.3X1A ")
 ;;9756
 ;;21,"T47.3X2A ")
 ;;9757
 ;;21,"T47.3X3A ")
 ;;9758
 ;;21,"T47.3X4A ")
 ;;9759
 ;;21,"T47.4X1A ")
 ;;9760
 ;;21,"T47.4X2A ")
 ;;9761
 ;;21,"T47.4X3A ")
 ;;9762
 ;;21,"T47.4X4A ")
 ;;9763
 ;;21,"T47.5X1A ")
 ;;9764
 ;;21,"T47.5X2A ")
 ;;9765
 ;;21,"T47.5X3A ")
 ;;9766
 ;;21,"T47.5X4A ")
 ;;9767
 ;;21,"T47.6X1A ")
 ;;9768
 ;;21,"T47.6X2A ")
 ;;9769
 ;;21,"T47.6X3A ")
 ;;9770
 ;;21,"T47.6X4A ")
 ;;9771
 ;;21,"T47.7X1A ")
 ;;9772
 ;;21,"T47.7X2A ")
 ;;9773
 ;;21,"T47.7X3A ")
 ;;9774
 ;;21,"T47.7X4A ")
 ;;9775
 ;;21,"T47.8X1A ")
 ;;9776
 ;;21,"T47.8X2A ")
 ;;9777
 ;;21,"T47.8X3A ")
 ;;9778
 ;;21,"T47.8X4A ")
 ;;9779
 ;;21,"T47.91XA ")
 ;;9780
 ;;21,"T47.92XA ")
 ;;9781
 ;;21,"T47.93XA ")
 ;;9782
 ;;21,"T47.94XA ")
 ;;9783
 ;;21,"T48.0X1A ")
 ;;9784
 ;;21,"T48.0X2A ")
 ;;9785
 ;;21,"T48.0X3A ")
 ;;9786
 ;;21,"T48.0X4A ")
 ;;9787
 ;;21,"T48.1X1A ")
 ;;9788
 ;;21,"T48.1X2A ")
 ;;9789
 ;;21,"T48.1X3A ")
 ;;9790
 ;;21,"T48.1X4A ")
 ;;9791
 ;;21,"T48.201A ")
 ;;9792
 ;;21,"T48.202A ")
 ;;9793
 ;;21,"T48.203A ")
 ;;9794
 ;;21,"T48.204A ")
 ;;9795
 ;;21,"T48.291A ")
 ;;9796
 ;;21,"T48.292A ")
 ;;9797
 ;;21,"T48.293A ")
 ;;9798
 ;;21,"T48.294A ")
 ;;9799
 ;;21,"T48.3X1A ")
 ;;9800
 ;;21,"T48.3X2A ")
 ;;9801
 ;;21,"T48.3X3A ")
 ;;9802
 ;;21,"T48.3X4A ")
 ;;9803
 ;;21,"T48.4X1A ")
 ;;9804
 ;;21,"T48.4X2A ")
 ;;9805
 ;;21,"T48.4X3A ")
 ;;9806
 ;;21,"T48.4X4A ")
 ;;9807
 ;;21,"T48.5X1A ")
 ;;9808
 ;;21,"T48.5X2A ")
 ;;9809
 ;;21,"T48.5X3A ")
 ;;9810
 ;;21,"T48.5X4A ")
 ;;9811
 ;;21,"T48.6X1A ")
 ;;9812
 ;;21,"T48.6X2A ")
 ;;9813
 ;;21,"T48.6X3A ")
 ;;9814
 ;;21,"T48.6X4A ")
 ;;9815
 ;;21,"T48.901A ")
 ;;9816
 ;;21,"T48.902A ")
 ;;9817
 ;;21,"T48.903A ")
 ;;9818
 ;;21,"T48.904A ")
 ;;9819
 ;;21,"T48.991A ")
 ;;9820
 ;;21,"T48.992A ")
 ;;9821
 ;;21,"T48.993A ")
 ;;9822
 ;;21,"T48.994A ")
 ;;9823
 ;;21,"T49.0X1A ")
 ;;9824
 ;;21,"T49.0X2A ")
 ;;9825
 ;;21,"T49.0X3A ")
 ;;9826
 ;;21,"T49.0X4A ")
 ;;9827
 ;;21,"T49.1X1A ")
 ;;9828
 ;;21,"T49.1X2A ")
 ;;9829
 ;;21,"T49.1X3A ")
 ;;9830
 ;;21,"T49.1X4A ")
 ;;9831
 ;;21,"T49.2X1A ")
 ;;9832
 ;;21,"T49.2X2A ")
 ;;9833
 ;;21,"T49.2X3A ")
 ;;9834
 ;;21,"T49.2X4A ")
 ;;9835
 ;;21,"T49.3X1A ")
 ;;9836
 ;;21,"T49.3X2A ")
 ;;9837
 ;;21,"T49.3X3A ")
 ;;9838
 ;;21,"T49.3X4A ")
 ;;9839
 ;;21,"T49.4X1A ")
 ;;9840
 ;;21,"T49.4X2A ")
 ;;9841
 ;;21,"T49.4X3A ")
 ;;9842
 ;;21,"T49.4X4A ")
 ;;9843
 ;;21,"T49.5X1A ")
 ;;9844
 ;;21,"T49.5X2A ")
 ;;9845
 ;;21,"T49.5X3A ")
 ;;9846
 ;;21,"T49.5X4A ")
 ;;9847
 ;;21,"T49.6X1A ")
 ;;9848
 ;;21,"T49.6X2A ")
 ;;9849
 ;;21,"T49.6X3A ")
 ;;9850
 ;;21,"T49.6X4A ")
 ;;9851
 ;;21,"T49.7X1A ")
 ;;9852
 ;;21,"T49.7X2A ")
 ;;9853
 ;;21,"T49.7X3A ")
 ;;9854
 ;;21,"T49.7X4A ")
 ;;9855
 ;;21,"T49.8X1A ")
 ;;9856
 ;;21,"T49.8X2A ")
 ;;9857
 ;;21,"T49.8X3A ")
 ;;9858
 ;;21,"T49.8X4A ")
 ;;9859
 ;;21,"T49.91XA ")
 ;;9860
 ;;21,"T49.92XA ")
 ;;9861
 ;;21,"T49.93XA ")
 ;;9862
 ;;21,"T49.94XA ")
 ;;9863
 ;;21,"T50.0X1A ")
 ;;9864
 ;;21,"T50.0X2A ")
 ;;9865
 ;;21,"T50.0X3A ")
 ;;9866
 ;;21,"T50.0X4A ")
 ;;9867
 ;;21,"T50.1X1A ")
 ;;9868
 ;;21,"T50.1X2A ")
 ;;9869
 ;;21,"T50.1X3A ")
 ;;9870
 ;;21,"T50.1X4A ")
 ;;9871
 ;;21,"T50.2X1A ")
 ;;9872
 ;;21,"T50.2X2A ")
 ;;9873
 ;;21,"T50.2X3A ")
 ;;9874
 ;;21,"T50.2X4A ")
 ;;9875
 ;;21,"T50.3X1A ")
 ;;9876
 ;;21,"T50.3X2A ")
 ;;9877
 ;;21,"T50.3X3A ")
 ;;9878
 ;;21,"T50.3X4A ")
 ;;9879
 ;;21,"T50.4X1A ")
 ;;9880
 ;;21,"T50.4X2A ")
 ;;9881
 ;;21,"T50.4X3A ")
 ;;9882
 ;;21,"T50.4X4A ")
 ;;9883
 ;;21,"T50.5X1A ")
 ;;9884
 ;;21,"T50.5X2A ")
 ;;9885
 ;;21,"T50.5X3A ")
 ;;9886
 ;;21,"T50.5X4A ")
 ;;9887
 ;;21,"T50.6X1A ")
 ;;9888
 ;;21,"T50.6X2A ")
 ;;9889
 ;;21,"T50.6X3A ")
 ;;9890
 ;;21,"T50.6X4A ")
 ;;9891
 ;;21,"T50.7X1A ")
 ;;9892
 ;;21,"T50.7X2A ")
 ;;9893
 ;;21,"T50.7X3A ")
 ;;9894
 ;;21,"T50.7X4A ")
 ;;9895
 ;;21,"T50.8X1A ")
 ;;9896
 ;;21,"T50.8X2A ")
 ;;9897
 ;;21,"T50.8X3A ")
 ;;9898
 ;;21,"T50.8X4A ")
 ;;9899
 ;;21,"T50.901A ")
 ;;9900
 ;;21,"T50.902A ")
 ;;9901
 ;;21,"T50.903A ")
 ;;9902
 ;;21,"T50.904A ")
 ;;9903
 ;;21,"T50.991A ")
 ;;9904
 ;;21,"T50.992A ")
 ;;9905
 ;;21,"T50.993A ")
 ;;9906
 ;;21,"T50.994A ")
 ;;9907
 ;;21,"T50.A11A ")
 ;;9908
 ;;21,"T50.A12A ")
 ;;9909
 ;;21,"T50.A13A ")
 ;;9910
 ;;21,"T50.A14A ")
 ;;9911
 ;;21,"T50.A21A ")
 ;;9912
 ;;21,"T50.A22A ")
 ;;9913
 ;;21,"T50.A23A ")
 ;;9914
 ;;21,"T50.A24A ")
 ;;9915
 ;;21,"T50.A91A ")
 ;;9916
 ;;21,"T50.A92A ")
 ;;9917
 ;;21,"T50.A93A ")
 ;;9918
 ;;21,"T50.A94A ")
 ;;9919
 ;;21,"T50.B11A ")
 ;;9920
 ;;21,"T50.B12A ")
 ;;9921
 ;;21,"T50.B13A ")
 ;;9922
 ;;21,"T50.B14A ")
 ;;9923
 ;;21,"T50.B91A ")
 ;;9924
 ;;21,"T50.B92A ")
 ;;9925
 ;;21,"T50.B93A ")
 ;;9926
 ;;21,"T50.B94A ")
 ;;9927
 ;;21,"T50.Z11A ")
 ;;9928
 ;;21,"T50.Z12A ")
 ;;9929
 ;;21,"T50.Z13A ")
 ;;9930
 ;;21,"T50.Z14A ")
 ;;9931
 ;;21,"T50.Z91A ")
 ;;9932
 ;;21,"T50.Z92A ")
 ;;9933
 ;;21,"T50.Z93A ")
 ;;9934
 ;;21,"T50.Z94A ")
 ;;9935
 ;;21,"T51.0X1A ")
 ;;9936
 ;;21,"T51.0X2A ")
 ;;9937
 ;;21,"T51.0X3A ")
 ;;9938
 ;;21,"T51.0X4A ")
 ;;9939
 ;;21,"T51.1X1A ")
 ;;9940
 ;;21,"T51.1X2A ")
 ;;9941
 ;;21,"T51.1X3A ")
 ;;9942
 ;;21,"T51.1X4A ")
 ;;9943
 ;;21,"T51.2X1A ")
 ;;9944
 ;;21,"T51.2X2A ")
 ;;9945
 ;;21,"T51.2X3A ")
 ;;9946
 ;;21,"T51.2X4A ")
 ;;9947
 ;;21,"T51.3X1A ")
 ;;9948
 ;;21,"T51.3X2A ")
 ;;9949
 ;;21,"T51.3X3A ")
 ;;9950
 ;;21,"T51.3X4A ")
 ;;9951
 ;;21,"T51.8X1A ")
 ;;9952
 ;;21,"T51.8X2A ")
 ;;9953
 ;;21,"T51.8X3A ")
 ;;9954
 ;;21,"T51.8X4A ")
 ;;9955
 ;;21,"T51.91XA ")
 ;;9956
 ;;21,"T51.92XA ")
 ;;9957
 ;;21,"T51.93XA ")
 ;;9958
 ;;21,"T51.94XA ")
 ;;9959
 ;;21,"T52.0X1A ")
 ;;9960
 ;;21,"T52.0X2A ")
 ;;9961
 ;;21,"T52.0X3A ")
 ;;9962
 ;;21,"T52.0X4A ")
 ;;9963
 ;;21,"T52.1X1A ")
 ;;9964
 ;;21,"T52.1X2A ")
 ;;9965
 ;;21,"T52.1X3A ")
 ;;9966
 ;;21,"T52.1X4A ")
 ;;9967
 ;;21,"T52.2X1A ")
 ;;9968
 ;;21,"T52.2X2A ")
 ;;9969
 ;;21,"T52.2X3A ")
 ;;9970
 ;;21,"T52.2X4A ")
 ;;9971
 ;;21,"T52.3X1A ")
 ;;9972
 ;;21,"T52.3X2A ")
 ;;9973
 ;;21,"T52.3X3A ")
 ;;9974
 ;;21,"T52.3X4A ")
 ;;9975
 ;;21,"T52.4X1A ")
 ;;9976
 ;;21,"T52.4X2A ")
 ;;9977
 ;;21,"T52.4X3A ")
 ;;9978
 ;;21,"T52.4X4A ")
 ;;9979
 ;;21,"T52.8X1A ")
 ;;9980
 ;;21,"T52.8X2A ")
 ;;9981
 ;;21,"T52.8X3A ")
 ;;9982
 ;;21,"T52.8X4A ")
 ;;9983
 ;;21,"T52.91XA ")
 ;;9984
 ;;21,"T52.92XA ")
 ;;9985
 ;;21,"T52.93XA ")
 ;;9986
 ;;21,"T52.94XA ")
 ;;9987
 ;;21,"T53.0X1A ")
 ;;9988
 ;;21,"T53.0X2A ")
 ;;9989
 ;;21,"T53.0X3A ")
 ;;9990
 ;;21,"T53.0X4A ")
 ;;9991
 ;;21,"T53.1X1A ")
 ;;9992
 ;;21,"T53.1X2A ")
 ;;9993
 ;;21,"T53.1X3A ")
 ;;9994
 ;;21,"T53.1X4A ")
 ;;9995
 ;;21,"T53.2X1A ")
 ;;9996
 ;;21,"T53.2X2A ")
 ;;9997
 ;;21,"T53.2X3A ")
 ;;9998
 ;;21,"T53.2X4A ")
 ;;9999
 ;;21,"T53.3X1A ")
 ;;10000
 ;;21,"T53.3X2A ")
 ;;10001
 ;;21,"T53.3X3A ")
 ;;10002
 ;;21,"T53.3X4A ")
 ;;10003
 ;;21,"T53.4X1A ")
 ;;10004
 ;;21,"T53.4X2A ")
 ;;10005
 ;;21,"T53.4X3A ")
 ;;10006
 ;;21,"T53.4X4A ")
 ;;10007
 ;;21,"T53.5X1A ")
 ;;10008
 ;;21,"T53.5X2A ")
 ;;10009
 ;;21,"T53.5X3A ")
 ;;10010
 ;;21,"T53.5X4A ")
 ;;10011
 ;;21,"T53.6X1A ")
 ;;10012
 ;;21,"T53.6X2A ")
 ;;10013
 ;;21,"T53.6X3A ")
 ;;10014
 ;;21,"T53.6X4A ")
 ;;10015
 ;;21,"T53.7X1A ")
 ;;10016
 ;;21,"T53.7X2A ")
 ;;10017