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

ATXXA32.m

Go to the documentation of this file.
ATXXA32 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 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,"873,S04.819A ",.03)
 ;;30
 ;;9002226.02101,"873,S04.891A ",.01)
 ;;S04.891A
 ;;9002226.02101,"873,S04.891A ",.02)
 ;;S04.891A
 ;;9002226.02101,"873,S04.891A ",.03)
 ;;30
 ;;9002226.02101,"873,S04.892A ",.01)
 ;;S04.892A
 ;;9002226.02101,"873,S04.892A ",.02)
 ;;S04.892A
 ;;9002226.02101,"873,S04.892A ",.03)
 ;;30
 ;;9002226.02101,"873,S04.899A ",.01)
 ;;S04.899A
 ;;9002226.02101,"873,S04.899A ",.02)
 ;;S04.899A
 ;;9002226.02101,"873,S04.899A ",.03)
 ;;30
 ;;9002226.02101,"873,S04.9XXA ",.01)
 ;;S04.9XXA
 ;;9002226.02101,"873,S04.9XXA ",.02)
 ;;S04.9XXA
 ;;9002226.02101,"873,S04.9XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.00XA ",.01)
 ;;S05.00XA
 ;;9002226.02101,"873,S05.00XA ",.02)
 ;;S05.00XA
 ;;9002226.02101,"873,S05.00XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.01XA ",.01)
 ;;S05.01XA
 ;;9002226.02101,"873,S05.01XA ",.02)
 ;;S05.01XA
 ;;9002226.02101,"873,S05.01XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.02XA ",.01)
 ;;S05.02XA
 ;;9002226.02101,"873,S05.02XA ",.02)
 ;;S05.02XA
 ;;9002226.02101,"873,S05.02XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.10XA ",.01)
 ;;S05.10XA
 ;;9002226.02101,"873,S05.10XA ",.02)
 ;;S05.10XA
 ;;9002226.02101,"873,S05.10XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.11XA ",.01)
 ;;S05.11XA
 ;;9002226.02101,"873,S05.11XA ",.02)
 ;;S05.11XA
 ;;9002226.02101,"873,S05.11XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.12XA ",.01)
 ;;S05.12XA
 ;;9002226.02101,"873,S05.12XA ",.02)
 ;;S05.12XA
 ;;9002226.02101,"873,S05.12XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.20XA ",.01)
 ;;S05.20XA
 ;;9002226.02101,"873,S05.20XA ",.02)
 ;;S05.20XA
 ;;9002226.02101,"873,S05.20XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.21XA ",.01)
 ;;S05.21XA
 ;;9002226.02101,"873,S05.21XA ",.02)
 ;;S05.21XA
 ;;9002226.02101,"873,S05.21XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.22XA ",.01)
 ;;S05.22XA
 ;;9002226.02101,"873,S05.22XA ",.02)
 ;;S05.22XA
 ;;9002226.02101,"873,S05.22XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.30XA ",.01)
 ;;S05.30XA
 ;;9002226.02101,"873,S05.30XA ",.02)
 ;;S05.30XA
 ;;9002226.02101,"873,S05.30XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.31XA ",.01)
 ;;S05.31XA
 ;;9002226.02101,"873,S05.31XA ",.02)
 ;;S05.31XA
 ;;9002226.02101,"873,S05.31XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.32XA ",.01)
 ;;S05.32XA
 ;;9002226.02101,"873,S05.32XA ",.02)
 ;;S05.32XA
 ;;9002226.02101,"873,S05.32XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.40XA ",.01)
 ;;S05.40XA
 ;;9002226.02101,"873,S05.40XA ",.02)
 ;;S05.40XA
 ;;9002226.02101,"873,S05.40XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.41XA ",.01)
 ;;S05.41XA
 ;;9002226.02101,"873,S05.41XA ",.02)
 ;;S05.41XA
 ;;9002226.02101,"873,S05.41XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.42XA ",.01)
 ;;S05.42XA
 ;;9002226.02101,"873,S05.42XA ",.02)
 ;;S05.42XA
 ;;9002226.02101,"873,S05.42XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.50XA ",.01)
 ;;S05.50XA
 ;;9002226.02101,"873,S05.50XA ",.02)
 ;;S05.50XA
 ;;9002226.02101,"873,S05.50XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.51XA ",.01)
 ;;S05.51XA
 ;;9002226.02101,"873,S05.51XA ",.02)
 ;;S05.51XA
 ;;9002226.02101,"873,S05.51XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.52XA ",.01)
 ;;S05.52XA
 ;;9002226.02101,"873,S05.52XA ",.02)
 ;;S05.52XA
 ;;9002226.02101,"873,S05.52XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.60XA ",.01)
 ;;S05.60XA
 ;;9002226.02101,"873,S05.60XA ",.02)
 ;;S05.60XA
 ;;9002226.02101,"873,S05.60XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.61XA ",.01)
 ;;S05.61XA
 ;;9002226.02101,"873,S05.61XA ",.02)
 ;;S05.61XA
 ;;9002226.02101,"873,S05.61XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.62XA ",.01)
 ;;S05.62XA
 ;;9002226.02101,"873,S05.62XA ",.02)
 ;;S05.62XA
 ;;9002226.02101,"873,S05.62XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.70XA ",.01)
 ;;S05.70XA
 ;;9002226.02101,"873,S05.70XA ",.02)
 ;;S05.70XA
 ;;9002226.02101,"873,S05.70XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.71XA ",.01)
 ;;S05.71XA
 ;;9002226.02101,"873,S05.71XA ",.02)
 ;;S05.71XA
 ;;9002226.02101,"873,S05.71XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.72XA ",.01)
 ;;S05.72XA
 ;;9002226.02101,"873,S05.72XA ",.02)
 ;;S05.72XA
 ;;9002226.02101,"873,S05.72XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.8X1A ",.01)
 ;;S05.8X1A
 ;;9002226.02101,"873,S05.8X1A ",.02)
 ;;S05.8X1A
 ;;9002226.02101,"873,S05.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,S05.8X2A ",.01)
 ;;S05.8X2A
 ;;9002226.02101,"873,S05.8X2A ",.02)
 ;;S05.8X2A
 ;;9002226.02101,"873,S05.8X2A ",.03)
 ;;30
 ;;9002226.02101,"873,S05.8X9A ",.01)
 ;;S05.8X9A
 ;;9002226.02101,"873,S05.8X9A ",.02)
 ;;S05.8X9A
 ;;9002226.02101,"873,S05.8X9A ",.03)
 ;;30
 ;;9002226.02101,"873,S05.90XA ",.01)
 ;;S05.90XA
 ;;9002226.02101,"873,S05.90XA ",.02)
 ;;S05.90XA
 ;;9002226.02101,"873,S05.90XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.91XA ",.01)
 ;;S05.91XA
 ;;9002226.02101,"873,S05.91XA ",.02)
 ;;S05.91XA
 ;;9002226.02101,"873,S05.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,S05.92XA ",.01)
 ;;S05.92XA
 ;;9002226.02101,"873,S05.92XA ",.02)
 ;;S05.92XA
 ;;9002226.02101,"873,S05.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,S06.0X0A ",.01)
 ;;S06.0X0A
 ;;9002226.02101,"873,S06.0X0A ",.02)
 ;;S06.0X0A
 ;;9002226.02101,"873,S06.0X0A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.0X1A ",.01)
 ;;S06.0X1A
 ;;9002226.02101,"873,S06.0X1A ",.02)
 ;;S06.0X1A
 ;;9002226.02101,"873,S06.0X1A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.0X2A ",.01)
 ;;S06.0X2A
 ;;9002226.02101,"873,S06.0X2A ",.02)
 ;;S06.0X2A
 ;;9002226.02101,"873,S06.0X2A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.0X9A ",.01)
 ;;S06.0X9A
 ;;9002226.02101,"873,S06.0X9A ",.02)
 ;;S06.0X9A
 ;;9002226.02101,"873,S06.0X9A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.1X0A ",.01)
 ;;S06.1X0A
 ;;9002226.02101,"873,S06.1X0A ",.02)
 ;;S06.1X0A
 ;;9002226.02101,"873,S06.1X0A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.1X1A ",.01)
 ;;S06.1X1A
 ;;9002226.02101,"873,S06.1X1A ",.02)
 ;;S06.1X1A
 ;;9002226.02101,"873,S06.1X1A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.1X2A ",.01)
 ;;S06.1X2A
 ;;9002226.02101,"873,S06.1X2A ",.02)
 ;;S06.1X2A
 ;;9002226.02101,"873,S06.1X2A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.1X9A ",.01)
 ;;S06.1X9A
 ;;9002226.02101,"873,S06.1X9A ",.02)
 ;;S06.1X9A
 ;;9002226.02101,"873,S06.1X9A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.2X0A ",.01)
 ;;S06.2X0A
 ;;9002226.02101,"873,S06.2X0A ",.02)
 ;;S06.2X0A
 ;;9002226.02101,"873,S06.2X0A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.2X1A ",.01)
 ;;S06.2X1A
 ;;9002226.02101,"873,S06.2X1A ",.02)
 ;;S06.2X1A
 ;;9002226.02101,"873,S06.2X1A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.2X2A ",.01)
 ;;S06.2X2A
 ;;9002226.02101,"873,S06.2X2A ",.02)
 ;;S06.2X2A
 ;;9002226.02101,"873,S06.2X2A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.2X9A ",.01)
 ;;S06.2X9A
 ;;9002226.02101,"873,S06.2X9A ",.02)
 ;;S06.2X9A
 ;;9002226.02101,"873,S06.2X9A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.300A ",.01)
 ;;S06.300A
 ;;9002226.02101,"873,S06.300A ",.02)
 ;;S06.300A
 ;;9002226.02101,"873,S06.300A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.301A ",.01)
 ;;S06.301A
 ;;9002226.02101,"873,S06.301A ",.02)
 ;;S06.301A
 ;;9002226.02101,"873,S06.301A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.302A ",.01)
 ;;S06.302A
 ;;9002226.02101,"873,S06.302A ",.02)
 ;;S06.302A
 ;;9002226.02101,"873,S06.302A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.309A ",.01)
 ;;S06.309A
 ;;9002226.02101,"873,S06.309A ",.02)
 ;;S06.309A
 ;;9002226.02101,"873,S06.309A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.310A ",.01)
 ;;S06.310A
 ;;9002226.02101,"873,S06.310A ",.02)
 ;;S06.310A
 ;;9002226.02101,"873,S06.310A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.311A ",.01)
 ;;S06.311A
 ;;9002226.02101,"873,S06.311A ",.02)
 ;;S06.311A
 ;;9002226.02101,"873,S06.311A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.312A ",.01)
 ;;S06.312A
 ;;9002226.02101,"873,S06.312A ",.02)
 ;;S06.312A
 ;;9002226.02101,"873,S06.312A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.319A ",.01)
 ;;S06.319A
 ;;9002226.02101,"873,S06.319A ",.02)
 ;;S06.319A
 ;;9002226.02101,"873,S06.319A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.320A ",.01)
 ;;S06.320A
 ;;9002226.02101,"873,S06.320A ",.02)
 ;;S06.320A
 ;;9002226.02101,"873,S06.320A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.321A ",.01)
 ;;S06.321A
 ;;9002226.02101,"873,S06.321A ",.02)
 ;;S06.321A
 ;;9002226.02101,"873,S06.321A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.322A ",.01)
 ;;S06.322A
 ;;9002226.02101,"873,S06.322A ",.02)
 ;;S06.322A
 ;;9002226.02101,"873,S06.322A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.329A ",.01)
 ;;S06.329A
 ;;9002226.02101,"873,S06.329A ",.02)
 ;;S06.329A
 ;;9002226.02101,"873,S06.329A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.330A ",.01)
 ;;S06.330A
 ;;9002226.02101,"873,S06.330A ",.02)
 ;;S06.330A
 ;;9002226.02101,"873,S06.330A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.331A ",.01)
 ;;S06.331A
 ;;9002226.02101,"873,S06.331A ",.02)
 ;;S06.331A
 ;;9002226.02101,"873,S06.331A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.332A ",.01)
 ;;S06.332A
 ;;9002226.02101,"873,S06.332A ",.02)
 ;;S06.332A
 ;;9002226.02101,"873,S06.332A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.339A ",.01)
 ;;S06.339A
 ;;9002226.02101,"873,S06.339A ",.02)
 ;;S06.339A
 ;;9002226.02101,"873,S06.339A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.340A ",.01)
 ;;S06.340A
 ;;9002226.02101,"873,S06.340A ",.02)
 ;;S06.340A
 ;;9002226.02101,"873,S06.340A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.341A ",.01)
 ;;S06.341A
 ;;9002226.02101,"873,S06.341A ",.02)
 ;;S06.341A
 ;;9002226.02101,"873,S06.341A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.342A ",.01)
 ;;S06.342A
 ;;9002226.02101,"873,S06.342A ",.02)
 ;;S06.342A
 ;;9002226.02101,"873,S06.342A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.349A ",.01)
 ;;S06.349A
 ;;9002226.02101,"873,S06.349A ",.02)
 ;;S06.349A
 ;;9002226.02101,"873,S06.349A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.350A ",.01)
 ;;S06.350A
 ;;9002226.02101,"873,S06.350A ",.02)
 ;;S06.350A
 ;;9002226.02101,"873,S06.350A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.351A ",.01)
 ;;S06.351A
 ;;9002226.02101,"873,S06.351A ",.02)
 ;;S06.351A
 ;;9002226.02101,"873,S06.351A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.352A ",.01)
 ;;S06.352A
 ;;9002226.02101,"873,S06.352A ",.02)
 ;;S06.352A
 ;;9002226.02101,"873,S06.352A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.359A ",.01)
 ;;S06.359A
 ;;9002226.02101,"873,S06.359A ",.02)
 ;;S06.359A
 ;;9002226.02101,"873,S06.359A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.360A ",.01)
 ;;S06.360A
 ;;9002226.02101,"873,S06.360A ",.02)
 ;;S06.360A
 ;;9002226.02101,"873,S06.360A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.361A ",.01)
 ;;S06.361A
 ;;9002226.02101,"873,S06.361A ",.02)
 ;;S06.361A
 ;;9002226.02101,"873,S06.361A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.362A ",.01)
 ;;S06.362A
 ;;9002226.02101,"873,S06.362A ",.02)
 ;;S06.362A
 ;;9002226.02101,"873,S06.362A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.369A ",.01)
 ;;S06.369A
 ;;9002226.02101,"873,S06.369A ",.02)
 ;;S06.369A
 ;;9002226.02101,"873,S06.369A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.370A ",.01)
 ;;S06.370A
 ;;9002226.02101,"873,S06.370A ",.02)
 ;;S06.370A
 ;;9002226.02101,"873,S06.370A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.371A ",.01)
 ;;S06.371A
 ;;9002226.02101,"873,S06.371A ",.02)
 ;;S06.371A
 ;;9002226.02101,"873,S06.371A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.372A ",.01)
 ;;S06.372A
 ;;9002226.02101,"873,S06.372A ",.02)
 ;;S06.372A
 ;;9002226.02101,"873,S06.372A ",.03)
 ;;30
 ;;9002226.02101,"873,S06.379A ",.01)
 ;;S06.379A
 ;;9002226.02101,"873,S06.379A ",.02)
 ;;S06.379A
 ;;9002226.02101,"873,S06.379A ",.03)
 ;;30