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

ATXD5G15.m

Go to the documentation of this file.
ATXD5G15 ;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,"160,X98.8XXD ",.02)
 ;;X98.8XXD 
 ;;9002226.02101,"160,X98.8XXD ",.03)
 ;;30
 ;;9002226.02101,"160,X98.8XXS ",.01)
 ;;X98.8XXS 
 ;;9002226.02101,"160,X98.8XXS ",.02)
 ;;X98.8XXS 
 ;;9002226.02101,"160,X98.8XXS ",.03)
 ;;30
 ;;9002226.02101,"160,X98.9XXA ",.01)
 ;;X98.9XXA 
 ;;9002226.02101,"160,X98.9XXA ",.02)
 ;;X98.9XXA 
 ;;9002226.02101,"160,X98.9XXA ",.03)
 ;;30
 ;;9002226.02101,"160,X98.9XXD ",.01)
 ;;X98.9XXD 
 ;;9002226.02101,"160,X98.9XXD ",.02)
 ;;X98.9XXD 
 ;;9002226.02101,"160,X98.9XXD ",.03)
 ;;30
 ;;9002226.02101,"160,X98.9XXS ",.01)
 ;;X98.9XXS 
 ;;9002226.02101,"160,X98.9XXS ",.02)
 ;;X98.9XXS 
 ;;9002226.02101,"160,X98.9XXS ",.03)
 ;;30
 ;;9002226.02101,"160,X99.0XXA ",.01)
 ;;X99.0XXA 
 ;;9002226.02101,"160,X99.0XXA ",.02)
 ;;X99.0XXA 
 ;;9002226.02101,"160,X99.0XXA ",.03)
 ;;30
 ;;9002226.02101,"160,X99.0XXD ",.01)
 ;;X99.0XXD 
 ;;9002226.02101,"160,X99.0XXD ",.02)
 ;;X99.0XXD 
 ;;9002226.02101,"160,X99.0XXD ",.03)
 ;;30
 ;;9002226.02101,"160,X99.0XXS ",.01)
 ;;X99.0XXS 
 ;;9002226.02101,"160,X99.0XXS ",.02)
 ;;X99.0XXS 
 ;;9002226.02101,"160,X99.0XXS ",.03)
 ;;30
 ;;9002226.02101,"160,X99.1XXA ",.01)
 ;;X99.1XXA 
 ;;9002226.02101,"160,X99.1XXA ",.02)
 ;;X99.1XXA 
 ;;9002226.02101,"160,X99.1XXA ",.03)
 ;;30
 ;;9002226.02101,"160,X99.1XXD ",.01)
 ;;X99.1XXD 
 ;;9002226.02101,"160,X99.1XXD ",.02)
 ;;X99.1XXD 
 ;;9002226.02101,"160,X99.1XXD ",.03)
 ;;30
 ;;9002226.02101,"160,X99.1XXS ",.01)
 ;;X99.1XXS 
 ;;9002226.02101,"160,X99.1XXS ",.02)
 ;;X99.1XXS 
 ;;9002226.02101,"160,X99.1XXS ",.03)
 ;;30
 ;;9002226.02101,"160,X99.2XXA ",.01)
 ;;X99.2XXA 
 ;;9002226.02101,"160,X99.2XXA ",.02)
 ;;X99.2XXA 
 ;;9002226.02101,"160,X99.2XXA ",.03)
 ;;30
 ;;9002226.02101,"160,X99.2XXD ",.01)
 ;;X99.2XXD 
 ;;9002226.02101,"160,X99.2XXD ",.02)
 ;;X99.2XXD 
 ;;9002226.02101,"160,X99.2XXD ",.03)
 ;;30
 ;;9002226.02101,"160,X99.2XXS ",.01)
 ;;X99.2XXS 
 ;;9002226.02101,"160,X99.2XXS ",.02)
 ;;X99.2XXS 
 ;;9002226.02101,"160,X99.2XXS ",.03)
 ;;30
 ;;9002226.02101,"160,X99.8XXA ",.01)
 ;;X99.8XXA 
 ;;9002226.02101,"160,X99.8XXA ",.02)
 ;;X99.8XXA 
 ;;9002226.02101,"160,X99.8XXA ",.03)
 ;;30
 ;;9002226.02101,"160,X99.8XXD ",.01)
 ;;X99.8XXD 
 ;;9002226.02101,"160,X99.8XXD ",.02)
 ;;X99.8XXD 
 ;;9002226.02101,"160,X99.8XXD ",.03)
 ;;30
 ;;9002226.02101,"160,X99.8XXS ",.01)
 ;;X99.8XXS 
 ;;9002226.02101,"160,X99.8XXS ",.02)
 ;;X99.8XXS 
 ;;9002226.02101,"160,X99.8XXS ",.03)
 ;;30
 ;;9002226.02101,"160,X99.9XXA ",.01)
 ;;X99.9XXA 
 ;;9002226.02101,"160,X99.9XXA ",.02)
 ;;X99.9XXA 
 ;;9002226.02101,"160,X99.9XXA ",.03)
 ;;30
 ;;9002226.02101,"160,X99.9XXD ",.01)
 ;;X99.9XXD 
 ;;9002226.02101,"160,X99.9XXD ",.02)
 ;;X99.9XXD 
 ;;9002226.02101,"160,X99.9XXD ",.03)
 ;;30
 ;;9002226.02101,"160,X99.9XXS ",.01)
 ;;X99.9XXS 
 ;;9002226.02101,"160,X99.9XXS ",.02)
 ;;X99.9XXS 
 ;;9002226.02101,"160,X99.9XXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y00.XXXA ",.01)
 ;;Y00.XXXA 
 ;;9002226.02101,"160,Y00.XXXA ",.02)
 ;;Y00.XXXA 
 ;;9002226.02101,"160,Y00.XXXA ",.03)
 ;;30
 ;;9002226.02101,"160,Y00.XXXD ",.01)
 ;;Y00.XXXD 
 ;;9002226.02101,"160,Y00.XXXD ",.02)
 ;;Y00.XXXD 
 ;;9002226.02101,"160,Y00.XXXD ",.03)
 ;;30
 ;;9002226.02101,"160,Y00.XXXS ",.01)
 ;;Y00.XXXS 
 ;;9002226.02101,"160,Y00.XXXS ",.02)
 ;;Y00.XXXS 
 ;;9002226.02101,"160,Y00.XXXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y01.XXXA ",.01)
 ;;Y01.XXXA 
 ;;9002226.02101,"160,Y01.XXXA ",.02)
 ;;Y01.XXXA 
 ;;9002226.02101,"160,Y01.XXXA ",.03)
 ;;30
 ;;9002226.02101,"160,Y01.XXXD ",.01)
 ;;Y01.XXXD 
 ;;9002226.02101,"160,Y01.XXXD ",.02)
 ;;Y01.XXXD 
 ;;9002226.02101,"160,Y01.XXXD ",.03)
 ;;30
 ;;9002226.02101,"160,Y01.XXXS ",.01)
 ;;Y01.XXXS 
 ;;9002226.02101,"160,Y01.XXXS ",.02)
 ;;Y01.XXXS 
 ;;9002226.02101,"160,Y01.XXXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y02.0XXA ",.01)
 ;;Y02.0XXA 
 ;;9002226.02101,"160,Y02.0XXA ",.02)
 ;;Y02.0XXA 
 ;;9002226.02101,"160,Y02.0XXA ",.03)
 ;;30
 ;;9002226.02101,"160,Y02.0XXD ",.01)
 ;;Y02.0XXD 
 ;;9002226.02101,"160,Y02.0XXD ",.02)
 ;;Y02.0XXD 
 ;;9002226.02101,"160,Y02.0XXD ",.03)
 ;;30
 ;;9002226.02101,"160,Y02.0XXS ",.01)
 ;;Y02.0XXS 
 ;;9002226.02101,"160,Y02.0XXS ",.02)
 ;;Y02.0XXS 
 ;;9002226.02101,"160,Y02.0XXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y02.1XXA ",.01)
 ;;Y02.1XXA 
 ;;9002226.02101,"160,Y02.1XXA ",.02)
 ;;Y02.1XXA 
 ;;9002226.02101,"160,Y02.1XXA ",.03)
 ;;30
 ;;9002226.02101,"160,Y02.1XXD ",.01)
 ;;Y02.1XXD 
 ;;9002226.02101,"160,Y02.1XXD ",.02)
 ;;Y02.1XXD 
 ;;9002226.02101,"160,Y02.1XXD ",.03)
 ;;30
 ;;9002226.02101,"160,Y02.1XXS ",.01)
 ;;Y02.1XXS 
 ;;9002226.02101,"160,Y02.1XXS ",.02)
 ;;Y02.1XXS 
 ;;9002226.02101,"160,Y02.1XXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y02.8XXA ",.01)
 ;;Y02.8XXA 
 ;;9002226.02101,"160,Y02.8XXA ",.02)
 ;;Y02.8XXA 
 ;;9002226.02101,"160,Y02.8XXA ",.03)
 ;;30
 ;;9002226.02101,"160,Y02.8XXD ",.01)
 ;;Y02.8XXD 
 ;;9002226.02101,"160,Y02.8XXD ",.02)
 ;;Y02.8XXD 
 ;;9002226.02101,"160,Y02.8XXD ",.03)
 ;;30
 ;;9002226.02101,"160,Y02.8XXS ",.01)
 ;;Y02.8XXS 
 ;;9002226.02101,"160,Y02.8XXS ",.02)
 ;;Y02.8XXS 
 ;;9002226.02101,"160,Y02.8XXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y03.0XXA ",.01)
 ;;Y03.0XXA 
 ;;9002226.02101,"160,Y03.0XXA ",.02)
 ;;Y03.0XXA 
 ;;9002226.02101,"160,Y03.0XXA ",.03)
 ;;30
 ;;9002226.02101,"160,Y03.0XXD ",.01)
 ;;Y03.0XXD 
 ;;9002226.02101,"160,Y03.0XXD ",.02)
 ;;Y03.0XXD 
 ;;9002226.02101,"160,Y03.0XXD ",.03)
 ;;30
 ;;9002226.02101,"160,Y03.0XXS ",.01)
 ;;Y03.0XXS 
 ;;9002226.02101,"160,Y03.0XXS ",.02)
 ;;Y03.0XXS 
 ;;9002226.02101,"160,Y03.0XXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y03.8XXA ",.01)
 ;;Y03.8XXA 
 ;;9002226.02101,"160,Y03.8XXA ",.02)
 ;;Y03.8XXA 
 ;;9002226.02101,"160,Y03.8XXA ",.03)
 ;;30
 ;;9002226.02101,"160,Y03.8XXD ",.01)
 ;;Y03.8XXD 
 ;;9002226.02101,"160,Y03.8XXD ",.02)
 ;;Y03.8XXD 
 ;;9002226.02101,"160,Y03.8XXD ",.03)
 ;;30
 ;;9002226.02101,"160,Y03.8XXS ",.01)
 ;;Y03.8XXS 
 ;;9002226.02101,"160,Y03.8XXS ",.02)
 ;;Y03.8XXS 
 ;;9002226.02101,"160,Y03.8XXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.0XXA ",.01)
 ;;Y04.0XXA 
 ;;9002226.02101,"160,Y04.0XXA ",.02)
 ;;Y04.0XXA 
 ;;9002226.02101,"160,Y04.0XXA ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.0XXD ",.01)
 ;;Y04.0XXD 
 ;;9002226.02101,"160,Y04.0XXD ",.02)
 ;;Y04.0XXD 
 ;;9002226.02101,"160,Y04.0XXD ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.0XXS ",.01)
 ;;Y04.0XXS 
 ;;9002226.02101,"160,Y04.0XXS ",.02)
 ;;Y04.0XXS 
 ;;9002226.02101,"160,Y04.0XXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.1XXA ",.01)
 ;;Y04.1XXA 
 ;;9002226.02101,"160,Y04.1XXA ",.02)
 ;;Y04.1XXA 
 ;;9002226.02101,"160,Y04.1XXA ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.1XXD ",.01)
 ;;Y04.1XXD 
 ;;9002226.02101,"160,Y04.1XXD ",.02)
 ;;Y04.1XXD 
 ;;9002226.02101,"160,Y04.1XXD ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.1XXS ",.01)
 ;;Y04.1XXS 
 ;;9002226.02101,"160,Y04.1XXS ",.02)
 ;;Y04.1XXS 
 ;;9002226.02101,"160,Y04.1XXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.2XXA ",.01)
 ;;Y04.2XXA 
 ;;9002226.02101,"160,Y04.2XXA ",.02)
 ;;Y04.2XXA 
 ;;9002226.02101,"160,Y04.2XXA ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.2XXD ",.01)
 ;;Y04.2XXD 
 ;;9002226.02101,"160,Y04.2XXD ",.02)
 ;;Y04.2XXD 
 ;;9002226.02101,"160,Y04.2XXD ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.2XXS ",.01)
 ;;Y04.2XXS 
 ;;9002226.02101,"160,Y04.2XXS ",.02)
 ;;Y04.2XXS 
 ;;9002226.02101,"160,Y04.2XXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.8XXA ",.01)
 ;;Y04.8XXA 
 ;;9002226.02101,"160,Y04.8XXA ",.02)
 ;;Y04.8XXA 
 ;;9002226.02101,"160,Y04.8XXA ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.8XXD ",.01)
 ;;Y04.8XXD 
 ;;9002226.02101,"160,Y04.8XXD ",.02)
 ;;Y04.8XXD 
 ;;9002226.02101,"160,Y04.8XXD ",.03)
 ;;30
 ;;9002226.02101,"160,Y04.8XXS ",.01)
 ;;Y04.8XXS 
 ;;9002226.02101,"160,Y04.8XXS ",.02)
 ;;Y04.8XXS 
 ;;9002226.02101,"160,Y04.8XXS ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.01XA ",.01)
 ;;Y08.01XA 
 ;;9002226.02101,"160,Y08.01XA ",.02)
 ;;Y08.01XA 
 ;;9002226.02101,"160,Y08.01XA ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.01XD ",.01)
 ;;Y08.01XD 
 ;;9002226.02101,"160,Y08.01XD ",.02)
 ;;Y08.01XD 
 ;;9002226.02101,"160,Y08.01XD ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.01XS ",.01)
 ;;Y08.01XS 
 ;;9002226.02101,"160,Y08.01XS ",.02)
 ;;Y08.01XS 
 ;;9002226.02101,"160,Y08.01XS ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.02XA ",.01)
 ;;Y08.02XA 
 ;;9002226.02101,"160,Y08.02XA ",.02)
 ;;Y08.02XA 
 ;;9002226.02101,"160,Y08.02XA ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.02XD ",.01)
 ;;Y08.02XD 
 ;;9002226.02101,"160,Y08.02XD ",.02)
 ;;Y08.02XD 
 ;;9002226.02101,"160,Y08.02XD ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.02XS ",.01)
 ;;Y08.02XS 
 ;;9002226.02101,"160,Y08.02XS ",.02)
 ;;Y08.02XS 
 ;;9002226.02101,"160,Y08.02XS ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.09XA ",.01)
 ;;Y08.09XA 
 ;;9002226.02101,"160,Y08.09XA ",.02)
 ;;Y08.09XA 
 ;;9002226.02101,"160,Y08.09XA ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.09XD ",.01)
 ;;Y08.09XD 
 ;;9002226.02101,"160,Y08.09XD ",.02)
 ;;Y08.09XD 
 ;;9002226.02101,"160,Y08.09XD ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.09XS ",.01)
 ;;Y08.09XS 
 ;;9002226.02101,"160,Y08.09XS ",.02)
 ;;Y08.09XS 
 ;;9002226.02101,"160,Y08.09XS ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.81XA ",.01)
 ;;Y08.81XA 
 ;;9002226.02101,"160,Y08.81XA ",.02)
 ;;Y08.81XA 
 ;;9002226.02101,"160,Y08.81XA ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.81XD ",.01)
 ;;Y08.81XD 
 ;;9002226.02101,"160,Y08.81XD ",.02)
 ;;Y08.81XD 
 ;;9002226.02101,"160,Y08.81XD ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.81XS ",.01)
 ;;Y08.81XS 
 ;;9002226.02101,"160,Y08.81XS ",.02)
 ;;Y08.81XS 
 ;;9002226.02101,"160,Y08.81XS ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.89XA ",.01)
 ;;Y08.89XA 
 ;;9002226.02101,"160,Y08.89XA ",.02)
 ;;Y08.89XA 
 ;;9002226.02101,"160,Y08.89XA ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.89XD ",.01)
 ;;Y08.89XD 
 ;;9002226.02101,"160,Y08.89XD ",.02)
 ;;Y08.89XD 
 ;;9002226.02101,"160,Y08.89XD ",.03)
 ;;30
 ;;9002226.02101,"160,Y08.89XS ",.01)
 ;;Y08.89XS 
 ;;9002226.02101,"160,Y08.89XS ",.02)
 ;;Y08.89XS 
 ;;9002226.02101,"160,Y08.89XS ",.03)
 ;;30
 ;;9002226.02101,"160,Y09. ",.01)
 ;;Y09. 
 ;;9002226.02101,"160,Y09. ",.02)
 ;;Y09. 
 ;;9002226.02101,"160,Y09. ",.03)
 ;;30
 ;;9002226.04101,"160,1",.01)
 ;;APCL