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

ATXD6X2.m

Go to the documentation of this file.
ATXD6X2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 17, 2014;
 ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
 ;
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,"476,180.0 ",.01)
 ;;180.0
 ;;9002226.02101,"476,180.0 ",.02)
 ;;180.9
 ;;9002226.02101,"476,180.0 ",.03)
 ;;1
 ;;9002226.02101,"476,191.0 ",.01)
 ;;191.0
 ;;9002226.02101,"476,191.0 ",.02)
 ;;191.9
 ;;9002226.02101,"476,191.0 ",.03)
 ;;1
 ;;9002226.02101,"476,196.0 ",.01)
 ;;196.0
 ;;9002226.02101,"476,196.0 ",.02)
 ;;196.9
 ;;9002226.02101,"476,196.0 ",.03)
 ;;1
 ;;9002226.02101,"476,200.20 ",.01)
 ;;200.20
 ;;9002226.02101,"476,200.20 ",.02)
 ;;200.28
 ;;9002226.02101,"476,200.20 ",.03)
 ;;1
 ;;9002226.02101,"476,200.80 ",.01)
 ;;200.80
 ;;9002226.02101,"476,200.80 ",.02)
 ;;200.88
 ;;9002226.02101,"476,200.80 ",.03)
 ;;1
 ;;9002226.02101,"476,202.80 ",.01)
 ;;202.80
 ;;9002226.02101,"476,202.80 ",.02)
 ;;202.88
 ;;9002226.02101,"476,202.80 ",.03)
 ;;1
 ;;9002226.02101,"476,261. ",.01)
 ;;261.
 ;;9002226.02101,"476,261. ",.02)
 ;;261.
 ;;9002226.02101,"476,261. ",.03)
 ;;1
 ;;9002226.02101,"476,348.3 ",.01)
 ;;348.3
 ;;9002226.02101,"476,348.3 ",.02)
 ;;348.39
 ;;9002226.02101,"476,348.3 ",.03)
 ;;1
 ;;9002226.02101,"476,480.0 ",.01)
 ;;480.0
 ;;9002226.02101,"476,480.0 ",.02)
 ;;480.9
 ;;9002226.02101,"476,480.0 ",.03)
 ;;1
 ;;9002226.02101,"476,482.0 ",.01)
 ;;482.0
 ;;9002226.02101,"476,482.0 ",.02)
 ;;482.9
 ;;9002226.02101,"476,482.0 ",.03)
 ;;1
 ;;9002226.02101,"476,483.0 ",.01)
 ;;483.0
 ;;9002226.02101,"476,483.0 ",.02)
 ;;483.9
 ;;9002226.02101,"476,483.0 ",.03)
 ;;1
 ;;9002226.02101,"476,484.0 ",.01)
 ;;484.0
 ;;9002226.02101,"476,484.0 ",.02)
 ;;484.9
 ;;9002226.02101,"476,484.0 ",.03)
 ;;1
 ;;9002226.02101,"476,485.0 ",.01)
 ;;485.0
 ;;9002226.02101,"476,485.0 ",.02)
 ;;485.9
 ;;9002226.02101,"476,485.0 ",.03)
 ;;1
 ;;9002226.02101,"476,486.0 ",.01)
 ;;486.0
 ;;9002226.02101,"476,486.0 ",.02)
 ;;486.9
 ;;9002226.02101,"476,486.0 ",.03)
 ;;1
 ;;9002226.02101,"476,487.0 ",.01)
 ;;487.0
 ;;9002226.02101,"476,487.0 ",.02)
 ;;487.0
 ;;9002226.02101,"476,487.0 ",.03)
 ;;1
 ;;9002226.02101,"476,799.4 ",.01)
 ;;799.4
 ;;9002226.02101,"476,799.4 ",.02)
 ;;799.4
 ;;9002226.02101,"476,799.4 ",.03)
 ;;1
 ;;9002226.02101,"476,A02.1 ",.01)
 ;;A02.1 
 ;;9002226.02101,"476,A02.1 ",.02)
 ;;A02.1 
 ;;9002226.02101,"476,A02.1 ",.03)
 ;;30
 ;;9002226.02101,"476,A07.2 ",.01)
 ;;A07.2 
 ;;9002226.02101,"476,A07.2 ",.02)
 ;;A07.2 
 ;;9002226.02101,"476,A07.2 ",.03)
 ;;30
 ;;9002226.02101,"476,A07.3 ",.01)
 ;;A07.3 
 ;;9002226.02101,"476,A07.3 ",.02)
 ;;A07.3 
 ;;9002226.02101,"476,A07.3 ",.03)
 ;;30
 ;;9002226.02101,"476,A15.0 ",.01)
 ;;A15.0 
 ;;9002226.02101,"476,A15.0 ",.02)
 ;;A15.0 
 ;;9002226.02101,"476,A15.0 ",.03)
 ;;30
 ;;9002226.02101,"476,A15.4 ",.01)
 ;;A15.4 
 ;;9002226.02101,"476,A15.4 ",.02)
 ;;A15.4 
 ;;9002226.02101,"476,A15.4 ",.03)
 ;;30
 ;;9002226.02101,"476,A15.5 ",.01)
 ;;A15.5 
 ;;9002226.02101,"476,A15.5 ",.02)
 ;;A15.5 
 ;;9002226.02101,"476,A15.5 ",.03)
 ;;30
 ;;9002226.02101,"476,A15.6 ",.01)
 ;;A15.6 
 ;;9002226.02101,"476,A15.6 ",.02)
 ;;A15.6 
 ;;9002226.02101,"476,A15.6 ",.03)
 ;;30
 ;;9002226.02101,"476,A15.7 ",.01)
 ;;A15.7 
 ;;9002226.02101,"476,A15.7 ",.02)
 ;;A15.7 
 ;;9002226.02101,"476,A15.7 ",.03)
 ;;30
 ;;9002226.02101,"476,A15.8 ",.01)
 ;;A15.8 
 ;;9002226.02101,"476,A15.8 ",.02)
 ;;A15.8 
 ;;9002226.02101,"476,A15.8 ",.03)
 ;;30
 ;;9002226.02101,"476,A15.9 ",.01)
 ;;A15.9 
 ;;9002226.02101,"476,A15.9 ",.02)
 ;;A15.9 
 ;;9002226.02101,"476,A15.9 ",.03)
 ;;30
 ;;9002226.02101,"476,A17.0 ",.01)
 ;;A17.0 
 ;;9002226.02101,"476,A17.0 ",.02)
 ;;A17.0 
 ;;9002226.02101,"476,A17.0 ",.03)
 ;;30
 ;;9002226.02101,"476,A17.1 ",.01)
 ;;A17.1 
 ;;9002226.02101,"476,A17.1 ",.02)
 ;;A17.1 
 ;;9002226.02101,"476,A17.1 ",.03)
 ;;30
 ;;9002226.02101,"476,A17.81 ",.01)
 ;;A17.81 
 ;;9002226.02101,"476,A17.81 ",.02)
 ;;A17.81 
 ;;9002226.02101,"476,A17.81 ",.03)
 ;;30
 ;;9002226.02101,"476,A17.82 ",.01)
 ;;A17.82 
 ;;9002226.02101,"476,A17.82 ",.02)
 ;;A17.82 
 ;;9002226.02101,"476,A17.82 ",.03)
 ;;30
 ;;9002226.02101,"476,A17.83 ",.01)
 ;;A17.83 
 ;;9002226.02101,"476,A17.83 ",.02)
 ;;A17.83 
 ;;9002226.02101,"476,A17.83 ",.03)
 ;;30
 ;;9002226.02101,"476,A17.89 ",.01)
 ;;A17.89 
 ;;9002226.02101,"476,A17.89 ",.02)
 ;;A17.89 
 ;;9002226.02101,"476,A17.89 ",.03)
 ;;30
 ;;9002226.02101,"476,A17.9 ",.01)
 ;;A17.9 
 ;;9002226.02101,"476,A17.9 ",.02)
 ;;A17.9 
 ;;9002226.02101,"476,A17.9 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.01 ",.01)
 ;;A18.01 
 ;;9002226.02101,"476,A18.01 ",.02)
 ;;A18.01 
 ;;9002226.02101,"476,A18.01 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.02 ",.01)
 ;;A18.02 
 ;;9002226.02101,"476,A18.02 ",.02)
 ;;A18.02 
 ;;9002226.02101,"476,A18.02 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.03 ",.01)
 ;;A18.03 
 ;;9002226.02101,"476,A18.03 ",.02)
 ;;A18.03 
 ;;9002226.02101,"476,A18.03 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.09 ",.01)
 ;;A18.09 
 ;;9002226.02101,"476,A18.09 ",.02)
 ;;A18.09 
 ;;9002226.02101,"476,A18.09 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.10 ",.01)
 ;;A18.10 
 ;;9002226.02101,"476,A18.10 ",.02)
 ;;A18.10 
 ;;9002226.02101,"476,A18.10 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.11 ",.01)
 ;;A18.11 
 ;;9002226.02101,"476,A18.11 ",.02)
 ;;A18.11 
 ;;9002226.02101,"476,A18.11 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.12 ",.01)
 ;;A18.12 
 ;;9002226.02101,"476,A18.12 ",.02)
 ;;A18.12 
 ;;9002226.02101,"476,A18.12 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.13 ",.01)
 ;;A18.13 
 ;;9002226.02101,"476,A18.13 ",.02)
 ;;A18.13 
 ;;9002226.02101,"476,A18.13 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.14 ",.01)
 ;;A18.14 
 ;;9002226.02101,"476,A18.14 ",.02)
 ;;A18.14 
 ;;9002226.02101,"476,A18.14 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.15 ",.01)
 ;;A18.15 
 ;;9002226.02101,"476,A18.15 ",.02)
 ;;A18.15 
 ;;9002226.02101,"476,A18.15 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.16 ",.01)
 ;;A18.16 
 ;;9002226.02101,"476,A18.16 ",.02)
 ;;A18.16 
 ;;9002226.02101,"476,A18.16 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.17 ",.01)
 ;;A18.17 
 ;;9002226.02101,"476,A18.17 ",.02)
 ;;A18.17 
 ;;9002226.02101,"476,A18.17 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.18 ",.01)
 ;;A18.18 
 ;;9002226.02101,"476,A18.18 ",.02)
 ;;A18.18 
 ;;9002226.02101,"476,A18.18 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.2 ",.01)
 ;;A18.2 
 ;;9002226.02101,"476,A18.2 ",.02)
 ;;A18.2 
 ;;9002226.02101,"476,A18.2 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.31 ",.01)
 ;;A18.31 
 ;;9002226.02101,"476,A18.31 ",.02)
 ;;A18.31 
 ;;9002226.02101,"476,A18.31 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.32 ",.01)
 ;;A18.32 
 ;;9002226.02101,"476,A18.32 ",.02)
 ;;A18.32 
 ;;9002226.02101,"476,A18.32 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.39 ",.01)
 ;;A18.39 
 ;;9002226.02101,"476,A18.39 ",.02)
 ;;A18.39 
 ;;9002226.02101,"476,A18.39 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.4 ",.01)
 ;;A18.4 
 ;;9002226.02101,"476,A18.4 ",.02)
 ;;A18.4 
 ;;9002226.02101,"476,A18.4 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.50 ",.01)
 ;;A18.50 
 ;;9002226.02101,"476,A18.50 ",.02)
 ;;A18.50 
 ;;9002226.02101,"476,A18.50 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.51 ",.01)
 ;;A18.51 
 ;;9002226.02101,"476,A18.51 ",.02)
 ;;A18.51 
 ;;9002226.02101,"476,A18.51 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.52 ",.01)
 ;;A18.52 
 ;;9002226.02101,"476,A18.52 ",.02)
 ;;A18.52 
 ;;9002226.02101,"476,A18.52 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.53 ",.01)
 ;;A18.53 
 ;;9002226.02101,"476,A18.53 ",.02)
 ;;A18.53 
 ;;9002226.02101,"476,A18.53 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.54 ",.01)
 ;;A18.54 
 ;;9002226.02101,"476,A18.54 ",.02)
 ;;A18.54 
 ;;9002226.02101,"476,A18.54 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.59 ",.01)
 ;;A18.59 
 ;;9002226.02101,"476,A18.59 ",.02)
 ;;A18.59 
 ;;9002226.02101,"476,A18.59 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.6 ",.01)
 ;;A18.6 
 ;;9002226.02101,"476,A18.6 ",.02)
 ;;A18.6 
 ;;9002226.02101,"476,A18.6 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.7 ",.01)
 ;;A18.7 
 ;;9002226.02101,"476,A18.7 ",.02)
 ;;A18.7 
 ;;9002226.02101,"476,A18.7 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.81 ",.01)
 ;;A18.81 
 ;;9002226.02101,"476,A18.81 ",.02)
 ;;A18.81 
 ;;9002226.02101,"476,A18.81 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.82 ",.01)
 ;;A18.82 
 ;;9002226.02101,"476,A18.82 ",.02)
 ;;A18.82 
 ;;9002226.02101,"476,A18.82 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.83 ",.01)
 ;;A18.83 
 ;;9002226.02101,"476,A18.83 ",.02)
 ;;A18.83 
 ;;9002226.02101,"476,A18.83 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.84 ",.01)
 ;;A18.84 
 ;;9002226.02101,"476,A18.84 ",.02)
 ;;A18.84 
 ;;9002226.02101,"476,A18.84 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.85 ",.01)
 ;;A18.85 
 ;;9002226.02101,"476,A18.85 ",.02)
 ;;A18.85 
 ;;9002226.02101,"476,A18.85 ",.03)
 ;;30
 ;;9002226.02101,"476,A18.89 ",.01)
 ;;A18.89 
 ;;9002226.02101,"476,A18.89 ",.02)
 ;;A18.89 
 ;;9002226.02101,"476,A18.89 ",.03)
 ;;30
 ;;9002226.02101,"476,A19.0 ",.01)
 ;;A19.0 
 ;;9002226.02101,"476,A19.0 ",.02)
 ;;A19.0 
 ;;9002226.02101,"476,A19.0 ",.03)
 ;;30
 ;;9002226.02101,"476,A19.1 ",.01)
 ;;A19.1 
 ;;9002226.02101,"476,A19.1 ",.02)
 ;;A19.1 
 ;;9002226.02101,"476,A19.1 ",.03)
 ;;30
 ;;9002226.02101,"476,A19.2 ",.01)
 ;;A19.2 
 ;;9002226.02101,"476,A19.2 ",.02)
 ;;A19.2 
 ;;9002226.02101,"476,A19.2 ",.03)
 ;;30
 ;;9002226.02101,"476,A19.8 ",.01)
 ;;A19.8 
 ;;9002226.02101,"476,A19.8 ",.02)
 ;;A19.8 
 ;;9002226.02101,"476,A19.8 ",.03)
 ;;30
 ;;9002226.02101,"476,A19.9 ",.01)
 ;;A19.9 
 ;;9002226.02101,"476,A19.9 ",.02)
 ;;A19.9 
 ;;9002226.02101,"476,A19.9 ",.03)
 ;;30
 ;;9002226.02101,"476,A22.1 ",.01)
 ;;A22.1 
 ;;9002226.02101,"476,A22.1 ",.02)
 ;;A22.1 
 ;;9002226.02101,"476,A22.1 ",.03)
 ;;30
 ;;9002226.02101,"476,A31.0 ",.01)
 ;;A31.0 
 ;;9002226.02101,"476,A31.0 ",.02)
 ;;A31.0 
 ;;9002226.02101,"476,A31.0 ",.03)
 ;;30
 ;;9002226.02101,"476,A31.1 ",.01)
 ;;A31.1 
 ;;9002226.02101,"476,A31.1 ",.02)
 ;;A31.1 
 ;;9002226.02101,"476,A31.1 ",.03)
 ;;30
 ;;9002226.02101,"476,A31.2 ",.01)
 ;;A31.2 
 ;;9002226.02101,"476,A31.2 ",.02)
 ;;A31.2 
 ;;9002226.02101,"476,A31.2 ",.03)
 ;;30
 ;;9002226.02101,"476,A31.9 ",.01)
 ;;A31.9 
 ;;9002226.02101,"476,A31.9 ",.02)
 ;;A31.9 
 ;;9002226.02101,"476,A31.9 ",.03)
 ;;30
 ;;9002226.02101,"476,A48.1 ",.01)
 ;;A48.1 
 ;;9002226.02101,"476,A48.1 ",.02)
 ;;A48.1 
 ;;9002226.02101,"476,A48.1 ",.03)
 ;;30
 ;;9002226.02101,"476,A60.00 ",.01)
 ;;A60.00 
 ;;9002226.02101,"476,A60.00 ",.02)
 ;;A60.00 
 ;;9002226.02101,"476,A60.00 ",.03)
 ;;30
 ;;9002226.02101,"476,A60.01 ",.01)
 ;;A60.01 
 ;;9002226.02101,"476,A60.01 ",.02)
 ;;A60.01 
 ;;9002226.02101,"476,A60.01 ",.03)
 ;;30
 ;;9002226.02101,"476,A60.02 ",.01)
 ;;A60.02 
 ;;9002226.02101,"476,A60.02 ",.02)
 ;;A60.02 
 ;;9002226.02101,"476,A60.02 ",.03)
 ;;30
 ;;9002226.02101,"476,A60.03 ",.01)
 ;;A60.03 
 ;;9002226.02101,"476,A60.03 ",.02)
 ;;A60.03 
 ;;9002226.02101,"476,A60.03 ",.03)
 ;;30
 ;;9002226.02101,"476,A60.04 ",.01)
 ;;A60.04 
 ;;9002226.02101,"476,A60.04 ",.02)
 ;;A60.04 
 ;;9002226.02101,"476,A60.04 ",.03)
 ;;30
 ;;9002226.02101,"476,A60.09 ",.01)
 ;;A60.09 
 ;;9002226.02101,"476,A60.09 ",.02)
 ;;A60.09 
 ;;9002226.02101,"476,A60.09 ",.03)
 ;;30
 ;;9002226.02101,"476,A60.1 ",.01)
 ;;A60.1 
 ;;9002226.02101,"476,A60.1 ",.02)
 ;;A60.1 
 ;;9002226.02101,"476,A60.1 ",.03)
 ;;30
 ;;9002226.02101,"476,A60.9 ",.01)
 ;;A60.9 
 ;;9002226.02101,"476,A60.9 ",.02)
 ;;A60.9 
 ;;9002226.02101,"476,A60.9 ",.03)
 ;;30
 ;;9002226.02101,"476,A81.2 ",.01)
 ;;A81.2 
 ;;9002226.02101,"476,A81.2 ",.02)
 ;;A81.2 
 ;;9002226.02101,"476,A81.2 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.0 ",.01)
 ;;B00.0 
 ;;9002226.02101,"476,B00.0 ",.02)
 ;;B00.0 
 ;;9002226.02101,"476,B00.0 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.1 ",.01)
 ;;B00.1 
 ;;9002226.02101,"476,B00.1 ",.02)
 ;;B00.1 
 ;;9002226.02101,"476,B00.1 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.2 ",.01)
 ;;B00.2 
 ;;9002226.02101,"476,B00.2 ",.02)
 ;;B00.2 
 ;;9002226.02101,"476,B00.2 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.3 ",.01)
 ;;B00.3 
 ;;9002226.02101,"476,B00.3 ",.02)
 ;;B00.3 
 ;;9002226.02101,"476,B00.3 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.4 ",.01)
 ;;B00.4 
 ;;9002226.02101,"476,B00.4 ",.02)
 ;;B00.4 
 ;;9002226.02101,"476,B00.4 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.50 ",.01)
 ;;B00.50 
 ;;9002226.02101,"476,B00.50 ",.02)
 ;;B00.50 
 ;;9002226.02101,"476,B00.50 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.51 ",.01)
 ;;B00.51 
 ;;9002226.02101,"476,B00.51 ",.02)
 ;;B00.51 
 ;;9002226.02101,"476,B00.51 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.52 ",.01)
 ;;B00.52 
 ;;9002226.02101,"476,B00.52 ",.02)
 ;;B00.52 
 ;;9002226.02101,"476,B00.52 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.53 ",.01)
 ;;B00.53 
 ;;9002226.02101,"476,B00.53 ",.02)
 ;;B00.53 
 ;;9002226.02101,"476,B00.53 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.59 ",.01)
 ;;B00.59 
 ;;9002226.02101,"476,B00.59 ",.02)
 ;;B00.59 
 ;;9002226.02101,"476,B00.59 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.7 ",.01)
 ;;B00.7 
 ;;9002226.02101,"476,B00.7 ",.02)
 ;;B00.7 
 ;;9002226.02101,"476,B00.7 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.81 ",.01)
 ;;B00.81 
 ;;9002226.02101,"476,B00.81 ",.02)
 ;;B00.81 
 ;;9002226.02101,"476,B00.81 ",.03)
 ;;30
 ;;9002226.02101,"476,B00.82 ",.01)
 ;;B00.82