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

ATXXA146.m

Go to the documentation of this file.
ATXXA146 ;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,T33.70XA ",.01)
 ;;T33.70XA
 ;;9002226.02101,"873,T33.70XA ",.02)
 ;;T33.70XA
 ;;9002226.02101,"873,T33.70XA ",.03)
 ;;30
 ;;9002226.02101,"873,T33.71XA ",.01)
 ;;T33.71XA
 ;;9002226.02101,"873,T33.71XA ",.02)
 ;;T33.71XA
 ;;9002226.02101,"873,T33.71XA ",.03)
 ;;30
 ;;9002226.02101,"873,T33.72XA ",.01)
 ;;T33.72XA
 ;;9002226.02101,"873,T33.72XA ",.02)
 ;;T33.72XA
 ;;9002226.02101,"873,T33.72XA ",.03)
 ;;30
 ;;9002226.02101,"873,T33.811A ",.01)
 ;;T33.811A
 ;;9002226.02101,"873,T33.811A ",.02)
 ;;T33.811A
 ;;9002226.02101,"873,T33.811A ",.03)
 ;;30
 ;;9002226.02101,"873,T33.812A ",.01)
 ;;T33.812A
 ;;9002226.02101,"873,T33.812A ",.02)
 ;;T33.812A
 ;;9002226.02101,"873,T33.812A ",.03)
 ;;30
 ;;9002226.02101,"873,T33.819A ",.01)
 ;;T33.819A
 ;;9002226.02101,"873,T33.819A ",.02)
 ;;T33.819A
 ;;9002226.02101,"873,T33.819A ",.03)
 ;;30
 ;;9002226.02101,"873,T33.821A ",.01)
 ;;T33.821A
 ;;9002226.02101,"873,T33.821A ",.02)
 ;;T33.821A
 ;;9002226.02101,"873,T33.821A ",.03)
 ;;30
 ;;9002226.02101,"873,T33.822A ",.01)
 ;;T33.822A
 ;;9002226.02101,"873,T33.822A ",.02)
 ;;T33.822A
 ;;9002226.02101,"873,T33.822A ",.03)
 ;;30
 ;;9002226.02101,"873,T33.829A ",.01)
 ;;T33.829A
 ;;9002226.02101,"873,T33.829A ",.02)
 ;;T33.829A
 ;;9002226.02101,"873,T33.829A ",.03)
 ;;30
 ;;9002226.02101,"873,T33.831A ",.01)
 ;;T33.831A
 ;;9002226.02101,"873,T33.831A ",.02)
 ;;T33.831A
 ;;9002226.02101,"873,T33.831A ",.03)
 ;;30
 ;;9002226.02101,"873,T33.832A ",.01)
 ;;T33.832A
 ;;9002226.02101,"873,T33.832A ",.02)
 ;;T33.832A
 ;;9002226.02101,"873,T33.832A ",.03)
 ;;30
 ;;9002226.02101,"873,T33.839A ",.01)
 ;;T33.839A
 ;;9002226.02101,"873,T33.839A ",.02)
 ;;T33.839A
 ;;9002226.02101,"873,T33.839A ",.03)
 ;;30
 ;;9002226.02101,"873,T33.90XA ",.01)
 ;;T33.90XA
 ;;9002226.02101,"873,T33.90XA ",.02)
 ;;T33.90XA
 ;;9002226.02101,"873,T33.90XA ",.03)
 ;;30
 ;;9002226.02101,"873,T33.99XA ",.01)
 ;;T33.99XA
 ;;9002226.02101,"873,T33.99XA ",.02)
 ;;T33.99XA
 ;;9002226.02101,"873,T33.99XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.011A ",.01)
 ;;T34.011A
 ;;9002226.02101,"873,T34.011A ",.02)
 ;;T34.011A
 ;;9002226.02101,"873,T34.011A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.012A ",.01)
 ;;T34.012A
 ;;9002226.02101,"873,T34.012A ",.02)
 ;;T34.012A
 ;;9002226.02101,"873,T34.012A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.019A ",.01)
 ;;T34.019A
 ;;9002226.02101,"873,T34.019A ",.02)
 ;;T34.019A
 ;;9002226.02101,"873,T34.019A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.02XA ",.01)
 ;;T34.02XA
 ;;9002226.02101,"873,T34.02XA ",.02)
 ;;T34.02XA
 ;;9002226.02101,"873,T34.02XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.09XA ",.01)
 ;;T34.09XA
 ;;9002226.02101,"873,T34.09XA ",.02)
 ;;T34.09XA
 ;;9002226.02101,"873,T34.09XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.1XXA ",.01)
 ;;T34.1XXA
 ;;9002226.02101,"873,T34.1XXA ",.02)
 ;;T34.1XXA
 ;;9002226.02101,"873,T34.1XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.2XXA ",.01)
 ;;T34.2XXA
 ;;9002226.02101,"873,T34.2XXA ",.02)
 ;;T34.2XXA
 ;;9002226.02101,"873,T34.2XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.3XXA ",.01)
 ;;T34.3XXA
 ;;9002226.02101,"873,T34.3XXA ",.02)
 ;;T34.3XXA
 ;;9002226.02101,"873,T34.3XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.40XA ",.01)
 ;;T34.40XA
 ;;9002226.02101,"873,T34.40XA ",.02)
 ;;T34.40XA
 ;;9002226.02101,"873,T34.40XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.41XA ",.01)
 ;;T34.41XA
 ;;9002226.02101,"873,T34.41XA ",.02)
 ;;T34.41XA
 ;;9002226.02101,"873,T34.41XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.42XA ",.01)
 ;;T34.42XA
 ;;9002226.02101,"873,T34.42XA ",.02)
 ;;T34.42XA
 ;;9002226.02101,"873,T34.42XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.511A ",.01)
 ;;T34.511A
 ;;9002226.02101,"873,T34.511A ",.02)
 ;;T34.511A
 ;;9002226.02101,"873,T34.511A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.512A ",.01)
 ;;T34.512A
 ;;9002226.02101,"873,T34.512A ",.02)
 ;;T34.512A
 ;;9002226.02101,"873,T34.512A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.519A ",.01)
 ;;T34.519A
 ;;9002226.02101,"873,T34.519A ",.02)
 ;;T34.519A
 ;;9002226.02101,"873,T34.519A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.521A ",.01)
 ;;T34.521A
 ;;9002226.02101,"873,T34.521A ",.02)
 ;;T34.521A
 ;;9002226.02101,"873,T34.521A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.522A ",.01)
 ;;T34.522A
 ;;9002226.02101,"873,T34.522A ",.02)
 ;;T34.522A
 ;;9002226.02101,"873,T34.522A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.529A ",.01)
 ;;T34.529A
 ;;9002226.02101,"873,T34.529A ",.02)
 ;;T34.529A
 ;;9002226.02101,"873,T34.529A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.531A ",.01)
 ;;T34.531A
 ;;9002226.02101,"873,T34.531A ",.02)
 ;;T34.531A
 ;;9002226.02101,"873,T34.531A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.532A ",.01)
 ;;T34.532A
 ;;9002226.02101,"873,T34.532A ",.02)
 ;;T34.532A
 ;;9002226.02101,"873,T34.532A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.539A ",.01)
 ;;T34.539A
 ;;9002226.02101,"873,T34.539A ",.02)
 ;;T34.539A
 ;;9002226.02101,"873,T34.539A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.60XA ",.01)
 ;;T34.60XA
 ;;9002226.02101,"873,T34.60XA ",.02)
 ;;T34.60XA
 ;;9002226.02101,"873,T34.60XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.61XA ",.01)
 ;;T34.61XA
 ;;9002226.02101,"873,T34.61XA ",.02)
 ;;T34.61XA
 ;;9002226.02101,"873,T34.61XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.62XA ",.01)
 ;;T34.62XA
 ;;9002226.02101,"873,T34.62XA ",.02)
 ;;T34.62XA
 ;;9002226.02101,"873,T34.62XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.70XA ",.01)
 ;;T34.70XA
 ;;9002226.02101,"873,T34.70XA ",.02)
 ;;T34.70XA
 ;;9002226.02101,"873,T34.70XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.71XA ",.01)
 ;;T34.71XA
 ;;9002226.02101,"873,T34.71XA ",.02)
 ;;T34.71XA
 ;;9002226.02101,"873,T34.71XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.72XA ",.01)
 ;;T34.72XA
 ;;9002226.02101,"873,T34.72XA ",.02)
 ;;T34.72XA
 ;;9002226.02101,"873,T34.72XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.811A ",.01)
 ;;T34.811A
 ;;9002226.02101,"873,T34.811A ",.02)
 ;;T34.811A
 ;;9002226.02101,"873,T34.811A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.812A ",.01)
 ;;T34.812A
 ;;9002226.02101,"873,T34.812A ",.02)
 ;;T34.812A
 ;;9002226.02101,"873,T34.812A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.819A ",.01)
 ;;T34.819A
 ;;9002226.02101,"873,T34.819A ",.02)
 ;;T34.819A
 ;;9002226.02101,"873,T34.819A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.821A ",.01)
 ;;T34.821A
 ;;9002226.02101,"873,T34.821A ",.02)
 ;;T34.821A
 ;;9002226.02101,"873,T34.821A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.822A ",.01)
 ;;T34.822A
 ;;9002226.02101,"873,T34.822A ",.02)
 ;;T34.822A
 ;;9002226.02101,"873,T34.822A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.829A ",.01)
 ;;T34.829A
 ;;9002226.02101,"873,T34.829A ",.02)
 ;;T34.829A
 ;;9002226.02101,"873,T34.829A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.831A ",.01)
 ;;T34.831A
 ;;9002226.02101,"873,T34.831A ",.02)
 ;;T34.831A
 ;;9002226.02101,"873,T34.831A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.832A ",.01)
 ;;T34.832A
 ;;9002226.02101,"873,T34.832A ",.02)
 ;;T34.832A
 ;;9002226.02101,"873,T34.832A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.839A ",.01)
 ;;T34.839A
 ;;9002226.02101,"873,T34.839A ",.02)
 ;;T34.839A
 ;;9002226.02101,"873,T34.839A ",.03)
 ;;30
 ;;9002226.02101,"873,T34.90XA ",.01)
 ;;T34.90XA
 ;;9002226.02101,"873,T34.90XA ",.02)
 ;;T34.90XA
 ;;9002226.02101,"873,T34.90XA ",.03)
 ;;30
 ;;9002226.02101,"873,T34.99XA ",.01)
 ;;T34.99XA
 ;;9002226.02101,"873,T34.99XA ",.02)
 ;;T34.99XA
 ;;9002226.02101,"873,T34.99XA ",.03)
 ;;30
 ;;9002226.02101,"873,T36.0X1A ",.01)
 ;;T36.0X1A
 ;;9002226.02101,"873,T36.0X1A ",.02)
 ;;T36.0X1A
 ;;9002226.02101,"873,T36.0X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.0X2A ",.01)
 ;;T36.0X2A
 ;;9002226.02101,"873,T36.0X2A ",.02)
 ;;T36.0X2A
 ;;9002226.02101,"873,T36.0X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.0X3A ",.01)
 ;;T36.0X3A
 ;;9002226.02101,"873,T36.0X3A ",.02)
 ;;T36.0X3A
 ;;9002226.02101,"873,T36.0X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.0X4A ",.01)
 ;;T36.0X4A
 ;;9002226.02101,"873,T36.0X4A ",.02)
 ;;T36.0X4A
 ;;9002226.02101,"873,T36.0X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.1X1A ",.01)
 ;;T36.1X1A
 ;;9002226.02101,"873,T36.1X1A ",.02)
 ;;T36.1X1A
 ;;9002226.02101,"873,T36.1X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.1X2A ",.01)
 ;;T36.1X2A
 ;;9002226.02101,"873,T36.1X2A ",.02)
 ;;T36.1X2A
 ;;9002226.02101,"873,T36.1X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.1X3A ",.01)
 ;;T36.1X3A
 ;;9002226.02101,"873,T36.1X3A ",.02)
 ;;T36.1X3A
 ;;9002226.02101,"873,T36.1X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.1X4A ",.01)
 ;;T36.1X4A
 ;;9002226.02101,"873,T36.1X4A ",.02)
 ;;T36.1X4A
 ;;9002226.02101,"873,T36.1X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.2X1A ",.01)
 ;;T36.2X1A
 ;;9002226.02101,"873,T36.2X1A ",.02)
 ;;T36.2X1A
 ;;9002226.02101,"873,T36.2X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.2X2A ",.01)
 ;;T36.2X2A
 ;;9002226.02101,"873,T36.2X2A ",.02)
 ;;T36.2X2A
 ;;9002226.02101,"873,T36.2X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.2X3A ",.01)
 ;;T36.2X3A
 ;;9002226.02101,"873,T36.2X3A ",.02)
 ;;T36.2X3A
 ;;9002226.02101,"873,T36.2X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.2X4A ",.01)
 ;;T36.2X4A
 ;;9002226.02101,"873,T36.2X4A ",.02)
 ;;T36.2X4A
 ;;9002226.02101,"873,T36.2X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.3X1A ",.01)
 ;;T36.3X1A
 ;;9002226.02101,"873,T36.3X1A ",.02)
 ;;T36.3X1A
 ;;9002226.02101,"873,T36.3X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.3X2A ",.01)
 ;;T36.3X2A
 ;;9002226.02101,"873,T36.3X2A ",.02)
 ;;T36.3X2A
 ;;9002226.02101,"873,T36.3X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.3X3A ",.01)
 ;;T36.3X3A
 ;;9002226.02101,"873,T36.3X3A ",.02)
 ;;T36.3X3A
 ;;9002226.02101,"873,T36.3X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.3X4A ",.01)
 ;;T36.3X4A
 ;;9002226.02101,"873,T36.3X4A ",.02)
 ;;T36.3X4A
 ;;9002226.02101,"873,T36.3X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.4X1A ",.01)
 ;;T36.4X1A
 ;;9002226.02101,"873,T36.4X1A ",.02)
 ;;T36.4X1A
 ;;9002226.02101,"873,T36.4X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.4X2A ",.01)
 ;;T36.4X2A
 ;;9002226.02101,"873,T36.4X2A ",.02)
 ;;T36.4X2A
 ;;9002226.02101,"873,T36.4X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.4X3A ",.01)
 ;;T36.4X3A
 ;;9002226.02101,"873,T36.4X3A ",.02)
 ;;T36.4X3A
 ;;9002226.02101,"873,T36.4X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.4X4A ",.01)
 ;;T36.4X4A
 ;;9002226.02101,"873,T36.4X4A ",.02)
 ;;T36.4X4A
 ;;9002226.02101,"873,T36.4X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.5X1A ",.01)
 ;;T36.5X1A
 ;;9002226.02101,"873,T36.5X1A ",.02)
 ;;T36.5X1A
 ;;9002226.02101,"873,T36.5X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.5X2A ",.01)
 ;;T36.5X2A
 ;;9002226.02101,"873,T36.5X2A ",.02)
 ;;T36.5X2A
 ;;9002226.02101,"873,T36.5X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.5X3A ",.01)
 ;;T36.5X3A
 ;;9002226.02101,"873,T36.5X3A ",.02)
 ;;T36.5X3A
 ;;9002226.02101,"873,T36.5X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.5X4A ",.01)
 ;;T36.5X4A
 ;;9002226.02101,"873,T36.5X4A ",.02)
 ;;T36.5X4A
 ;;9002226.02101,"873,T36.5X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.6X1A ",.01)
 ;;T36.6X1A
 ;;9002226.02101,"873,T36.6X1A ",.02)
 ;;T36.6X1A
 ;;9002226.02101,"873,T36.6X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.6X2A ",.01)
 ;;T36.6X2A
 ;;9002226.02101,"873,T36.6X2A ",.02)
 ;;T36.6X2A
 ;;9002226.02101,"873,T36.6X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.6X3A ",.01)
 ;;T36.6X3A
 ;;9002226.02101,"873,T36.6X3A ",.02)
 ;;T36.6X3A
 ;;9002226.02101,"873,T36.6X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T36.6X4A ",.01)
 ;;T36.6X4A