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

ATXFAB2.m

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