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

ATXD5O34.m

Go to the documentation of this file.
ATXD5O34 ;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,"168,V87.1XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V87.2XXA ",.01)
 ;;V87.2XXA 
 ;;9002226.02101,"168,V87.2XXA ",.02)
 ;;V87.2XXA 
 ;;9002226.02101,"168,V87.2XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V87.2XXD ",.01)
 ;;V87.2XXD 
 ;;9002226.02101,"168,V87.2XXD ",.02)
 ;;V87.2XXD 
 ;;9002226.02101,"168,V87.2XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V87.2XXS ",.01)
 ;;V87.2XXS 
 ;;9002226.02101,"168,V87.2XXS ",.02)
 ;;V87.2XXS 
 ;;9002226.02101,"168,V87.2XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V87.3XXA ",.01)
 ;;V87.3XXA 
 ;;9002226.02101,"168,V87.3XXA ",.02)
 ;;V87.3XXA 
 ;;9002226.02101,"168,V87.3XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V87.3XXD ",.01)
 ;;V87.3XXD 
 ;;9002226.02101,"168,V87.3XXD ",.02)
 ;;V87.3XXD 
 ;;9002226.02101,"168,V87.3XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V87.3XXS ",.01)
 ;;V87.3XXS 
 ;;9002226.02101,"168,V87.3XXS ",.02)
 ;;V87.3XXS 
 ;;9002226.02101,"168,V87.3XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V87.4XXA ",.01)
 ;;V87.4XXA 
 ;;9002226.02101,"168,V87.4XXA ",.02)
 ;;V87.4XXA 
 ;;9002226.02101,"168,V87.4XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V87.4XXD ",.01)
 ;;V87.4XXD 
 ;;9002226.02101,"168,V87.4XXD ",.02)
 ;;V87.4XXD 
 ;;9002226.02101,"168,V87.4XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V87.4XXS ",.01)
 ;;V87.4XXS 
 ;;9002226.02101,"168,V87.4XXS ",.02)
 ;;V87.4XXS 
 ;;9002226.02101,"168,V87.4XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V87.5XXA ",.01)
 ;;V87.5XXA 
 ;;9002226.02101,"168,V87.5XXA ",.02)
 ;;V87.5XXA 
 ;;9002226.02101,"168,V87.5XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V87.5XXD ",.01)
 ;;V87.5XXD 
 ;;9002226.02101,"168,V87.5XXD ",.02)
 ;;V87.5XXD 
 ;;9002226.02101,"168,V87.5XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V87.5XXS ",.01)
 ;;V87.5XXS 
 ;;9002226.02101,"168,V87.5XXS ",.02)
 ;;V87.5XXS 
 ;;9002226.02101,"168,V87.5XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V87.6XXA ",.01)
 ;;V87.6XXA 
 ;;9002226.02101,"168,V87.6XXA ",.02)
 ;;V87.6XXA 
 ;;9002226.02101,"168,V87.6XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V87.6XXD ",.01)
 ;;V87.6XXD 
 ;;9002226.02101,"168,V87.6XXD ",.02)
 ;;V87.6XXD 
 ;;9002226.02101,"168,V87.6XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V87.6XXS ",.01)
 ;;V87.6XXS 
 ;;9002226.02101,"168,V87.6XXS ",.02)
 ;;V87.6XXS 
 ;;9002226.02101,"168,V87.6XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V87.7XXA ",.01)
 ;;V87.7XXA 
 ;;9002226.02101,"168,V87.7XXA ",.02)
 ;;V87.7XXA 
 ;;9002226.02101,"168,V87.7XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V87.7XXD ",.01)
 ;;V87.7XXD 
 ;;9002226.02101,"168,V87.7XXD ",.02)
 ;;V87.7XXD 
 ;;9002226.02101,"168,V87.7XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V87.7XXS ",.01)
 ;;V87.7XXS 
 ;;9002226.02101,"168,V87.7XXS ",.02)
 ;;V87.7XXS 
 ;;9002226.02101,"168,V87.7XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V87.8XXA ",.01)
 ;;V87.8XXA 
 ;;9002226.02101,"168,V87.8XXA ",.02)
 ;;V87.8XXA 
 ;;9002226.02101,"168,V87.8XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V87.8XXD ",.01)
 ;;V87.8XXD 
 ;;9002226.02101,"168,V87.8XXD ",.02)
 ;;V87.8XXD 
 ;;9002226.02101,"168,V87.8XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V87.8XXS ",.01)
 ;;V87.8XXS 
 ;;9002226.02101,"168,V87.8XXS ",.02)
 ;;V87.8XXS 
 ;;9002226.02101,"168,V87.8XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V88.0XXA ",.01)
 ;;V88.0XXA 
 ;;9002226.02101,"168,V88.0XXA ",.02)
 ;;V88.0XXA 
 ;;9002226.02101,"168,V88.0XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V88.0XXD ",.01)
 ;;V88.0XXD 
 ;;9002226.02101,"168,V88.0XXD ",.02)
 ;;V88.0XXD 
 ;;9002226.02101,"168,V88.0XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V88.0XXS ",.01)
 ;;V88.0XXS 
 ;;9002226.02101,"168,V88.0XXS ",.02)
 ;;V88.0XXS 
 ;;9002226.02101,"168,V88.0XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V88.1XXA ",.01)
 ;;V88.1XXA 
 ;;9002226.02101,"168,V88.1XXA ",.02)
 ;;V88.1XXA 
 ;;9002226.02101,"168,V88.1XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V88.1XXD ",.01)
 ;;V88.1XXD 
 ;;9002226.02101,"168,V88.1XXD ",.02)
 ;;V88.1XXD 
 ;;9002226.02101,"168,V88.1XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V88.1XXS ",.01)
 ;;V88.1XXS 
 ;;9002226.02101,"168,V88.1XXS ",.02)
 ;;V88.1XXS 
 ;;9002226.02101,"168,V88.1XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V88.2XXA ",.01)
 ;;V88.2XXA 
 ;;9002226.02101,"168,V88.2XXA ",.02)
 ;;V88.2XXA 
 ;;9002226.02101,"168,V88.2XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V88.2XXD ",.01)
 ;;V88.2XXD 
 ;;9002226.02101,"168,V88.2XXD ",.02)
 ;;V88.2XXD 
 ;;9002226.02101,"168,V88.2XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V88.2XXS ",.01)
 ;;V88.2XXS 
 ;;9002226.02101,"168,V88.2XXS ",.02)
 ;;V88.2XXS 
 ;;9002226.02101,"168,V88.2XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V88.3XXA ",.01)
 ;;V88.3XXA 
 ;;9002226.02101,"168,V88.3XXA ",.02)
 ;;V88.3XXA 
 ;;9002226.02101,"168,V88.3XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V88.3XXD ",.01)
 ;;V88.3XXD 
 ;;9002226.02101,"168,V88.3XXD ",.02)
 ;;V88.3XXD 
 ;;9002226.02101,"168,V88.3XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V88.3XXS ",.01)
 ;;V88.3XXS 
 ;;9002226.02101,"168,V88.3XXS ",.02)
 ;;V88.3XXS 
 ;;9002226.02101,"168,V88.3XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V88.4XXA ",.01)
 ;;V88.4XXA 
 ;;9002226.02101,"168,V88.4XXA ",.02)
 ;;V88.4XXA 
 ;;9002226.02101,"168,V88.4XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V88.4XXD ",.01)
 ;;V88.4XXD 
 ;;9002226.02101,"168,V88.4XXD ",.02)
 ;;V88.4XXD 
 ;;9002226.02101,"168,V88.4XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V88.4XXS ",.01)
 ;;V88.4XXS 
 ;;9002226.02101,"168,V88.4XXS ",.02)
 ;;V88.4XXS 
 ;;9002226.02101,"168,V88.4XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V88.5XXA ",.01)
 ;;V88.5XXA 
 ;;9002226.02101,"168,V88.5XXA ",.02)
 ;;V88.5XXA 
 ;;9002226.02101,"168,V88.5XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V88.5XXD ",.01)
 ;;V88.5XXD 
 ;;9002226.02101,"168,V88.5XXD ",.02)
 ;;V88.5XXD 
 ;;9002226.02101,"168,V88.5XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V88.5XXS ",.01)
 ;;V88.5XXS 
 ;;9002226.02101,"168,V88.5XXS ",.02)
 ;;V88.5XXS 
 ;;9002226.02101,"168,V88.5XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V88.6XXA ",.01)
 ;;V88.6XXA 
 ;;9002226.02101,"168,V88.6XXA ",.02)
 ;;V88.6XXA 
 ;;9002226.02101,"168,V88.6XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V88.6XXD ",.01)
 ;;V88.6XXD 
 ;;9002226.02101,"168,V88.6XXD ",.02)
 ;;V88.6XXD 
 ;;9002226.02101,"168,V88.6XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V88.6XXS ",.01)
 ;;V88.6XXS 
 ;;9002226.02101,"168,V88.6XXS ",.02)
 ;;V88.6XXS 
 ;;9002226.02101,"168,V88.6XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V88.7XXA ",.01)
 ;;V88.7XXA 
 ;;9002226.02101,"168,V88.7XXA ",.02)
 ;;V88.7XXA 
 ;;9002226.02101,"168,V88.7XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V88.7XXD ",.01)
 ;;V88.7XXD 
 ;;9002226.02101,"168,V88.7XXD ",.02)
 ;;V88.7XXD 
 ;;9002226.02101,"168,V88.7XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V88.7XXS ",.01)
 ;;V88.7XXS 
 ;;9002226.02101,"168,V88.7XXS ",.02)
 ;;V88.7XXS 
 ;;9002226.02101,"168,V88.7XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V88.8XXA ",.01)
 ;;V88.8XXA 
 ;;9002226.02101,"168,V88.8XXA ",.02)
 ;;V88.8XXA 
 ;;9002226.02101,"168,V88.8XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V88.8XXD ",.01)
 ;;V88.8XXD 
 ;;9002226.02101,"168,V88.8XXD ",.02)
 ;;V88.8XXD 
 ;;9002226.02101,"168,V88.8XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V88.8XXS ",.01)
 ;;V88.8XXS 
 ;;9002226.02101,"168,V88.8XXS ",.02)
 ;;V88.8XXS 
 ;;9002226.02101,"168,V88.8XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V89.0XXA ",.01)
 ;;V89.0XXA 
 ;;9002226.02101,"168,V89.0XXA ",.02)
 ;;V89.0XXA 
 ;;9002226.02101,"168,V89.0XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V89.0XXD ",.01)
 ;;V89.0XXD 
 ;;9002226.02101,"168,V89.0XXD ",.02)
 ;;V89.0XXD 
 ;;9002226.02101,"168,V89.0XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V89.0XXS ",.01)
 ;;V89.0XXS 
 ;;9002226.02101,"168,V89.0XXS ",.02)
 ;;V89.0XXS 
 ;;9002226.02101,"168,V89.0XXS ",.03)
 ;;30
 ;;9002226.02101,"168,V89.2XXA ",.01)
 ;;V89.2XXA 
 ;;9002226.02101,"168,V89.2XXA ",.02)
 ;;V89.2XXA 
 ;;9002226.02101,"168,V89.2XXA ",.03)
 ;;30
 ;;9002226.02101,"168,V89.2XXD ",.01)
 ;;V89.2XXD 
 ;;9002226.02101,"168,V89.2XXD ",.02)
 ;;V89.2XXD 
 ;;9002226.02101,"168,V89.2XXD ",.03)
 ;;30
 ;;9002226.02101,"168,V89.2XXS ",.01)
 ;;V89.2XXS 
 ;;9002226.02101,"168,V89.2XXS ",.02)
 ;;V89.2XXS 
 ;;9002226.02101,"168,V89.2XXS ",.03)
 ;;30
 ;;9002226.04101,"168,1",.01)
 ;;APCL