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

ATXF1E3.m

Go to the documentation of this file.
ATXF1E3 ;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,"487,O30.211 ",.01)
 ;;O30.211
 ;;9002226.02101,"487,O30.211 ",.02)
 ;;O30.211
 ;;9002226.02101,"487,O30.211 ",.03)
 ;;30
 ;;9002226.02101,"487,O30.221 ",.01)
 ;;O30.221
 ;;9002226.02101,"487,O30.221 ",.02)
 ;;O30.221
 ;;9002226.02101,"487,O30.221 ",.03)
 ;;30
 ;;9002226.02101,"487,O30.291 ",.01)
 ;;O30.291
 ;;9002226.02101,"487,O30.291 ",.02)
 ;;O30.291
 ;;9002226.02101,"487,O30.291 ",.03)
 ;;30
 ;;9002226.02101,"487,O30.801 ",.01)
 ;;O30.801
 ;;9002226.02101,"487,O30.801 ",.02)
 ;;O30.801
 ;;9002226.02101,"487,O30.801 ",.03)
 ;;30
 ;;9002226.02101,"487,O30.811 ",.01)
 ;;O30.811
 ;;9002226.02101,"487,O30.811 ",.02)
 ;;O30.811
 ;;9002226.02101,"487,O30.811 ",.03)
 ;;30
 ;;9002226.02101,"487,O30.821 ",.01)
 ;;O30.821
 ;;9002226.02101,"487,O30.821 ",.02)
 ;;O30.821
 ;;9002226.02101,"487,O30.821 ",.03)
 ;;30
 ;;9002226.02101,"487,O30.891 ",.01)
 ;;O30.891
 ;;9002226.02101,"487,O30.891 ",.02)
 ;;O30.891
 ;;9002226.02101,"487,O30.891 ",.03)
 ;;30
 ;;9002226.02101,"487,O30.91 ",.01)
 ;;O30.91
 ;;9002226.02101,"487,O30.91 ",.02)
 ;;O30.91
 ;;9002226.02101,"487,O30.91 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.01X0 ",.01)
 ;;O31.01X0
 ;;9002226.02101,"487,O31.01X0 ",.02)
 ;;O31.01X0
 ;;9002226.02101,"487,O31.01X0 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.01X1 ",.01)
 ;;O31.01X1
 ;;9002226.02101,"487,O31.01X1 ",.02)
 ;;O31.01X1
 ;;9002226.02101,"487,O31.01X1 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.01X2 ",.01)
 ;;O31.01X2
 ;;9002226.02101,"487,O31.01X2 ",.02)
 ;;O31.01X2
 ;;9002226.02101,"487,O31.01X2 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.01X3 ",.01)
 ;;O31.01X3
 ;;9002226.02101,"487,O31.01X3 ",.02)
 ;;O31.01X3
 ;;9002226.02101,"487,O31.01X3 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.01X4 ",.01)
 ;;O31.01X4
 ;;9002226.02101,"487,O31.01X4 ",.02)
 ;;O31.01X4
 ;;9002226.02101,"487,O31.01X4 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.01X5 ",.01)
 ;;O31.01X5
 ;;9002226.02101,"487,O31.01X5 ",.02)
 ;;O31.01X5
 ;;9002226.02101,"487,O31.01X5 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.01X9 ",.01)
 ;;O31.01X9
 ;;9002226.02101,"487,O31.01X9 ",.02)
 ;;O31.01X9
 ;;9002226.02101,"487,O31.01X9 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.11X0 ",.01)
 ;;O31.11X0
 ;;9002226.02101,"487,O31.11X0 ",.02)
 ;;O31.11X0
 ;;9002226.02101,"487,O31.11X0 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.11X1 ",.01)
 ;;O31.11X1
 ;;9002226.02101,"487,O31.11X1 ",.02)
 ;;O31.11X1
 ;;9002226.02101,"487,O31.11X1 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.11X2 ",.01)
 ;;O31.11X2
 ;;9002226.02101,"487,O31.11X2 ",.02)
 ;;O31.11X2
 ;;9002226.02101,"487,O31.11X2 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.11X3 ",.01)
 ;;O31.11X3
 ;;9002226.02101,"487,O31.11X3 ",.02)
 ;;O31.11X3
 ;;9002226.02101,"487,O31.11X3 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.11X4 ",.01)
 ;;O31.11X4
 ;;9002226.02101,"487,O31.11X4 ",.02)
 ;;O31.11X4
 ;;9002226.02101,"487,O31.11X4 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.11X5 ",.01)
 ;;O31.11X5
 ;;9002226.02101,"487,O31.11X5 ",.02)
 ;;O31.11X5
 ;;9002226.02101,"487,O31.11X5 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.11X9 ",.01)
 ;;O31.11X9
 ;;9002226.02101,"487,O31.11X9 ",.02)
 ;;O31.11X9
 ;;9002226.02101,"487,O31.11X9 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.21X0 ",.01)
 ;;O31.21X0
 ;;9002226.02101,"487,O31.21X0 ",.02)
 ;;O31.21X0
 ;;9002226.02101,"487,O31.21X0 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.21X1 ",.01)
 ;;O31.21X1
 ;;9002226.02101,"487,O31.21X1 ",.02)
 ;;O31.21X1
 ;;9002226.02101,"487,O31.21X1 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.21X2 ",.01)
 ;;O31.21X2
 ;;9002226.02101,"487,O31.21X2 ",.02)
 ;;O31.21X2
 ;;9002226.02101,"487,O31.21X2 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.21X3 ",.01)
 ;;O31.21X3
 ;;9002226.02101,"487,O31.21X3 ",.02)
 ;;O31.21X3
 ;;9002226.02101,"487,O31.21X3 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.21X4 ",.01)
 ;;O31.21X4
 ;;9002226.02101,"487,O31.21X4 ",.02)
 ;;O31.21X4
 ;;9002226.02101,"487,O31.21X4 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.21X5 ",.01)
 ;;O31.21X5
 ;;9002226.02101,"487,O31.21X5 ",.02)
 ;;O31.21X5
 ;;9002226.02101,"487,O31.21X5 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.21X9 ",.01)
 ;;O31.21X9
 ;;9002226.02101,"487,O31.21X9 ",.02)
 ;;O31.21X9
 ;;9002226.02101,"487,O31.21X9 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.31X0 ",.01)
 ;;O31.31X0
 ;;9002226.02101,"487,O31.31X0 ",.02)
 ;;O31.31X0
 ;;9002226.02101,"487,O31.31X0 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.31X1 ",.01)
 ;;O31.31X1
 ;;9002226.02101,"487,O31.31X1 ",.02)
 ;;O31.31X1
 ;;9002226.02101,"487,O31.31X1 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.31X2 ",.01)
 ;;O31.31X2
 ;;9002226.02101,"487,O31.31X2 ",.02)
 ;;O31.31X2
 ;;9002226.02101,"487,O31.31X2 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.31X3 ",.01)
 ;;O31.31X3
 ;;9002226.02101,"487,O31.31X3 ",.02)
 ;;O31.31X3
 ;;9002226.02101,"487,O31.31X3 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.31X4 ",.01)
 ;;O31.31X4
 ;;9002226.02101,"487,O31.31X4 ",.02)
 ;;O31.31X4
 ;;9002226.02101,"487,O31.31X4 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.31X5 ",.01)
 ;;O31.31X5
 ;;9002226.02101,"487,O31.31X5 ",.02)
 ;;O31.31X5
 ;;9002226.02101,"487,O31.31X5 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.31X9 ",.01)
 ;;O31.31X9
 ;;9002226.02101,"487,O31.31X9 ",.02)
 ;;O31.31X9
 ;;9002226.02101,"487,O31.31X9 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.8X10 ",.01)
 ;;O31.8X10
 ;;9002226.02101,"487,O31.8X10 ",.02)
 ;;O31.8X10
 ;;9002226.02101,"487,O31.8X10 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.8X11 ",.01)
 ;;O31.8X11
 ;;9002226.02101,"487,O31.8X11 ",.02)
 ;;O31.8X11
 ;;9002226.02101,"487,O31.8X11 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.8X12 ",.01)
 ;;O31.8X12
 ;;9002226.02101,"487,O31.8X12 ",.02)
 ;;O31.8X12
 ;;9002226.02101,"487,O31.8X12 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.8X13 ",.01)
 ;;O31.8X13
 ;;9002226.02101,"487,O31.8X13 ",.02)
 ;;O31.8X13
 ;;9002226.02101,"487,O31.8X13 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.8X14 ",.01)
 ;;O31.8X14
 ;;9002226.02101,"487,O31.8X14 ",.02)
 ;;O31.8X14
 ;;9002226.02101,"487,O31.8X14 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.8X15 ",.01)
 ;;O31.8X15
 ;;9002226.02101,"487,O31.8X15 ",.02)
 ;;O31.8X15
 ;;9002226.02101,"487,O31.8X15 ",.03)
 ;;30
 ;;9002226.02101,"487,O31.8X19 ",.01)
 ;;O31.8X19
 ;;9002226.02101,"487,O31.8X19 ",.02)
 ;;O31.8X19
 ;;9002226.02101,"487,O31.8X19 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.01 ",.01)
 ;;O34.01
 ;;9002226.02101,"487,O34.01 ",.02)
 ;;O34.01
 ;;9002226.02101,"487,O34.01 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.11 ",.01)
 ;;O34.11
 ;;9002226.02101,"487,O34.11 ",.02)
 ;;O34.11
 ;;9002226.02101,"487,O34.11 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.31 ",.01)
 ;;O34.31
 ;;9002226.02101,"487,O34.31 ",.02)
 ;;O34.31
 ;;9002226.02101,"487,O34.31 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.41 ",.01)
 ;;O34.41
 ;;9002226.02101,"487,O34.41 ",.02)
 ;;O34.41
 ;;9002226.02101,"487,O34.41 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.511 ",.01)
 ;;O34.511
 ;;9002226.02101,"487,O34.511 ",.02)
 ;;O34.511
 ;;9002226.02101,"487,O34.511 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.521 ",.01)
 ;;O34.521
 ;;9002226.02101,"487,O34.521 ",.02)
 ;;O34.521
 ;;9002226.02101,"487,O34.521 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.531 ",.01)
 ;;O34.531
 ;;9002226.02101,"487,O34.531 ",.02)
 ;;O34.531
 ;;9002226.02101,"487,O34.531 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.591 ",.01)
 ;;O34.591
 ;;9002226.02101,"487,O34.591 ",.02)
 ;;O34.591
 ;;9002226.02101,"487,O34.591 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.61 ",.01)
 ;;O34.61
 ;;9002226.02101,"487,O34.61 ",.02)
 ;;O34.61
 ;;9002226.02101,"487,O34.61 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.71 ",.01)
 ;;O34.71
 ;;9002226.02101,"487,O34.71 ",.02)
 ;;O34.71
 ;;9002226.02101,"487,O34.71 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.81 ",.01)
 ;;O34.81
 ;;9002226.02101,"487,O34.81 ",.02)
 ;;O34.81
 ;;9002226.02101,"487,O34.81 ",.03)
 ;;30
 ;;9002226.02101,"487,O34.91 ",.01)
 ;;O34.91
 ;;9002226.02101,"487,O34.91 ",.02)
 ;;O34.91
 ;;9002226.02101,"487,O34.91 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0110 ",.01)
 ;;O36.0110
 ;;9002226.02101,"487,O36.0110 ",.02)
 ;;O36.0110
 ;;9002226.02101,"487,O36.0110 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0111 ",.01)
 ;;O36.0111
 ;;9002226.02101,"487,O36.0111 ",.02)
 ;;O36.0111
 ;;9002226.02101,"487,O36.0111 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0112 ",.01)
 ;;O36.0112
 ;;9002226.02101,"487,O36.0112 ",.02)
 ;;O36.0112
 ;;9002226.02101,"487,O36.0112 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0113 ",.01)
 ;;O36.0113
 ;;9002226.02101,"487,O36.0113 ",.02)
 ;;O36.0113
 ;;9002226.02101,"487,O36.0113 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0114 ",.01)
 ;;O36.0114
 ;;9002226.02101,"487,O36.0114 ",.02)
 ;;O36.0114
 ;;9002226.02101,"487,O36.0114 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0115 ",.01)
 ;;O36.0115
 ;;9002226.02101,"487,O36.0115 ",.02)
 ;;O36.0115
 ;;9002226.02101,"487,O36.0115 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0119 ",.01)
 ;;O36.0119
 ;;9002226.02101,"487,O36.0119 ",.02)
 ;;O36.0119
 ;;9002226.02101,"487,O36.0119 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0910 ",.01)
 ;;O36.0910
 ;;9002226.02101,"487,O36.0910 ",.02)
 ;;O36.0910
 ;;9002226.02101,"487,O36.0910 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0911 ",.01)
 ;;O36.0911
 ;;9002226.02101,"487,O36.0911 ",.02)
 ;;O36.0911
 ;;9002226.02101,"487,O36.0911 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0912 ",.01)
 ;;O36.0912
 ;;9002226.02101,"487,O36.0912 ",.02)
 ;;O36.0912
 ;;9002226.02101,"487,O36.0912 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0913 ",.01)
 ;;O36.0913
 ;;9002226.02101,"487,O36.0913 ",.02)
 ;;O36.0913
 ;;9002226.02101,"487,O36.0913 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0914 ",.01)
 ;;O36.0914
 ;;9002226.02101,"487,O36.0914 ",.02)
 ;;O36.0914
 ;;9002226.02101,"487,O36.0914 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0915 ",.01)
 ;;O36.0915
 ;;9002226.02101,"487,O36.0915 ",.02)
 ;;O36.0915
 ;;9002226.02101,"487,O36.0915 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.0919 ",.01)
 ;;O36.0919
 ;;9002226.02101,"487,O36.0919 ",.02)
 ;;O36.0919
 ;;9002226.02101,"487,O36.0919 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.1110 ",.01)
 ;;O36.1110
 ;;9002226.02101,"487,O36.1110 ",.02)
 ;;O36.1110
 ;;9002226.02101,"487,O36.1110 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.1111 ",.01)
 ;;O36.1111
 ;;9002226.02101,"487,O36.1111 ",.02)
 ;;O36.1111
 ;;9002226.02101,"487,O36.1111 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.1112 ",.01)
 ;;O36.1112
 ;;9002226.02101,"487,O36.1112 ",.02)
 ;;O36.1112
 ;;9002226.02101,"487,O36.1112 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.1113 ",.01)
 ;;O36.1113
 ;;9002226.02101,"487,O36.1113 ",.02)
 ;;O36.1113
 ;;9002226.02101,"487,O36.1113 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.1114 ",.01)
 ;;O36.1114
 ;;9002226.02101,"487,O36.1114 ",.02)
 ;;O36.1114
 ;;9002226.02101,"487,O36.1114 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.1115 ",.01)
 ;;O36.1115
 ;;9002226.02101,"487,O36.1115 ",.02)
 ;;O36.1115
 ;;9002226.02101,"487,O36.1115 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.1119 ",.01)
 ;;O36.1119
 ;;9002226.02101,"487,O36.1119 ",.02)
 ;;O36.1119
 ;;9002226.02101,"487,O36.1119 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.1910 ",.01)
 ;;O36.1910
 ;;9002226.02101,"487,O36.1910 ",.02)
 ;;O36.1910
 ;;9002226.02101,"487,O36.1910 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.1911 ",.01)
 ;;O36.1911
 ;;9002226.02101,"487,O36.1911 ",.02)
 ;;O36.1911
 ;;9002226.02101,"487,O36.1911 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.1912 ",.01)
 ;;O36.1912
 ;;9002226.02101,"487,O36.1912 ",.02)
 ;;O36.1912
 ;;9002226.02101,"487,O36.1912 ",.03)
 ;;30
 ;;9002226.02101,"487,O36.1913 ",.01)
 ;;O36.1913