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

ATXF1G4.m

Go to the documentation of this file.
ATXF1G4 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JUL 09, 2015;
 ;;5.1;TAXONOMY;**12**;FEB 04, 1997;Build 5
 ;
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)
 ;;9002226.02101,"489,O36.1131 ",.01)
 ;;O36.1131
 ;;9002226.02101,"489,O36.1131 ",.02)
 ;;O36.1131
 ;;9002226.02101,"489,O36.1131 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1132 ",.01)
 ;;O36.1132
 ;;9002226.02101,"489,O36.1132 ",.02)
 ;;O36.1132
 ;;9002226.02101,"489,O36.1132 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1133 ",.01)
 ;;O36.1133
 ;;9002226.02101,"489,O36.1133 ",.02)
 ;;O36.1133
 ;;9002226.02101,"489,O36.1133 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1134 ",.01)
 ;;O36.1134
 ;;9002226.02101,"489,O36.1134 ",.02)
 ;;O36.1134
 ;;9002226.02101,"489,O36.1134 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1135 ",.01)
 ;;O36.1135
 ;;9002226.02101,"489,O36.1135 ",.02)
 ;;O36.1135
 ;;9002226.02101,"489,O36.1135 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1139 ",.01)
 ;;O36.1139
 ;;9002226.02101,"489,O36.1139 ",.02)
 ;;O36.1139
 ;;9002226.02101,"489,O36.1139 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1930 ",.01)
 ;;O36.1930
 ;;9002226.02101,"489,O36.1930 ",.02)
 ;;O36.1930
 ;;9002226.02101,"489,O36.1930 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1931 ",.01)
 ;;O36.1931
 ;;9002226.02101,"489,O36.1931 ",.02)
 ;;O36.1931
 ;;9002226.02101,"489,O36.1931 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1932 ",.01)
 ;;O36.1932
 ;;9002226.02101,"489,O36.1932 ",.02)
 ;;O36.1932
 ;;9002226.02101,"489,O36.1932 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1933 ",.01)
 ;;O36.1933
 ;;9002226.02101,"489,O36.1933 ",.02)
 ;;O36.1933
 ;;9002226.02101,"489,O36.1933 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1934 ",.01)
 ;;O36.1934
 ;;9002226.02101,"489,O36.1934 ",.02)
 ;;O36.1934
 ;;9002226.02101,"489,O36.1934 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1935 ",.01)
 ;;O36.1935
 ;;9002226.02101,"489,O36.1935 ",.02)
 ;;O36.1935
 ;;9002226.02101,"489,O36.1935 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1939 ",.01)
 ;;O36.1939
 ;;9002226.02101,"489,O36.1939 ",.02)
 ;;O36.1939
 ;;9002226.02101,"489,O36.1939 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.23X0 ",.01)
 ;;O36.23X0
 ;;9002226.02101,"489,O36.23X0 ",.02)
 ;;O36.23X0
 ;;9002226.02101,"489,O36.23X0 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.23X1 ",.01)
 ;;O36.23X1
 ;;9002226.02101,"489,O36.23X1 ",.02)
 ;;O36.23X1
 ;;9002226.02101,"489,O36.23X1 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.23X2 ",.01)
 ;;O36.23X2
 ;;9002226.02101,"489,O36.23X2 ",.02)
 ;;O36.23X2
 ;;9002226.02101,"489,O36.23X2 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.23X3 ",.01)
 ;;O36.23X3
 ;;9002226.02101,"489,O36.23X3 ",.02)
 ;;O36.23X3
 ;;9002226.02101,"489,O36.23X3 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.23X4 ",.01)
 ;;O36.23X4
 ;;9002226.02101,"489,O36.23X4 ",.02)
 ;;O36.23X4
 ;;9002226.02101,"489,O36.23X4 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.23X5 ",.01)
 ;;O36.23X5
 ;;9002226.02101,"489,O36.23X5 ",.02)
 ;;O36.23X5
 ;;9002226.02101,"489,O36.23X5 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.23X9 ",.01)
 ;;O36.23X9
 ;;9002226.02101,"489,O36.23X9 ",.02)
 ;;O36.23X9
 ;;9002226.02101,"489,O36.23X9 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5130 ",.01)
 ;;O36.5130
 ;;9002226.02101,"489,O36.5130 ",.02)
 ;;O36.5130
 ;;9002226.02101,"489,O36.5130 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5131 ",.01)
 ;;O36.5131
 ;;9002226.02101,"489,O36.5131 ",.02)
 ;;O36.5131
 ;;9002226.02101,"489,O36.5131 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5132 ",.01)
 ;;O36.5132
 ;;9002226.02101,"489,O36.5132 ",.02)
 ;;O36.5132
 ;;9002226.02101,"489,O36.5132 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5133 ",.01)
 ;;O36.5133
 ;;9002226.02101,"489,O36.5133 ",.02)
 ;;O36.5133
 ;;9002226.02101,"489,O36.5133 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5134 ",.01)
 ;;O36.5134
 ;;9002226.02101,"489,O36.5134 ",.02)
 ;;O36.5134
 ;;9002226.02101,"489,O36.5134 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5135 ",.01)
 ;;O36.5135
 ;;9002226.02101,"489,O36.5135 ",.02)
 ;;O36.5135
 ;;9002226.02101,"489,O36.5135 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5139 ",.01)
 ;;O36.5139
 ;;9002226.02101,"489,O36.5139 ",.02)
 ;;O36.5139
 ;;9002226.02101,"489,O36.5139 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5930 ",.01)
 ;;O36.5930
 ;;9002226.02101,"489,O36.5930 ",.02)
 ;;O36.5930
 ;;9002226.02101,"489,O36.5930 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5931 ",.01)
 ;;O36.5931
 ;;9002226.02101,"489,O36.5931 ",.02)
 ;;O36.5931
 ;;9002226.02101,"489,O36.5931 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5932 ",.01)
 ;;O36.5932
 ;;9002226.02101,"489,O36.5932 ",.02)
 ;;O36.5932
 ;;9002226.02101,"489,O36.5932 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5933 ",.01)
 ;;O36.5933
 ;;9002226.02101,"489,O36.5933 ",.02)
 ;;O36.5933
 ;;9002226.02101,"489,O36.5933 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5934 ",.01)
 ;;O36.5934
 ;;9002226.02101,"489,O36.5934 ",.02)
 ;;O36.5934
 ;;9002226.02101,"489,O36.5934 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5935 ",.01)
 ;;O36.5935
 ;;9002226.02101,"489,O36.5935 ",.02)
 ;;O36.5935
 ;;9002226.02101,"489,O36.5935 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.5939 ",.01)
 ;;O36.5939
 ;;9002226.02101,"489,O36.5939 ",.02)
 ;;O36.5939
 ;;9002226.02101,"489,O36.5939 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.63X0 ",.01)
 ;;O36.63X0
 ;;9002226.02101,"489,O36.63X0 ",.02)
 ;;O36.63X0
 ;;9002226.02101,"489,O36.63X0 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.63X1 ",.01)
 ;;O36.63X1
 ;;9002226.02101,"489,O36.63X1 ",.02)
 ;;O36.63X1
 ;;9002226.02101,"489,O36.63X1 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.63X2 ",.01)
 ;;O36.63X2
 ;;9002226.02101,"489,O36.63X2 ",.02)
 ;;O36.63X2
 ;;9002226.02101,"489,O36.63X2 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.63X3 ",.01)
 ;;O36.63X3
 ;;9002226.02101,"489,O36.63X3 ",.02)
 ;;O36.63X3
 ;;9002226.02101,"489,O36.63X3 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.63X4 ",.01)
 ;;O36.63X4
 ;;9002226.02101,"489,O36.63X4 ",.02)
 ;;O36.63X4
 ;;9002226.02101,"489,O36.63X4 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.63X5 ",.01)
 ;;O36.63X5
 ;;9002226.02101,"489,O36.63X5 ",.02)
 ;;O36.63X5
 ;;9002226.02101,"489,O36.63X5 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.63X9 ",.01)
 ;;O36.63X9
 ;;9002226.02101,"489,O36.63X9 ",.02)
 ;;O36.63X9
 ;;9002226.02101,"489,O36.63X9 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.73X0 ",.01)
 ;;O36.73X0
 ;;9002226.02101,"489,O36.73X0 ",.02)
 ;;O36.73X0
 ;;9002226.02101,"489,O36.73X0 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.73X1 ",.01)
 ;;O36.73X1
 ;;9002226.02101,"489,O36.73X1 ",.02)
 ;;O36.73X1
 ;;9002226.02101,"489,O36.73X1 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.73X2 ",.01)
 ;;O36.73X2
 ;;9002226.02101,"489,O36.73X2 ",.02)
 ;;O36.73X2
 ;;9002226.02101,"489,O36.73X2 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.73X3 ",.01)
 ;;O36.73X3
 ;;9002226.02101,"489,O36.73X3 ",.02)
 ;;O36.73X3
 ;;9002226.02101,"489,O36.73X3 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.73X4 ",.01)
 ;;O36.73X4
 ;;9002226.02101,"489,O36.73X4 ",.02)
 ;;O36.73X4
 ;;9002226.02101,"489,O36.73X4 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.73X5 ",.01)
 ;;O36.73X5
 ;;9002226.02101,"489,O36.73X5 ",.02)
 ;;O36.73X5
 ;;9002226.02101,"489,O36.73X5 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.73X9 ",.01)
 ;;O36.73X9
 ;;9002226.02101,"489,O36.73X9 ",.02)
 ;;O36.73X9
 ;;9002226.02101,"489,O36.73X9 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8130 ",.01)
 ;;O36.8130
 ;;9002226.02101,"489,O36.8130 ",.02)
 ;;O36.8130
 ;;9002226.02101,"489,O36.8130 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8131 ",.01)
 ;;O36.8131
 ;;9002226.02101,"489,O36.8131 ",.02)
 ;;O36.8131
 ;;9002226.02101,"489,O36.8131 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8132 ",.01)
 ;;O36.8132
 ;;9002226.02101,"489,O36.8132 ",.02)
 ;;O36.8132
 ;;9002226.02101,"489,O36.8132 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8133 ",.01)
 ;;O36.8133
 ;;9002226.02101,"489,O36.8133 ",.02)
 ;;O36.8133
 ;;9002226.02101,"489,O36.8133 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8134 ",.01)
 ;;O36.8134
 ;;9002226.02101,"489,O36.8134 ",.02)
 ;;O36.8134
 ;;9002226.02101,"489,O36.8134 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8135 ",.01)
 ;;O36.8135
 ;;9002226.02101,"489,O36.8135 ",.02)
 ;;O36.8135
 ;;9002226.02101,"489,O36.8135 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8139 ",.01)
 ;;O36.8139
 ;;9002226.02101,"489,O36.8139 ",.02)
 ;;O36.8139
 ;;9002226.02101,"489,O36.8139 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8230 ",.01)
 ;;O36.8230
 ;;9002226.02101,"489,O36.8230 ",.02)
 ;;O36.8230
 ;;9002226.02101,"489,O36.8230 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8231 ",.01)
 ;;O36.8231
 ;;9002226.02101,"489,O36.8231 ",.02)
 ;;O36.8231
 ;;9002226.02101,"489,O36.8231 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8232 ",.01)
 ;;O36.8232
 ;;9002226.02101,"489,O36.8232 ",.02)
 ;;O36.8232
 ;;9002226.02101,"489,O36.8232 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8233 ",.01)
 ;;O36.8233
 ;;9002226.02101,"489,O36.8233 ",.02)
 ;;O36.8233
 ;;9002226.02101,"489,O36.8233 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8234 ",.01)
 ;;O36.8234
 ;;9002226.02101,"489,O36.8234 ",.02)
 ;;O36.8234
 ;;9002226.02101,"489,O36.8234 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8235 ",.01)
 ;;O36.8235
 ;;9002226.02101,"489,O36.8235 ",.02)
 ;;O36.8235
 ;;9002226.02101,"489,O36.8235 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8239 ",.01)
 ;;O36.8239
 ;;9002226.02101,"489,O36.8239 ",.02)
 ;;O36.8239
 ;;9002226.02101,"489,O36.8239 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8930 ",.01)
 ;;O36.8930
 ;;9002226.02101,"489,O36.8930 ",.02)
 ;;O36.8930
 ;;9002226.02101,"489,O36.8930 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8931 ",.01)
 ;;O36.8931
 ;;9002226.02101,"489,O36.8931 ",.02)
 ;;O36.8931
 ;;9002226.02101,"489,O36.8931 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8932 ",.01)
 ;;O36.8932
 ;;9002226.02101,"489,O36.8932 ",.02)
 ;;O36.8932
 ;;9002226.02101,"489,O36.8932 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8933 ",.01)
 ;;O36.8933
 ;;9002226.02101,"489,O36.8933 ",.02)
 ;;O36.8933
 ;;9002226.02101,"489,O36.8933 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8934 ",.01)
 ;;O36.8934
 ;;9002226.02101,"489,O36.8934 ",.02)
 ;;O36.8934
 ;;9002226.02101,"489,O36.8934 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8935 ",.01)
 ;;O36.8935
 ;;9002226.02101,"489,O36.8935 ",.02)
 ;;O36.8935
 ;;9002226.02101,"489,O36.8935 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.8939 ",.01)
 ;;O36.8939
 ;;9002226.02101,"489,O36.8939 ",.02)
 ;;O36.8939
 ;;9002226.02101,"489,O36.8939 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.93X0 ",.01)
 ;;O36.93X0
 ;;9002226.02101,"489,O36.93X0 ",.02)
 ;;O36.93X0
 ;;9002226.02101,"489,O36.93X0 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.93X1 ",.01)
 ;;O36.93X1
 ;;9002226.02101,"489,O36.93X1 ",.02)
 ;;O36.93X1
 ;;9002226.02101,"489,O36.93X1 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.93X2 ",.01)
 ;;O36.93X2
 ;;9002226.02101,"489,O36.93X2 ",.02)
 ;;O36.93X2
 ;;9002226.02101,"489,O36.93X2 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.93X3 ",.01)
 ;;O36.93X3
 ;;9002226.02101,"489,O36.93X3 ",.02)
 ;;O36.93X3
 ;;9002226.02101,"489,O36.93X3 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.93X4 ",.01)
 ;;O36.93X4
 ;;9002226.02101,"489,O36.93X4 ",.02)
 ;;O36.93X4
 ;;9002226.02101,"489,O36.93X4 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.93X5 ",.01)
 ;;O36.93X5
 ;;9002226.02101,"489,O36.93X5 ",.02)
 ;;O36.93X5
 ;;9002226.02101,"489,O36.93X5 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.93X9 ",.01)
 ;;O36.93X9
 ;;9002226.02101,"489,O36.93X9 ",.02)
 ;;O36.93X9
 ;;9002226.02101,"489,O36.93X9 ",.03)
 ;;30
 ;;9002226.02101,"489,O40.3XX0 ",.01)
 ;;O40.3XX0
 ;;9002226.02101,"489,O40.3XX0 ",.02)
 ;;O40.3XX0
 ;;9002226.02101,"489,O40.3XX0 ",.03)
 ;;30
 ;;9002226.02101,"489,O40.3XX1 ",.01)
 ;;O40.3XX1
 ;;9002226.02101,"489,O40.3XX1 ",.02)
 ;;O40.3XX1
 ;;9002226.02101,"489,O40.3XX1 ",.03)
 ;;30
 ;;9002226.02101,"489,O40.3XX2 ",.01)
 ;;O40.3XX2