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

ATXD5P13.m

Go to the documentation of this file.
ATXD5P13 ;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,"169,W21.11XD ",.02)
 ;;W21.11XD 
 ;;9002226.02101,"169,W21.11XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.11XS ",.01)
 ;;W21.11XS 
 ;;9002226.02101,"169,W21.11XS ",.02)
 ;;W21.11XS 
 ;;9002226.02101,"169,W21.11XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.12XA ",.01)
 ;;W21.12XA 
 ;;9002226.02101,"169,W21.12XA ",.02)
 ;;W21.12XA 
 ;;9002226.02101,"169,W21.12XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.12XD ",.01)
 ;;W21.12XD 
 ;;9002226.02101,"169,W21.12XD ",.02)
 ;;W21.12XD 
 ;;9002226.02101,"169,W21.12XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.12XS ",.01)
 ;;W21.12XS 
 ;;9002226.02101,"169,W21.12XS ",.02)
 ;;W21.12XS 
 ;;9002226.02101,"169,W21.12XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.13XA ",.01)
 ;;W21.13XA 
 ;;9002226.02101,"169,W21.13XA ",.02)
 ;;W21.13XA 
 ;;9002226.02101,"169,W21.13XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.13XD ",.01)
 ;;W21.13XD 
 ;;9002226.02101,"169,W21.13XD ",.02)
 ;;W21.13XD 
 ;;9002226.02101,"169,W21.13XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.13XS ",.01)
 ;;W21.13XS 
 ;;9002226.02101,"169,W21.13XS ",.02)
 ;;W21.13XS 
 ;;9002226.02101,"169,W21.13XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.19XA ",.01)
 ;;W21.19XA 
 ;;9002226.02101,"169,W21.19XA ",.02)
 ;;W21.19XA 
 ;;9002226.02101,"169,W21.19XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.19XD ",.01)
 ;;W21.19XD 
 ;;9002226.02101,"169,W21.19XD ",.02)
 ;;W21.19XD 
 ;;9002226.02101,"169,W21.19XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.19XS ",.01)
 ;;W21.19XS 
 ;;9002226.02101,"169,W21.19XS ",.02)
 ;;W21.19XS 
 ;;9002226.02101,"169,W21.19XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.210A ",.01)
 ;;W21.210A 
 ;;9002226.02101,"169,W21.210A ",.02)
 ;;W21.210A 
 ;;9002226.02101,"169,W21.210A ",.03)
 ;;30
 ;;9002226.02101,"169,W21.210D ",.01)
 ;;W21.210D 
 ;;9002226.02101,"169,W21.210D ",.02)
 ;;W21.210D 
 ;;9002226.02101,"169,W21.210D ",.03)
 ;;30
 ;;9002226.02101,"169,W21.210S ",.01)
 ;;W21.210S 
 ;;9002226.02101,"169,W21.210S ",.02)
 ;;W21.210S 
 ;;9002226.02101,"169,W21.210S ",.03)
 ;;30
 ;;9002226.02101,"169,W21.211A ",.01)
 ;;W21.211A 
 ;;9002226.02101,"169,W21.211A ",.02)
 ;;W21.211A 
 ;;9002226.02101,"169,W21.211A ",.03)
 ;;30
 ;;9002226.02101,"169,W21.211D ",.01)
 ;;W21.211D 
 ;;9002226.02101,"169,W21.211D ",.02)
 ;;W21.211D 
 ;;9002226.02101,"169,W21.211D ",.03)
 ;;30
 ;;9002226.02101,"169,W21.211S ",.01)
 ;;W21.211S 
 ;;9002226.02101,"169,W21.211S ",.02)
 ;;W21.211S 
 ;;9002226.02101,"169,W21.211S ",.03)
 ;;30
 ;;9002226.02101,"169,W21.220A ",.01)
 ;;W21.220A 
 ;;9002226.02101,"169,W21.220A ",.02)
 ;;W21.220A 
 ;;9002226.02101,"169,W21.220A ",.03)
 ;;30
 ;;9002226.02101,"169,W21.220D ",.01)
 ;;W21.220D 
 ;;9002226.02101,"169,W21.220D ",.02)
 ;;W21.220D 
 ;;9002226.02101,"169,W21.220D ",.03)
 ;;30
 ;;9002226.02101,"169,W21.220S ",.01)
 ;;W21.220S 
 ;;9002226.02101,"169,W21.220S ",.02)
 ;;W21.220S 
 ;;9002226.02101,"169,W21.220S ",.03)
 ;;30
 ;;9002226.02101,"169,W21.221A ",.01)
 ;;W21.221A 
 ;;9002226.02101,"169,W21.221A ",.02)
 ;;W21.221A 
 ;;9002226.02101,"169,W21.221A ",.03)
 ;;30
 ;;9002226.02101,"169,W21.221D ",.01)
 ;;W21.221D 
 ;;9002226.02101,"169,W21.221D ",.02)
 ;;W21.221D 
 ;;9002226.02101,"169,W21.221D ",.03)
 ;;30
 ;;9002226.02101,"169,W21.221S ",.01)
 ;;W21.221S 
 ;;9002226.02101,"169,W21.221S ",.02)
 ;;W21.221S 
 ;;9002226.02101,"169,W21.221S ",.03)
 ;;30
 ;;9002226.02101,"169,W21.31XA ",.01)
 ;;W21.31XA 
 ;;9002226.02101,"169,W21.31XA ",.02)
 ;;W21.31XA 
 ;;9002226.02101,"169,W21.31XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.31XD ",.01)
 ;;W21.31XD 
 ;;9002226.02101,"169,W21.31XD ",.02)
 ;;W21.31XD 
 ;;9002226.02101,"169,W21.31XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.31XS ",.01)
 ;;W21.31XS 
 ;;9002226.02101,"169,W21.31XS ",.02)
 ;;W21.31XS 
 ;;9002226.02101,"169,W21.31XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.32XA ",.01)
 ;;W21.32XA 
 ;;9002226.02101,"169,W21.32XA ",.02)
 ;;W21.32XA 
 ;;9002226.02101,"169,W21.32XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.32XD ",.01)
 ;;W21.32XD 
 ;;9002226.02101,"169,W21.32XD ",.02)
 ;;W21.32XD 
 ;;9002226.02101,"169,W21.32XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.32XS ",.01)
 ;;W21.32XS 
 ;;9002226.02101,"169,W21.32XS ",.02)
 ;;W21.32XS 
 ;;9002226.02101,"169,W21.32XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.39XA ",.01)
 ;;W21.39XA 
 ;;9002226.02101,"169,W21.39XA ",.02)
 ;;W21.39XA 
 ;;9002226.02101,"169,W21.39XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.39XD ",.01)
 ;;W21.39XD 
 ;;9002226.02101,"169,W21.39XD ",.02)
 ;;W21.39XD 
 ;;9002226.02101,"169,W21.39XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.39XS ",.01)
 ;;W21.39XS 
 ;;9002226.02101,"169,W21.39XS ",.02)
 ;;W21.39XS 
 ;;9002226.02101,"169,W21.39XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.4XXA ",.01)
 ;;W21.4XXA 
 ;;9002226.02101,"169,W21.4XXA ",.02)
 ;;W21.4XXA 
 ;;9002226.02101,"169,W21.4XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.4XXD ",.01)
 ;;W21.4XXD 
 ;;9002226.02101,"169,W21.4XXD ",.02)
 ;;W21.4XXD 
 ;;9002226.02101,"169,W21.4XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.4XXS ",.01)
 ;;W21.4XXS 
 ;;9002226.02101,"169,W21.4XXS ",.02)
 ;;W21.4XXS 
 ;;9002226.02101,"169,W21.4XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.81XA ",.01)
 ;;W21.81XA 
 ;;9002226.02101,"169,W21.81XA ",.02)
 ;;W21.81XA 
 ;;9002226.02101,"169,W21.81XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.81XD ",.01)
 ;;W21.81XD 
 ;;9002226.02101,"169,W21.81XD ",.02)
 ;;W21.81XD 
 ;;9002226.02101,"169,W21.81XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.81XS ",.01)
 ;;W21.81XS 
 ;;9002226.02101,"169,W21.81XS ",.02)
 ;;W21.81XS 
 ;;9002226.02101,"169,W21.81XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.89XA ",.01)
 ;;W21.89XA 
 ;;9002226.02101,"169,W21.89XA ",.02)
 ;;W21.89XA 
 ;;9002226.02101,"169,W21.89XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.89XD ",.01)
 ;;W21.89XD 
 ;;9002226.02101,"169,W21.89XD ",.02)
 ;;W21.89XD 
 ;;9002226.02101,"169,W21.89XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.89XS ",.01)
 ;;W21.89XS 
 ;;9002226.02101,"169,W21.89XS ",.02)
 ;;W21.89XS 
 ;;9002226.02101,"169,W21.89XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.9XXA ",.01)
 ;;W21.9XXA 
 ;;9002226.02101,"169,W21.9XXA ",.02)
 ;;W21.9XXA 
 ;;9002226.02101,"169,W21.9XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.9XXD ",.01)
 ;;W21.9XXD 
 ;;9002226.02101,"169,W21.9XXD ",.02)
 ;;W21.9XXD 
 ;;9002226.02101,"169,W21.9XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.9XXS ",.01)
 ;;W21.9XXS 
 ;;9002226.02101,"169,W21.9XXS ",.02)
 ;;W21.9XXS 
 ;;9002226.02101,"169,W21.9XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W22.01XA ",.01)
 ;;W22.01XA 
 ;;9002226.02101,"169,W22.01XA ",.02)
 ;;W22.01XA 
 ;;9002226.02101,"169,W22.01XA ",.03)
 ;;30
 ;;9002226.02101,"169,W22.01XD ",.01)
 ;;W22.01XD 
 ;;9002226.02101,"169,W22.01XD ",.02)
 ;;W22.01XD 
 ;;9002226.02101,"169,W22.01XD ",.03)
 ;;30
 ;;9002226.02101,"169,W22.01XS ",.01)
 ;;W22.01XS 
 ;;9002226.02101,"169,W22.01XS ",.02)
 ;;W22.01XS 
 ;;9002226.02101,"169,W22.01XS ",.03)
 ;;30
 ;;9002226.02101,"169,W22.02XA ",.01)
 ;;W22.02XA 
 ;;9002226.02101,"169,W22.02XA ",.02)
 ;;W22.02XA 
 ;;9002226.02101,"169,W22.02XA ",.03)
 ;;30
 ;;9002226.02101,"169,W22.02XD ",.01)
 ;;W22.02XD 
 ;;9002226.02101,"169,W22.02XD ",.02)
 ;;W22.02XD 
 ;;9002226.02101,"169,W22.02XD ",.03)
 ;;30
 ;;9002226.02101,"169,W22.02XS ",.01)
 ;;W22.02XS 
 ;;9002226.02101,"169,W22.02XS ",.02)
 ;;W22.02XS 
 ;;9002226.02101,"169,W22.02XS ",.03)
 ;;30
 ;;9002226.02101,"169,W22.03XA ",.01)
 ;;W22.03XA 
 ;;9002226.02101,"169,W22.03XA ",.02)
 ;;W22.03XA 
 ;;9002226.02101,"169,W22.03XA ",.03)
 ;;30
 ;;9002226.02101,"169,W22.03XD ",.01)
 ;;W22.03XD 
 ;;9002226.02101,"169,W22.03XD ",.02)
 ;;W22.03XD 
 ;;9002226.02101,"169,W22.03XD ",.03)
 ;;30
 ;;9002226.02101,"169,W22.03XS ",.01)
 ;;W22.03XS 
 ;;9002226.02101,"169,W22.03XS ",.02)
 ;;W22.03XS 
 ;;9002226.02101,"169,W22.03XS ",.03)
 ;;30
 ;;9002226.02101,"169,W22.041A ",.01)
 ;;W22.041A 
 ;;9002226.02101,"169,W22.041A ",.02)
 ;;W22.041A 
 ;;9002226.02101,"169,W22.041A ",.03)
 ;;30
 ;;9002226.02101,"169,W22.041D ",.01)
 ;;W22.041D 
 ;;9002226.02101,"169,W22.041D ",.02)
 ;;W22.041D 
 ;;9002226.02101,"169,W22.041D ",.03)
 ;;30
 ;;9002226.02101,"169,W22.041S ",.01)
 ;;W22.041S 
 ;;9002226.02101,"169,W22.041S ",.02)
 ;;W22.041S 
 ;;9002226.02101,"169,W22.041S ",.03)
 ;;30
 ;;9002226.02101,"169,W22.042A ",.01)
 ;;W22.042A 
 ;;9002226.02101,"169,W22.042A ",.02)
 ;;W22.042A 
 ;;9002226.02101,"169,W22.042A ",.03)
 ;;30
 ;;9002226.02101,"169,W22.042D ",.01)
 ;;W22.042D 
 ;;9002226.02101,"169,W22.042D ",.02)
 ;;W22.042D 
 ;;9002226.02101,"169,W22.042D ",.03)
 ;;30
 ;;9002226.02101,"169,W22.042S ",.01)
 ;;W22.042S 
 ;;9002226.02101,"169,W22.042S ",.02)
 ;;W22.042S 
 ;;9002226.02101,"169,W22.042S ",.03)
 ;;30
 ;;9002226.02101,"169,W22.09XA ",.01)
 ;;W22.09XA 
 ;;9002226.02101,"169,W22.09XA ",.02)
 ;;W22.09XA 
 ;;9002226.02101,"169,W22.09XA ",.03)
 ;;30
 ;;9002226.02101,"169,W22.09XD ",.01)
 ;;W22.09XD 
 ;;9002226.02101,"169,W22.09XD ",.02)
 ;;W22.09XD 
 ;;9002226.02101,"169,W22.09XD ",.03)
 ;;30
 ;;9002226.02101,"169,W22.09XS ",.01)
 ;;W22.09XS 
 ;;9002226.02101,"169,W22.09XS ",.02)
 ;;W22.09XS 
 ;;9002226.02101,"169,W22.09XS ",.03)
 ;;30
 ;;9002226.02101,"169,W22.10XA ",.01)
 ;;W22.10XA 
 ;;9002226.02101,"169,W22.10XA ",.02)
 ;;W22.10XA 
 ;;9002226.02101,"169,W22.10XA ",.03)
 ;;30
 ;;9002226.02101,"169,W22.10XD ",.01)
 ;;W22.10XD 
 ;;9002226.02101,"169,W22.10XD ",.02)
 ;;W22.10XD 
 ;;9002226.02101,"169,W22.10XD ",.03)
 ;;30
 ;;9002226.02101,"169,W22.10XS ",.01)
 ;;W22.10XS 
 ;;9002226.02101,"169,W22.10XS ",.02)
 ;;W22.10XS 
 ;;9002226.02101,"169,W22.10XS ",.03)
 ;;30
 ;;9002226.02101,"169,W22.11XA ",.01)
 ;;W22.11XA 
 ;;9002226.02101,"169,W22.11XA ",.02)
 ;;W22.11XA 
 ;;9002226.02101,"169,W22.11XA ",.03)
 ;;30
 ;;9002226.02101,"169,W22.11XD ",.01)
 ;;W22.11XD 
 ;;9002226.02101,"169,W22.11XD ",.02)
 ;;W22.11XD 
 ;;9002226.02101,"169,W22.11XD ",.03)
 ;;30
 ;;9002226.02101,"169,W22.11XS ",.01)
 ;;W22.11XS 
 ;;9002226.02101,"169,W22.11XS ",.02)
 ;;W22.11XS 
 ;;9002226.02101,"169,W22.11XS ",.03)
 ;;30
 ;;9002226.02101,"169,W22.12XA ",.01)
 ;;W22.12XA 
 ;;9002226.02101,"169,W22.12XA ",.02)
 ;;W22.12XA 
 ;;9002226.02101,"169,W22.12XA ",.03)
 ;;30
 ;;9002226.02101,"169,W22.12XD ",.01)
 ;;W22.12XD 
 ;;9002226.02101,"169,W22.12XD ",.02)
 ;;W22.12XD 
 ;;9002226.02101,"169,W22.12XD ",.03)
 ;;30
 ;;9002226.02101,"169,W22.12XS ",.01)
 ;;W22.12XS 
 ;;9002226.02101,"169,W22.12XS ",.02)
 ;;W22.12XS 
 ;;9002226.02101,"169,W22.12XS ",.03)
 ;;30
 ;;9002226.02101,"169,W22.19XA ",.01)
 ;;W22.19XA 
 ;;9002226.02101,"169,W22.19XA ",.02)
 ;;W22.19XA 
 ;;9002226.02101,"169,W22.19XA ",.03)
 ;;30
 ;;9002226.02101,"169,W22.19XD ",.01)
 ;;W22.19XD 
 ;;9002226.02101,"169,W22.19XD ",.02)
 ;;W22.19XD 
 ;;9002226.02101,"169,W22.19XD ",.03)
 ;;30
 ;;9002226.02101,"169,W22.19XS ",.01)
 ;;W22.19XS 
 ;;9002226.02101,"169,W22.19XS ",.02)
 ;;W22.19XS 
 ;;9002226.02101,"169,W22.19XS ",.03)
 ;;30
 ;;9002226.02101,"169,W22.8XXA ",.01)
 ;;W22.8XXA 
 ;;9002226.02101,"169,W22.8XXA ",.02)
 ;;W22.8XXA 
 ;;9002226.02101,"169,W22.8XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W22.8XXD ",.01)
 ;;W22.8XXD 
 ;;9002226.02101,"169,W22.8XXD ",.02)
 ;;W22.8XXD 
 ;;9002226.02101,"169,W22.8XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W22.8XXS ",.01)
 ;;W22.8XXS 
 ;;9002226.02101,"169,W22.8XXS ",.02)
 ;;W22.8XXS 
 ;;9002226.02101,"169,W22.8XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W23.0XXA ",.01)
 ;;W23.0XXA 
 ;;9002226.02101,"169,W23.0XXA ",.02)
 ;;W23.0XXA 
 ;;9002226.02101,"169,W23.0XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W23.0XXD ",.01)
 ;;W23.0XXD 
 ;;9002226.02101,"169,W23.0XXD ",.02)
 ;;W23.0XXD 
 ;;9002226.02101,"169,W23.0XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W23.0XXS ",.01)
 ;;W23.0XXS 
 ;;9002226.02101,"169,W23.0XXS ",.02)
 ;;W23.0XXS 
 ;;9002226.02101,"169,W23.0XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W23.1XXA ",.01)
 ;;W23.1XXA 
 ;;9002226.02101,"169,W23.1XXA ",.02)
 ;;W23.1XXA 
 ;;9002226.02101,"169,W23.1XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W23.1XXD ",.01)
 ;;W23.1XXD 
 ;;9002226.02101,"169,W23.1XXD ",.02)
 ;;W23.1XXD 
 ;;9002226.02101,"169,W23.1XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W23.1XXS ",.01)
 ;;W23.1XXS 
 ;;9002226.02101,"169,W23.1XXS ",.02)
 ;;W23.1XXS 
 ;;9002226.02101,"169,W23.1XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W24.0XXA ",.01)
 ;;W24.0XXA 
 ;;9002226.02101,"169,W24.0XXA ",.02)
 ;;W24.0XXA 
 ;;9002226.02101,"169,W24.0XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W24.0XXD ",.01)
 ;;W24.0XXD 
 ;;9002226.02101,"169,W24.0XXD ",.02)
 ;;W24.0XXD 
 ;;9002226.02101,"169,W24.0XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W24.0XXS ",.01)
 ;;W24.0XXS 
 ;;9002226.02101,"169,W24.0XXS ",.02)
 ;;W24.0XXS 
 ;;9002226.02101,"169,W24.0XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W24.1XXA ",.01)
 ;;W24.1XXA 
 ;;9002226.02101,"169,W24.1XXA ",.02)
 ;;W24.1XXA 
 ;;9002226.02101,"169,W24.1XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W24.1XXD ",.01)
 ;;W24.1XXD 
 ;;9002226.02101,"169,W24.1XXD ",.02)
 ;;W24.1XXD 
 ;;9002226.02101,"169,W24.1XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W24.1XXS ",.01)
 ;;W24.1XXS 
 ;;9002226.02101,"169,W24.1XXS ",.02)
 ;;W24.1XXS 
 ;;9002226.02101,"169,W24.1XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W30.0XXA ",.01)
 ;;W30.0XXA 
 ;;9002226.02101,"169,W30.0XXA ",.02)
 ;;W30.0XXA 
 ;;9002226.02101,"169,W30.0XXA ",.03)
 ;;30