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

ATXF1E4.m

Go to the documentation of this file.
  1. ATXF1E4 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JUL 09, 2015;
  1. ;;5.1;TAXONOMY;**12**;FEB 04, 1997;Build 5
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;9002226.02101,"487,O36.1913 ",.02)
  1. ;;O36.1913
  1. ;;9002226.02101,"487,O36.1913 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.1914 ",.01)
  1. ;;O36.1914
  1. ;;9002226.02101,"487,O36.1914 ",.02)
  1. ;;O36.1914
  1. ;;9002226.02101,"487,O36.1914 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.1915 ",.01)
  1. ;;O36.1915
  1. ;;9002226.02101,"487,O36.1915 ",.02)
  1. ;;O36.1915
  1. ;;9002226.02101,"487,O36.1915 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.1919 ",.01)
  1. ;;O36.1919
  1. ;;9002226.02101,"487,O36.1919 ",.02)
  1. ;;O36.1919
  1. ;;9002226.02101,"487,O36.1919 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.21X0 ",.01)
  1. ;;O36.21X0
  1. ;;9002226.02101,"487,O36.21X0 ",.02)
  1. ;;O36.21X0
  1. ;;9002226.02101,"487,O36.21X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.21X1 ",.01)
  1. ;;O36.21X1
  1. ;;9002226.02101,"487,O36.21X1 ",.02)
  1. ;;O36.21X1
  1. ;;9002226.02101,"487,O36.21X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.21X2 ",.01)
  1. ;;O36.21X2
  1. ;;9002226.02101,"487,O36.21X2 ",.02)
  1. ;;O36.21X2
  1. ;;9002226.02101,"487,O36.21X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.21X3 ",.01)
  1. ;;O36.21X3
  1. ;;9002226.02101,"487,O36.21X3 ",.02)
  1. ;;O36.21X3
  1. ;;9002226.02101,"487,O36.21X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.21X4 ",.01)
  1. ;;O36.21X4
  1. ;;9002226.02101,"487,O36.21X4 ",.02)
  1. ;;O36.21X4
  1. ;;9002226.02101,"487,O36.21X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.21X5 ",.01)
  1. ;;O36.21X5
  1. ;;9002226.02101,"487,O36.21X5 ",.02)
  1. ;;O36.21X5
  1. ;;9002226.02101,"487,O36.21X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.21X9 ",.01)
  1. ;;O36.21X9
  1. ;;9002226.02101,"487,O36.21X9 ",.02)
  1. ;;O36.21X9
  1. ;;9002226.02101,"487,O36.21X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5110 ",.01)
  1. ;;O36.5110
  1. ;;9002226.02101,"487,O36.5110 ",.02)
  1. ;;O36.5110
  1. ;;9002226.02101,"487,O36.5110 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5111 ",.01)
  1. ;;O36.5111
  1. ;;9002226.02101,"487,O36.5111 ",.02)
  1. ;;O36.5111
  1. ;;9002226.02101,"487,O36.5111 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5112 ",.01)
  1. ;;O36.5112
  1. ;;9002226.02101,"487,O36.5112 ",.02)
  1. ;;O36.5112
  1. ;;9002226.02101,"487,O36.5112 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5113 ",.01)
  1. ;;O36.5113
  1. ;;9002226.02101,"487,O36.5113 ",.02)
  1. ;;O36.5113
  1. ;;9002226.02101,"487,O36.5113 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5114 ",.01)
  1. ;;O36.5114
  1. ;;9002226.02101,"487,O36.5114 ",.02)
  1. ;;O36.5114
  1. ;;9002226.02101,"487,O36.5114 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5115 ",.01)
  1. ;;O36.5115
  1. ;;9002226.02101,"487,O36.5115 ",.02)
  1. ;;O36.5115
  1. ;;9002226.02101,"487,O36.5115 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5119 ",.01)
  1. ;;O36.5119
  1. ;;9002226.02101,"487,O36.5119 ",.02)
  1. ;;O36.5119
  1. ;;9002226.02101,"487,O36.5119 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5910 ",.01)
  1. ;;O36.5910
  1. ;;9002226.02101,"487,O36.5910 ",.02)
  1. ;;O36.5910
  1. ;;9002226.02101,"487,O36.5910 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5911 ",.01)
  1. ;;O36.5911
  1. ;;9002226.02101,"487,O36.5911 ",.02)
  1. ;;O36.5911
  1. ;;9002226.02101,"487,O36.5911 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5912 ",.01)
  1. ;;O36.5912
  1. ;;9002226.02101,"487,O36.5912 ",.02)
  1. ;;O36.5912
  1. ;;9002226.02101,"487,O36.5912 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5913 ",.01)
  1. ;;O36.5913
  1. ;;9002226.02101,"487,O36.5913 ",.02)
  1. ;;O36.5913
  1. ;;9002226.02101,"487,O36.5913 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5914 ",.01)
  1. ;;O36.5914
  1. ;;9002226.02101,"487,O36.5914 ",.02)
  1. ;;O36.5914
  1. ;;9002226.02101,"487,O36.5914 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5915 ",.01)
  1. ;;O36.5915
  1. ;;9002226.02101,"487,O36.5915 ",.02)
  1. ;;O36.5915
  1. ;;9002226.02101,"487,O36.5915 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.5919 ",.01)
  1. ;;O36.5919
  1. ;;9002226.02101,"487,O36.5919 ",.02)
  1. ;;O36.5919
  1. ;;9002226.02101,"487,O36.5919 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.61X0 ",.01)
  1. ;;O36.61X0
  1. ;;9002226.02101,"487,O36.61X0 ",.02)
  1. ;;O36.61X0
  1. ;;9002226.02101,"487,O36.61X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.61X1 ",.01)
  1. ;;O36.61X1
  1. ;;9002226.02101,"487,O36.61X1 ",.02)
  1. ;;O36.61X1
  1. ;;9002226.02101,"487,O36.61X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.61X2 ",.01)
  1. ;;O36.61X2
  1. ;;9002226.02101,"487,O36.61X2 ",.02)
  1. ;;O36.61X2
  1. ;;9002226.02101,"487,O36.61X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.61X3 ",.01)
  1. ;;O36.61X3
  1. ;;9002226.02101,"487,O36.61X3 ",.02)
  1. ;;O36.61X3
  1. ;;9002226.02101,"487,O36.61X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.61X4 ",.01)
  1. ;;O36.61X4
  1. ;;9002226.02101,"487,O36.61X4 ",.02)
  1. ;;O36.61X4
  1. ;;9002226.02101,"487,O36.61X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.61X5 ",.01)
  1. ;;O36.61X5
  1. ;;9002226.02101,"487,O36.61X5 ",.02)
  1. ;;O36.61X5
  1. ;;9002226.02101,"487,O36.61X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.61X9 ",.01)
  1. ;;O36.61X9
  1. ;;9002226.02101,"487,O36.61X9 ",.02)
  1. ;;O36.61X9
  1. ;;9002226.02101,"487,O36.61X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.71X0 ",.01)
  1. ;;O36.71X0
  1. ;;9002226.02101,"487,O36.71X0 ",.02)
  1. ;;O36.71X0
  1. ;;9002226.02101,"487,O36.71X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.71X1 ",.01)
  1. ;;O36.71X1
  1. ;;9002226.02101,"487,O36.71X1 ",.02)
  1. ;;O36.71X1
  1. ;;9002226.02101,"487,O36.71X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.71X2 ",.01)
  1. ;;O36.71X2
  1. ;;9002226.02101,"487,O36.71X2 ",.02)
  1. ;;O36.71X2
  1. ;;9002226.02101,"487,O36.71X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.71X3 ",.01)
  1. ;;O36.71X3
  1. ;;9002226.02101,"487,O36.71X3 ",.02)
  1. ;;O36.71X3
  1. ;;9002226.02101,"487,O36.71X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.71X4 ",.01)
  1. ;;O36.71X4
  1. ;;9002226.02101,"487,O36.71X4 ",.02)
  1. ;;O36.71X4
  1. ;;9002226.02101,"487,O36.71X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.71X5 ",.01)
  1. ;;O36.71X5
  1. ;;9002226.02101,"487,O36.71X5 ",.02)
  1. ;;O36.71X5
  1. ;;9002226.02101,"487,O36.71X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.71X9 ",.01)
  1. ;;O36.71X9
  1. ;;9002226.02101,"487,O36.71X9 ",.02)
  1. ;;O36.71X9
  1. ;;9002226.02101,"487,O36.71X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8210 ",.01)
  1. ;;O36.8210
  1. ;;9002226.02101,"487,O36.8210 ",.02)
  1. ;;O36.8210
  1. ;;9002226.02101,"487,O36.8210 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8211 ",.01)
  1. ;;O36.8211
  1. ;;9002226.02101,"487,O36.8211 ",.02)
  1. ;;O36.8211
  1. ;;9002226.02101,"487,O36.8211 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8212 ",.01)
  1. ;;O36.8212
  1. ;;9002226.02101,"487,O36.8212 ",.02)
  1. ;;O36.8212
  1. ;;9002226.02101,"487,O36.8212 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8213 ",.01)
  1. ;;O36.8213
  1. ;;9002226.02101,"487,O36.8213 ",.02)
  1. ;;O36.8213
  1. ;;9002226.02101,"487,O36.8213 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8214 ",.01)
  1. ;;O36.8214
  1. ;;9002226.02101,"487,O36.8214 ",.02)
  1. ;;O36.8214
  1. ;;9002226.02101,"487,O36.8214 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8215 ",.01)
  1. ;;O36.8215
  1. ;;9002226.02101,"487,O36.8215 ",.02)
  1. ;;O36.8215
  1. ;;9002226.02101,"487,O36.8215 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8219 ",.01)
  1. ;;O36.8219
  1. ;;9002226.02101,"487,O36.8219 ",.02)
  1. ;;O36.8219
  1. ;;9002226.02101,"487,O36.8219 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8910 ",.01)
  1. ;;O36.8910
  1. ;;9002226.02101,"487,O36.8910 ",.02)
  1. ;;O36.8910
  1. ;;9002226.02101,"487,O36.8910 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8911 ",.01)
  1. ;;O36.8911
  1. ;;9002226.02101,"487,O36.8911 ",.02)
  1. ;;O36.8911
  1. ;;9002226.02101,"487,O36.8911 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8912 ",.01)
  1. ;;O36.8912
  1. ;;9002226.02101,"487,O36.8912 ",.02)
  1. ;;O36.8912
  1. ;;9002226.02101,"487,O36.8912 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8913 ",.01)
  1. ;;O36.8913
  1. ;;9002226.02101,"487,O36.8913 ",.02)
  1. ;;O36.8913
  1. ;;9002226.02101,"487,O36.8913 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8914 ",.01)
  1. ;;O36.8914
  1. ;;9002226.02101,"487,O36.8914 ",.02)
  1. ;;O36.8914
  1. ;;9002226.02101,"487,O36.8914 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8915 ",.01)
  1. ;;O36.8915
  1. ;;9002226.02101,"487,O36.8915 ",.02)
  1. ;;O36.8915
  1. ;;9002226.02101,"487,O36.8915 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.8919 ",.01)
  1. ;;O36.8919
  1. ;;9002226.02101,"487,O36.8919 ",.02)
  1. ;;O36.8919
  1. ;;9002226.02101,"487,O36.8919 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.91X0 ",.01)
  1. ;;O36.91X0
  1. ;;9002226.02101,"487,O36.91X0 ",.02)
  1. ;;O36.91X0
  1. ;;9002226.02101,"487,O36.91X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.91X1 ",.01)
  1. ;;O36.91X1
  1. ;;9002226.02101,"487,O36.91X1 ",.02)
  1. ;;O36.91X1
  1. ;;9002226.02101,"487,O36.91X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.91X2 ",.01)
  1. ;;O36.91X2
  1. ;;9002226.02101,"487,O36.91X2 ",.02)
  1. ;;O36.91X2
  1. ;;9002226.02101,"487,O36.91X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.91X3 ",.01)
  1. ;;O36.91X3
  1. ;;9002226.02101,"487,O36.91X3 ",.02)
  1. ;;O36.91X3
  1. ;;9002226.02101,"487,O36.91X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.91X4 ",.01)
  1. ;;O36.91X4
  1. ;;9002226.02101,"487,O36.91X4 ",.02)
  1. ;;O36.91X4
  1. ;;9002226.02101,"487,O36.91X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.91X5 ",.01)
  1. ;;O36.91X5
  1. ;;9002226.02101,"487,O36.91X5 ",.02)
  1. ;;O36.91X5
  1. ;;9002226.02101,"487,O36.91X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O36.91X9 ",.01)
  1. ;;O36.91X9
  1. ;;9002226.02101,"487,O36.91X9 ",.02)
  1. ;;O36.91X9
  1. ;;9002226.02101,"487,O36.91X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O40.1XX0 ",.01)
  1. ;;O40.1XX0
  1. ;;9002226.02101,"487,O40.1XX0 ",.02)
  1. ;;O40.1XX0
  1. ;;9002226.02101,"487,O40.1XX0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O40.1XX1 ",.01)
  1. ;;O40.1XX1
  1. ;;9002226.02101,"487,O40.1XX1 ",.02)
  1. ;;O40.1XX1
  1. ;;9002226.02101,"487,O40.1XX1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O40.1XX2 ",.01)
  1. ;;O40.1XX2
  1. ;;9002226.02101,"487,O40.1XX2 ",.02)
  1. ;;O40.1XX2
  1. ;;9002226.02101,"487,O40.1XX2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O40.1XX3 ",.01)
  1. ;;O40.1XX3
  1. ;;9002226.02101,"487,O40.1XX3 ",.02)
  1. ;;O40.1XX3
  1. ;;9002226.02101,"487,O40.1XX3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O40.1XX4 ",.01)
  1. ;;O40.1XX4
  1. ;;9002226.02101,"487,O40.1XX4 ",.02)
  1. ;;O40.1XX4
  1. ;;9002226.02101,"487,O40.1XX4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O40.1XX5 ",.01)
  1. ;;O40.1XX5
  1. ;;9002226.02101,"487,O40.1XX5 ",.02)
  1. ;;O40.1XX5
  1. ;;9002226.02101,"487,O40.1XX5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O40.1XX9 ",.01)
  1. ;;O40.1XX9
  1. ;;9002226.02101,"487,O40.1XX9 ",.02)
  1. ;;O40.1XX9
  1. ;;9002226.02101,"487,O40.1XX9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.01X0 ",.01)
  1. ;;O41.01X0
  1. ;;9002226.02101,"487,O41.01X0 ",.02)
  1. ;;O41.01X0
  1. ;;9002226.02101,"487,O41.01X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.01X1 ",.01)
  1. ;;O41.01X1
  1. ;;9002226.02101,"487,O41.01X1 ",.02)
  1. ;;O41.01X1
  1. ;;9002226.02101,"487,O41.01X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.01X2 ",.01)
  1. ;;O41.01X2
  1. ;;9002226.02101,"487,O41.01X2 ",.02)
  1. ;;O41.01X2
  1. ;;9002226.02101,"487,O41.01X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.01X3 ",.01)
  1. ;;O41.01X3
  1. ;;9002226.02101,"487,O41.01X3 ",.02)
  1. ;;O41.01X3
  1. ;;9002226.02101,"487,O41.01X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.01X4 ",.01)
  1. ;;O41.01X4
  1. ;;9002226.02101,"487,O41.01X4 ",.02)
  1. ;;O41.01X4
  1. ;;9002226.02101,"487,O41.01X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.01X5 ",.01)
  1. ;;O41.01X5
  1. ;;9002226.02101,"487,O41.01X5 ",.02)
  1. ;;O41.01X5
  1. ;;9002226.02101,"487,O41.01X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.01X9 ",.01)
  1. ;;O41.01X9
  1. ;;9002226.02101,"487,O41.01X9 ",.02)
  1. ;;O41.01X9
  1. ;;9002226.02101,"487,O41.01X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1011 ",.01)
  1. ;;O41.1011
  1. ;;9002226.02101,"487,O41.1011 ",.02)
  1. ;;O41.1011
  1. ;;9002226.02101,"487,O41.1011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1012 ",.01)
  1. ;;O41.1012
  1. ;;9002226.02101,"487,O41.1012 ",.02)
  1. ;;O41.1012
  1. ;;9002226.02101,"487,O41.1012 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1013 ",.01)
  1. ;;O41.1013
  1. ;;9002226.02101,"487,O41.1013 ",.02)
  1. ;;O41.1013
  1. ;;9002226.02101,"487,O41.1013 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1014 ",.01)
  1. ;;O41.1014
  1. ;;9002226.02101,"487,O41.1014 ",.02)
  1. ;;O41.1014
  1. ;;9002226.02101,"487,O41.1014 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1015 ",.01)
  1. ;;O41.1015
  1. ;;9002226.02101,"487,O41.1015 ",.02)
  1. ;;O41.1015