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

ATXXA152.m

Go to the documentation of this file.
ATXXA152 ;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,T45.604A ",.01)
 ;;T45.604A
 ;;9002226.02101,"873,T45.604A ",.02)
 ;;T45.604A
 ;;9002226.02101,"873,T45.604A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.611A ",.01)
 ;;T45.611A
 ;;9002226.02101,"873,T45.611A ",.02)
 ;;T45.611A
 ;;9002226.02101,"873,T45.611A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.612A ",.01)
 ;;T45.612A
 ;;9002226.02101,"873,T45.612A ",.02)
 ;;T45.612A
 ;;9002226.02101,"873,T45.612A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.613A ",.01)
 ;;T45.613A
 ;;9002226.02101,"873,T45.613A ",.02)
 ;;T45.613A
 ;;9002226.02101,"873,T45.613A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.614A ",.01)
 ;;T45.614A
 ;;9002226.02101,"873,T45.614A ",.02)
 ;;T45.614A
 ;;9002226.02101,"873,T45.614A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.621A ",.01)
 ;;T45.621A
 ;;9002226.02101,"873,T45.621A ",.02)
 ;;T45.621A
 ;;9002226.02101,"873,T45.621A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.622A ",.01)
 ;;T45.622A
 ;;9002226.02101,"873,T45.622A ",.02)
 ;;T45.622A
 ;;9002226.02101,"873,T45.622A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.623A ",.01)
 ;;T45.623A
 ;;9002226.02101,"873,T45.623A ",.02)
 ;;T45.623A
 ;;9002226.02101,"873,T45.623A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.624A ",.01)
 ;;T45.624A
 ;;9002226.02101,"873,T45.624A ",.02)
 ;;T45.624A
 ;;9002226.02101,"873,T45.624A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.691A ",.01)
 ;;T45.691A
 ;;9002226.02101,"873,T45.691A ",.02)
 ;;T45.691A
 ;;9002226.02101,"873,T45.691A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.692A ",.01)
 ;;T45.692A
 ;;9002226.02101,"873,T45.692A ",.02)
 ;;T45.692A
 ;;9002226.02101,"873,T45.692A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.693A ",.01)
 ;;T45.693A
 ;;9002226.02101,"873,T45.693A ",.02)
 ;;T45.693A
 ;;9002226.02101,"873,T45.693A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.694A ",.01)
 ;;T45.694A
 ;;9002226.02101,"873,T45.694A ",.02)
 ;;T45.694A
 ;;9002226.02101,"873,T45.694A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.7X1A ",.01)
 ;;T45.7X1A
 ;;9002226.02101,"873,T45.7X1A ",.02)
 ;;T45.7X1A
 ;;9002226.02101,"873,T45.7X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.7X2A ",.01)
 ;;T45.7X2A
 ;;9002226.02101,"873,T45.7X2A ",.02)
 ;;T45.7X2A
 ;;9002226.02101,"873,T45.7X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.7X3A ",.01)
 ;;T45.7X3A
 ;;9002226.02101,"873,T45.7X3A ",.02)
 ;;T45.7X3A
 ;;9002226.02101,"873,T45.7X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.7X4A ",.01)
 ;;T45.7X4A
 ;;9002226.02101,"873,T45.7X4A ",.02)
 ;;T45.7X4A
 ;;9002226.02101,"873,T45.7X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.8X1A ",.01)
 ;;T45.8X1A
 ;;9002226.02101,"873,T45.8X1A ",.02)
 ;;T45.8X1A
 ;;9002226.02101,"873,T45.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.8X2A ",.01)
 ;;T45.8X2A
 ;;9002226.02101,"873,T45.8X2A ",.02)
 ;;T45.8X2A
 ;;9002226.02101,"873,T45.8X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.8X3A ",.01)
 ;;T45.8X3A
 ;;9002226.02101,"873,T45.8X3A ",.02)
 ;;T45.8X3A
 ;;9002226.02101,"873,T45.8X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.8X4A ",.01)
 ;;T45.8X4A
 ;;9002226.02101,"873,T45.8X4A ",.02)
 ;;T45.8X4A
 ;;9002226.02101,"873,T45.8X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T45.91XA ",.01)
 ;;T45.91XA
 ;;9002226.02101,"873,T45.91XA ",.02)
 ;;T45.91XA
 ;;9002226.02101,"873,T45.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,T45.92XA ",.01)
 ;;T45.92XA
 ;;9002226.02101,"873,T45.92XA ",.02)
 ;;T45.92XA
 ;;9002226.02101,"873,T45.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,T45.93XA ",.01)
 ;;T45.93XA
 ;;9002226.02101,"873,T45.93XA ",.02)
 ;;T45.93XA
 ;;9002226.02101,"873,T45.93XA ",.03)
 ;;30
 ;;9002226.02101,"873,T45.94XA ",.01)
 ;;T45.94XA
 ;;9002226.02101,"873,T45.94XA ",.02)
 ;;T45.94XA
 ;;9002226.02101,"873,T45.94XA ",.03)
 ;;30
 ;;9002226.02101,"873,T46.0X1A ",.01)
 ;;T46.0X1A
 ;;9002226.02101,"873,T46.0X1A ",.02)
 ;;T46.0X1A
 ;;9002226.02101,"873,T46.0X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.0X2A ",.01)
 ;;T46.0X2A
 ;;9002226.02101,"873,T46.0X2A ",.02)
 ;;T46.0X2A
 ;;9002226.02101,"873,T46.0X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.0X3A ",.01)
 ;;T46.0X3A
 ;;9002226.02101,"873,T46.0X3A ",.02)
 ;;T46.0X3A
 ;;9002226.02101,"873,T46.0X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.0X4A ",.01)
 ;;T46.0X4A
 ;;9002226.02101,"873,T46.0X4A ",.02)
 ;;T46.0X4A
 ;;9002226.02101,"873,T46.0X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.1X1A ",.01)
 ;;T46.1X1A
 ;;9002226.02101,"873,T46.1X1A ",.02)
 ;;T46.1X1A
 ;;9002226.02101,"873,T46.1X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.1X2A ",.01)
 ;;T46.1X2A
 ;;9002226.02101,"873,T46.1X2A ",.02)
 ;;T46.1X2A
 ;;9002226.02101,"873,T46.1X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.1X3A ",.01)
 ;;T46.1X3A
 ;;9002226.02101,"873,T46.1X3A ",.02)
 ;;T46.1X3A
 ;;9002226.02101,"873,T46.1X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.1X4A ",.01)
 ;;T46.1X4A
 ;;9002226.02101,"873,T46.1X4A ",.02)
 ;;T46.1X4A
 ;;9002226.02101,"873,T46.1X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.2X1A ",.01)
 ;;T46.2X1A
 ;;9002226.02101,"873,T46.2X1A ",.02)
 ;;T46.2X1A
 ;;9002226.02101,"873,T46.2X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.2X2A ",.01)
 ;;T46.2X2A
 ;;9002226.02101,"873,T46.2X2A ",.02)
 ;;T46.2X2A
 ;;9002226.02101,"873,T46.2X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.2X3A ",.01)
 ;;T46.2X3A
 ;;9002226.02101,"873,T46.2X3A ",.02)
 ;;T46.2X3A
 ;;9002226.02101,"873,T46.2X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.2X4A ",.01)
 ;;T46.2X4A
 ;;9002226.02101,"873,T46.2X4A ",.02)
 ;;T46.2X4A
 ;;9002226.02101,"873,T46.2X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.3X1A ",.01)
 ;;T46.3X1A
 ;;9002226.02101,"873,T46.3X1A ",.02)
 ;;T46.3X1A
 ;;9002226.02101,"873,T46.3X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.3X2A ",.01)
 ;;T46.3X2A
 ;;9002226.02101,"873,T46.3X2A ",.02)
 ;;T46.3X2A
 ;;9002226.02101,"873,T46.3X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.3X3A ",.01)
 ;;T46.3X3A
 ;;9002226.02101,"873,T46.3X3A ",.02)
 ;;T46.3X3A
 ;;9002226.02101,"873,T46.3X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.3X4A ",.01)
 ;;T46.3X4A
 ;;9002226.02101,"873,T46.3X4A ",.02)
 ;;T46.3X4A
 ;;9002226.02101,"873,T46.3X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.4X1A ",.01)
 ;;T46.4X1A
 ;;9002226.02101,"873,T46.4X1A ",.02)
 ;;T46.4X1A
 ;;9002226.02101,"873,T46.4X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.4X2A ",.01)
 ;;T46.4X2A
 ;;9002226.02101,"873,T46.4X2A ",.02)
 ;;T46.4X2A
 ;;9002226.02101,"873,T46.4X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.4X3A ",.01)
 ;;T46.4X3A
 ;;9002226.02101,"873,T46.4X3A ",.02)
 ;;T46.4X3A
 ;;9002226.02101,"873,T46.4X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.4X4A ",.01)
 ;;T46.4X4A
 ;;9002226.02101,"873,T46.4X4A ",.02)
 ;;T46.4X4A
 ;;9002226.02101,"873,T46.4X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.5X1A ",.01)
 ;;T46.5X1A
 ;;9002226.02101,"873,T46.5X1A ",.02)
 ;;T46.5X1A
 ;;9002226.02101,"873,T46.5X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.5X2A ",.01)
 ;;T46.5X2A
 ;;9002226.02101,"873,T46.5X2A ",.02)
 ;;T46.5X2A
 ;;9002226.02101,"873,T46.5X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.5X3A ",.01)
 ;;T46.5X3A
 ;;9002226.02101,"873,T46.5X3A ",.02)
 ;;T46.5X3A
 ;;9002226.02101,"873,T46.5X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.5X4A ",.01)
 ;;T46.5X4A
 ;;9002226.02101,"873,T46.5X4A ",.02)
 ;;T46.5X4A
 ;;9002226.02101,"873,T46.5X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.6X1A ",.01)
 ;;T46.6X1A
 ;;9002226.02101,"873,T46.6X1A ",.02)
 ;;T46.6X1A
 ;;9002226.02101,"873,T46.6X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.6X2A ",.01)
 ;;T46.6X2A
 ;;9002226.02101,"873,T46.6X2A ",.02)
 ;;T46.6X2A
 ;;9002226.02101,"873,T46.6X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.6X3A ",.01)
 ;;T46.6X3A
 ;;9002226.02101,"873,T46.6X3A ",.02)
 ;;T46.6X3A
 ;;9002226.02101,"873,T46.6X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.6X4A ",.01)
 ;;T46.6X4A
 ;;9002226.02101,"873,T46.6X4A ",.02)
 ;;T46.6X4A
 ;;9002226.02101,"873,T46.6X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.7X1A ",.01)
 ;;T46.7X1A
 ;;9002226.02101,"873,T46.7X1A ",.02)
 ;;T46.7X1A
 ;;9002226.02101,"873,T46.7X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.7X2A ",.01)
 ;;T46.7X2A
 ;;9002226.02101,"873,T46.7X2A ",.02)
 ;;T46.7X2A
 ;;9002226.02101,"873,T46.7X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.7X3A ",.01)
 ;;T46.7X3A
 ;;9002226.02101,"873,T46.7X3A ",.02)
 ;;T46.7X3A
 ;;9002226.02101,"873,T46.7X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.7X4A ",.01)
 ;;T46.7X4A
 ;;9002226.02101,"873,T46.7X4A ",.02)
 ;;T46.7X4A
 ;;9002226.02101,"873,T46.7X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.8X1A ",.01)
 ;;T46.8X1A
 ;;9002226.02101,"873,T46.8X1A ",.02)
 ;;T46.8X1A
 ;;9002226.02101,"873,T46.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.8X2A ",.01)
 ;;T46.8X2A
 ;;9002226.02101,"873,T46.8X2A ",.02)
 ;;T46.8X2A
 ;;9002226.02101,"873,T46.8X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.8X3A ",.01)
 ;;T46.8X3A
 ;;9002226.02101,"873,T46.8X3A ",.02)
 ;;T46.8X3A
 ;;9002226.02101,"873,T46.8X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.8X4A ",.01)
 ;;T46.8X4A
 ;;9002226.02101,"873,T46.8X4A ",.02)
 ;;T46.8X4A
 ;;9002226.02101,"873,T46.8X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.901A ",.01)
 ;;T46.901A
 ;;9002226.02101,"873,T46.901A ",.02)
 ;;T46.901A
 ;;9002226.02101,"873,T46.901A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.902A ",.01)
 ;;T46.902A
 ;;9002226.02101,"873,T46.902A ",.02)
 ;;T46.902A
 ;;9002226.02101,"873,T46.902A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.903A ",.01)
 ;;T46.903A
 ;;9002226.02101,"873,T46.903A ",.02)
 ;;T46.903A
 ;;9002226.02101,"873,T46.903A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.904A ",.01)
 ;;T46.904A
 ;;9002226.02101,"873,T46.904A ",.02)
 ;;T46.904A
 ;;9002226.02101,"873,T46.904A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.991A ",.01)
 ;;T46.991A
 ;;9002226.02101,"873,T46.991A ",.02)
 ;;T46.991A
 ;;9002226.02101,"873,T46.991A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.992A ",.01)
 ;;T46.992A
 ;;9002226.02101,"873,T46.992A ",.02)
 ;;T46.992A
 ;;9002226.02101,"873,T46.992A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.993A ",.01)
 ;;T46.993A
 ;;9002226.02101,"873,T46.993A ",.02)
 ;;T46.993A
 ;;9002226.02101,"873,T46.993A ",.03)
 ;;30
 ;;9002226.02101,"873,T46.994A ",.01)
 ;;T46.994A
 ;;9002226.02101,"873,T46.994A ",.02)
 ;;T46.994A
 ;;9002226.02101,"873,T46.994A ",.03)
 ;;30
 ;;9002226.02101,"873,T47.0X1A ",.01)
 ;;T47.0X1A
 ;;9002226.02101,"873,T47.0X1A ",.02)
 ;;T47.0X1A
 ;;9002226.02101,"873,T47.0X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T47.0X2A ",.01)
 ;;T47.0X2A
 ;;9002226.02101,"873,T47.0X2A ",.02)
 ;;T47.0X2A
 ;;9002226.02101,"873,T47.0X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T47.0X3A ",.01)
 ;;T47.0X3A
 ;;9002226.02101,"873,T47.0X3A ",.02)
 ;;T47.0X3A
 ;;9002226.02101,"873,T47.0X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T47.0X4A ",.01)
 ;;T47.0X4A
 ;;9002226.02101,"873,T47.0X4A ",.02)
 ;;T47.0X4A
 ;;9002226.02101,"873,T47.0X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T47.1X1A ",.01)
 ;;T47.1X1A
 ;;9002226.02101,"873,T47.1X1A ",.02)
 ;;T47.1X1A
 ;;9002226.02101,"873,T47.1X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T47.1X2A ",.01)
 ;;T47.1X2A
 ;;9002226.02101,"873,T47.1X2A ",.02)
 ;;T47.1X2A
 ;;9002226.02101,"873,T47.1X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T47.1X3A ",.01)
 ;;T47.1X3A
 ;;9002226.02101,"873,T47.1X3A ",.02)
 ;;T47.1X3A
 ;;9002226.02101,"873,T47.1X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T47.1X4A ",.01)
 ;;T47.1X4A
 ;;9002226.02101,"873,T47.1X4A ",.02)
 ;;T47.1X4A
 ;;9002226.02101,"873,T47.1X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T47.2X1A ",.01)
 ;;T47.2X1A
 ;;9002226.02101,"873,T47.2X1A ",.02)
 ;;T47.2X1A
 ;;9002226.02101,"873,T47.2X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T47.2X2A ",.01)
 ;;T47.2X2A