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

ATXD5M2.m

Go to the documentation of this file.
ATXD5M2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 12, 2013;
 ;;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,"166,X03.0XXS ",.02)
 ;;X03.0XXS 
 ;;9002226.02101,"166,X03.0XXS ",.03)
 ;;30
 ;;9002226.02101,"166,X03.1XXA ",.01)
 ;;X03.1XXA 
 ;;9002226.02101,"166,X03.1XXA ",.02)
 ;;X03.1XXA 
 ;;9002226.02101,"166,X03.1XXA ",.03)
 ;;30
 ;;9002226.02101,"166,X03.1XXD ",.01)
 ;;X03.1XXD 
 ;;9002226.02101,"166,X03.1XXD ",.02)
 ;;X03.1XXD 
 ;;9002226.02101,"166,X03.1XXD ",.03)
 ;;30
 ;;9002226.02101,"166,X03.1XXS ",.01)
 ;;X03.1XXS 
 ;;9002226.02101,"166,X03.1XXS ",.02)
 ;;X03.1XXS 
 ;;9002226.02101,"166,X03.1XXS ",.03)
 ;;30
 ;;9002226.02101,"166,X03.3XXA ",.01)
 ;;X03.3XXA 
 ;;9002226.02101,"166,X03.3XXA ",.02)
 ;;X03.3XXA 
 ;;9002226.02101,"166,X03.3XXA ",.03)
 ;;30
 ;;9002226.02101,"166,X03.3XXD ",.01)
 ;;X03.3XXD 
 ;;9002226.02101,"166,X03.3XXD ",.02)
 ;;X03.3XXD 
 ;;9002226.02101,"166,X03.3XXD ",.03)
 ;;30
 ;;9002226.02101,"166,X03.3XXS ",.01)
 ;;X03.3XXS 
 ;;9002226.02101,"166,X03.3XXS ",.02)
 ;;X03.3XXS 
 ;;9002226.02101,"166,X03.3XXS ",.03)
 ;;30
 ;;9002226.02101,"166,X03.4XXA ",.01)
 ;;X03.4XXA 
 ;;9002226.02101,"166,X03.4XXA ",.02)
 ;;X03.4XXA 
 ;;9002226.02101,"166,X03.4XXA ",.03)
 ;;30
 ;;9002226.02101,"166,X03.4XXD ",.01)
 ;;X03.4XXD 
 ;;9002226.02101,"166,X03.4XXD ",.02)
 ;;X03.4XXD 
 ;;9002226.02101,"166,X03.4XXD ",.03)
 ;;30
 ;;9002226.02101,"166,X03.4XXS ",.01)
 ;;X03.4XXS 
 ;;9002226.02101,"166,X03.4XXS ",.02)
 ;;X03.4XXS 
 ;;9002226.02101,"166,X03.4XXS ",.03)
 ;;30
 ;;9002226.02101,"166,X03.8XXA ",.01)
 ;;X03.8XXA 
 ;;9002226.02101,"166,X03.8XXA ",.02)
 ;;X03.8XXA 
 ;;9002226.02101,"166,X03.8XXA ",.03)
 ;;30
 ;;9002226.02101,"166,X03.8XXD ",.01)
 ;;X03.8XXD 
 ;;9002226.02101,"166,X03.8XXD ",.02)
 ;;X03.8XXD 
 ;;9002226.02101,"166,X03.8XXD ",.03)
 ;;30
 ;;9002226.02101,"166,X03.8XXS ",.01)
 ;;X03.8XXS 
 ;;9002226.02101,"166,X03.8XXS ",.02)
 ;;X03.8XXS 
 ;;9002226.02101,"166,X03.8XXS ",.03)
 ;;30
 ;;9002226.02101,"166,X04.XXXA ",.01)
 ;;X04.XXXA 
 ;;9002226.02101,"166,X04.XXXA ",.02)
 ;;X04.XXXA 
 ;;9002226.02101,"166,X04.XXXA ",.03)
 ;;30
 ;;9002226.02101,"166,X04.XXXD ",.01)
 ;;X04.XXXD 
 ;;9002226.02101,"166,X04.XXXD ",.02)
 ;;X04.XXXD 
 ;;9002226.02101,"166,X04.XXXD ",.03)
 ;;30
 ;;9002226.02101,"166,X04.XXXS ",.01)
 ;;X04.XXXS 
 ;;9002226.02101,"166,X04.XXXS ",.02)
 ;;X04.XXXS 
 ;;9002226.02101,"166,X04.XXXS ",.03)
 ;;30
 ;;9002226.02101,"166,X05.XXXA ",.01)
 ;;X05.XXXA 
 ;;9002226.02101,"166,X05.XXXA ",.02)
 ;;X05.XXXA 
 ;;9002226.02101,"166,X05.XXXA ",.03)
 ;;30
 ;;9002226.02101,"166,X05.XXXD ",.01)
 ;;X05.XXXD 
 ;;9002226.02101,"166,X05.XXXD ",.02)
 ;;X05.XXXD 
 ;;9002226.02101,"166,X05.XXXD ",.03)
 ;;30
 ;;9002226.02101,"166,X05.XXXS ",.01)
 ;;X05.XXXS 
 ;;9002226.02101,"166,X05.XXXS ",.02)
 ;;X05.XXXS 
 ;;9002226.02101,"166,X05.XXXS ",.03)
 ;;30
 ;;9002226.02101,"166,X06.0XXA ",.01)
 ;;X06.0XXA 
 ;;9002226.02101,"166,X06.0XXA ",.02)
 ;;X06.0XXA 
 ;;9002226.02101,"166,X06.0XXA ",.03)
 ;;30
 ;;9002226.02101,"166,X06.0XXD ",.01)
 ;;X06.0XXD 
 ;;9002226.02101,"166,X06.0XXD ",.02)
 ;;X06.0XXD 
 ;;9002226.02101,"166,X06.0XXD ",.03)
 ;;30
 ;;9002226.02101,"166,X06.0XXS ",.01)
 ;;X06.0XXS 
 ;;9002226.02101,"166,X06.0XXS ",.02)
 ;;X06.0XXS 
 ;;9002226.02101,"166,X06.0XXS ",.03)
 ;;30
 ;;9002226.02101,"166,X06.1XXA ",.01)
 ;;X06.1XXA 
 ;;9002226.02101,"166,X06.1XXA ",.02)
 ;;X06.1XXA 
 ;;9002226.02101,"166,X06.1XXA ",.03)
 ;;30
 ;;9002226.02101,"166,X06.1XXD ",.01)
 ;;X06.1XXD 
 ;;9002226.02101,"166,X06.1XXD ",.02)
 ;;X06.1XXD 
 ;;9002226.02101,"166,X06.1XXD ",.03)
 ;;30
 ;;9002226.02101,"166,X06.1XXS ",.01)
 ;;X06.1XXS 
 ;;9002226.02101,"166,X06.1XXS ",.02)
 ;;X06.1XXS 
 ;;9002226.02101,"166,X06.1XXS ",.03)
 ;;30
 ;;9002226.02101,"166,X06.2XXA ",.01)
 ;;X06.2XXA 
 ;;9002226.02101,"166,X06.2XXA ",.02)
 ;;X06.2XXA 
 ;;9002226.02101,"166,X06.2XXA ",.03)
 ;;30
 ;;9002226.02101,"166,X06.2XXD ",.01)
 ;;X06.2XXD 
 ;;9002226.02101,"166,X06.2XXD ",.02)
 ;;X06.2XXD 
 ;;9002226.02101,"166,X06.2XXD ",.03)
 ;;30
 ;;9002226.02101,"166,X06.2XXS ",.01)
 ;;X06.2XXS 
 ;;9002226.02101,"166,X06.2XXS ",.02)
 ;;X06.2XXS 
 ;;9002226.02101,"166,X06.2XXS ",.03)
 ;;30
 ;;9002226.02101,"166,X06.3XXA ",.01)
 ;;X06.3XXA 
 ;;9002226.02101,"166,X06.3XXA ",.02)
 ;;X06.3XXA 
 ;;9002226.02101,"166,X06.3XXA ",.03)
 ;;30
 ;;9002226.02101,"166,X06.3XXD ",.01)
 ;;X06.3XXD 
 ;;9002226.02101,"166,X06.3XXD ",.02)
 ;;X06.3XXD 
 ;;9002226.02101,"166,X06.3XXD ",.03)
 ;;30
 ;;9002226.02101,"166,X06.3XXS ",.01)
 ;;X06.3XXS 
 ;;9002226.02101,"166,X06.3XXS ",.02)
 ;;X06.3XXS 
 ;;9002226.02101,"166,X06.3XXS ",.03)
 ;;30
 ;;9002226.02101,"166,X08.00XA ",.01)
 ;;X08.00XA 
 ;;9002226.02101,"166,X08.00XA ",.02)
 ;;X08.00XA 
 ;;9002226.02101,"166,X08.00XA ",.03)
 ;;30
 ;;9002226.02101,"166,X08.00XD ",.01)
 ;;X08.00XD 
 ;;9002226.02101,"166,X08.00XD ",.02)
 ;;X08.00XD 
 ;;9002226.02101,"166,X08.00XD ",.03)
 ;;30
 ;;9002226.02101,"166,X08.00XS ",.01)
 ;;X08.00XS 
 ;;9002226.02101,"166,X08.00XS ",.02)
 ;;X08.00XS 
 ;;9002226.02101,"166,X08.00XS ",.03)
 ;;30
 ;;9002226.02101,"166,X08.01XA ",.01)
 ;;X08.01XA 
 ;;9002226.02101,"166,X08.01XA ",.02)
 ;;X08.01XA 
 ;;9002226.02101,"166,X08.01XA ",.03)
 ;;30
 ;;9002226.02101,"166,X08.01XD ",.01)
 ;;X08.01XD 
 ;;9002226.02101,"166,X08.01XD ",.02)
 ;;X08.01XD 
 ;;9002226.02101,"166,X08.01XD ",.03)
 ;;30
 ;;9002226.02101,"166,X08.01XS ",.01)
 ;;X08.01XS 
 ;;9002226.02101,"166,X08.01XS ",.02)
 ;;X08.01XS 
 ;;9002226.02101,"166,X08.01XS ",.03)
 ;;30
 ;;9002226.02101,"166,X08.09XA ",.01)
 ;;X08.09XA 
 ;;9002226.02101,"166,X08.09XA ",.02)
 ;;X08.09XA 
 ;;9002226.02101,"166,X08.09XA ",.03)
 ;;30
 ;;9002226.02101,"166,X08.09XD ",.01)
 ;;X08.09XD 
 ;;9002226.02101,"166,X08.09XD ",.02)
 ;;X08.09XD 
 ;;9002226.02101,"166,X08.09XD ",.03)
 ;;30
 ;;9002226.02101,"166,X08.09XS ",.01)
 ;;X08.09XS 
 ;;9002226.02101,"166,X08.09XS ",.02)
 ;;X08.09XS 
 ;;9002226.02101,"166,X08.09XS ",.03)
 ;;30
 ;;9002226.02101,"166,X08.10XA ",.01)
 ;;X08.10XA 
 ;;9002226.02101,"166,X08.10XA ",.02)
 ;;X08.10XA 
 ;;9002226.02101,"166,X08.10XA ",.03)
 ;;30
 ;;9002226.02101,"166,X08.10XD ",.01)
 ;;X08.10XD 
 ;;9002226.02101,"166,X08.10XD ",.02)
 ;;X08.10XD 
 ;;9002226.02101,"166,X08.10XD ",.03)
 ;;30
 ;;9002226.02101,"166,X08.10XS ",.01)
 ;;X08.10XS 
 ;;9002226.02101,"166,X08.10XS ",.02)
 ;;X08.10XS 
 ;;9002226.02101,"166,X08.10XS ",.03)
 ;;30
 ;;9002226.02101,"166,X08.11XA ",.01)
 ;;X08.11XA 
 ;;9002226.02101,"166,X08.11XA ",.02)
 ;;X08.11XA 
 ;;9002226.02101,"166,X08.11XA ",.03)
 ;;30
 ;;9002226.02101,"166,X08.11XD ",.01)
 ;;X08.11XD 
 ;;9002226.02101,"166,X08.11XD ",.02)
 ;;X08.11XD 
 ;;9002226.02101,"166,X08.11XD ",.03)
 ;;30
 ;;9002226.02101,"166,X08.11XS ",.01)
 ;;X08.11XS 
 ;;9002226.02101,"166,X08.11XS ",.02)
 ;;X08.11XS 
 ;;9002226.02101,"166,X08.11XS ",.03)
 ;;30
 ;;9002226.02101,"166,X08.19XA ",.01)
 ;;X08.19XA 
 ;;9002226.02101,"166,X08.19XA ",.02)
 ;;X08.19XA 
 ;;9002226.02101,"166,X08.19XA ",.03)
 ;;30
 ;;9002226.02101,"166,X08.19XD ",.01)
 ;;X08.19XD 
 ;;9002226.02101,"166,X08.19XD ",.02)
 ;;X08.19XD 
 ;;9002226.02101,"166,X08.19XD ",.03)
 ;;30
 ;;9002226.02101,"166,X08.19XS ",.01)
 ;;X08.19XS 
 ;;9002226.02101,"166,X08.19XS ",.02)
 ;;X08.19XS 
 ;;9002226.02101,"166,X08.19XS ",.03)
 ;;30
 ;;9002226.02101,"166,X08.20XA ",.01)
 ;;X08.20XA 
 ;;9002226.02101,"166,X08.20XA ",.02)
 ;;X08.20XA 
 ;;9002226.02101,"166,X08.20XA ",.03)
 ;;30
 ;;9002226.02101,"166,X08.20XD ",.01)
 ;;X08.20XD 
 ;;9002226.02101,"166,X08.20XD ",.02)
 ;;X08.20XD 
 ;;9002226.02101,"166,X08.20XD ",.03)
 ;;30
 ;;9002226.02101,"166,X08.20XS ",.01)
 ;;X08.20XS 
 ;;9002226.02101,"166,X08.20XS ",.02)
 ;;X08.20XS 
 ;;9002226.02101,"166,X08.20XS ",.03)
 ;;30
 ;;9002226.02101,"166,X08.21XA ",.01)
 ;;X08.21XA 
 ;;9002226.02101,"166,X08.21XA ",.02)
 ;;X08.21XA 
 ;;9002226.02101,"166,X08.21XA ",.03)
 ;;30
 ;;9002226.02101,"166,X08.21XD ",.01)
 ;;X08.21XD 
 ;;9002226.02101,"166,X08.21XD ",.02)
 ;;X08.21XD 
 ;;9002226.02101,"166,X08.21XD ",.03)
 ;;30
 ;;9002226.02101,"166,X08.21XS ",.01)
 ;;X08.21XS 
 ;;9002226.02101,"166,X08.21XS ",.02)
 ;;X08.21XS 
 ;;9002226.02101,"166,X08.21XS ",.03)
 ;;30
 ;;9002226.02101,"166,X08.29XA ",.01)
 ;;X08.29XA 
 ;;9002226.02101,"166,X08.29XA ",.02)
 ;;X08.29XA 
 ;;9002226.02101,"166,X08.29XA ",.03)
 ;;30
 ;;9002226.02101,"166,X08.29XD ",.01)
 ;;X08.29XD 
 ;;9002226.02101,"166,X08.29XD ",.02)
 ;;X08.29XD 
 ;;9002226.02101,"166,X08.29XD ",.03)
 ;;30
 ;;9002226.02101,"166,X08.29XS ",.01)
 ;;X08.29XS 
 ;;9002226.02101,"166,X08.29XS ",.02)
 ;;X08.29XS 
 ;;9002226.02101,"166,X08.29XS ",.03)
 ;;30
 ;;9002226.02101,"166,X08.8XXA ",.01)
 ;;X08.8XXA 
 ;;9002226.02101,"166,X08.8XXA ",.02)
 ;;X08.8XXA 
 ;;9002226.02101,"166,X08.8XXA ",.03)
 ;;30
 ;;9002226.02101,"166,X08.8XXD ",.01)
 ;;X08.8XXD 
 ;;9002226.02101,"166,X08.8XXD ",.02)
 ;;X08.8XXD 
 ;;9002226.02101,"166,X08.8XXD ",.03)
 ;;30
 ;;9002226.02101,"166,X08.8XXS ",.01)
 ;;X08.8XXS 
 ;;9002226.02101,"166,X08.8XXS ",.02)
 ;;X08.8XXS 
 ;;9002226.02101,"166,X08.8XXS ",.03)
 ;;30
 ;;9002226.04101,"166,1",.01)
 ;;APCL