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

ATXD5P5.m

Go to the documentation of this file.
ATXD5P5 ;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,T68.XXXD ",.01)
 ;;T68.XXXD 
 ;;9002226.02101,"169,T68.XXXD ",.02)
 ;;T68.XXXD 
 ;;9002226.02101,"169,T68.XXXD ",.03)
 ;;30
 ;;9002226.02101,"169,T68.XXXS ",.01)
 ;;T68.XXXS 
 ;;9002226.02101,"169,T68.XXXS ",.02)
 ;;T68.XXXS 
 ;;9002226.02101,"169,T68.XXXS ",.03)
 ;;30
 ;;9002226.02101,"169,T71.111A ",.01)
 ;;T71.111A 
 ;;9002226.02101,"169,T71.111A ",.02)
 ;;T71.111A 
 ;;9002226.02101,"169,T71.111A ",.03)
 ;;30
 ;;9002226.02101,"169,T71.111D ",.01)
 ;;T71.111D 
 ;;9002226.02101,"169,T71.111D ",.02)
 ;;T71.111D 
 ;;9002226.02101,"169,T71.111D ",.03)
 ;;30
 ;;9002226.02101,"169,T71.111S ",.01)
 ;;T71.111S 
 ;;9002226.02101,"169,T71.111S ",.02)
 ;;T71.111S 
 ;;9002226.02101,"169,T71.111S ",.03)
 ;;30
 ;;9002226.02101,"169,T71.121A ",.01)
 ;;T71.121A 
 ;;9002226.02101,"169,T71.121A ",.02)
 ;;T71.121A 
 ;;9002226.02101,"169,T71.121A ",.03)
 ;;30
 ;;9002226.02101,"169,T71.121D ",.01)
 ;;T71.121D 
 ;;9002226.02101,"169,T71.121D ",.02)
 ;;T71.121D 
 ;;9002226.02101,"169,T71.121D ",.03)
 ;;30
 ;;9002226.02101,"169,T71.121S ",.01)
 ;;T71.121S 
 ;;9002226.02101,"169,T71.121S ",.02)
 ;;T71.121S 
 ;;9002226.02101,"169,T71.121S ",.03)
 ;;30
 ;;9002226.02101,"169,T71.131A ",.01)
 ;;T71.131A 
 ;;9002226.02101,"169,T71.131A ",.02)
 ;;T71.131A 
 ;;9002226.02101,"169,T71.131A ",.03)
 ;;30
 ;;9002226.02101,"169,T71.131D ",.01)
 ;;T71.131D 
 ;;9002226.02101,"169,T71.131D ",.02)
 ;;T71.131D 
 ;;9002226.02101,"169,T71.131D ",.03)
 ;;30
 ;;9002226.02101,"169,T71.131S ",.01)
 ;;T71.131S 
 ;;9002226.02101,"169,T71.131S ",.02)
 ;;T71.131S 
 ;;9002226.02101,"169,T71.131S ",.03)
 ;;30
 ;;9002226.02101,"169,T71.141A ",.01)
 ;;T71.141A 
 ;;9002226.02101,"169,T71.141A ",.02)
 ;;T71.141A 
 ;;9002226.02101,"169,T71.141A ",.03)
 ;;30
 ;;9002226.02101,"169,T71.141D ",.01)
 ;;T71.141D 
 ;;9002226.02101,"169,T71.141D ",.02)
 ;;T71.141D 
 ;;9002226.02101,"169,T71.141D ",.03)
 ;;30
 ;;9002226.02101,"169,T71.141S ",.01)
 ;;T71.141S 
 ;;9002226.02101,"169,T71.141S ",.02)
 ;;T71.141S 
 ;;9002226.02101,"169,T71.141S ",.03)
 ;;30
 ;;9002226.02101,"169,T71.151A ",.01)
 ;;T71.151A 
 ;;9002226.02101,"169,T71.151A ",.02)
 ;;T71.151A 
 ;;9002226.02101,"169,T71.151A ",.03)
 ;;30
 ;;9002226.02101,"169,T71.151D ",.01)
 ;;T71.151D 
 ;;9002226.02101,"169,T71.151D ",.02)
 ;;T71.151D 
 ;;9002226.02101,"169,T71.151D ",.03)
 ;;30
 ;;9002226.02101,"169,T71.151S ",.01)
 ;;T71.151S 
 ;;9002226.02101,"169,T71.151S ",.02)
 ;;T71.151S 
 ;;9002226.02101,"169,T71.151S ",.03)
 ;;30
 ;;9002226.02101,"169,T71.161A ",.01)
 ;;T71.161A 
 ;;9002226.02101,"169,T71.161A ",.02)
 ;;T71.161A 
 ;;9002226.02101,"169,T71.161A ",.03)
 ;;30
 ;;9002226.02101,"169,T71.161D ",.01)
 ;;T71.161D 
 ;;9002226.02101,"169,T71.161D ",.02)
 ;;T71.161D 
 ;;9002226.02101,"169,T71.161D ",.03)
 ;;30
 ;;9002226.02101,"169,T71.161S ",.01)
 ;;T71.161S 
 ;;9002226.02101,"169,T71.161S ",.02)
 ;;T71.161S 
 ;;9002226.02101,"169,T71.161S ",.03)
 ;;30
 ;;9002226.02101,"169,T71.191A ",.01)
 ;;T71.191A 
 ;;9002226.02101,"169,T71.191A ",.02)
 ;;T71.191A 
 ;;9002226.02101,"169,T71.191A ",.03)
 ;;30
 ;;9002226.02101,"169,T71.191D ",.01)
 ;;T71.191D 
 ;;9002226.02101,"169,T71.191D ",.02)
 ;;T71.191D 
 ;;9002226.02101,"169,T71.191D ",.03)
 ;;30
 ;;9002226.02101,"169,T71.191S ",.01)
 ;;T71.191S 
 ;;9002226.02101,"169,T71.191S ",.02)
 ;;T71.191S 
 ;;9002226.02101,"169,T71.191S ",.03)
 ;;30
 ;;9002226.02101,"169,T71.221A ",.01)
 ;;T71.221A 
 ;;9002226.02101,"169,T71.221A ",.02)
 ;;T71.221A 
 ;;9002226.02101,"169,T71.221A ",.03)
 ;;30
 ;;9002226.02101,"169,T71.221D ",.01)
 ;;T71.221D 
 ;;9002226.02101,"169,T71.221D ",.02)
 ;;T71.221D 
 ;;9002226.02101,"169,T71.221D ",.03)
 ;;30
 ;;9002226.02101,"169,T71.221S ",.01)
 ;;T71.221S 
 ;;9002226.02101,"169,T71.221S ",.02)
 ;;T71.221S 
 ;;9002226.02101,"169,T71.221S ",.03)
 ;;30
 ;;9002226.02101,"169,T71.231A ",.01)
 ;;T71.231A 
 ;;9002226.02101,"169,T71.231A ",.02)
 ;;T71.231A 
 ;;9002226.02101,"169,T71.231A ",.03)
 ;;30
 ;;9002226.02101,"169,T71.231D ",.01)
 ;;T71.231D 
 ;;9002226.02101,"169,T71.231D ",.02)
 ;;T71.231D 
 ;;9002226.02101,"169,T71.231D ",.03)
 ;;30
 ;;9002226.02101,"169,T71.231S ",.01)
 ;;T71.231S 
 ;;9002226.02101,"169,T71.231S ",.02)
 ;;T71.231S 
 ;;9002226.02101,"169,T71.231S ",.03)
 ;;30
 ;;9002226.02101,"169,V01.99XS ",.01)
 ;;V01.99XS 
 ;;9002226.02101,"169,V01.99XS ",.02)
 ;;V01.99XS 
 ;;9002226.02101,"169,V01.99XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.00XA ",.01)
 ;;V06.00XA 
 ;;9002226.02101,"169,V06.00XA ",.02)
 ;;V06.00XA 
 ;;9002226.02101,"169,V06.00XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.00XD ",.01)
 ;;V06.00XD 
 ;;9002226.02101,"169,V06.00XD ",.02)
 ;;V06.00XD 
 ;;9002226.02101,"169,V06.00XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.00XS ",.01)
 ;;V06.00XS 
 ;;9002226.02101,"169,V06.00XS ",.02)
 ;;V06.00XS 
 ;;9002226.02101,"169,V06.00XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.01XA ",.01)
 ;;V06.01XA 
 ;;9002226.02101,"169,V06.01XA ",.02)
 ;;V06.01XA 
 ;;9002226.02101,"169,V06.01XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.01XD ",.01)
 ;;V06.01XD 
 ;;9002226.02101,"169,V06.01XD ",.02)
 ;;V06.01XD 
 ;;9002226.02101,"169,V06.01XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.01XS ",.01)
 ;;V06.01XS 
 ;;9002226.02101,"169,V06.01XS ",.02)
 ;;V06.01XS 
 ;;9002226.02101,"169,V06.01XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.02XA ",.01)
 ;;V06.02XA 
 ;;9002226.02101,"169,V06.02XA ",.02)
 ;;V06.02XA 
 ;;9002226.02101,"169,V06.02XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.02XD ",.01)
 ;;V06.02XD 
 ;;9002226.02101,"169,V06.02XD ",.02)
 ;;V06.02XD 
 ;;9002226.02101,"169,V06.02XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.02XS ",.01)
 ;;V06.02XS 
 ;;9002226.02101,"169,V06.02XS ",.02)
 ;;V06.02XS 
 ;;9002226.02101,"169,V06.02XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.09XA ",.01)
 ;;V06.09XA 
 ;;9002226.02101,"169,V06.09XA ",.02)
 ;;V06.09XA 
 ;;9002226.02101,"169,V06.09XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.09XD ",.01)
 ;;V06.09XD 
 ;;9002226.02101,"169,V06.09XD ",.02)
 ;;V06.09XD 
 ;;9002226.02101,"169,V06.09XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.09XS ",.01)
 ;;V06.09XS 
 ;;9002226.02101,"169,V06.09XS ",.02)
 ;;V06.09XS 
 ;;9002226.02101,"169,V06.09XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.10XA ",.01)
 ;;V06.10XA 
 ;;9002226.02101,"169,V06.10XA ",.02)
 ;;V06.10XA 
 ;;9002226.02101,"169,V06.10XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.10XD ",.01)
 ;;V06.10XD 
 ;;9002226.02101,"169,V06.10XD ",.02)
 ;;V06.10XD 
 ;;9002226.02101,"169,V06.10XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.10XS ",.01)
 ;;V06.10XS 
 ;;9002226.02101,"169,V06.10XS ",.02)
 ;;V06.10XS 
 ;;9002226.02101,"169,V06.10XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.11XA ",.01)
 ;;V06.11XA 
 ;;9002226.02101,"169,V06.11XA ",.02)
 ;;V06.11XA 
 ;;9002226.02101,"169,V06.11XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.11XD ",.01)
 ;;V06.11XD 
 ;;9002226.02101,"169,V06.11XD ",.02)
 ;;V06.11XD 
 ;;9002226.02101,"169,V06.11XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.11XS ",.01)
 ;;V06.11XS 
 ;;9002226.02101,"169,V06.11XS ",.02)
 ;;V06.11XS 
 ;;9002226.02101,"169,V06.11XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.12XA ",.01)
 ;;V06.12XA 
 ;;9002226.02101,"169,V06.12XA ",.02)
 ;;V06.12XA 
 ;;9002226.02101,"169,V06.12XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.12XD ",.01)
 ;;V06.12XD 
 ;;9002226.02101,"169,V06.12XD ",.02)
 ;;V06.12XD 
 ;;9002226.02101,"169,V06.12XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.12XS ",.01)
 ;;V06.12XS 
 ;;9002226.02101,"169,V06.12XS ",.02)
 ;;V06.12XS 
 ;;9002226.02101,"169,V06.12XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.19XA ",.01)
 ;;V06.19XA 
 ;;9002226.02101,"169,V06.19XA ",.02)
 ;;V06.19XA 
 ;;9002226.02101,"169,V06.19XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.19XD ",.01)
 ;;V06.19XD 
 ;;9002226.02101,"169,V06.19XD ",.02)
 ;;V06.19XD 
 ;;9002226.02101,"169,V06.19XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.19XS ",.01)
 ;;V06.19XS 
 ;;9002226.02101,"169,V06.19XS ",.02)
 ;;V06.19XS 
 ;;9002226.02101,"169,V06.19XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.90XA ",.01)
 ;;V06.90XA 
 ;;9002226.02101,"169,V06.90XA ",.02)
 ;;V06.90XA 
 ;;9002226.02101,"169,V06.90XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.90XD ",.01)
 ;;V06.90XD 
 ;;9002226.02101,"169,V06.90XD ",.02)
 ;;V06.90XD 
 ;;9002226.02101,"169,V06.90XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.90XS ",.01)
 ;;V06.90XS 
 ;;9002226.02101,"169,V06.90XS ",.02)
 ;;V06.90XS 
 ;;9002226.02101,"169,V06.90XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.91XA ",.01)
 ;;V06.91XA 
 ;;9002226.02101,"169,V06.91XA ",.02)
 ;;V06.91XA 
 ;;9002226.02101,"169,V06.91XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.91XD ",.01)
 ;;V06.91XD 
 ;;9002226.02101,"169,V06.91XD ",.02)
 ;;V06.91XD 
 ;;9002226.02101,"169,V06.91XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.91XS ",.01)
 ;;V06.91XS 
 ;;9002226.02101,"169,V06.91XS ",.02)
 ;;V06.91XS 
 ;;9002226.02101,"169,V06.91XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.92XA ",.01)
 ;;V06.92XA 
 ;;9002226.02101,"169,V06.92XA ",.02)
 ;;V06.92XA 
 ;;9002226.02101,"169,V06.92XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.92XD ",.01)
 ;;V06.92XD 
 ;;9002226.02101,"169,V06.92XD ",.02)
 ;;V06.92XD 
 ;;9002226.02101,"169,V06.92XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.92XS ",.01)
 ;;V06.92XS 
 ;;9002226.02101,"169,V06.92XS ",.02)
 ;;V06.92XS 
 ;;9002226.02101,"169,V06.92XS ",.03)
 ;;30
 ;;9002226.02101,"169,V06.99XA ",.01)
 ;;V06.99XA 
 ;;9002226.02101,"169,V06.99XA ",.02)
 ;;V06.99XA 
 ;;9002226.02101,"169,V06.99XA ",.03)
 ;;30
 ;;9002226.02101,"169,V06.99XD ",.01)
 ;;V06.99XD 
 ;;9002226.02101,"169,V06.99XD ",.02)
 ;;V06.99XD 
 ;;9002226.02101,"169,V06.99XD ",.03)
 ;;30
 ;;9002226.02101,"169,V06.99XS ",.01)
 ;;V06.99XS 
 ;;9002226.02101,"169,V06.99XS ",.02)
 ;;V06.99XS 
 ;;9002226.02101,"169,V06.99XS ",.03)
 ;;30
 ;;9002226.02101,"169,V09.1XXA ",.01)
 ;;V09.1XXA 
 ;;9002226.02101,"169,V09.1XXA ",.02)
 ;;V09.1XXA 
 ;;9002226.02101,"169,V09.1XXA ",.03)
 ;;30
 ;;9002226.02101,"169,V09.1XXD ",.01)
 ;;V09.1XXD 
 ;;9002226.02101,"169,V09.1XXD ",.02)
 ;;V09.1XXD 
 ;;9002226.02101,"169,V09.1XXD ",.03)
 ;;30
 ;;9002226.02101,"169,V09.1XXS ",.01)
 ;;V09.1XXS 
 ;;9002226.02101,"169,V09.1XXS ",.02)
 ;;V09.1XXS 
 ;;9002226.02101,"169,V09.1XXS ",.03)
 ;;30
 ;;9002226.02101,"169,V09.3XXA ",.01)
 ;;V09.3XXA 
 ;;9002226.02101,"169,V09.3XXA ",.02)
 ;;V09.3XXA 
 ;;9002226.02101,"169,V09.3XXA ",.03)
 ;;30
 ;;9002226.02101,"169,V09.3XXD ",.01)
 ;;V09.3XXD 
 ;;9002226.02101,"169,V09.3XXD ",.02)
 ;;V09.3XXD 
 ;;9002226.02101,"169,V09.3XXD ",.03)
 ;;30
 ;;9002226.02101,"169,V09.3XXS ",.01)
 ;;V09.3XXS 
 ;;9002226.02101,"169,V09.3XXS ",.02)
 ;;V09.3XXS 
 ;;9002226.02101,"169,V09.3XXS ",.03)
 ;;30
 ;;9002226.02101,"169,V09.9XXA ",.01)
 ;;V09.9XXA 
 ;;9002226.02101,"169,V09.9XXA ",.02)
 ;;V09.9XXA 
 ;;9002226.02101,"169,V09.9XXA ",.03)
 ;;30
 ;;9002226.02101,"169,V09.9XXD ",.01)
 ;;V09.9XXD 
 ;;9002226.02101,"169,V09.9XXD ",.02)
 ;;V09.9XXD 
 ;;9002226.02101,"169,V09.9XXD ",.03)
 ;;30
 ;;9002226.02101,"169,V09.9XXS ",.01)
 ;;V09.9XXS 
 ;;9002226.02101,"169,V09.9XXS ",.02)
 ;;V09.9XXS 
 ;;9002226.02101,"169,V09.9XXS ",.03)
 ;;30
 ;;9002226.02101,"169,V10.0XXA ",.01)
 ;;V10.0XXA 
 ;;9002226.02101,"169,V10.0XXA ",.02)
 ;;V10.0XXA 
 ;;9002226.02101,"169,V10.0XXA ",.03)
 ;;30
 ;;9002226.02101,"169,V10.0XXD ",.01)
 ;;V10.0XXD 
 ;;9002226.02101,"169,V10.0XXD ",.02)
 ;;V10.0XXD 
 ;;9002226.02101,"169,V10.0XXD ",.03)
 ;;30
 ;;9002226.02101,"169,V10.0XXS ",.01)
 ;;V10.0XXS 
 ;;9002226.02101,"169,V10.0XXS ",.02)
 ;;V10.0XXS 
 ;;9002226.02101,"169,V10.0XXS ",.03)
 ;;30
 ;;9002226.02101,"169,V10.1XXA ",.01)
 ;;V10.1XXA 
 ;;9002226.02101,"169,V10.1XXA ",.02)
 ;;V10.1XXA 
 ;;9002226.02101,"169,V10.1XXA ",.03)
 ;;30
 ;;9002226.02101,"169,V10.1XXD ",.01)
 ;;V10.1XXD 
 ;;9002226.02101,"169,V10.1XXD ",.02)
 ;;V10.1XXD 
 ;;9002226.02101,"169,V10.1XXD ",.03)
 ;;30
 ;;9002226.02101,"169,V10.1XXS ",.01)
 ;;V10.1XXS 
 ;;9002226.02101,"169,V10.1XXS ",.02)
 ;;V10.1XXS 
 ;;9002226.02101,"169,V10.1XXS ",.03)
 ;;30
 ;;9002226.02101,"169,V10.2XXA ",.01)
 ;;V10.2XXA 
 ;;9002226.02101,"169,V10.2XXA ",.02)
 ;;V10.2XXA 
 ;;9002226.02101,"169,V10.2XXA ",.03)
 ;;30
 ;;9002226.02101,"169,V10.2XXD ",.01)
 ;;V10.2XXD 
 ;;9002226.02101,"169,V10.2XXD ",.02)
 ;;V10.2XXD 
 ;;9002226.02101,"169,V10.2XXD ",.03)
 ;;30
 ;;9002226.02101,"169,V10.2XXS ",.01)
 ;;V10.2XXS 
 ;;9002226.02101,"169,V10.2XXS ",.02)
 ;;V10.2XXS 
 ;;9002226.02101,"169,V10.2XXS ",.03)
 ;;30
 ;;9002226.02101,"169,V10.3XXA ",.01)
 ;;V10.3XXA 
 ;;9002226.02101,"169,V10.3XXA ",.02)
 ;;V10.3XXA 
 ;;9002226.02101,"169,V10.3XXA ",.03)
 ;;30
 ;;9002226.02101,"169,V10.3XXD ",.01)
 ;;V10.3XXD 
 ;;9002226.02101,"169,V10.3XXD ",.02)
 ;;V10.3XXD 
 ;;9002226.02101,"169,V10.3XXD ",.03)
 ;;30
 ;;9002226.02101,"169,V10.3XXS ",.01)
 ;;V10.3XXS 
 ;;9002226.02101,"169,V10.3XXS ",.02)
 ;;V10.3XXS 
 ;;9002226.02101,"169,V10.3XXS ",.03)
 ;;30
 ;;9002226.02101,"169,V10.4XXA ",.01)
 ;;V10.4XXA 
 ;;9002226.02101,"169,V10.4XXA ",.02)
 ;;V10.4XXA 
 ;;9002226.02101,"169,V10.4XXA ",.03)
 ;;30
 ;;9002226.02101,"169,V10.4XXD ",.01)
 ;;V10.4XXD 
 ;;9002226.02101,"169,V10.4XXD ",.02)
 ;;V10.4XXD 
 ;;9002226.02101,"169,V10.4XXD ",.03)
 ;;30
 ;;9002226.02101,"169,V10.4XXS ",.01)
 ;;V10.4XXS 
 ;;9002226.02101,"169,V10.4XXS ",.02)
 ;;V10.4XXS