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

ATXXA18.m

Go to the documentation of this file.
ATXXA18 ;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,"S82.242B ")
 ;;6556
 ;;21,"S82.242C ")
 ;;6557
 ;;21,"S82.243A ")
 ;;6558
 ;;21,"S82.243B ")
 ;;6559
 ;;21,"S82.243C ")
 ;;6560
 ;;21,"S82.244A ")
 ;;6561
 ;;21,"S82.244B ")
 ;;6562
 ;;21,"S82.244C ")
 ;;6563
 ;;21,"S82.245A ")
 ;;6564
 ;;21,"S82.245B ")
 ;;6565
 ;;21,"S82.245C ")
 ;;6566
 ;;21,"S82.246A ")
 ;;6567
 ;;21,"S82.246B ")
 ;;6568
 ;;21,"S82.246C ")
 ;;6569
 ;;21,"S82.251A ")
 ;;6570
 ;;21,"S82.251B ")
 ;;6571
 ;;21,"S82.251C ")
 ;;6572
 ;;21,"S82.252A ")
 ;;6573
 ;;21,"S82.252B ")
 ;;6574
 ;;21,"S82.252C ")
 ;;6575
 ;;21,"S82.253A ")
 ;;6576
 ;;21,"S82.253B ")
 ;;6577
 ;;21,"S82.253C ")
 ;;6578
 ;;21,"S82.254A ")
 ;;6579
 ;;21,"S82.254B ")
 ;;6580
 ;;21,"S82.254C ")
 ;;6581
 ;;21,"S82.255A ")
 ;;6582
 ;;21,"S82.255B ")
 ;;6583
 ;;21,"S82.255C ")
 ;;6584
 ;;21,"S82.256A ")
 ;;6585
 ;;21,"S82.256B ")
 ;;6586
 ;;21,"S82.256C ")
 ;;6587
 ;;21,"S82.261A ")
 ;;6588
 ;;21,"S82.261B ")
 ;;6589
 ;;21,"S82.261C ")
 ;;6590
 ;;21,"S82.262A ")
 ;;6591
 ;;21,"S82.262B ")
 ;;6592
 ;;21,"S82.262C ")
 ;;6593
 ;;21,"S82.263A ")
 ;;6594
 ;;21,"S82.263B ")
 ;;6595
 ;;21,"S82.263C ")
 ;;6596
 ;;21,"S82.264A ")
 ;;6597
 ;;21,"S82.264B ")
 ;;6598
 ;;21,"S82.264C ")
 ;;6599
 ;;21,"S82.265A ")
 ;;6600
 ;;21,"S82.265B ")
 ;;6601
 ;;21,"S82.265C ")
 ;;6602
 ;;21,"S82.266A ")
 ;;6603
 ;;21,"S82.266B ")
 ;;6604
 ;;21,"S82.266C ")
 ;;6605
 ;;21,"S82.291A ")
 ;;6606
 ;;21,"S82.291B ")
 ;;6607
 ;;21,"S82.291C ")
 ;;6608
 ;;21,"S82.292A ")
 ;;6609
 ;;21,"S82.292B ")
 ;;6610
 ;;21,"S82.292C ")
 ;;6611
 ;;21,"S82.299A ")
 ;;6612
 ;;21,"S82.299B ")
 ;;6613
 ;;21,"S82.299C ")
 ;;6614
 ;;21,"S82.301A ")
 ;;6615
 ;;21,"S82.301B ")
 ;;6616
 ;;21,"S82.301C ")
 ;;6617
 ;;21,"S82.302A ")
 ;;6618
 ;;21,"S82.302B ")
 ;;6619
 ;;21,"S82.302C ")
 ;;6620
 ;;21,"S82.309A ")
 ;;6621
 ;;21,"S82.309B ")
 ;;6622
 ;;21,"S82.309C ")
 ;;6623
 ;;21,"S82.311A ")
 ;;6624
 ;;21,"S82.312A ")
 ;;6625
 ;;21,"S82.319A ")
 ;;6626
 ;;21,"S82.391A ")
 ;;6627
 ;;21,"S82.391B ")
 ;;6628
 ;;21,"S82.391C ")
 ;;6629
 ;;21,"S82.392A ")
 ;;6630
 ;;21,"S82.392B ")
 ;;6631
 ;;21,"S82.392C ")
 ;;6632
 ;;21,"S82.399A ")
 ;;6633
 ;;21,"S82.399B ")
 ;;6634
 ;;21,"S82.399C ")
 ;;6635
 ;;21,"S82.401A ")
 ;;6636
 ;;21,"S82.401B ")
 ;;6637
 ;;21,"S82.401C ")
 ;;6638
 ;;21,"S82.402A ")
 ;;6639
 ;;21,"S82.402B ")
 ;;6640
 ;;21,"S82.402C ")
 ;;6641
 ;;21,"S82.409A ")
 ;;6642
 ;;21,"S82.409B ")
 ;;6643
 ;;21,"S82.409C ")
 ;;6644
 ;;21,"S82.421A ")
 ;;6645
 ;;21,"S82.421B ")
 ;;6646
 ;;21,"S82.421C ")
 ;;6647
 ;;21,"S82.422A ")
 ;;6648
 ;;21,"S82.422B ")
 ;;6649
 ;;21,"S82.422C ")
 ;;6650
 ;;21,"S82.423A ")
 ;;6651
 ;;21,"S82.423B ")
 ;;6652
 ;;21,"S82.423C ")
 ;;6653
 ;;21,"S82.424A ")
 ;;6654
 ;;21,"S82.424B ")
 ;;6655
 ;;21,"S82.424C ")
 ;;6656
 ;;21,"S82.425A ")
 ;;6657
 ;;21,"S82.425B ")
 ;;6658
 ;;21,"S82.425C ")
 ;;6659
 ;;21,"S82.426A ")
 ;;6660
 ;;21,"S82.426B ")
 ;;6661
 ;;21,"S82.426C ")
 ;;6662
 ;;21,"S82.431A ")
 ;;6663
 ;;21,"S82.431B ")
 ;;6664
 ;;21,"S82.431C ")
 ;;6665
 ;;21,"S82.432A ")
 ;;6666
 ;;21,"S82.432B ")
 ;;6667
 ;;21,"S82.432C ")
 ;;6668
 ;;21,"S82.433A ")
 ;;6669
 ;;21,"S82.433B ")
 ;;6670
 ;;21,"S82.433C ")
 ;;6671
 ;;21,"S82.434A ")
 ;;6672
 ;;21,"S82.434B ")
 ;;6673
 ;;21,"S82.434C ")
 ;;6674
 ;;21,"S82.435A ")
 ;;6675
 ;;21,"S82.435B ")
 ;;6676
 ;;21,"S82.435C ")
 ;;6677
 ;;21,"S82.436A ")
 ;;6678
 ;;21,"S82.436B ")
 ;;6679
 ;;21,"S82.436C ")
 ;;6680
 ;;21,"S82.441A ")
 ;;6681
 ;;21,"S82.441B ")
 ;;6682
 ;;21,"S82.441C ")
 ;;6683
 ;;21,"S82.442A ")
 ;;6684
 ;;21,"S82.442B ")
 ;;6685
 ;;21,"S82.442C ")
 ;;6686
 ;;21,"S82.443A ")
 ;;6687
 ;;21,"S82.443B ")
 ;;6688
 ;;21,"S82.443C ")
 ;;6689
 ;;21,"S82.444A ")
 ;;6690
 ;;21,"S82.444B ")
 ;;6691
 ;;21,"S82.444C ")
 ;;6692
 ;;21,"S82.445A ")
 ;;6693
 ;;21,"S82.445B ")
 ;;6694
 ;;21,"S82.445C ")
 ;;6695
 ;;21,"S82.446A ")
 ;;6696
 ;;21,"S82.446B ")
 ;;6697
 ;;21,"S82.446C ")
 ;;6698
 ;;21,"S82.451A ")
 ;;6699
 ;;21,"S82.451B ")
 ;;6700
 ;;21,"S82.451C ")
 ;;6701
 ;;21,"S82.452A ")
 ;;6702
 ;;21,"S82.452B ")
 ;;6703
 ;;21,"S82.452C ")
 ;;6704
 ;;21,"S82.453A ")
 ;;6705
 ;;21,"S82.453B ")
 ;;6706
 ;;21,"S82.453C ")
 ;;6707
 ;;21,"S82.454A ")
 ;;6708
 ;;21,"S82.454B ")
 ;;6709
 ;;21,"S82.454C ")
 ;;6710
 ;;21,"S82.455A ")
 ;;6711
 ;;21,"S82.455B ")
 ;;6712
 ;;21,"S82.455C ")
 ;;6713
 ;;21,"S82.456A ")
 ;;6714
 ;;21,"S82.456B ")
 ;;6715
 ;;21,"S82.456C ")
 ;;6716
 ;;21,"S82.461A ")
 ;;6717
 ;;21,"S82.461B ")
 ;;6718
 ;;21,"S82.461C ")
 ;;6719
 ;;21,"S82.462A ")
 ;;6720
 ;;21,"S82.462B ")
 ;;6721
 ;;21,"S82.462C ")
 ;;6722
 ;;21,"S82.463A ")
 ;;6723
 ;;21,"S82.463B ")
 ;;6724
 ;;21,"S82.463C ")
 ;;6725
 ;;21,"S82.464A ")
 ;;6726
 ;;21,"S82.464B ")
 ;;6727
 ;;21,"S82.464C ")
 ;;6728
 ;;21,"S82.465A ")
 ;;6729
 ;;21,"S82.465B ")
 ;;6730
 ;;21,"S82.465C ")
 ;;6731
 ;;21,"S82.466A ")
 ;;6732
 ;;21,"S82.466B ")
 ;;6733
 ;;21,"S82.466C ")
 ;;6734
 ;;21,"S82.491A ")
 ;;6735
 ;;21,"S82.491B ")
 ;;6736
 ;;21,"S82.491C ")
 ;;6737
 ;;21,"S82.492A ")
 ;;6738
 ;;21,"S82.492B ")
 ;;6739
 ;;21,"S82.492C ")
 ;;6740
 ;;21,"S82.499A ")
 ;;6741
 ;;21,"S82.499B ")
 ;;6742
 ;;21,"S82.499C ")
 ;;6743
 ;;21,"S82.51XA ")
 ;;6744
 ;;21,"S82.51XB ")
 ;;6745
 ;;21,"S82.51XC ")
 ;;6746
 ;;21,"S82.52XA ")
 ;;6747
 ;;21,"S82.52XB ")
 ;;6748
 ;;21,"S82.52XC ")
 ;;6749
 ;;21,"S82.53XA ")
 ;;6750
 ;;21,"S82.53XB ")
 ;;6751
 ;;21,"S82.53XC ")
 ;;6752
 ;;21,"S82.54XA ")
 ;;6753
 ;;21,"S82.54XB ")
 ;;6754
 ;;21,"S82.54XC ")
 ;;6755
 ;;21,"S82.55XA ")
 ;;6756
 ;;21,"S82.55XB ")
 ;;6757
 ;;21,"S82.55XC ")
 ;;6758
 ;;21,"S82.56XA ")
 ;;6759
 ;;21,"S82.56XB ")
 ;;6760
 ;;21,"S82.56XC ")
 ;;6761
 ;;21,"S82.61XA ")
 ;;6762
 ;;21,"S82.61XB ")
 ;;6763
 ;;21,"S82.61XC ")
 ;;6764
 ;;21,"S82.62XA ")
 ;;6765
 ;;21,"S82.62XB ")
 ;;6766
 ;;21,"S82.62XC ")
 ;;6767
 ;;21,"S82.63XA ")
 ;;6768
 ;;21,"S82.63XB ")
 ;;6769
 ;;21,"S82.63XC ")
 ;;6770
 ;;21,"S82.64XA ")
 ;;6771
 ;;21,"S82.64XB ")
 ;;6772
 ;;21,"S82.64XC ")
 ;;6773
 ;;21,"S82.65XA ")
 ;;6774
 ;;21,"S82.65XB ")
 ;;6775
 ;;21,"S82.65XC ")
 ;;6776
 ;;21,"S82.66XA ")
 ;;6777
 ;;21,"S82.66XB ")
 ;;6778
 ;;21,"S82.66XC ")
 ;;6779
 ;;21,"S82.811A ")
 ;;6780
 ;;21,"S82.812A ")
 ;;6781
 ;;21,"S82.819A ")
 ;;6782
 ;;21,"S82.821A ")
 ;;6783
 ;;21,"S82.822A ")
 ;;6784
 ;;21,"S82.829A ")
 ;;6785
 ;;21,"S82.831A ")
 ;;6786
 ;;21,"S82.831B ")
 ;;6787
 ;;21,"S82.831C ")
 ;;6788
 ;;21,"S82.832A ")
 ;;6789
 ;;21,"S82.832B ")
 ;;6790
 ;;21,"S82.832C ")
 ;;6791
 ;;21,"S82.839A ")
 ;;6792
 ;;21,"S82.839B ")
 ;;6793
 ;;21,"S82.839C ")
 ;;6794
 ;;21,"S82.841A ")
 ;;6795
 ;;21,"S82.841B ")
 ;;6796
 ;;21,"S82.841C ")
 ;;6797
 ;;21,"S82.842A ")
 ;;6798
 ;;21,"S82.842B ")
 ;;6799
 ;;21,"S82.842C ")
 ;;6800
 ;;21,"S82.843A ")
 ;;6801
 ;;21,"S82.843B ")
 ;;6802
 ;;21,"S82.843C ")
 ;;6803
 ;;21,"S82.844A ")
 ;;6804
 ;;21,"S82.844B ")
 ;;6805
 ;;21,"S82.844C ")
 ;;6806
 ;;21,"S82.845A ")
 ;;6807
 ;;21,"S82.845B ")
 ;;6808
 ;;21,"S82.845C ")
 ;;6809
 ;;21,"S82.846A ")
 ;;6810
 ;;21,"S82.846B ")
 ;;6811
 ;;21,"S82.846C ")
 ;;6812
 ;;21,"S82.851A ")
 ;;6813
 ;;21,"S82.851B ")
 ;;6814
 ;;21,"S82.851C ")
 ;;6815
 ;;21,"S82.852A ")
 ;;6816
 ;;21,"S82.852B ")
 ;;6817
 ;;21,"S82.852C ")
 ;;6818
 ;;21,"S82.853A ")
 ;;6819
 ;;21,"S82.853B ")
 ;;6820
 ;;21,"S82.853C ")
 ;;6821
 ;;21,"S82.854A ")
 ;;6822
 ;;21,"S82.854B ")
 ;;6823
 ;;21,"S82.854C ")
 ;;6824
 ;;21,"S82.855A ")
 ;;6825
 ;;21,"S82.855B ")
 ;;6826
 ;;21,"S82.855C ")
 ;;6827
 ;;21,"S82.856A ")
 ;;6828
 ;;21,"S82.856B ")
 ;;6829
 ;;21,"S82.856C ")
 ;;6830
 ;;21,"S82.861A ")
 ;;6831
 ;;21,"S82.861B ")
 ;;6832
 ;;21,"S82.861C ")
 ;;6833
 ;;21,"S82.862A ")
 ;;6834
 ;;21,"S82.862B ")
 ;;6835
 ;;21,"S82.862C ")
 ;;6836
 ;;21,"S82.863A ")
 ;;6837
 ;;21,"S82.863B ")
 ;;6838
 ;;21,"S82.863C ")
 ;;6839
 ;;21,"S82.864A ")
 ;;6840
 ;;21,"S82.864B ")
 ;;6841
 ;;21,"S82.864C ")
 ;;6842
 ;;21,"S82.865A ")
 ;;6843
 ;;21,"S82.865B ")
 ;;6844
 ;;21,"S82.865C ")
 ;;6845
 ;;21,"S82.866A ")
 ;;6846
 ;;21,"S82.866B ")
 ;;6847
 ;;21,"S82.866C ")
 ;;6848
 ;;21,"S82.871A ")
 ;;6849
 ;;21,"S82.871B ")
 ;;6850
 ;;21,"S82.871C ")
 ;;6851
 ;;21,"S82.872A ")
 ;;6852
 ;;21,"S82.872B ")
 ;;6853
 ;;21,"S82.872C ")
 ;;6854
 ;;21,"S82.873A ")
 ;;6855
 ;;21,"S82.873B ")
 ;;6856
 ;;21,"S82.873C ")
 ;;6857
 ;;21,"S82.874A ")
 ;;6858
 ;;21,"S82.874B ")
 ;;6859
 ;;21,"S82.874C ")
 ;;6860
 ;;21,"S82.875A ")
 ;;6861
 ;;21,"S82.875B ")
 ;;6862
 ;;21,"S82.875C ")
 ;;6863
 ;;21,"S82.876A ")
 ;;6864
 ;;21,"S82.876B ")
 ;;6865
 ;;21,"S82.876C ")
 ;;6866
 ;;21,"S82.891A ")
 ;;6867
 ;;21,"S82.891B ")
 ;;6868
 ;;21,"S82.891C ")
 ;;6869
 ;;21,"S82.892A ")
 ;;6870
 ;;21,"S82.892B ")
 ;;6871
 ;;21,"S82.892C ")
 ;;6872
 ;;21,"S82.899A ")
 ;;6873
 ;;21,"S82.899B ")
 ;;6874
 ;;21,"S82.899C ")
 ;;6875
 ;;21,"S82.90XA ")
 ;;6876
 ;;21,"S82.90XB ")
 ;;6877
 ;;21,"S82.90XC ")
 ;;6878
 ;;21,"S82.91XA ")
 ;;6879
 ;;21,"S82.91XB ")
 ;;6880
 ;;21,"S82.91XC ")
 ;;6881
 ;;21,"S82.92XA ")
 ;;6882
 ;;21,"S82.92XB ")
 ;;6883
 ;;21,"S82.92XC ")
 ;;6884
 ;;21,"S83.001A ")
 ;;6885
 ;;21,"S83.002A ")
 ;;6886
 ;;21,"S83.003A ")
 ;;6887
 ;;21,"S83.004A ")
 ;;6888
 ;;21,"S83.005A ")
 ;;6889
 ;;21,"S83.006A ")
 ;;6890
 ;;21,"S83.011A ")
 ;;6891
 ;;21,"S83.012A ")
 ;;6892
 ;;21,"S83.013A ")
 ;;6893
 ;;21,"S83.014A ")
 ;;6894
 ;;21,"S83.015A ")
 ;;6895
 ;;21,"S83.016A ")
 ;;6896
 ;;21,"S83.091A ")
 ;;6897
 ;;21,"S83.092A ")
 ;;6898
 ;;21,"S83.093A ")
 ;;6899
 ;;21,"S83.094A ")
 ;;6900
 ;;21,"S83.095A ")
 ;;6901
 ;;21,"S83.096A ")
 ;;6902
 ;;21,"S83.101A ")
 ;;6903
 ;;21,"S83.102A ")
 ;;6904
 ;;21,"S83.103A ")
 ;;6905
 ;;21,"S83.104A ")
 ;;6906
 ;;21,"S83.105A ")
 ;;6907
 ;;21,"S83.106A ")
 ;;6908
 ;;21,"S83.111A ")
 ;;6909
 ;;21,"S83.112A ")
 ;;6910
 ;;21,"S83.113A ")
 ;;6911
 ;;21,"S83.114A ")
 ;;6912
 ;;21,"S83.115A ")
 ;;6913
 ;;21,"S83.116A ")
 ;;6914
 ;;21,"S83.121A ")
 ;;6915
 ;;21,"S83.122A ")
 ;;6916
 ;;21,"S83.123A ")
 ;;6917
 ;;21,"S83.124A ")
 ;;6918
 ;;21,"S83.125A ")
 ;;6919
 ;;21,"S83.126A ")
 ;;6920
 ;;21,"S83.131A ")
 ;;6921
 ;;21,"S83.132A ")
 ;;6922
 ;;21,"S83.133A ")
 ;;6923
 ;;21,"S83.134A ")
 ;;6924
 ;;21,"S83.135A ")
 ;;6925
 ;;21,"S83.136A ")
 ;;6926
 ;;21,"S83.141A ")
 ;;6927
 ;;21,"S83.142A ")
 ;;6928
 ;;21,"S83.143A ")
 ;;6929
 ;;21,"S83.144A ")
 ;;6930
 ;;21,"S83.145A ")
 ;;6931
 ;;21,"S83.146A ")
 ;;6932
 ;;21,"S83.191A ")
 ;;6933
 ;;21,"S83.192A ")
 ;;6934
 ;;21,"S83.193A ")
 ;;6935
 ;;21,"S83.194A ")
 ;;6936
 ;;21,"S83.195A ")
 ;;6937
 ;;21,"S83.196A ")
 ;;6938
 ;;21,"S83.200A ")
 ;;6939