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

ATXXA134.m

Go to the documentation of this file.
ATXXA134 ;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,T20.111A ",.01)
 ;;T20.111A
 ;;9002226.02101,"873,T20.111A ",.02)
 ;;T20.111A
 ;;9002226.02101,"873,T20.111A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.112A ",.01)
 ;;T20.112A
 ;;9002226.02101,"873,T20.112A ",.02)
 ;;T20.112A
 ;;9002226.02101,"873,T20.112A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.119A ",.01)
 ;;T20.119A
 ;;9002226.02101,"873,T20.119A ",.02)
 ;;T20.119A
 ;;9002226.02101,"873,T20.119A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.12XA ",.01)
 ;;T20.12XA
 ;;9002226.02101,"873,T20.12XA ",.02)
 ;;T20.12XA
 ;;9002226.02101,"873,T20.12XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.13XA ",.01)
 ;;T20.13XA
 ;;9002226.02101,"873,T20.13XA ",.02)
 ;;T20.13XA
 ;;9002226.02101,"873,T20.13XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.14XA ",.01)
 ;;T20.14XA
 ;;9002226.02101,"873,T20.14XA ",.02)
 ;;T20.14XA
 ;;9002226.02101,"873,T20.14XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.15XA ",.01)
 ;;T20.15XA
 ;;9002226.02101,"873,T20.15XA ",.02)
 ;;T20.15XA
 ;;9002226.02101,"873,T20.15XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.16XA ",.01)
 ;;T20.16XA
 ;;9002226.02101,"873,T20.16XA ",.02)
 ;;T20.16XA
 ;;9002226.02101,"873,T20.16XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.17XA ",.01)
 ;;T20.17XA
 ;;9002226.02101,"873,T20.17XA ",.02)
 ;;T20.17XA
 ;;9002226.02101,"873,T20.17XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.19XA ",.01)
 ;;T20.19XA
 ;;9002226.02101,"873,T20.19XA ",.02)
 ;;T20.19XA
 ;;9002226.02101,"873,T20.19XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.20XA ",.01)
 ;;T20.20XA
 ;;9002226.02101,"873,T20.20XA ",.02)
 ;;T20.20XA
 ;;9002226.02101,"873,T20.20XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.211A ",.01)
 ;;T20.211A
 ;;9002226.02101,"873,T20.211A ",.02)
 ;;T20.211A
 ;;9002226.02101,"873,T20.211A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.212A ",.01)
 ;;T20.212A
 ;;9002226.02101,"873,T20.212A ",.02)
 ;;T20.212A
 ;;9002226.02101,"873,T20.212A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.219A ",.01)
 ;;T20.219A
 ;;9002226.02101,"873,T20.219A ",.02)
 ;;T20.219A
 ;;9002226.02101,"873,T20.219A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.22XA ",.01)
 ;;T20.22XA
 ;;9002226.02101,"873,T20.22XA ",.02)
 ;;T20.22XA
 ;;9002226.02101,"873,T20.22XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.23XA ",.01)
 ;;T20.23XA
 ;;9002226.02101,"873,T20.23XA ",.02)
 ;;T20.23XA
 ;;9002226.02101,"873,T20.23XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.24XA ",.01)
 ;;T20.24XA
 ;;9002226.02101,"873,T20.24XA ",.02)
 ;;T20.24XA
 ;;9002226.02101,"873,T20.24XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.25XA ",.01)
 ;;T20.25XA
 ;;9002226.02101,"873,T20.25XA ",.02)
 ;;T20.25XA
 ;;9002226.02101,"873,T20.25XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.26XA ",.01)
 ;;T20.26XA
 ;;9002226.02101,"873,T20.26XA ",.02)
 ;;T20.26XA
 ;;9002226.02101,"873,T20.26XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.27XA ",.01)
 ;;T20.27XA
 ;;9002226.02101,"873,T20.27XA ",.02)
 ;;T20.27XA
 ;;9002226.02101,"873,T20.27XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.29XA ",.01)
 ;;T20.29XA
 ;;9002226.02101,"873,T20.29XA ",.02)
 ;;T20.29XA
 ;;9002226.02101,"873,T20.29XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.30XA ",.01)
 ;;T20.30XA
 ;;9002226.02101,"873,T20.30XA ",.02)
 ;;T20.30XA
 ;;9002226.02101,"873,T20.30XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.311A ",.01)
 ;;T20.311A
 ;;9002226.02101,"873,T20.311A ",.02)
 ;;T20.311A
 ;;9002226.02101,"873,T20.311A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.312A ",.01)
 ;;T20.312A
 ;;9002226.02101,"873,T20.312A ",.02)
 ;;T20.312A
 ;;9002226.02101,"873,T20.312A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.319A ",.01)
 ;;T20.319A
 ;;9002226.02101,"873,T20.319A ",.02)
 ;;T20.319A
 ;;9002226.02101,"873,T20.319A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.32XA ",.01)
 ;;T20.32XA
 ;;9002226.02101,"873,T20.32XA ",.02)
 ;;T20.32XA
 ;;9002226.02101,"873,T20.32XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.33XA ",.01)
 ;;T20.33XA
 ;;9002226.02101,"873,T20.33XA ",.02)
 ;;T20.33XA
 ;;9002226.02101,"873,T20.33XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.34XA ",.01)
 ;;T20.34XA
 ;;9002226.02101,"873,T20.34XA ",.02)
 ;;T20.34XA
 ;;9002226.02101,"873,T20.34XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.35XA ",.01)
 ;;T20.35XA
 ;;9002226.02101,"873,T20.35XA ",.02)
 ;;T20.35XA
 ;;9002226.02101,"873,T20.35XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.36XA ",.01)
 ;;T20.36XA
 ;;9002226.02101,"873,T20.36XA ",.02)
 ;;T20.36XA
 ;;9002226.02101,"873,T20.36XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.37XA ",.01)
 ;;T20.37XA
 ;;9002226.02101,"873,T20.37XA ",.02)
 ;;T20.37XA
 ;;9002226.02101,"873,T20.37XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.39XA ",.01)
 ;;T20.39XA
 ;;9002226.02101,"873,T20.39XA ",.02)
 ;;T20.39XA
 ;;9002226.02101,"873,T20.39XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.40XA ",.01)
 ;;T20.40XA
 ;;9002226.02101,"873,T20.40XA ",.02)
 ;;T20.40XA
 ;;9002226.02101,"873,T20.40XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.411A ",.01)
 ;;T20.411A
 ;;9002226.02101,"873,T20.411A ",.02)
 ;;T20.411A
 ;;9002226.02101,"873,T20.411A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.412A ",.01)
 ;;T20.412A
 ;;9002226.02101,"873,T20.412A ",.02)
 ;;T20.412A
 ;;9002226.02101,"873,T20.412A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.419A ",.01)
 ;;T20.419A
 ;;9002226.02101,"873,T20.419A ",.02)
 ;;T20.419A
 ;;9002226.02101,"873,T20.419A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.42XA ",.01)
 ;;T20.42XA
 ;;9002226.02101,"873,T20.42XA ",.02)
 ;;T20.42XA
 ;;9002226.02101,"873,T20.42XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.43XA ",.01)
 ;;T20.43XA
 ;;9002226.02101,"873,T20.43XA ",.02)
 ;;T20.43XA
 ;;9002226.02101,"873,T20.43XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.44XA ",.01)
 ;;T20.44XA
 ;;9002226.02101,"873,T20.44XA ",.02)
 ;;T20.44XA
 ;;9002226.02101,"873,T20.44XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.45XA ",.01)
 ;;T20.45XA
 ;;9002226.02101,"873,T20.45XA ",.02)
 ;;T20.45XA
 ;;9002226.02101,"873,T20.45XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.46XA ",.01)
 ;;T20.46XA
 ;;9002226.02101,"873,T20.46XA ",.02)
 ;;T20.46XA
 ;;9002226.02101,"873,T20.46XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.47XA ",.01)
 ;;T20.47XA
 ;;9002226.02101,"873,T20.47XA ",.02)
 ;;T20.47XA
 ;;9002226.02101,"873,T20.47XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.49XA ",.01)
 ;;T20.49XA
 ;;9002226.02101,"873,T20.49XA ",.02)
 ;;T20.49XA
 ;;9002226.02101,"873,T20.49XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.50XA ",.01)
 ;;T20.50XA
 ;;9002226.02101,"873,T20.50XA ",.02)
 ;;T20.50XA
 ;;9002226.02101,"873,T20.50XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.511A ",.01)
 ;;T20.511A
 ;;9002226.02101,"873,T20.511A ",.02)
 ;;T20.511A
 ;;9002226.02101,"873,T20.511A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.512A ",.01)
 ;;T20.512A
 ;;9002226.02101,"873,T20.512A ",.02)
 ;;T20.512A
 ;;9002226.02101,"873,T20.512A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.519A ",.01)
 ;;T20.519A
 ;;9002226.02101,"873,T20.519A ",.02)
 ;;T20.519A
 ;;9002226.02101,"873,T20.519A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.52XA ",.01)
 ;;T20.52XA
 ;;9002226.02101,"873,T20.52XA ",.02)
 ;;T20.52XA
 ;;9002226.02101,"873,T20.52XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.53XA ",.01)
 ;;T20.53XA
 ;;9002226.02101,"873,T20.53XA ",.02)
 ;;T20.53XA
 ;;9002226.02101,"873,T20.53XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.54XA ",.01)
 ;;T20.54XA
 ;;9002226.02101,"873,T20.54XA ",.02)
 ;;T20.54XA
 ;;9002226.02101,"873,T20.54XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.55XA ",.01)
 ;;T20.55XA
 ;;9002226.02101,"873,T20.55XA ",.02)
 ;;T20.55XA
 ;;9002226.02101,"873,T20.55XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.56XA ",.01)
 ;;T20.56XA
 ;;9002226.02101,"873,T20.56XA ",.02)
 ;;T20.56XA
 ;;9002226.02101,"873,T20.56XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.57XA ",.01)
 ;;T20.57XA
 ;;9002226.02101,"873,T20.57XA ",.02)
 ;;T20.57XA
 ;;9002226.02101,"873,T20.57XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.59XA ",.01)
 ;;T20.59XA
 ;;9002226.02101,"873,T20.59XA ",.02)
 ;;T20.59XA
 ;;9002226.02101,"873,T20.59XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.60XA ",.01)
 ;;T20.60XA
 ;;9002226.02101,"873,T20.60XA ",.02)
 ;;T20.60XA
 ;;9002226.02101,"873,T20.60XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.611A ",.01)
 ;;T20.611A
 ;;9002226.02101,"873,T20.611A ",.02)
 ;;T20.611A
 ;;9002226.02101,"873,T20.611A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.612A ",.01)
 ;;T20.612A
 ;;9002226.02101,"873,T20.612A ",.02)
 ;;T20.612A
 ;;9002226.02101,"873,T20.612A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.619A ",.01)
 ;;T20.619A
 ;;9002226.02101,"873,T20.619A ",.02)
 ;;T20.619A
 ;;9002226.02101,"873,T20.619A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.62XA ",.01)
 ;;T20.62XA
 ;;9002226.02101,"873,T20.62XA ",.02)
 ;;T20.62XA
 ;;9002226.02101,"873,T20.62XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.63XA ",.01)
 ;;T20.63XA
 ;;9002226.02101,"873,T20.63XA ",.02)
 ;;T20.63XA
 ;;9002226.02101,"873,T20.63XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.64XA ",.01)
 ;;T20.64XA
 ;;9002226.02101,"873,T20.64XA ",.02)
 ;;T20.64XA
 ;;9002226.02101,"873,T20.64XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.65XA ",.01)
 ;;T20.65XA
 ;;9002226.02101,"873,T20.65XA ",.02)
 ;;T20.65XA
 ;;9002226.02101,"873,T20.65XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.66XA ",.01)
 ;;T20.66XA
 ;;9002226.02101,"873,T20.66XA ",.02)
 ;;T20.66XA
 ;;9002226.02101,"873,T20.66XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.67XA ",.01)
 ;;T20.67XA
 ;;9002226.02101,"873,T20.67XA ",.02)
 ;;T20.67XA
 ;;9002226.02101,"873,T20.67XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.69XA ",.01)
 ;;T20.69XA
 ;;9002226.02101,"873,T20.69XA ",.02)
 ;;T20.69XA
 ;;9002226.02101,"873,T20.69XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.70XA ",.01)
 ;;T20.70XA
 ;;9002226.02101,"873,T20.70XA ",.02)
 ;;T20.70XA
 ;;9002226.02101,"873,T20.70XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.711A ",.01)
 ;;T20.711A
 ;;9002226.02101,"873,T20.711A ",.02)
 ;;T20.711A
 ;;9002226.02101,"873,T20.711A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.712A ",.01)
 ;;T20.712A
 ;;9002226.02101,"873,T20.712A ",.02)
 ;;T20.712A
 ;;9002226.02101,"873,T20.712A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.719A ",.01)
 ;;T20.719A
 ;;9002226.02101,"873,T20.719A ",.02)
 ;;T20.719A
 ;;9002226.02101,"873,T20.719A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.72XA ",.01)
 ;;T20.72XA
 ;;9002226.02101,"873,T20.72XA ",.02)
 ;;T20.72XA
 ;;9002226.02101,"873,T20.72XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.73XA ",.01)
 ;;T20.73XA
 ;;9002226.02101,"873,T20.73XA ",.02)
 ;;T20.73XA
 ;;9002226.02101,"873,T20.73XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.74XA ",.01)
 ;;T20.74XA
 ;;9002226.02101,"873,T20.74XA ",.02)
 ;;T20.74XA
 ;;9002226.02101,"873,T20.74XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.75XA ",.01)
 ;;T20.75XA
 ;;9002226.02101,"873,T20.75XA ",.02)
 ;;T20.75XA
 ;;9002226.02101,"873,T20.75XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.76XA ",.01)
 ;;T20.76XA
 ;;9002226.02101,"873,T20.76XA ",.02)
 ;;T20.76XA
 ;;9002226.02101,"873,T20.76XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.77XA ",.01)
 ;;T20.77XA
 ;;9002226.02101,"873,T20.77XA ",.02)
 ;;T20.77XA
 ;;9002226.02101,"873,T20.77XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.79XA ",.01)
 ;;T20.79XA
 ;;9002226.02101,"873,T20.79XA ",.02)
 ;;T20.79XA
 ;;9002226.02101,"873,T20.79XA ",.03)
 ;;30
 ;;9002226.02101,"873,T21.00XA ",.01)
 ;;T21.00XA
 ;;9002226.02101,"873,T21.00XA ",.02)
 ;;T21.00XA
 ;;9002226.02101,"873,T21.00XA ",.03)
 ;;30
 ;;9002226.02101,"873,T21.01XA ",.01)
 ;;T21.01XA
 ;;9002226.02101,"873,T21.01XA ",.02)
 ;;T21.01XA
 ;;9002226.02101,"873,T21.01XA ",.03)
 ;;30
 ;;9002226.02101,"873,T21.02XA ",.01)
 ;;T21.02XA