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

ATXF1G3.m

Go to the documentation of this file.
ATXF1G3 ;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,O30.013 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.023 ",.01)
 ;;O30.023
 ;;9002226.02101,"489,O30.023 ",.02)
 ;;O30.023
 ;;9002226.02101,"489,O30.023 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.033 ",.01)
 ;;O30.033
 ;;9002226.02101,"489,O30.033 ",.02)
 ;;O30.033
 ;;9002226.02101,"489,O30.033 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.043 ",.01)
 ;;O30.043
 ;;9002226.02101,"489,O30.043 ",.02)
 ;;O30.043
 ;;9002226.02101,"489,O30.043 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.093 ",.01)
 ;;O30.093
 ;;9002226.02101,"489,O30.093 ",.02)
 ;;O30.093
 ;;9002226.02101,"489,O30.093 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.103 ",.01)
 ;;O30.103
 ;;9002226.02101,"489,O30.103 ",.02)
 ;;O30.103
 ;;9002226.02101,"489,O30.103 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.113 ",.01)
 ;;O30.113
 ;;9002226.02101,"489,O30.113 ",.02)
 ;;O30.113
 ;;9002226.02101,"489,O30.113 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.123 ",.01)
 ;;O30.123
 ;;9002226.02101,"489,O30.123 ",.02)
 ;;O30.123
 ;;9002226.02101,"489,O30.123 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.193 ",.01)
 ;;O30.193
 ;;9002226.02101,"489,O30.193 ",.02)
 ;;O30.193
 ;;9002226.02101,"489,O30.193 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.203 ",.01)
 ;;O30.203
 ;;9002226.02101,"489,O30.203 ",.02)
 ;;O30.203
 ;;9002226.02101,"489,O30.203 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.213 ",.01)
 ;;O30.213
 ;;9002226.02101,"489,O30.213 ",.02)
 ;;O30.213
 ;;9002226.02101,"489,O30.213 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.223 ",.01)
 ;;O30.223
 ;;9002226.02101,"489,O30.223 ",.02)
 ;;O30.223
 ;;9002226.02101,"489,O30.223 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.293 ",.01)
 ;;O30.293
 ;;9002226.02101,"489,O30.293 ",.02)
 ;;O30.293
 ;;9002226.02101,"489,O30.293 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.803 ",.01)
 ;;O30.803
 ;;9002226.02101,"489,O30.803 ",.02)
 ;;O30.803
 ;;9002226.02101,"489,O30.803 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.813 ",.01)
 ;;O30.813
 ;;9002226.02101,"489,O30.813 ",.02)
 ;;O30.813
 ;;9002226.02101,"489,O30.813 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.823 ",.01)
 ;;O30.823
 ;;9002226.02101,"489,O30.823 ",.02)
 ;;O30.823
 ;;9002226.02101,"489,O30.823 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.893 ",.01)
 ;;O30.893
 ;;9002226.02101,"489,O30.893 ",.02)
 ;;O30.893
 ;;9002226.02101,"489,O30.893 ",.03)
 ;;30
 ;;9002226.02101,"489,O30.93 ",.01)
 ;;O30.93
 ;;9002226.02101,"489,O30.93 ",.02)
 ;;O30.93
 ;;9002226.02101,"489,O30.93 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.03X0 ",.01)
 ;;O31.03X0
 ;;9002226.02101,"489,O31.03X0 ",.02)
 ;;O31.03X0
 ;;9002226.02101,"489,O31.03X0 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.03X1 ",.01)
 ;;O31.03X1
 ;;9002226.02101,"489,O31.03X1 ",.02)
 ;;O31.03X1
 ;;9002226.02101,"489,O31.03X1 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.03X2 ",.01)
 ;;O31.03X2
 ;;9002226.02101,"489,O31.03X2 ",.02)
 ;;O31.03X2
 ;;9002226.02101,"489,O31.03X2 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.03X3 ",.01)
 ;;O31.03X3
 ;;9002226.02101,"489,O31.03X3 ",.02)
 ;;O31.03X3
 ;;9002226.02101,"489,O31.03X3 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.03X4 ",.01)
 ;;O31.03X4
 ;;9002226.02101,"489,O31.03X4 ",.02)
 ;;O31.03X4
 ;;9002226.02101,"489,O31.03X4 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.03X5 ",.01)
 ;;O31.03X5
 ;;9002226.02101,"489,O31.03X5 ",.02)
 ;;O31.03X5
 ;;9002226.02101,"489,O31.03X5 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.03X9 ",.01)
 ;;O31.03X9
 ;;9002226.02101,"489,O31.03X9 ",.02)
 ;;O31.03X9
 ;;9002226.02101,"489,O31.03X9 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.13X0 ",.01)
 ;;O31.13X0
 ;;9002226.02101,"489,O31.13X0 ",.02)
 ;;O31.13X0
 ;;9002226.02101,"489,O31.13X0 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.13X1 ",.01)
 ;;O31.13X1
 ;;9002226.02101,"489,O31.13X1 ",.02)
 ;;O31.13X1
 ;;9002226.02101,"489,O31.13X1 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.13X2 ",.01)
 ;;O31.13X2
 ;;9002226.02101,"489,O31.13X2 ",.02)
 ;;O31.13X2
 ;;9002226.02101,"489,O31.13X2 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.13X3 ",.01)
 ;;O31.13X3
 ;;9002226.02101,"489,O31.13X3 ",.02)
 ;;O31.13X3
 ;;9002226.02101,"489,O31.13X3 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.13X4 ",.01)
 ;;O31.13X4
 ;;9002226.02101,"489,O31.13X4 ",.02)
 ;;O31.13X4
 ;;9002226.02101,"489,O31.13X4 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.13X5 ",.01)
 ;;O31.13X5
 ;;9002226.02101,"489,O31.13X5 ",.02)
 ;;O31.13X5
 ;;9002226.02101,"489,O31.13X5 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.13X9 ",.01)
 ;;O31.13X9
 ;;9002226.02101,"489,O31.13X9 ",.02)
 ;;O31.13X9
 ;;9002226.02101,"489,O31.13X9 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.23X0 ",.01)
 ;;O31.23X0
 ;;9002226.02101,"489,O31.23X0 ",.02)
 ;;O31.23X0
 ;;9002226.02101,"489,O31.23X0 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.23X1 ",.01)
 ;;O31.23X1
 ;;9002226.02101,"489,O31.23X1 ",.02)
 ;;O31.23X1
 ;;9002226.02101,"489,O31.23X1 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.23X2 ",.01)
 ;;O31.23X2
 ;;9002226.02101,"489,O31.23X2 ",.02)
 ;;O31.23X2
 ;;9002226.02101,"489,O31.23X2 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.23X3 ",.01)
 ;;O31.23X3
 ;;9002226.02101,"489,O31.23X3 ",.02)
 ;;O31.23X3
 ;;9002226.02101,"489,O31.23X3 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.23X4 ",.01)
 ;;O31.23X4
 ;;9002226.02101,"489,O31.23X4 ",.02)
 ;;O31.23X4
 ;;9002226.02101,"489,O31.23X4 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.23X5 ",.01)
 ;;O31.23X5
 ;;9002226.02101,"489,O31.23X5 ",.02)
 ;;O31.23X5
 ;;9002226.02101,"489,O31.23X5 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.23X9 ",.01)
 ;;O31.23X9
 ;;9002226.02101,"489,O31.23X9 ",.02)
 ;;O31.23X9
 ;;9002226.02101,"489,O31.23X9 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.33X0 ",.01)
 ;;O31.33X0
 ;;9002226.02101,"489,O31.33X0 ",.02)
 ;;O31.33X0
 ;;9002226.02101,"489,O31.33X0 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.33X1 ",.01)
 ;;O31.33X1
 ;;9002226.02101,"489,O31.33X1 ",.02)
 ;;O31.33X1
 ;;9002226.02101,"489,O31.33X1 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.33X2 ",.01)
 ;;O31.33X2
 ;;9002226.02101,"489,O31.33X2 ",.02)
 ;;O31.33X2
 ;;9002226.02101,"489,O31.33X2 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.33X3 ",.01)
 ;;O31.33X3
 ;;9002226.02101,"489,O31.33X3 ",.02)
 ;;O31.33X3
 ;;9002226.02101,"489,O31.33X3 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.33X4 ",.01)
 ;;O31.33X4
 ;;9002226.02101,"489,O31.33X4 ",.02)
 ;;O31.33X4
 ;;9002226.02101,"489,O31.33X4 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.33X5 ",.01)
 ;;O31.33X5
 ;;9002226.02101,"489,O31.33X5 ",.02)
 ;;O31.33X5
 ;;9002226.02101,"489,O31.33X5 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.33X9 ",.01)
 ;;O31.33X9
 ;;9002226.02101,"489,O31.33X9 ",.02)
 ;;O31.33X9
 ;;9002226.02101,"489,O31.33X9 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.8X30 ",.01)
 ;;O31.8X30
 ;;9002226.02101,"489,O31.8X30 ",.02)
 ;;O31.8X30
 ;;9002226.02101,"489,O31.8X30 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.8X31 ",.01)
 ;;O31.8X31
 ;;9002226.02101,"489,O31.8X31 ",.02)
 ;;O31.8X31
 ;;9002226.02101,"489,O31.8X31 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.8X32 ",.01)
 ;;O31.8X32
 ;;9002226.02101,"489,O31.8X32 ",.02)
 ;;O31.8X32
 ;;9002226.02101,"489,O31.8X32 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.8X33 ",.01)
 ;;O31.8X33
 ;;9002226.02101,"489,O31.8X33 ",.02)
 ;;O31.8X33
 ;;9002226.02101,"489,O31.8X33 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.8X34 ",.01)
 ;;O31.8X34
 ;;9002226.02101,"489,O31.8X34 ",.02)
 ;;O31.8X34
 ;;9002226.02101,"489,O31.8X34 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.8X35 ",.01)
 ;;O31.8X35
 ;;9002226.02101,"489,O31.8X35 ",.02)
 ;;O31.8X35
 ;;9002226.02101,"489,O31.8X35 ",.03)
 ;;30
 ;;9002226.02101,"489,O31.8X39 ",.01)
 ;;O31.8X39
 ;;9002226.02101,"489,O31.8X39 ",.02)
 ;;O31.8X39
 ;;9002226.02101,"489,O31.8X39 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.03 ",.01)
 ;;O34.03
 ;;9002226.02101,"489,O34.03 ",.02)
 ;;O34.03
 ;;9002226.02101,"489,O34.03 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.13 ",.01)
 ;;O34.13
 ;;9002226.02101,"489,O34.13 ",.02)
 ;;O34.13
 ;;9002226.02101,"489,O34.13 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.33 ",.01)
 ;;O34.33
 ;;9002226.02101,"489,O34.33 ",.02)
 ;;O34.33
 ;;9002226.02101,"489,O34.33 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.43 ",.01)
 ;;O34.43
 ;;9002226.02101,"489,O34.43 ",.02)
 ;;O34.43
 ;;9002226.02101,"489,O34.43 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.513 ",.01)
 ;;O34.513
 ;;9002226.02101,"489,O34.513 ",.02)
 ;;O34.513
 ;;9002226.02101,"489,O34.513 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.523 ",.01)
 ;;O34.523
 ;;9002226.02101,"489,O34.523 ",.02)
 ;;O34.523
 ;;9002226.02101,"489,O34.523 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.533 ",.01)
 ;;O34.533
 ;;9002226.02101,"489,O34.533 ",.02)
 ;;O34.533
 ;;9002226.02101,"489,O34.533 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.593 ",.01)
 ;;O34.593
 ;;9002226.02101,"489,O34.593 ",.02)
 ;;O34.593
 ;;9002226.02101,"489,O34.593 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.63 ",.01)
 ;;O34.63
 ;;9002226.02101,"489,O34.63 ",.02)
 ;;O34.63
 ;;9002226.02101,"489,O34.63 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.73 ",.01)
 ;;O34.73
 ;;9002226.02101,"489,O34.73 ",.02)
 ;;O34.73
 ;;9002226.02101,"489,O34.73 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.83 ",.01)
 ;;O34.83
 ;;9002226.02101,"489,O34.83 ",.02)
 ;;O34.83
 ;;9002226.02101,"489,O34.83 ",.03)
 ;;30
 ;;9002226.02101,"489,O34.93 ",.01)
 ;;O34.93
 ;;9002226.02101,"489,O34.93 ",.02)
 ;;O34.93
 ;;9002226.02101,"489,O34.93 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0130 ",.01)
 ;;O36.0130
 ;;9002226.02101,"489,O36.0130 ",.02)
 ;;O36.0130
 ;;9002226.02101,"489,O36.0130 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0131 ",.01)
 ;;O36.0131
 ;;9002226.02101,"489,O36.0131 ",.02)
 ;;O36.0131
 ;;9002226.02101,"489,O36.0131 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0132 ",.01)
 ;;O36.0132
 ;;9002226.02101,"489,O36.0132 ",.02)
 ;;O36.0132
 ;;9002226.02101,"489,O36.0132 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0133 ",.01)
 ;;O36.0133
 ;;9002226.02101,"489,O36.0133 ",.02)
 ;;O36.0133
 ;;9002226.02101,"489,O36.0133 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0134 ",.01)
 ;;O36.0134
 ;;9002226.02101,"489,O36.0134 ",.02)
 ;;O36.0134
 ;;9002226.02101,"489,O36.0134 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0135 ",.01)
 ;;O36.0135
 ;;9002226.02101,"489,O36.0135 ",.02)
 ;;O36.0135
 ;;9002226.02101,"489,O36.0135 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0139 ",.01)
 ;;O36.0139
 ;;9002226.02101,"489,O36.0139 ",.02)
 ;;O36.0139
 ;;9002226.02101,"489,O36.0139 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0930 ",.01)
 ;;O36.0930
 ;;9002226.02101,"489,O36.0930 ",.02)
 ;;O36.0930
 ;;9002226.02101,"489,O36.0930 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0931 ",.01)
 ;;O36.0931
 ;;9002226.02101,"489,O36.0931 ",.02)
 ;;O36.0931
 ;;9002226.02101,"489,O36.0931 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0932 ",.01)
 ;;O36.0932
 ;;9002226.02101,"489,O36.0932 ",.02)
 ;;O36.0932
 ;;9002226.02101,"489,O36.0932 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0933 ",.01)
 ;;O36.0933
 ;;9002226.02101,"489,O36.0933 ",.02)
 ;;O36.0933
 ;;9002226.02101,"489,O36.0933 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0934 ",.01)
 ;;O36.0934
 ;;9002226.02101,"489,O36.0934 ",.02)
 ;;O36.0934
 ;;9002226.02101,"489,O36.0934 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0935 ",.01)
 ;;O36.0935
 ;;9002226.02101,"489,O36.0935 ",.02)
 ;;O36.0935
 ;;9002226.02101,"489,O36.0935 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.0939 ",.01)
 ;;O36.0939
 ;;9002226.02101,"489,O36.0939 ",.02)
 ;;O36.0939
 ;;9002226.02101,"489,O36.0939 ",.03)
 ;;30
 ;;9002226.02101,"489,O36.1130 ",.01)
 ;;O36.1130
 ;;9002226.02101,"489,O36.1130 ",.02)
 ;;O36.1130
 ;;9002226.02101,"489,O36.1130 ",.03)
 ;;30