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

ATXXA157.m

Go to the documentation of this file.
ATXXA157 ;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,T56.3X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.3X4A ",.01)
 ;;T56.3X4A
 ;;9002226.02101,"873,T56.3X4A ",.02)
 ;;T56.3X4A
 ;;9002226.02101,"873,T56.3X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.4X1A ",.01)
 ;;T56.4X1A
 ;;9002226.02101,"873,T56.4X1A ",.02)
 ;;T56.4X1A
 ;;9002226.02101,"873,T56.4X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.4X2A ",.01)
 ;;T56.4X2A
 ;;9002226.02101,"873,T56.4X2A ",.02)
 ;;T56.4X2A
 ;;9002226.02101,"873,T56.4X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.4X3A ",.01)
 ;;T56.4X3A
 ;;9002226.02101,"873,T56.4X3A ",.02)
 ;;T56.4X3A
 ;;9002226.02101,"873,T56.4X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.4X4A ",.01)
 ;;T56.4X4A
 ;;9002226.02101,"873,T56.4X4A ",.02)
 ;;T56.4X4A
 ;;9002226.02101,"873,T56.4X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.5X1A ",.01)
 ;;T56.5X1A
 ;;9002226.02101,"873,T56.5X1A ",.02)
 ;;T56.5X1A
 ;;9002226.02101,"873,T56.5X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.5X2A ",.01)
 ;;T56.5X2A
 ;;9002226.02101,"873,T56.5X2A ",.02)
 ;;T56.5X2A
 ;;9002226.02101,"873,T56.5X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.5X3A ",.01)
 ;;T56.5X3A
 ;;9002226.02101,"873,T56.5X3A ",.02)
 ;;T56.5X3A
 ;;9002226.02101,"873,T56.5X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.5X4A ",.01)
 ;;T56.5X4A
 ;;9002226.02101,"873,T56.5X4A ",.02)
 ;;T56.5X4A
 ;;9002226.02101,"873,T56.5X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.6X1A ",.01)
 ;;T56.6X1A
 ;;9002226.02101,"873,T56.6X1A ",.02)
 ;;T56.6X1A
 ;;9002226.02101,"873,T56.6X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.6X2A ",.01)
 ;;T56.6X2A
 ;;9002226.02101,"873,T56.6X2A ",.02)
 ;;T56.6X2A
 ;;9002226.02101,"873,T56.6X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.6X3A ",.01)
 ;;T56.6X3A
 ;;9002226.02101,"873,T56.6X3A ",.02)
 ;;T56.6X3A
 ;;9002226.02101,"873,T56.6X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.6X4A ",.01)
 ;;T56.6X4A
 ;;9002226.02101,"873,T56.6X4A ",.02)
 ;;T56.6X4A
 ;;9002226.02101,"873,T56.6X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.7X1A ",.01)
 ;;T56.7X1A
 ;;9002226.02101,"873,T56.7X1A ",.02)
 ;;T56.7X1A
 ;;9002226.02101,"873,T56.7X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.7X2A ",.01)
 ;;T56.7X2A
 ;;9002226.02101,"873,T56.7X2A ",.02)
 ;;T56.7X2A
 ;;9002226.02101,"873,T56.7X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.7X3A ",.01)
 ;;T56.7X3A
 ;;9002226.02101,"873,T56.7X3A ",.02)
 ;;T56.7X3A
 ;;9002226.02101,"873,T56.7X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.7X4A ",.01)
 ;;T56.7X4A
 ;;9002226.02101,"873,T56.7X4A ",.02)
 ;;T56.7X4A
 ;;9002226.02101,"873,T56.7X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.811A ",.01)
 ;;T56.811A
 ;;9002226.02101,"873,T56.811A ",.02)
 ;;T56.811A
 ;;9002226.02101,"873,T56.811A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.812A ",.01)
 ;;T56.812A
 ;;9002226.02101,"873,T56.812A ",.02)
 ;;T56.812A
 ;;9002226.02101,"873,T56.812A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.813A ",.01)
 ;;T56.813A
 ;;9002226.02101,"873,T56.813A ",.02)
 ;;T56.813A
 ;;9002226.02101,"873,T56.813A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.814A ",.01)
 ;;T56.814A
 ;;9002226.02101,"873,T56.814A ",.02)
 ;;T56.814A
 ;;9002226.02101,"873,T56.814A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.891A ",.01)
 ;;T56.891A
 ;;9002226.02101,"873,T56.891A ",.02)
 ;;T56.891A
 ;;9002226.02101,"873,T56.891A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.892A ",.01)
 ;;T56.892A
 ;;9002226.02101,"873,T56.892A ",.02)
 ;;T56.892A
 ;;9002226.02101,"873,T56.892A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.893A ",.01)
 ;;T56.893A
 ;;9002226.02101,"873,T56.893A ",.02)
 ;;T56.893A
 ;;9002226.02101,"873,T56.893A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.894A ",.01)
 ;;T56.894A
 ;;9002226.02101,"873,T56.894A ",.02)
 ;;T56.894A
 ;;9002226.02101,"873,T56.894A ",.03)
 ;;30
 ;;9002226.02101,"873,T56.91XA ",.01)
 ;;T56.91XA
 ;;9002226.02101,"873,T56.91XA ",.02)
 ;;T56.91XA
 ;;9002226.02101,"873,T56.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,T56.92XA ",.01)
 ;;T56.92XA
 ;;9002226.02101,"873,T56.92XA ",.02)
 ;;T56.92XA
 ;;9002226.02101,"873,T56.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,T56.93XA ",.01)
 ;;T56.93XA
 ;;9002226.02101,"873,T56.93XA ",.02)
 ;;T56.93XA
 ;;9002226.02101,"873,T56.93XA ",.03)
 ;;30
 ;;9002226.02101,"873,T56.94XA ",.01)
 ;;T56.94XA
 ;;9002226.02101,"873,T56.94XA ",.02)
 ;;T56.94XA
 ;;9002226.02101,"873,T56.94XA ",.03)
 ;;30
 ;;9002226.02101,"873,T57.0X1A ",.01)
 ;;T57.0X1A
 ;;9002226.02101,"873,T57.0X1A ",.02)
 ;;T57.0X1A
 ;;9002226.02101,"873,T57.0X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.0X2A ",.01)
 ;;T57.0X2A
 ;;9002226.02101,"873,T57.0X2A ",.02)
 ;;T57.0X2A
 ;;9002226.02101,"873,T57.0X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.0X3A ",.01)
 ;;T57.0X3A
 ;;9002226.02101,"873,T57.0X3A ",.02)
 ;;T57.0X3A
 ;;9002226.02101,"873,T57.0X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.0X4A ",.01)
 ;;T57.0X4A
 ;;9002226.02101,"873,T57.0X4A ",.02)
 ;;T57.0X4A
 ;;9002226.02101,"873,T57.0X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.1X1A ",.01)
 ;;T57.1X1A
 ;;9002226.02101,"873,T57.1X1A ",.02)
 ;;T57.1X1A
 ;;9002226.02101,"873,T57.1X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.1X2A ",.01)
 ;;T57.1X2A
 ;;9002226.02101,"873,T57.1X2A ",.02)
 ;;T57.1X2A
 ;;9002226.02101,"873,T57.1X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.1X3A ",.01)
 ;;T57.1X3A
 ;;9002226.02101,"873,T57.1X3A ",.02)
 ;;T57.1X3A
 ;;9002226.02101,"873,T57.1X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.1X4A ",.01)
 ;;T57.1X4A
 ;;9002226.02101,"873,T57.1X4A ",.02)
 ;;T57.1X4A
 ;;9002226.02101,"873,T57.1X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.2X1A ",.01)
 ;;T57.2X1A
 ;;9002226.02101,"873,T57.2X1A ",.02)
 ;;T57.2X1A
 ;;9002226.02101,"873,T57.2X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.2X2A ",.01)
 ;;T57.2X2A
 ;;9002226.02101,"873,T57.2X2A ",.02)
 ;;T57.2X2A
 ;;9002226.02101,"873,T57.2X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.2X3A ",.01)
 ;;T57.2X3A
 ;;9002226.02101,"873,T57.2X3A ",.02)
 ;;T57.2X3A
 ;;9002226.02101,"873,T57.2X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.2X4A ",.01)
 ;;T57.2X4A
 ;;9002226.02101,"873,T57.2X4A ",.02)
 ;;T57.2X4A
 ;;9002226.02101,"873,T57.2X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.3X1A ",.01)
 ;;T57.3X1A
 ;;9002226.02101,"873,T57.3X1A ",.02)
 ;;T57.3X1A
 ;;9002226.02101,"873,T57.3X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.3X2A ",.01)
 ;;T57.3X2A
 ;;9002226.02101,"873,T57.3X2A ",.02)
 ;;T57.3X2A
 ;;9002226.02101,"873,T57.3X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.3X3A ",.01)
 ;;T57.3X3A
 ;;9002226.02101,"873,T57.3X3A ",.02)
 ;;T57.3X3A
 ;;9002226.02101,"873,T57.3X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.3X4A ",.01)
 ;;T57.3X4A
 ;;9002226.02101,"873,T57.3X4A ",.02)
 ;;T57.3X4A
 ;;9002226.02101,"873,T57.3X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.8X1A ",.01)
 ;;T57.8X1A
 ;;9002226.02101,"873,T57.8X1A ",.02)
 ;;T57.8X1A
 ;;9002226.02101,"873,T57.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.8X2A ",.01)
 ;;T57.8X2A
 ;;9002226.02101,"873,T57.8X2A ",.02)
 ;;T57.8X2A
 ;;9002226.02101,"873,T57.8X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.8X3A ",.01)
 ;;T57.8X3A
 ;;9002226.02101,"873,T57.8X3A ",.02)
 ;;T57.8X3A
 ;;9002226.02101,"873,T57.8X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.8X4A ",.01)
 ;;T57.8X4A
 ;;9002226.02101,"873,T57.8X4A ",.02)
 ;;T57.8X4A
 ;;9002226.02101,"873,T57.8X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T57.91XA ",.01)
 ;;T57.91XA
 ;;9002226.02101,"873,T57.91XA ",.02)
 ;;T57.91XA
 ;;9002226.02101,"873,T57.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,T57.92XA ",.01)
 ;;T57.92XA
 ;;9002226.02101,"873,T57.92XA ",.02)
 ;;T57.92XA
 ;;9002226.02101,"873,T57.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,T57.93XA ",.01)
 ;;T57.93XA
 ;;9002226.02101,"873,T57.93XA ",.02)
 ;;T57.93XA
 ;;9002226.02101,"873,T57.93XA ",.03)
 ;;30
 ;;9002226.02101,"873,T57.94XA ",.01)
 ;;T57.94XA
 ;;9002226.02101,"873,T57.94XA ",.02)
 ;;T57.94XA
 ;;9002226.02101,"873,T57.94XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.01XA ",.01)
 ;;T58.01XA
 ;;9002226.02101,"873,T58.01XA ",.02)
 ;;T58.01XA
 ;;9002226.02101,"873,T58.01XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.02XA ",.01)
 ;;T58.02XA
 ;;9002226.02101,"873,T58.02XA ",.02)
 ;;T58.02XA
 ;;9002226.02101,"873,T58.02XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.03XA ",.01)
 ;;T58.03XA
 ;;9002226.02101,"873,T58.03XA ",.02)
 ;;T58.03XA
 ;;9002226.02101,"873,T58.03XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.04XA ",.01)
 ;;T58.04XA
 ;;9002226.02101,"873,T58.04XA ",.02)
 ;;T58.04XA
 ;;9002226.02101,"873,T58.04XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.11XA ",.01)
 ;;T58.11XA
 ;;9002226.02101,"873,T58.11XA ",.02)
 ;;T58.11XA
 ;;9002226.02101,"873,T58.11XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.12XA ",.01)
 ;;T58.12XA
 ;;9002226.02101,"873,T58.12XA ",.02)
 ;;T58.12XA
 ;;9002226.02101,"873,T58.12XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.13XA ",.01)
 ;;T58.13XA
 ;;9002226.02101,"873,T58.13XA ",.02)
 ;;T58.13XA
 ;;9002226.02101,"873,T58.13XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.14XA ",.01)
 ;;T58.14XA
 ;;9002226.02101,"873,T58.14XA ",.02)
 ;;T58.14XA
 ;;9002226.02101,"873,T58.14XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.2X1A ",.01)
 ;;T58.2X1A
 ;;9002226.02101,"873,T58.2X1A ",.02)
 ;;T58.2X1A
 ;;9002226.02101,"873,T58.2X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T58.2X2A ",.01)
 ;;T58.2X2A
 ;;9002226.02101,"873,T58.2X2A ",.02)
 ;;T58.2X2A
 ;;9002226.02101,"873,T58.2X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T58.2X3A ",.01)
 ;;T58.2X3A
 ;;9002226.02101,"873,T58.2X3A ",.02)
 ;;T58.2X3A
 ;;9002226.02101,"873,T58.2X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T58.2X4A ",.01)
 ;;T58.2X4A
 ;;9002226.02101,"873,T58.2X4A ",.02)
 ;;T58.2X4A
 ;;9002226.02101,"873,T58.2X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T58.8X1A ",.01)
 ;;T58.8X1A
 ;;9002226.02101,"873,T58.8X1A ",.02)
 ;;T58.8X1A
 ;;9002226.02101,"873,T58.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T58.8X2A ",.01)
 ;;T58.8X2A
 ;;9002226.02101,"873,T58.8X2A ",.02)
 ;;T58.8X2A
 ;;9002226.02101,"873,T58.8X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T58.8X3A ",.01)
 ;;T58.8X3A
 ;;9002226.02101,"873,T58.8X3A ",.02)
 ;;T58.8X3A
 ;;9002226.02101,"873,T58.8X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T58.8X4A ",.01)
 ;;T58.8X4A
 ;;9002226.02101,"873,T58.8X4A ",.02)
 ;;T58.8X4A
 ;;9002226.02101,"873,T58.8X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T58.91XA ",.01)
 ;;T58.91XA
 ;;9002226.02101,"873,T58.91XA ",.02)
 ;;T58.91XA
 ;;9002226.02101,"873,T58.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.92XA ",.01)
 ;;T58.92XA
 ;;9002226.02101,"873,T58.92XA ",.02)
 ;;T58.92XA
 ;;9002226.02101,"873,T58.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.93XA ",.01)
 ;;T58.93XA
 ;;9002226.02101,"873,T58.93XA ",.02)
 ;;T58.93XA
 ;;9002226.02101,"873,T58.93XA ",.03)
 ;;30
 ;;9002226.02101,"873,T58.94XA ",.01)
 ;;T58.94XA
 ;;9002226.02101,"873,T58.94XA ",.02)
 ;;T58.94XA
 ;;9002226.02101,"873,T58.94XA ",.03)
 ;;30
 ;;9002226.02101,"873,T59.0X1A ",.01)
 ;;T59.0X1A
 ;;9002226.02101,"873,T59.0X1A ",.02)
 ;;T59.0X1A
 ;;9002226.02101,"873,T59.0X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T59.0X2A ",.01)
 ;;T59.0X2A
 ;;9002226.02101,"873,T59.0X2A ",.02)
 ;;T59.0X2A
 ;;9002226.02101,"873,T59.0X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T59.0X3A ",.01)
 ;;T59.0X3A
 ;;9002226.02101,"873,T59.0X3A ",.02)
 ;;T59.0X3A
 ;;9002226.02101,"873,T59.0X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T59.0X4A ",.01)
 ;;T59.0X4A
 ;;9002226.02101,"873,T59.0X4A ",.02)
 ;;T59.0X4A
 ;;9002226.02101,"873,T59.0X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T59.1X1A ",.01)
 ;;T59.1X1A
 ;;9002226.02101,"873,T59.1X1A ",.02)
 ;;T59.1X1A
 ;;9002226.02101,"873,T59.1X1A ",.03)
 ;;30