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

ATXXA45.m

Go to the documentation of this file.
ATXXA45 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
 ;;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,"873,S30.846A ",.01)
 ;;S30.846A
 ;;9002226.02101,"873,S30.846A ",.02)
 ;;S30.846A
 ;;9002226.02101,"873,S30.846A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.850A ",.01)
 ;;S30.850A
 ;;9002226.02101,"873,S30.850A ",.02)
 ;;S30.850A
 ;;9002226.02101,"873,S30.850A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.851A ",.01)
 ;;S30.851A
 ;;9002226.02101,"873,S30.851A ",.02)
 ;;S30.851A
 ;;9002226.02101,"873,S30.851A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.852A ",.01)
 ;;S30.852A
 ;;9002226.02101,"873,S30.852A ",.02)
 ;;S30.852A
 ;;9002226.02101,"873,S30.852A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.853A ",.01)
 ;;S30.853A
 ;;9002226.02101,"873,S30.853A ",.02)
 ;;S30.853A
 ;;9002226.02101,"873,S30.853A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.854A ",.01)
 ;;S30.854A
 ;;9002226.02101,"873,S30.854A ",.02)
 ;;S30.854A
 ;;9002226.02101,"873,S30.854A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.855A ",.01)
 ;;S30.855A
 ;;9002226.02101,"873,S30.855A ",.02)
 ;;S30.855A
 ;;9002226.02101,"873,S30.855A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.856A ",.01)
 ;;S30.856A
 ;;9002226.02101,"873,S30.856A ",.02)
 ;;S30.856A
 ;;9002226.02101,"873,S30.856A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.857A ",.01)
 ;;S30.857A
 ;;9002226.02101,"873,S30.857A ",.02)
 ;;S30.857A
 ;;9002226.02101,"873,S30.857A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.870A ",.01)
 ;;S30.870A
 ;;9002226.02101,"873,S30.870A ",.02)
 ;;S30.870A
 ;;9002226.02101,"873,S30.870A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.871A ",.01)
 ;;S30.871A
 ;;9002226.02101,"873,S30.871A ",.02)
 ;;S30.871A
 ;;9002226.02101,"873,S30.871A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.872A ",.01)
 ;;S30.872A
 ;;9002226.02101,"873,S30.872A ",.02)
 ;;S30.872A
 ;;9002226.02101,"873,S30.872A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.873A ",.01)
 ;;S30.873A
 ;;9002226.02101,"873,S30.873A ",.02)
 ;;S30.873A
 ;;9002226.02101,"873,S30.873A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.874A ",.01)
 ;;S30.874A
 ;;9002226.02101,"873,S30.874A ",.02)
 ;;S30.874A
 ;;9002226.02101,"873,S30.874A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.875A ",.01)
 ;;S30.875A
 ;;9002226.02101,"873,S30.875A ",.02)
 ;;S30.875A
 ;;9002226.02101,"873,S30.875A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.876A ",.01)
 ;;S30.876A
 ;;9002226.02101,"873,S30.876A ",.02)
 ;;S30.876A
 ;;9002226.02101,"873,S30.876A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.877A ",.01)
 ;;S30.877A
 ;;9002226.02101,"873,S30.877A ",.02)
 ;;S30.877A
 ;;9002226.02101,"873,S30.877A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.91XA ",.01)
 ;;S30.91XA
 ;;9002226.02101,"873,S30.91XA ",.02)
 ;;S30.91XA
 ;;9002226.02101,"873,S30.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.92XA ",.01)
 ;;S30.92XA
 ;;9002226.02101,"873,S30.92XA ",.02)
 ;;S30.92XA
 ;;9002226.02101,"873,S30.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.93XA ",.01)
 ;;S30.93XA
 ;;9002226.02101,"873,S30.93XA ",.02)
 ;;S30.93XA
 ;;9002226.02101,"873,S30.93XA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.94XA ",.01)
 ;;S30.94XA
 ;;9002226.02101,"873,S30.94XA ",.02)
 ;;S30.94XA
 ;;9002226.02101,"873,S30.94XA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.95XA ",.01)
 ;;S30.95XA
 ;;9002226.02101,"873,S30.95XA ",.02)
 ;;S30.95XA
 ;;9002226.02101,"873,S30.95XA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.96XA ",.01)
 ;;S30.96XA
 ;;9002226.02101,"873,S30.96XA ",.02)
 ;;S30.96XA
 ;;9002226.02101,"873,S30.96XA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.97XA ",.01)
 ;;S30.97XA
 ;;9002226.02101,"873,S30.97XA ",.02)
 ;;S30.97XA
 ;;9002226.02101,"873,S30.97XA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.98XA ",.01)
 ;;S30.98XA
 ;;9002226.02101,"873,S30.98XA ",.02)
 ;;S30.98XA
 ;;9002226.02101,"873,S30.98XA ",.03)
 ;;30
 ;;9002226.02101,"873,S31.000A ",.01)
 ;;S31.000A
 ;;9002226.02101,"873,S31.000A ",.02)
 ;;S31.000A
 ;;9002226.02101,"873,S31.000A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.001A ",.01)
 ;;S31.001A
 ;;9002226.02101,"873,S31.001A ",.02)
 ;;S31.001A
 ;;9002226.02101,"873,S31.001A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.010A ",.01)
 ;;S31.010A
 ;;9002226.02101,"873,S31.010A ",.02)
 ;;S31.010A
 ;;9002226.02101,"873,S31.010A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.011A ",.01)
 ;;S31.011A
 ;;9002226.02101,"873,S31.011A ",.02)
 ;;S31.011A
 ;;9002226.02101,"873,S31.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.020A ",.01)
 ;;S31.020A
 ;;9002226.02101,"873,S31.020A ",.02)
 ;;S31.020A
 ;;9002226.02101,"873,S31.020A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.021A ",.01)
 ;;S31.021A
 ;;9002226.02101,"873,S31.021A ",.02)
 ;;S31.021A
 ;;9002226.02101,"873,S31.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.030A ",.01)
 ;;S31.030A
 ;;9002226.02101,"873,S31.030A ",.02)
 ;;S31.030A
 ;;9002226.02101,"873,S31.030A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.031A ",.01)
 ;;S31.031A
 ;;9002226.02101,"873,S31.031A ",.02)
 ;;S31.031A
 ;;9002226.02101,"873,S31.031A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.040A ",.01)
 ;;S31.040A
 ;;9002226.02101,"873,S31.040A ",.02)
 ;;S31.040A
 ;;9002226.02101,"873,S31.040A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.041A ",.01)
 ;;S31.041A
 ;;9002226.02101,"873,S31.041A ",.02)
 ;;S31.041A
 ;;9002226.02101,"873,S31.041A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.050A ",.01)
 ;;S31.050A
 ;;9002226.02101,"873,S31.050A ",.02)
 ;;S31.050A
 ;;9002226.02101,"873,S31.050A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.051A ",.01)
 ;;S31.051A
 ;;9002226.02101,"873,S31.051A ",.02)
 ;;S31.051A
 ;;9002226.02101,"873,S31.051A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.100A ",.01)
 ;;S31.100A
 ;;9002226.02101,"873,S31.100A ",.02)
 ;;S31.100A
 ;;9002226.02101,"873,S31.100A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.101A ",.01)
 ;;S31.101A
 ;;9002226.02101,"873,S31.101A ",.02)
 ;;S31.101A
 ;;9002226.02101,"873,S31.101A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.102A ",.01)
 ;;S31.102A
 ;;9002226.02101,"873,S31.102A ",.02)
 ;;S31.102A
 ;;9002226.02101,"873,S31.102A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.103A ",.01)
 ;;S31.103A
 ;;9002226.02101,"873,S31.103A ",.02)
 ;;S31.103A
 ;;9002226.02101,"873,S31.103A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.104A ",.01)
 ;;S31.104A
 ;;9002226.02101,"873,S31.104A ",.02)
 ;;S31.104A
 ;;9002226.02101,"873,S31.104A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.105A ",.01)
 ;;S31.105A
 ;;9002226.02101,"873,S31.105A ",.02)
 ;;S31.105A
 ;;9002226.02101,"873,S31.105A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.109A ",.01)
 ;;S31.109A
 ;;9002226.02101,"873,S31.109A ",.02)
 ;;S31.109A
 ;;9002226.02101,"873,S31.109A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.110A ",.01)
 ;;S31.110A
 ;;9002226.02101,"873,S31.110A ",.02)
 ;;S31.110A
 ;;9002226.02101,"873,S31.110A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.111A ",.01)
 ;;S31.111A
 ;;9002226.02101,"873,S31.111A ",.02)
 ;;S31.111A
 ;;9002226.02101,"873,S31.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.112A ",.01)
 ;;S31.112A
 ;;9002226.02101,"873,S31.112A ",.02)
 ;;S31.112A
 ;;9002226.02101,"873,S31.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.113A ",.01)
 ;;S31.113A
 ;;9002226.02101,"873,S31.113A ",.02)
 ;;S31.113A
 ;;9002226.02101,"873,S31.113A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.114A ",.01)
 ;;S31.114A
 ;;9002226.02101,"873,S31.114A ",.02)
 ;;S31.114A
 ;;9002226.02101,"873,S31.114A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.115A ",.01)
 ;;S31.115A
 ;;9002226.02101,"873,S31.115A ",.02)
 ;;S31.115A
 ;;9002226.02101,"873,S31.115A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.119A ",.01)
 ;;S31.119A
 ;;9002226.02101,"873,S31.119A ",.02)
 ;;S31.119A
 ;;9002226.02101,"873,S31.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.120A ",.01)
 ;;S31.120A
 ;;9002226.02101,"873,S31.120A ",.02)
 ;;S31.120A
 ;;9002226.02101,"873,S31.120A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.121A ",.01)
 ;;S31.121A
 ;;9002226.02101,"873,S31.121A ",.02)
 ;;S31.121A
 ;;9002226.02101,"873,S31.121A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.122A ",.01)
 ;;S31.122A
 ;;9002226.02101,"873,S31.122A ",.02)
 ;;S31.122A
 ;;9002226.02101,"873,S31.122A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.123A ",.01)
 ;;S31.123A
 ;;9002226.02101,"873,S31.123A ",.02)
 ;;S31.123A
 ;;9002226.02101,"873,S31.123A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.124A ",.01)
 ;;S31.124A
 ;;9002226.02101,"873,S31.124A ",.02)
 ;;S31.124A
 ;;9002226.02101,"873,S31.124A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.125A ",.01)
 ;;S31.125A
 ;;9002226.02101,"873,S31.125A ",.02)
 ;;S31.125A
 ;;9002226.02101,"873,S31.125A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.129A ",.01)
 ;;S31.129A
 ;;9002226.02101,"873,S31.129A ",.02)
 ;;S31.129A
 ;;9002226.02101,"873,S31.129A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.130A ",.01)
 ;;S31.130A
 ;;9002226.02101,"873,S31.130A ",.02)
 ;;S31.130A
 ;;9002226.02101,"873,S31.130A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.131A ",.01)
 ;;S31.131A
 ;;9002226.02101,"873,S31.131A ",.02)
 ;;S31.131A
 ;;9002226.02101,"873,S31.131A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.132A ",.01)
 ;;S31.132A
 ;;9002226.02101,"873,S31.132A ",.02)
 ;;S31.132A
 ;;9002226.02101,"873,S31.132A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.133A ",.01)
 ;;S31.133A
 ;;9002226.02101,"873,S31.133A ",.02)
 ;;S31.133A
 ;;9002226.02101,"873,S31.133A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.134A ",.01)
 ;;S31.134A
 ;;9002226.02101,"873,S31.134A ",.02)
 ;;S31.134A
 ;;9002226.02101,"873,S31.134A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.135A ",.01)
 ;;S31.135A
 ;;9002226.02101,"873,S31.135A ",.02)
 ;;S31.135A
 ;;9002226.02101,"873,S31.135A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.139A ",.01)
 ;;S31.139A
 ;;9002226.02101,"873,S31.139A ",.02)
 ;;S31.139A
 ;;9002226.02101,"873,S31.139A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.140A ",.01)
 ;;S31.140A
 ;;9002226.02101,"873,S31.140A ",.02)
 ;;S31.140A
 ;;9002226.02101,"873,S31.140A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.141A ",.01)
 ;;S31.141A
 ;;9002226.02101,"873,S31.141A ",.02)
 ;;S31.141A
 ;;9002226.02101,"873,S31.141A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.142A ",.01)
 ;;S31.142A
 ;;9002226.02101,"873,S31.142A ",.02)
 ;;S31.142A
 ;;9002226.02101,"873,S31.142A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.143A ",.01)
 ;;S31.143A
 ;;9002226.02101,"873,S31.143A ",.02)
 ;;S31.143A
 ;;9002226.02101,"873,S31.143A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.144A ",.01)
 ;;S31.144A
 ;;9002226.02101,"873,S31.144A ",.02)
 ;;S31.144A
 ;;9002226.02101,"873,S31.144A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.145A ",.01)
 ;;S31.145A
 ;;9002226.02101,"873,S31.145A ",.02)
 ;;S31.145A
 ;;9002226.02101,"873,S31.145A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.149A ",.01)
 ;;S31.149A
 ;;9002226.02101,"873,S31.149A ",.02)
 ;;S31.149A
 ;;9002226.02101,"873,S31.149A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.150A ",.01)
 ;;S31.150A
 ;;9002226.02101,"873,S31.150A ",.02)
 ;;S31.150A
 ;;9002226.02101,"873,S31.150A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.151A ",.01)
 ;;S31.151A
 ;;9002226.02101,"873,S31.151A ",.02)
 ;;S31.151A
 ;;9002226.02101,"873,S31.151A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.152A ",.01)
 ;;S31.152A
 ;;9002226.02101,"873,S31.152A ",.02)
 ;;S31.152A
 ;;9002226.02101,"873,S31.152A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.153A ",.01)
 ;;S31.153A
 ;;9002226.02101,"873,S31.153A ",.02)
 ;;S31.153A
 ;;9002226.02101,"873,S31.153A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.154A ",.01)
 ;;S31.154A
 ;;9002226.02101,"873,S31.154A ",.02)
 ;;S31.154A
 ;;9002226.02101,"873,S31.154A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.155A ",.01)
 ;;S31.155A
 ;;9002226.02101,"873,S31.155A ",.02)
 ;;S31.155A
 ;;9002226.02101,"873,S31.155A ",.03)
 ;;30
 ;;9002226.02101,"873,S31.159A ",.01)
 ;;S31.159A