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

ATXF1F4.m

Go to the documentation of this file.
ATXF1F4 ;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,"488,O36.1121 ",.01)
 ;;O36.1121
 ;;9002226.02101,"488,O36.1121 ",.02)
 ;;O36.1121
 ;;9002226.02101,"488,O36.1121 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1122 ",.01)
 ;;O36.1122
 ;;9002226.02101,"488,O36.1122 ",.02)
 ;;O36.1122
 ;;9002226.02101,"488,O36.1122 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1123 ",.01)
 ;;O36.1123
 ;;9002226.02101,"488,O36.1123 ",.02)
 ;;O36.1123
 ;;9002226.02101,"488,O36.1123 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1124 ",.01)
 ;;O36.1124
 ;;9002226.02101,"488,O36.1124 ",.02)
 ;;O36.1124
 ;;9002226.02101,"488,O36.1124 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1125 ",.01)
 ;;O36.1125
 ;;9002226.02101,"488,O36.1125 ",.02)
 ;;O36.1125
 ;;9002226.02101,"488,O36.1125 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1129 ",.01)
 ;;O36.1129
 ;;9002226.02101,"488,O36.1129 ",.02)
 ;;O36.1129
 ;;9002226.02101,"488,O36.1129 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1920 ",.01)
 ;;O36.1920
 ;;9002226.02101,"488,O36.1920 ",.02)
 ;;O36.1920
 ;;9002226.02101,"488,O36.1920 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1921 ",.01)
 ;;O36.1921
 ;;9002226.02101,"488,O36.1921 ",.02)
 ;;O36.1921
 ;;9002226.02101,"488,O36.1921 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1922 ",.01)
 ;;O36.1922
 ;;9002226.02101,"488,O36.1922 ",.02)
 ;;O36.1922
 ;;9002226.02101,"488,O36.1922 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1923 ",.01)
 ;;O36.1923
 ;;9002226.02101,"488,O36.1923 ",.02)
 ;;O36.1923
 ;;9002226.02101,"488,O36.1923 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1924 ",.01)
 ;;O36.1924
 ;;9002226.02101,"488,O36.1924 ",.02)
 ;;O36.1924
 ;;9002226.02101,"488,O36.1924 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1925 ",.01)
 ;;O36.1925
 ;;9002226.02101,"488,O36.1925 ",.02)
 ;;O36.1925
 ;;9002226.02101,"488,O36.1925 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.1929 ",.01)
 ;;O36.1929
 ;;9002226.02101,"488,O36.1929 ",.02)
 ;;O36.1929
 ;;9002226.02101,"488,O36.1929 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.22X0 ",.01)
 ;;O36.22X0
 ;;9002226.02101,"488,O36.22X0 ",.02)
 ;;O36.22X0
 ;;9002226.02101,"488,O36.22X0 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.22X1 ",.01)
 ;;O36.22X1
 ;;9002226.02101,"488,O36.22X1 ",.02)
 ;;O36.22X1
 ;;9002226.02101,"488,O36.22X1 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.22X2 ",.01)
 ;;O36.22X2
 ;;9002226.02101,"488,O36.22X2 ",.02)
 ;;O36.22X2
 ;;9002226.02101,"488,O36.22X2 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.22X3 ",.01)
 ;;O36.22X3
 ;;9002226.02101,"488,O36.22X3 ",.02)
 ;;O36.22X3
 ;;9002226.02101,"488,O36.22X3 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.22X4 ",.01)
 ;;O36.22X4
 ;;9002226.02101,"488,O36.22X4 ",.02)
 ;;O36.22X4
 ;;9002226.02101,"488,O36.22X4 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.22X5 ",.01)
 ;;O36.22X5
 ;;9002226.02101,"488,O36.22X5 ",.02)
 ;;O36.22X5
 ;;9002226.02101,"488,O36.22X5 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.22X9 ",.01)
 ;;O36.22X9
 ;;9002226.02101,"488,O36.22X9 ",.02)
 ;;O36.22X9
 ;;9002226.02101,"488,O36.22X9 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5120 ",.01)
 ;;O36.5120
 ;;9002226.02101,"488,O36.5120 ",.02)
 ;;O36.5120
 ;;9002226.02101,"488,O36.5120 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5121 ",.01)
 ;;O36.5121
 ;;9002226.02101,"488,O36.5121 ",.02)
 ;;O36.5121
 ;;9002226.02101,"488,O36.5121 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5122 ",.01)
 ;;O36.5122
 ;;9002226.02101,"488,O36.5122 ",.02)
 ;;O36.5122
 ;;9002226.02101,"488,O36.5122 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5123 ",.01)
 ;;O36.5123
 ;;9002226.02101,"488,O36.5123 ",.02)
 ;;O36.5123
 ;;9002226.02101,"488,O36.5123 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5124 ",.01)
 ;;O36.5124
 ;;9002226.02101,"488,O36.5124 ",.02)
 ;;O36.5124
 ;;9002226.02101,"488,O36.5124 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5125 ",.01)
 ;;O36.5125
 ;;9002226.02101,"488,O36.5125 ",.02)
 ;;O36.5125
 ;;9002226.02101,"488,O36.5125 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5129 ",.01)
 ;;O36.5129
 ;;9002226.02101,"488,O36.5129 ",.02)
 ;;O36.5129
 ;;9002226.02101,"488,O36.5129 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5920 ",.01)
 ;;O36.5920
 ;;9002226.02101,"488,O36.5920 ",.02)
 ;;O36.5920
 ;;9002226.02101,"488,O36.5920 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5921 ",.01)
 ;;O36.5921
 ;;9002226.02101,"488,O36.5921 ",.02)
 ;;O36.5921
 ;;9002226.02101,"488,O36.5921 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5922 ",.01)
 ;;O36.5922
 ;;9002226.02101,"488,O36.5922 ",.02)
 ;;O36.5922
 ;;9002226.02101,"488,O36.5922 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5923 ",.01)
 ;;O36.5923
 ;;9002226.02101,"488,O36.5923 ",.02)
 ;;O36.5923
 ;;9002226.02101,"488,O36.5923 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5924 ",.01)
 ;;O36.5924
 ;;9002226.02101,"488,O36.5924 ",.02)
 ;;O36.5924
 ;;9002226.02101,"488,O36.5924 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5925 ",.01)
 ;;O36.5925
 ;;9002226.02101,"488,O36.5925 ",.02)
 ;;O36.5925
 ;;9002226.02101,"488,O36.5925 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.5929 ",.01)
 ;;O36.5929
 ;;9002226.02101,"488,O36.5929 ",.02)
 ;;O36.5929
 ;;9002226.02101,"488,O36.5929 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.62X0 ",.01)
 ;;O36.62X0
 ;;9002226.02101,"488,O36.62X0 ",.02)
 ;;O36.62X0
 ;;9002226.02101,"488,O36.62X0 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.62X1 ",.01)
 ;;O36.62X1
 ;;9002226.02101,"488,O36.62X1 ",.02)
 ;;O36.62X1
 ;;9002226.02101,"488,O36.62X1 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.62X2 ",.01)
 ;;O36.62X2
 ;;9002226.02101,"488,O36.62X2 ",.02)
 ;;O36.62X2
 ;;9002226.02101,"488,O36.62X2 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.62X3 ",.01)
 ;;O36.62X3
 ;;9002226.02101,"488,O36.62X3 ",.02)
 ;;O36.62X3
 ;;9002226.02101,"488,O36.62X3 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.62X4 ",.01)
 ;;O36.62X4
 ;;9002226.02101,"488,O36.62X4 ",.02)
 ;;O36.62X4
 ;;9002226.02101,"488,O36.62X4 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.62X5 ",.01)
 ;;O36.62X5
 ;;9002226.02101,"488,O36.62X5 ",.02)
 ;;O36.62X5
 ;;9002226.02101,"488,O36.62X5 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.62X9 ",.01)
 ;;O36.62X9
 ;;9002226.02101,"488,O36.62X9 ",.02)
 ;;O36.62X9
 ;;9002226.02101,"488,O36.62X9 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.72X0 ",.01)
 ;;O36.72X0
 ;;9002226.02101,"488,O36.72X0 ",.02)
 ;;O36.72X0
 ;;9002226.02101,"488,O36.72X0 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.72X1 ",.01)
 ;;O36.72X1
 ;;9002226.02101,"488,O36.72X1 ",.02)
 ;;O36.72X1
 ;;9002226.02101,"488,O36.72X1 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.72X2 ",.01)
 ;;O36.72X2
 ;;9002226.02101,"488,O36.72X2 ",.02)
 ;;O36.72X2
 ;;9002226.02101,"488,O36.72X2 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.72X3 ",.01)
 ;;O36.72X3
 ;;9002226.02101,"488,O36.72X3 ",.02)
 ;;O36.72X3
 ;;9002226.02101,"488,O36.72X3 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.72X4 ",.01)
 ;;O36.72X4
 ;;9002226.02101,"488,O36.72X4 ",.02)
 ;;O36.72X4
 ;;9002226.02101,"488,O36.72X4 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.72X5 ",.01)
 ;;O36.72X5
 ;;9002226.02101,"488,O36.72X5 ",.02)
 ;;O36.72X5
 ;;9002226.02101,"488,O36.72X5 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.72X9 ",.01)
 ;;O36.72X9
 ;;9002226.02101,"488,O36.72X9 ",.02)
 ;;O36.72X9
 ;;9002226.02101,"488,O36.72X9 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8121 ",.01)
 ;;O36.8121
 ;;9002226.02101,"488,O36.8121 ",.02)
 ;;O36.8121
 ;;9002226.02101,"488,O36.8121 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8122 ",.01)
 ;;O36.8122
 ;;9002226.02101,"488,O36.8122 ",.02)
 ;;O36.8122
 ;;9002226.02101,"488,O36.8122 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8123 ",.01)
 ;;O36.8123
 ;;9002226.02101,"488,O36.8123 ",.02)
 ;;O36.8123
 ;;9002226.02101,"488,O36.8123 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8124 ",.01)
 ;;O36.8124
 ;;9002226.02101,"488,O36.8124 ",.02)
 ;;O36.8124
 ;;9002226.02101,"488,O36.8124 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8125 ",.01)
 ;;O36.8125
 ;;9002226.02101,"488,O36.8125 ",.02)
 ;;O36.8125
 ;;9002226.02101,"488,O36.8125 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8129 ",.01)
 ;;O36.8129
 ;;9002226.02101,"488,O36.8129 ",.02)
 ;;O36.8129
 ;;9002226.02101,"488,O36.8129 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8220 ",.01)
 ;;O36.8220
 ;;9002226.02101,"488,O36.8220 ",.02)
 ;;O36.8220
 ;;9002226.02101,"488,O36.8220 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8221 ",.01)
 ;;O36.8221
 ;;9002226.02101,"488,O36.8221 ",.02)
 ;;O36.8221
 ;;9002226.02101,"488,O36.8221 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8222 ",.01)
 ;;O36.8222
 ;;9002226.02101,"488,O36.8222 ",.02)
 ;;O36.8222
 ;;9002226.02101,"488,O36.8222 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8223 ",.01)
 ;;O36.8223
 ;;9002226.02101,"488,O36.8223 ",.02)
 ;;O36.8223
 ;;9002226.02101,"488,O36.8223 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8224 ",.01)
 ;;O36.8224
 ;;9002226.02101,"488,O36.8224 ",.02)
 ;;O36.8224
 ;;9002226.02101,"488,O36.8224 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8225 ",.01)
 ;;O36.8225
 ;;9002226.02101,"488,O36.8225 ",.02)
 ;;O36.8225
 ;;9002226.02101,"488,O36.8225 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8229 ",.01)
 ;;O36.8229
 ;;9002226.02101,"488,O36.8229 ",.02)
 ;;O36.8229
 ;;9002226.02101,"488,O36.8229 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8920 ",.01)
 ;;O36.8920
 ;;9002226.02101,"488,O36.8920 ",.02)
 ;;O36.8920
 ;;9002226.02101,"488,O36.8920 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8921 ",.01)
 ;;O36.8921
 ;;9002226.02101,"488,O36.8921 ",.02)
 ;;O36.8921
 ;;9002226.02101,"488,O36.8921 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8922 ",.01)
 ;;O36.8922
 ;;9002226.02101,"488,O36.8922 ",.02)
 ;;O36.8922
 ;;9002226.02101,"488,O36.8922 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8923 ",.01)
 ;;O36.8923
 ;;9002226.02101,"488,O36.8923 ",.02)
 ;;O36.8923
 ;;9002226.02101,"488,O36.8923 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8924 ",.01)
 ;;O36.8924
 ;;9002226.02101,"488,O36.8924 ",.02)
 ;;O36.8924
 ;;9002226.02101,"488,O36.8924 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8925 ",.01)
 ;;O36.8925
 ;;9002226.02101,"488,O36.8925 ",.02)
 ;;O36.8925
 ;;9002226.02101,"488,O36.8925 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.8929 ",.01)
 ;;O36.8929
 ;;9002226.02101,"488,O36.8929 ",.02)
 ;;O36.8929
 ;;9002226.02101,"488,O36.8929 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.92X0 ",.01)
 ;;O36.92X0
 ;;9002226.02101,"488,O36.92X0 ",.02)
 ;;O36.92X0
 ;;9002226.02101,"488,O36.92X0 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.92X1 ",.01)
 ;;O36.92X1
 ;;9002226.02101,"488,O36.92X1 ",.02)
 ;;O36.92X1
 ;;9002226.02101,"488,O36.92X1 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.92X2 ",.01)
 ;;O36.92X2
 ;;9002226.02101,"488,O36.92X2 ",.02)
 ;;O36.92X2
 ;;9002226.02101,"488,O36.92X2 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.92X3 ",.01)
 ;;O36.92X3
 ;;9002226.02101,"488,O36.92X3 ",.02)
 ;;O36.92X3
 ;;9002226.02101,"488,O36.92X3 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.92X4 ",.01)
 ;;O36.92X4
 ;;9002226.02101,"488,O36.92X4 ",.02)
 ;;O36.92X4
 ;;9002226.02101,"488,O36.92X4 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.92X5 ",.01)
 ;;O36.92X5
 ;;9002226.02101,"488,O36.92X5 ",.02)
 ;;O36.92X5
 ;;9002226.02101,"488,O36.92X5 ",.03)
 ;;30
 ;;9002226.02101,"488,O36.92X9 ",.01)
 ;;O36.92X9
 ;;9002226.02101,"488,O36.92X9 ",.02)
 ;;O36.92X9
 ;;9002226.02101,"488,O36.92X9 ",.03)
 ;;30
 ;;9002226.02101,"488,O40.2XX0 ",.01)
 ;;O40.2XX0
 ;;9002226.02101,"488,O40.2XX0 ",.02)
 ;;O40.2XX0
 ;;9002226.02101,"488,O40.2XX0 ",.03)
 ;;30
 ;;9002226.02101,"488,O40.2XX1 ",.01)
 ;;O40.2XX1
 ;;9002226.02101,"488,O40.2XX1 ",.02)
 ;;O40.2XX1
 ;;9002226.02101,"488,O40.2XX1 ",.03)
 ;;30
 ;;9002226.02101,"488,O40.2XX2 ",.01)
 ;;O40.2XX2
 ;;9002226.02101,"488,O40.2XX2 ",.02)
 ;;O40.2XX2
 ;;9002226.02101,"488,O40.2XX2 ",.03)
 ;;30
 ;;9002226.02101,"488,O40.2XX3 ",.01)
 ;;O40.2XX3