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

ATXF1A21.m

Go to the documentation of this file.
  1. ATXF1A21 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JUL 22, 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,"1075,O36.5192 ",.01)
  1. ;;O36.5192
  1. ;;9002226.02101,"1075,O36.5192 ",.02)
  1. ;;O36.5192
  1. ;;9002226.02101,"1075,O36.5192 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5193 ",.01)
  1. ;;O36.5193
  1. ;;9002226.02101,"1075,O36.5193 ",.02)
  1. ;;O36.5193
  1. ;;9002226.02101,"1075,O36.5193 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5194 ",.01)
  1. ;;O36.5194
  1. ;;9002226.02101,"1075,O36.5194 ",.02)
  1. ;;O36.5194
  1. ;;9002226.02101,"1075,O36.5194 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5195 ",.01)
  1. ;;O36.5195
  1. ;;9002226.02101,"1075,O36.5195 ",.02)
  1. ;;O36.5195
  1. ;;9002226.02101,"1075,O36.5195 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5199 ",.01)
  1. ;;O36.5199
  1. ;;9002226.02101,"1075,O36.5199 ",.02)
  1. ;;O36.5199
  1. ;;9002226.02101,"1075,O36.5199 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5910 ",.01)
  1. ;;O36.5910
  1. ;;9002226.02101,"1075,O36.5910 ",.02)
  1. ;;O36.5910
  1. ;;9002226.02101,"1075,O36.5910 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5911 ",.01)
  1. ;;O36.5911
  1. ;;9002226.02101,"1075,O36.5911 ",.02)
  1. ;;O36.5911
  1. ;;9002226.02101,"1075,O36.5911 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5912 ",.01)
  1. ;;O36.5912
  1. ;;9002226.02101,"1075,O36.5912 ",.02)
  1. ;;O36.5912
  1. ;;9002226.02101,"1075,O36.5912 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5913 ",.01)
  1. ;;O36.5913
  1. ;;9002226.02101,"1075,O36.5913 ",.02)
  1. ;;O36.5913
  1. ;;9002226.02101,"1075,O36.5913 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5914 ",.01)
  1. ;;O36.5914
  1. ;;9002226.02101,"1075,O36.5914 ",.02)
  1. ;;O36.5914
  1. ;;9002226.02101,"1075,O36.5914 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5915 ",.01)
  1. ;;O36.5915
  1. ;;9002226.02101,"1075,O36.5915 ",.02)
  1. ;;O36.5915
  1. ;;9002226.02101,"1075,O36.5915 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5919 ",.01)
  1. ;;O36.5919
  1. ;;9002226.02101,"1075,O36.5919 ",.02)
  1. ;;O36.5919
  1. ;;9002226.02101,"1075,O36.5919 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5920 ",.01)
  1. ;;O36.5920
  1. ;;9002226.02101,"1075,O36.5920 ",.02)
  1. ;;O36.5920
  1. ;;9002226.02101,"1075,O36.5920 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5921 ",.01)
  1. ;;O36.5921
  1. ;;9002226.02101,"1075,O36.5921 ",.02)
  1. ;;O36.5921
  1. ;;9002226.02101,"1075,O36.5921 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5922 ",.01)
  1. ;;O36.5922
  1. ;;9002226.02101,"1075,O36.5922 ",.02)
  1. ;;O36.5922
  1. ;;9002226.02101,"1075,O36.5922 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5923 ",.01)
  1. ;;O36.5923
  1. ;;9002226.02101,"1075,O36.5923 ",.02)
  1. ;;O36.5923
  1. ;;9002226.02101,"1075,O36.5923 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5924 ",.01)
  1. ;;O36.5924
  1. ;;9002226.02101,"1075,O36.5924 ",.02)
  1. ;;O36.5924
  1. ;;9002226.02101,"1075,O36.5924 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5925 ",.01)
  1. ;;O36.5925
  1. ;;9002226.02101,"1075,O36.5925 ",.02)
  1. ;;O36.5925
  1. ;;9002226.02101,"1075,O36.5925 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5929 ",.01)
  1. ;;O36.5929
  1. ;;9002226.02101,"1075,O36.5929 ",.02)
  1. ;;O36.5929
  1. ;;9002226.02101,"1075,O36.5929 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5930 ",.01)
  1. ;;O36.5930
  1. ;;9002226.02101,"1075,O36.5930 ",.02)
  1. ;;O36.5930
  1. ;;9002226.02101,"1075,O36.5930 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5931 ",.01)
  1. ;;O36.5931
  1. ;;9002226.02101,"1075,O36.5931 ",.02)
  1. ;;O36.5931
  1. ;;9002226.02101,"1075,O36.5931 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5932 ",.01)
  1. ;;O36.5932
  1. ;;9002226.02101,"1075,O36.5932 ",.02)
  1. ;;O36.5932
  1. ;;9002226.02101,"1075,O36.5932 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5933 ",.01)
  1. ;;O36.5933
  1. ;;9002226.02101,"1075,O36.5933 ",.02)
  1. ;;O36.5933
  1. ;;9002226.02101,"1075,O36.5933 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5934 ",.01)
  1. ;;O36.5934
  1. ;;9002226.02101,"1075,O36.5934 ",.02)
  1. ;;O36.5934
  1. ;;9002226.02101,"1075,O36.5934 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5935 ",.01)
  1. ;;O36.5935
  1. ;;9002226.02101,"1075,O36.5935 ",.02)
  1. ;;O36.5935
  1. ;;9002226.02101,"1075,O36.5935 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5939 ",.01)
  1. ;;O36.5939
  1. ;;9002226.02101,"1075,O36.5939 ",.02)
  1. ;;O36.5939
  1. ;;9002226.02101,"1075,O36.5939 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5990 ",.01)
  1. ;;O36.5990
  1. ;;9002226.02101,"1075,O36.5990 ",.02)
  1. ;;O36.5990
  1. ;;9002226.02101,"1075,O36.5990 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5991 ",.01)
  1. ;;O36.5991
  1. ;;9002226.02101,"1075,O36.5991 ",.02)
  1. ;;O36.5991
  1. ;;9002226.02101,"1075,O36.5991 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5992 ",.01)
  1. ;;O36.5992
  1. ;;9002226.02101,"1075,O36.5992 ",.02)
  1. ;;O36.5992
  1. ;;9002226.02101,"1075,O36.5992 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5993 ",.01)
  1. ;;O36.5993
  1. ;;9002226.02101,"1075,O36.5993 ",.02)
  1. ;;O36.5993
  1. ;;9002226.02101,"1075,O36.5993 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5994 ",.01)
  1. ;;O36.5994
  1. ;;9002226.02101,"1075,O36.5994 ",.02)
  1. ;;O36.5994
  1. ;;9002226.02101,"1075,O36.5994 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5995 ",.01)
  1. ;;O36.5995
  1. ;;9002226.02101,"1075,O36.5995 ",.02)
  1. ;;O36.5995
  1. ;;9002226.02101,"1075,O36.5995 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.5999 ",.01)
  1. ;;O36.5999
  1. ;;9002226.02101,"1075,O36.5999 ",.02)
  1. ;;O36.5999
  1. ;;9002226.02101,"1075,O36.5999 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.60X0 ",.01)
  1. ;;O36.60X0
  1. ;;9002226.02101,"1075,O36.60X0 ",.02)
  1. ;;O36.60X0
  1. ;;9002226.02101,"1075,O36.60X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.60X1 ",.01)
  1. ;;O36.60X1
  1. ;;9002226.02101,"1075,O36.60X1 ",.02)
  1. ;;O36.60X1
  1. ;;9002226.02101,"1075,O36.60X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.60X2 ",.01)
  1. ;;O36.60X2
  1. ;;9002226.02101,"1075,O36.60X2 ",.02)
  1. ;;O36.60X2
  1. ;;9002226.02101,"1075,O36.60X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.60X3 ",.01)
  1. ;;O36.60X3
  1. ;;9002226.02101,"1075,O36.60X3 ",.02)
  1. ;;O36.60X3
  1. ;;9002226.02101,"1075,O36.60X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.60X4 ",.01)
  1. ;;O36.60X4
  1. ;;9002226.02101,"1075,O36.60X4 ",.02)
  1. ;;O36.60X4
  1. ;;9002226.02101,"1075,O36.60X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.60X5 ",.01)
  1. ;;O36.60X5
  1. ;;9002226.02101,"1075,O36.60X5 ",.02)
  1. ;;O36.60X5
  1. ;;9002226.02101,"1075,O36.60X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.60X9 ",.01)
  1. ;;O36.60X9
  1. ;;9002226.02101,"1075,O36.60X9 ",.02)
  1. ;;O36.60X9
  1. ;;9002226.02101,"1075,O36.60X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.61X0 ",.01)
  1. ;;O36.61X0
  1. ;;9002226.02101,"1075,O36.61X0 ",.02)
  1. ;;O36.61X0
  1. ;;9002226.02101,"1075,O36.61X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.61X1 ",.01)
  1. ;;O36.61X1
  1. ;;9002226.02101,"1075,O36.61X1 ",.02)
  1. ;;O36.61X1
  1. ;;9002226.02101,"1075,O36.61X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.61X2 ",.01)
  1. ;;O36.61X2
  1. ;;9002226.02101,"1075,O36.61X2 ",.02)
  1. ;;O36.61X2
  1. ;;9002226.02101,"1075,O36.61X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.61X3 ",.01)
  1. ;;O36.61X3
  1. ;;9002226.02101,"1075,O36.61X3 ",.02)
  1. ;;O36.61X3
  1. ;;9002226.02101,"1075,O36.61X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.61X4 ",.01)
  1. ;;O36.61X4
  1. ;;9002226.02101,"1075,O36.61X4 ",.02)
  1. ;;O36.61X4
  1. ;;9002226.02101,"1075,O36.61X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.61X5 ",.01)
  1. ;;O36.61X5
  1. ;;9002226.02101,"1075,O36.61X5 ",.02)
  1. ;;O36.61X5
  1. ;;9002226.02101,"1075,O36.61X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.61X9 ",.01)
  1. ;;O36.61X9
  1. ;;9002226.02101,"1075,O36.61X9 ",.02)
  1. ;;O36.61X9
  1. ;;9002226.02101,"1075,O36.61X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.62X0 ",.01)
  1. ;;O36.62X0
  1. ;;9002226.02101,"1075,O36.62X0 ",.02)
  1. ;;O36.62X0
  1. ;;9002226.02101,"1075,O36.62X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.62X1 ",.01)
  1. ;;O36.62X1
  1. ;;9002226.02101,"1075,O36.62X1 ",.02)
  1. ;;O36.62X1
  1. ;;9002226.02101,"1075,O36.62X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.62X2 ",.01)
  1. ;;O36.62X2
  1. ;;9002226.02101,"1075,O36.62X2 ",.02)
  1. ;;O36.62X2
  1. ;;9002226.02101,"1075,O36.62X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.62X3 ",.01)
  1. ;;O36.62X3
  1. ;;9002226.02101,"1075,O36.62X3 ",.02)
  1. ;;O36.62X3
  1. ;;9002226.02101,"1075,O36.62X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.62X4 ",.01)
  1. ;;O36.62X4
  1. ;;9002226.02101,"1075,O36.62X4 ",.02)
  1. ;;O36.62X4
  1. ;;9002226.02101,"1075,O36.62X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.62X5 ",.01)
  1. ;;O36.62X5
  1. ;;9002226.02101,"1075,O36.62X5 ",.02)
  1. ;;O36.62X5
  1. ;;9002226.02101,"1075,O36.62X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.62X9 ",.01)
  1. ;;O36.62X9
  1. ;;9002226.02101,"1075,O36.62X9 ",.02)
  1. ;;O36.62X9
  1. ;;9002226.02101,"1075,O36.62X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.63X0 ",.01)
  1. ;;O36.63X0
  1. ;;9002226.02101,"1075,O36.63X0 ",.02)
  1. ;;O36.63X0
  1. ;;9002226.02101,"1075,O36.63X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.63X1 ",.01)
  1. ;;O36.63X1
  1. ;;9002226.02101,"1075,O36.63X1 ",.02)
  1. ;;O36.63X1
  1. ;;9002226.02101,"1075,O36.63X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.63X2 ",.01)
  1. ;;O36.63X2
  1. ;;9002226.02101,"1075,O36.63X2 ",.02)
  1. ;;O36.63X2
  1. ;;9002226.02101,"1075,O36.63X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.63X3 ",.01)
  1. ;;O36.63X3
  1. ;;9002226.02101,"1075,O36.63X3 ",.02)
  1. ;;O36.63X3
  1. ;;9002226.02101,"1075,O36.63X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.63X4 ",.01)
  1. ;;O36.63X4
  1. ;;9002226.02101,"1075,O36.63X4 ",.02)
  1. ;;O36.63X4
  1. ;;9002226.02101,"1075,O36.63X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.63X5 ",.01)
  1. ;;O36.63X5
  1. ;;9002226.02101,"1075,O36.63X5 ",.02)
  1. ;;O36.63X5
  1. ;;9002226.02101,"1075,O36.63X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.63X9 ",.01)
  1. ;;O36.63X9
  1. ;;9002226.02101,"1075,O36.63X9 ",.02)
  1. ;;O36.63X9
  1. ;;9002226.02101,"1075,O36.63X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.70X0 ",.01)
  1. ;;O36.70X0
  1. ;;9002226.02101,"1075,O36.70X0 ",.02)
  1. ;;O36.70X0
  1. ;;9002226.02101,"1075,O36.70X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.70X1 ",.01)
  1. ;;O36.70X1
  1. ;;9002226.02101,"1075,O36.70X1 ",.02)
  1. ;;O36.70X1
  1. ;;9002226.02101,"1075,O36.70X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.70X2 ",.01)
  1. ;;O36.70X2
  1. ;;9002226.02101,"1075,O36.70X2 ",.02)
  1. ;;O36.70X2
  1. ;;9002226.02101,"1075,O36.70X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.70X3 ",.01)
  1. ;;O36.70X3
  1. ;;9002226.02101,"1075,O36.70X3 ",.02)
  1. ;;O36.70X3
  1. ;;9002226.02101,"1075,O36.70X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.70X4 ",.01)
  1. ;;O36.70X4
  1. ;;9002226.02101,"1075,O36.70X4 ",.02)
  1. ;;O36.70X4
  1. ;;9002226.02101,"1075,O36.70X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.70X5 ",.01)
  1. ;;O36.70X5
  1. ;;9002226.02101,"1075,O36.70X5 ",.02)
  1. ;;O36.70X5
  1. ;;9002226.02101,"1075,O36.70X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.70X9 ",.01)
  1. ;;O36.70X9
  1. ;;9002226.02101,"1075,O36.70X9 ",.02)
  1. ;;O36.70X9
  1. ;;9002226.02101,"1075,O36.70X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.71X0 ",.01)
  1. ;;O36.71X0
  1. ;;9002226.02101,"1075,O36.71X0 ",.02)
  1. ;;O36.71X0
  1. ;;9002226.02101,"1075,O36.71X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.71X1 ",.01)
  1. ;;O36.71X1
  1. ;;9002226.02101,"1075,O36.71X1 ",.02)
  1. ;;O36.71X1
  1. ;;9002226.02101,"1075,O36.71X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.71X2 ",.01)
  1. ;;O36.71X2
  1. ;;9002226.02101,"1075,O36.71X2 ",.02)
  1. ;;O36.71X2
  1. ;;9002226.02101,"1075,O36.71X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.71X3 ",.01)
  1. ;;O36.71X3
  1. ;;9002226.02101,"1075,O36.71X3 ",.02)
  1. ;;O36.71X3
  1. ;;9002226.02101,"1075,O36.71X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.71X4 ",.01)
  1. ;;O36.71X4
  1. ;;9002226.02101,"1075,O36.71X4 ",.02)
  1. ;;O36.71X4
  1. ;;9002226.02101,"1075,O36.71X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.71X5 ",.01)
  1. ;;O36.71X5
  1. ;;9002226.02101,"1075,O36.71X5 ",.02)
  1. ;;O36.71X5
  1. ;;9002226.02101,"1075,O36.71X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.71X9 ",.01)
  1. ;;O36.71X9
  1. ;;9002226.02101,"1075,O36.71X9 ",.02)
  1. ;;O36.71X9
  1. ;;9002226.02101,"1075,O36.71X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.72X0 ",.01)
  1. ;;O36.72X0
  1. ;;9002226.02101,"1075,O36.72X0 ",.02)
  1. ;;O36.72X0
  1. ;;9002226.02101,"1075,O36.72X0 ",.03)
  1. ;;30