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

ATXF4E2.m

Go to the documentation of this file.
  1. ATXF4E2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 15, 2016;
  1. ;;5.1;TAXONOMY;**15**;FEB 04, 1997;Build 20
  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,"2108,215.0 ",.02)
  1. ;;215.9
  1. ;;9002226.02101,"2108,215.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,216.0 ",.01)
  1. ;;216.0
  1. ;;9002226.02101,"2108,216.0 ",.02)
  1. ;;216.9
  1. ;;9002226.02101,"2108,216.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,217. ",.01)
  1. ;;217.
  1. ;;9002226.02101,"2108,217. ",.02)
  1. ;;217.
  1. ;;9002226.02101,"2108,217. ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,218.0 ",.01)
  1. ;;218.0
  1. ;;9002226.02101,"2108,218.0 ",.02)
  1. ;;218.9
  1. ;;9002226.02101,"2108,218.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,219.0 ",.01)
  1. ;;219.0
  1. ;;9002226.02101,"2108,219.0 ",.02)
  1. ;;219.9
  1. ;;9002226.02101,"2108,219.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,220. ",.01)
  1. ;;220.
  1. ;;9002226.02101,"2108,220. ",.02)
  1. ;;220.
  1. ;;9002226.02101,"2108,220. ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,221.0 ",.01)
  1. ;;221.0
  1. ;;9002226.02101,"2108,221.0 ",.02)
  1. ;;221.9
  1. ;;9002226.02101,"2108,221.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,222.0 ",.01)
  1. ;;222.0
  1. ;;9002226.02101,"2108,222.0 ",.02)
  1. ;;222.9
  1. ;;9002226.02101,"2108,222.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,223.0 ",.01)
  1. ;;223.0
  1. ;;9002226.02101,"2108,223.0 ",.02)
  1. ;;223.3
  1. ;;9002226.02101,"2108,223.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,223.81 ",.01)
  1. ;;223.81
  1. ;;9002226.02101,"2108,223.81 ",.02)
  1. ;;223.9
  1. ;;9002226.02101,"2108,223.81 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,224.0 ",.01)
  1. ;;224.0
  1. ;;9002226.02101,"2108,224.0 ",.02)
  1. ;;224.9
  1. ;;9002226.02101,"2108,224.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,226. ",.01)
  1. ;;226.
  1. ;;9002226.02101,"2108,226. ",.02)
  1. ;;226.
  1. ;;9002226.02101,"2108,226. ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,227.0 ",.01)
  1. ;;227.0
  1. ;;9002226.02101,"2108,227.0 ",.02)
  1. ;;227.1
  1. ;;9002226.02101,"2108,227.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,227.5 ",.01)
  1. ;;227.5
  1. ;;9002226.02101,"2108,227.5 ",.02)
  1. ;;227.9
  1. ;;9002226.02101,"2108,227.5 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,228.00 ",.01)
  1. ;;228.00
  1. ;;9002226.02101,"2108,228.00 ",.02)
  1. ;;228.01
  1. ;;9002226.02101,"2108,228.00 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,228.03 ",.01)
  1. ;;228.03
  1. ;;9002226.02101,"2108,228.03 ",.02)
  1. ;;228.09
  1. ;;9002226.02101,"2108,228.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,229.0 ",.01)
  1. ;;229.0
  1. ;;9002226.02101,"2108,229.0 ",.02)
  1. ;;229.9
  1. ;;9002226.02101,"2108,229.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,235.0 ",.01)
  1. ;;235.0
  1. ;;9002226.02101,"2108,235.0 ",.02)
  1. ;;235.9
  1. ;;9002226.02101,"2108,235.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,236.0 ",.01)
  1. ;;236.0
  1. ;;9002226.02101,"2108,236.0 ",.02)
  1. ;;236.99
  1. ;;9002226.02101,"2108,236.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,237.2 ",.01)
  1. ;;237.2
  1. ;;9002226.02101,"2108,237.2 ",.02)
  1. ;;237.4
  1. ;;9002226.02101,"2108,237.2 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,237.70 ",.01)
  1. ;;237.70
  1. ;;9002226.02101,"2108,237.70 ",.02)
  1. ;;237.79
  1. ;;9002226.02101,"2108,237.70 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,238.0 ",.01)
  1. ;;238.0
  1. ;;9002226.02101,"2108,238.0 ",.02)
  1. ;;238.3
  1. ;;9002226.02101,"2108,238.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,238.5 ",.01)
  1. ;;238.5
  1. ;;9002226.02101,"2108,238.5 ",.02)
  1. ;;238.6
  1. ;;9002226.02101,"2108,238.5 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,238.8 ",.01)
  1. ;;238.8
  1. ;;9002226.02101,"2108,238.8 ",.02)
  1. ;;238.9
  1. ;;9002226.02101,"2108,238.8 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,239.0 ",.01)
  1. ;;239.0
  1. ;;9002226.02101,"2108,239.0 ",.02)
  1. ;;239.5
  1. ;;9002226.02101,"2108,239.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,239.8 ",.01)
  1. ;;239.8
  1. ;;9002226.02101,"2108,239.8 ",.02)
  1. ;;239.9
  1. ;;9002226.02101,"2108,239.8 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,258.01 ",.01)
  1. ;;258.01
  1. ;;9002226.02101,"2108,258.01 ",.02)
  1. ;;258.03
  1. ;;9002226.02101,"2108,258.01 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,258.8 ",.01)
  1. ;;258.8
  1. ;;9002226.02101,"2108,258.8 ",.02)
  1. ;;258.8
  1. ;;9002226.02101,"2108,258.8 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,259.2 ",.01)
  1. ;;259.2
  1. ;;9002226.02101,"2108,259.2 ",.02)
  1. ;;259.2
  1. ;;9002226.02101,"2108,259.2 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,273.0 ",.01)
  1. ;;273.0
  1. ;;9002226.02101,"2108,273.0 ",.02)
  1. ;;273.2
  1. ;;9002226.02101,"2108,273.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,273.8 ",.01)
  1. ;;273.8
  1. ;;9002226.02101,"2108,273.8 ",.02)
  1. ;;273.9
  1. ;;9002226.02101,"2108,273.8 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,275.42 ",.01)
  1. ;;275.42
  1. ;;9002226.02101,"2108,275.42 ",.02)
  1. ;;275.42
  1. ;;9002226.02101,"2108,275.42 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,277.88 ",.01)
  1. ;;277.88
  1. ;;9002226.02101,"2108,277.88 ",.02)
  1. ;;277.88
  1. ;;9002226.02101,"2108,277.88 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,284.11 ",.01)
  1. ;;284.11
  1. ;;9002226.02101,"2108,284.11 ",.02)
  1. ;;284.12
  1. ;;9002226.02101,"2108,284.11 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,284.19 ",.01)
  1. ;;284.19
  1. ;;9002226.02101,"2108,284.19 ",.02)
  1. ;;284.19
  1. ;;9002226.02101,"2108,284.19 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,284.89 ",.01)
  1. ;;284.89
  1. ;;9002226.02101,"2108,284.89 ",.02)
  1. ;;284.89
  1. ;;9002226.02101,"2108,284.89 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,285.22 ",.01)
  1. ;;285.22
  1. ;;9002226.02101,"2108,285.22 ",.02)
  1. ;;285.22
  1. ;;9002226.02101,"2108,285.22 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,285.3 ",.01)
  1. ;;285.3
  1. ;;9002226.02101,"2108,285.3 ",.02)
  1. ;;285.3
  1. ;;9002226.02101,"2108,285.3 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,287.39 ",.01)
  1. ;;287.39
  1. ;;9002226.02101,"2108,287.39 ",.02)
  1. ;;287.39
  1. ;;9002226.02101,"2108,287.39 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,287.49 ",.01)
  1. ;;287.49
  1. ;;9002226.02101,"2108,287.49 ",.02)
  1. ;;287.49
  1. ;;9002226.02101,"2108,287.49 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,287.5 ",.01)
  1. ;;287.5
  1. ;;9002226.02101,"2108,287.5 ",.02)
  1. ;;287.5
  1. ;;9002226.02101,"2108,287.5 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,288.03 ",.01)
  1. ;;288.03
  1. ;;9002226.02101,"2108,288.03 ",.02)
  1. ;;288.03
  1. ;;9002226.02101,"2108,288.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,288.3 ",.01)
  1. ;;288.3
  1. ;;9002226.02101,"2108,288.3 ",.02)
  1. ;;288.4
  1. ;;9002226.02101,"2108,288.3 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,289.83 ",.01)
  1. ;;289.83
  1. ;;9002226.02101,"2108,289.83 ",.02)
  1. ;;289.83
  1. ;;9002226.02101,"2108,289.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,336.3 ",.01)
  1. ;;336.3
  1. ;;9002226.02101,"2108,336.3 ",.02)
  1. ;;336.3
  1. ;;9002226.02101,"2108,336.3 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,338.3 ",.01)
  1. ;;338.3
  1. ;;9002226.02101,"2108,338.3 ",.02)
  1. ;;338.3
  1. ;;9002226.02101,"2108,338.3 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,357.3 ",.01)
  1. ;;357.3
  1. ;;9002226.02101,"2108,357.3 ",.02)
  1. ;;357.3
  1. ;;9002226.02101,"2108,357.3 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,358.31 ",.01)
  1. ;;358.31
  1. ;;9002226.02101,"2108,358.31 ",.02)
  1. ;;358.31
  1. ;;9002226.02101,"2108,358.31 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,377.51 ",.01)
  1. ;;377.51
  1. ;;9002226.02101,"2108,377.51 ",.02)
  1. ;;377.52
  1. ;;9002226.02101,"2108,377.51 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,377.61 ",.01)
  1. ;;377.61
  1. ;;9002226.02101,"2108,377.61 ",.02)
  1. ;;377.61
  1. ;;9002226.02101,"2108,377.61 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,377.71 ",.01)
  1. ;;377.71
  1. ;;9002226.02101,"2108,377.71 ",.02)
  1. ;;377.71
  1. ;;9002226.02101,"2108,377.71 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,478.11 ",.01)
  1. ;;478.11
  1. ;;9002226.02101,"2108,478.11 ",.02)
  1. ;;478.11
  1. ;;9002226.02101,"2108,478.11 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,511.81 ",.01)
  1. ;;511.81
  1. ;;9002226.02101,"2108,511.81 ",.02)
  1. ;;511.81
  1. ;;9002226.02101,"2108,511.81 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,512.82 ",.01)
  1. ;;512.82
  1. ;;9002226.02101,"2108,512.82 ",.02)
  1. ;;512.82
  1. ;;9002226.02101,"2108,512.82 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,528.01 ",.01)
  1. ;;528.01
  1. ;;9002226.02101,"2108,528.01 ",.02)
  1. ;;528.01
  1. ;;9002226.02101,"2108,528.01 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,530.85 ",.01)
  1. ;;530.85
  1. ;;9002226.02101,"2108,530.85 ",.02)
  1. ;;530.85
  1. ;;9002226.02101,"2108,530.85 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,569.44 ",.01)
  1. ;;569.44
  1. ;;9002226.02101,"2108,569.44 ",.02)
  1. ;;569.44
  1. ;;9002226.02101,"2108,569.44 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,569.49 ",.01)
  1. ;;569.49
  1. ;;9002226.02101,"2108,569.49 ",.02)
  1. ;;569.49
  1. ;;9002226.02101,"2108,569.49 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,602.3 ",.01)
  1. ;;602.3
  1. ;;9002226.02101,"2108,602.3 ",.02)
  1. ;;602.3
  1. ;;9002226.02101,"2108,602.3 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,616.81 ",.01)
  1. ;;616.81
  1. ;;9002226.02101,"2108,616.81 ",.02)
  1. ;;616.81
  1. ;;9002226.02101,"2108,616.81 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,622.10 ",.01)
  1. ;;622.10
  1. ;;9002226.02101,"2108,622.10 ",.02)
  1. ;;622.12
  1. ;;9002226.02101,"2108,622.10 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,623.0 ",.01)
  1. ;;623.0
  1. ;;9002226.02101,"2108,623.0 ",.02)
  1. ;;623.0
  1. ;;9002226.02101,"2108,623.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,624.01 ",.01)
  1. ;;624.01
  1. ;;9002226.02101,"2108,624.01 ",.02)
  1. ;;624.02
  1. ;;9002226.02101,"2108,624.01 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,630. ",.01)
  1. ;;630.
  1. ;;9002226.02101,"2108,630. ",.02)
  1. ;;630.
  1. ;;9002226.02101,"2108,630. ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,648.90 ",.01)
  1. ;;648.90
  1. ;;9002226.02101,"2108,648.90 ",.02)
  1. ;;648.94
  1. ;;9002226.02101,"2108,648.90 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,710.3 ",.01)
  1. ;;710.3
  1. ;;9002226.02101,"2108,710.3 ",.02)
  1. ;;710.3
  1. ;;9002226.02101,"2108,710.3 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,713.8 ",.01)
  1. ;;713.8
  1. ;;9002226.02101,"2108,713.8 ",.02)
  1. ;;713.8
  1. ;;9002226.02101,"2108,713.8 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,731.1 ",.01)
  1. ;;731.1
  1. ;;9002226.02101,"2108,731.1 ",.02)
  1. ;;731.1
  1. ;;9002226.02101,"2108,731.1 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,733.1 ",.01)
  1. ;;733.1
  1. ;;9002226.02101,"2108,733.1 ",.02)
  1. ;;733.1
  1. ;;9002226.02101,"2108,733.1 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,780.79 ",.01)
  1. ;;780.79
  1. ;;9002226.02101,"2108,780.79 ",.02)
  1. ;;780.79
  1. ;;9002226.02101,"2108,780.79 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,785.6 ",.01)
  1. ;;785.6
  1. ;;9002226.02101,"2108,785.6 ",.02)
  1. ;;785.6
  1. ;;9002226.02101,"2108,785.6 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,789.51 ",.01)
  1. ;;789.51
  1. ;;9002226.02101,"2108,789.51 ",.02)
  1. ;;789.51
  1. ;;9002226.02101,"2108,789.51 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,790.93 ",.01)
  1. ;;790.93
  1. ;;9002226.02101,"2108,790.93 ",.02)
  1. ;;790.93
  1. ;;9002226.02101,"2108,790.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,793.8 ",.01)
  1. ;;793.8
  1. ;;9002226.02101,"2108,793.8 ",.02)
  1. ;;793.89
  1. ;;9002226.02101,"2108,793.8 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,795.0 ",.01)
  1. ;;795.0
  1. ;;9002226.02101,"2108,795.0 ",.02)
  1. ;;795.09
  1. ;;9002226.02101,"2108,795.0 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,795.1 ",.01)
  1. ;;795.1
  1. ;;9002226.02101,"2108,795.1 ",.02)
  1. ;;795.19
  1. ;;9002226.02101,"2108,795.1 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,795.81 ",.01)
  1. ;;795.81
  1. ;;9002226.02101,"2108,795.81 ",.02)
  1. ;;795.89
  1. ;;9002226.02101,"2108,795.81 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,796.70 ",.01)
  1. ;;796.70
  1. ;;9002226.02101,"2108,796.70 ",.02)
  1. ;;796.79
  1. ;;9002226.02101,"2108,796.70 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,963.1 ",.01)
  1. ;;963.1
  1. ;;9002226.02101,"2108,963.1 ",.02)
  1. ;;963.1
  1. ;;9002226.02101,"2108,963.1 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,990. ",.01)
  1. ;;990.
  1. ;;9002226.02101,"2108,990. ",.02)
  1. ;;990.
  1. ;;9002226.02101,"2108,990. ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,996.85 ",.01)
  1. ;;996.85
  1. ;;9002226.02101,"2108,996.85 ",.02)
  1. ;;996.85
  1. ;;9002226.02101,"2108,996.85 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,999.3 ",.01)
  1. ;;999.3
  1. ;;9002226.02101,"2108,999.3 ",.02)
  1. ;;999.39
  1. ;;9002226.02101,"2108,999.3 ",.03)
  1. ;;1
  1. ;;9002226.02101,"2108,C44.01 ",.01)
  1. ;;C44.01
  1. ;;9002226.02101,"2108,C44.01 ",.02)
  1. ;;C44.02
  1. ;;9002226.02101,"2108,C44.01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2108,C44.111 ",.01)
  1. ;;C44.111
  1. ;;9002226.02101,"2108,C44.111 ",.02)
  1. ;;C44.119
  1. ;;9002226.02101,"2108,C44.111 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2108,C44.121 ",.01)
  1. ;;C44.121