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

ATXXA148.m

Go to the documentation of this file.
ATXXA148 ;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,T38.802A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.803A ",.01)
 ;;T38.803A
 ;;9002226.02101,"873,T38.803A ",.02)
 ;;T38.803A
 ;;9002226.02101,"873,T38.803A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.804A ",.01)
 ;;T38.804A
 ;;9002226.02101,"873,T38.804A ",.02)
 ;;T38.804A
 ;;9002226.02101,"873,T38.804A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.811A ",.01)
 ;;T38.811A
 ;;9002226.02101,"873,T38.811A ",.02)
 ;;T38.811A
 ;;9002226.02101,"873,T38.811A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.812A ",.01)
 ;;T38.812A
 ;;9002226.02101,"873,T38.812A ",.02)
 ;;T38.812A
 ;;9002226.02101,"873,T38.812A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.813A ",.01)
 ;;T38.813A
 ;;9002226.02101,"873,T38.813A ",.02)
 ;;T38.813A
 ;;9002226.02101,"873,T38.813A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.814A ",.01)
 ;;T38.814A
 ;;9002226.02101,"873,T38.814A ",.02)
 ;;T38.814A
 ;;9002226.02101,"873,T38.814A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.891A ",.01)
 ;;T38.891A
 ;;9002226.02101,"873,T38.891A ",.02)
 ;;T38.891A
 ;;9002226.02101,"873,T38.891A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.892A ",.01)
 ;;T38.892A
 ;;9002226.02101,"873,T38.892A ",.02)
 ;;T38.892A
 ;;9002226.02101,"873,T38.892A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.893A ",.01)
 ;;T38.893A
 ;;9002226.02101,"873,T38.893A ",.02)
 ;;T38.893A
 ;;9002226.02101,"873,T38.893A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.894A ",.01)
 ;;T38.894A
 ;;9002226.02101,"873,T38.894A ",.02)
 ;;T38.894A
 ;;9002226.02101,"873,T38.894A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.901A ",.01)
 ;;T38.901A
 ;;9002226.02101,"873,T38.901A ",.02)
 ;;T38.901A
 ;;9002226.02101,"873,T38.901A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.902A ",.01)
 ;;T38.902A
 ;;9002226.02101,"873,T38.902A ",.02)
 ;;T38.902A
 ;;9002226.02101,"873,T38.902A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.903A ",.01)
 ;;T38.903A
 ;;9002226.02101,"873,T38.903A ",.02)
 ;;T38.903A
 ;;9002226.02101,"873,T38.903A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.904A ",.01)
 ;;T38.904A
 ;;9002226.02101,"873,T38.904A ",.02)
 ;;T38.904A
 ;;9002226.02101,"873,T38.904A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.991A ",.01)
 ;;T38.991A
 ;;9002226.02101,"873,T38.991A ",.02)
 ;;T38.991A
 ;;9002226.02101,"873,T38.991A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.992A ",.01)
 ;;T38.992A
 ;;9002226.02101,"873,T38.992A ",.02)
 ;;T38.992A
 ;;9002226.02101,"873,T38.992A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.993A ",.01)
 ;;T38.993A
 ;;9002226.02101,"873,T38.993A ",.02)
 ;;T38.993A
 ;;9002226.02101,"873,T38.993A ",.03)
 ;;30
 ;;9002226.02101,"873,T38.994A ",.01)
 ;;T38.994A
 ;;9002226.02101,"873,T38.994A ",.02)
 ;;T38.994A
 ;;9002226.02101,"873,T38.994A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.011A ",.01)
 ;;T39.011A
 ;;9002226.02101,"873,T39.011A ",.02)
 ;;T39.011A
 ;;9002226.02101,"873,T39.011A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.012A ",.01)
 ;;T39.012A
 ;;9002226.02101,"873,T39.012A ",.02)
 ;;T39.012A
 ;;9002226.02101,"873,T39.012A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.013A ",.01)
 ;;T39.013A
 ;;9002226.02101,"873,T39.013A ",.02)
 ;;T39.013A
 ;;9002226.02101,"873,T39.013A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.014A ",.01)
 ;;T39.014A
 ;;9002226.02101,"873,T39.014A ",.02)
 ;;T39.014A
 ;;9002226.02101,"873,T39.014A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.091A ",.01)
 ;;T39.091A
 ;;9002226.02101,"873,T39.091A ",.02)
 ;;T39.091A
 ;;9002226.02101,"873,T39.091A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.092A ",.01)
 ;;T39.092A
 ;;9002226.02101,"873,T39.092A ",.02)
 ;;T39.092A
 ;;9002226.02101,"873,T39.092A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.093A ",.01)
 ;;T39.093A
 ;;9002226.02101,"873,T39.093A ",.02)
 ;;T39.093A
 ;;9002226.02101,"873,T39.093A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.094A ",.01)
 ;;T39.094A
 ;;9002226.02101,"873,T39.094A ",.02)
 ;;T39.094A
 ;;9002226.02101,"873,T39.094A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.1X1A ",.01)
 ;;T39.1X1A
 ;;9002226.02101,"873,T39.1X1A ",.02)
 ;;T39.1X1A
 ;;9002226.02101,"873,T39.1X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.1X2A ",.01)
 ;;T39.1X2A
 ;;9002226.02101,"873,T39.1X2A ",.02)
 ;;T39.1X2A
 ;;9002226.02101,"873,T39.1X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.1X3A ",.01)
 ;;T39.1X3A
 ;;9002226.02101,"873,T39.1X3A ",.02)
 ;;T39.1X3A
 ;;9002226.02101,"873,T39.1X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.1X4A ",.01)
 ;;T39.1X4A
 ;;9002226.02101,"873,T39.1X4A ",.02)
 ;;T39.1X4A
 ;;9002226.02101,"873,T39.1X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.2X1A ",.01)
 ;;T39.2X1A
 ;;9002226.02101,"873,T39.2X1A ",.02)
 ;;T39.2X1A
 ;;9002226.02101,"873,T39.2X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.2X2A ",.01)
 ;;T39.2X2A
 ;;9002226.02101,"873,T39.2X2A ",.02)
 ;;T39.2X2A
 ;;9002226.02101,"873,T39.2X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.2X3A ",.01)
 ;;T39.2X3A
 ;;9002226.02101,"873,T39.2X3A ",.02)
 ;;T39.2X3A
 ;;9002226.02101,"873,T39.2X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.2X4A ",.01)
 ;;T39.2X4A
 ;;9002226.02101,"873,T39.2X4A ",.02)
 ;;T39.2X4A
 ;;9002226.02101,"873,T39.2X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.311A ",.01)
 ;;T39.311A
 ;;9002226.02101,"873,T39.311A ",.02)
 ;;T39.311A
 ;;9002226.02101,"873,T39.311A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.312A ",.01)
 ;;T39.312A
 ;;9002226.02101,"873,T39.312A ",.02)
 ;;T39.312A
 ;;9002226.02101,"873,T39.312A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.313A ",.01)
 ;;T39.313A
 ;;9002226.02101,"873,T39.313A ",.02)
 ;;T39.313A
 ;;9002226.02101,"873,T39.313A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.314A ",.01)
 ;;T39.314A
 ;;9002226.02101,"873,T39.314A ",.02)
 ;;T39.314A
 ;;9002226.02101,"873,T39.314A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.391A ",.01)
 ;;T39.391A
 ;;9002226.02101,"873,T39.391A ",.02)
 ;;T39.391A
 ;;9002226.02101,"873,T39.391A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.392A ",.01)
 ;;T39.392A
 ;;9002226.02101,"873,T39.392A ",.02)
 ;;T39.392A
 ;;9002226.02101,"873,T39.392A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.393A ",.01)
 ;;T39.393A
 ;;9002226.02101,"873,T39.393A ",.02)
 ;;T39.393A
 ;;9002226.02101,"873,T39.393A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.394A ",.01)
 ;;T39.394A
 ;;9002226.02101,"873,T39.394A ",.02)
 ;;T39.394A
 ;;9002226.02101,"873,T39.394A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.4X1A ",.01)
 ;;T39.4X1A
 ;;9002226.02101,"873,T39.4X1A ",.02)
 ;;T39.4X1A
 ;;9002226.02101,"873,T39.4X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.4X2A ",.01)
 ;;T39.4X2A
 ;;9002226.02101,"873,T39.4X2A ",.02)
 ;;T39.4X2A
 ;;9002226.02101,"873,T39.4X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.4X3A ",.01)
 ;;T39.4X3A
 ;;9002226.02101,"873,T39.4X3A ",.02)
 ;;T39.4X3A
 ;;9002226.02101,"873,T39.4X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.4X4A ",.01)
 ;;T39.4X4A
 ;;9002226.02101,"873,T39.4X4A ",.02)
 ;;T39.4X4A
 ;;9002226.02101,"873,T39.4X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.8X1A ",.01)
 ;;T39.8X1A
 ;;9002226.02101,"873,T39.8X1A ",.02)
 ;;T39.8X1A
 ;;9002226.02101,"873,T39.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.8X2A ",.01)
 ;;T39.8X2A
 ;;9002226.02101,"873,T39.8X2A ",.02)
 ;;T39.8X2A
 ;;9002226.02101,"873,T39.8X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.8X3A ",.01)
 ;;T39.8X3A
 ;;9002226.02101,"873,T39.8X3A ",.02)
 ;;T39.8X3A
 ;;9002226.02101,"873,T39.8X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.8X4A ",.01)
 ;;T39.8X4A
 ;;9002226.02101,"873,T39.8X4A ",.02)
 ;;T39.8X4A
 ;;9002226.02101,"873,T39.8X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T39.91XA ",.01)
 ;;T39.91XA
 ;;9002226.02101,"873,T39.91XA ",.02)
 ;;T39.91XA
 ;;9002226.02101,"873,T39.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,T39.92XA ",.01)
 ;;T39.92XA
 ;;9002226.02101,"873,T39.92XA ",.02)
 ;;T39.92XA
 ;;9002226.02101,"873,T39.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,T39.93XA ",.01)
 ;;T39.93XA
 ;;9002226.02101,"873,T39.93XA ",.02)
 ;;T39.93XA
 ;;9002226.02101,"873,T39.93XA ",.03)
 ;;30
 ;;9002226.02101,"873,T39.94XA ",.01)
 ;;T39.94XA
 ;;9002226.02101,"873,T39.94XA ",.02)
 ;;T39.94XA
 ;;9002226.02101,"873,T39.94XA ",.03)
 ;;30
 ;;9002226.02101,"873,T40.0X1A ",.01)
 ;;T40.0X1A
 ;;9002226.02101,"873,T40.0X1A ",.02)
 ;;T40.0X1A
 ;;9002226.02101,"873,T40.0X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.0X2A ",.01)
 ;;T40.0X2A
 ;;9002226.02101,"873,T40.0X2A ",.02)
 ;;T40.0X2A
 ;;9002226.02101,"873,T40.0X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.0X3A ",.01)
 ;;T40.0X3A
 ;;9002226.02101,"873,T40.0X3A ",.02)
 ;;T40.0X3A
 ;;9002226.02101,"873,T40.0X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.0X4A ",.01)
 ;;T40.0X4A
 ;;9002226.02101,"873,T40.0X4A ",.02)
 ;;T40.0X4A
 ;;9002226.02101,"873,T40.0X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.1X1A ",.01)
 ;;T40.1X1A
 ;;9002226.02101,"873,T40.1X1A ",.02)
 ;;T40.1X1A
 ;;9002226.02101,"873,T40.1X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.1X2A ",.01)
 ;;T40.1X2A
 ;;9002226.02101,"873,T40.1X2A ",.02)
 ;;T40.1X2A
 ;;9002226.02101,"873,T40.1X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.1X3A ",.01)
 ;;T40.1X3A
 ;;9002226.02101,"873,T40.1X3A ",.02)
 ;;T40.1X3A
 ;;9002226.02101,"873,T40.1X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.1X4A ",.01)
 ;;T40.1X4A
 ;;9002226.02101,"873,T40.1X4A ",.02)
 ;;T40.1X4A
 ;;9002226.02101,"873,T40.1X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.2X1A ",.01)
 ;;T40.2X1A
 ;;9002226.02101,"873,T40.2X1A ",.02)
 ;;T40.2X1A
 ;;9002226.02101,"873,T40.2X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.2X2A ",.01)
 ;;T40.2X2A
 ;;9002226.02101,"873,T40.2X2A ",.02)
 ;;T40.2X2A
 ;;9002226.02101,"873,T40.2X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.2X3A ",.01)
 ;;T40.2X3A
 ;;9002226.02101,"873,T40.2X3A ",.02)
 ;;T40.2X3A
 ;;9002226.02101,"873,T40.2X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.2X4A ",.01)
 ;;T40.2X4A
 ;;9002226.02101,"873,T40.2X4A ",.02)
 ;;T40.2X4A
 ;;9002226.02101,"873,T40.2X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.3X1A ",.01)
 ;;T40.3X1A
 ;;9002226.02101,"873,T40.3X1A ",.02)
 ;;T40.3X1A
 ;;9002226.02101,"873,T40.3X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.3X2A ",.01)
 ;;T40.3X2A
 ;;9002226.02101,"873,T40.3X2A ",.02)
 ;;T40.3X2A
 ;;9002226.02101,"873,T40.3X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.3X3A ",.01)
 ;;T40.3X3A
 ;;9002226.02101,"873,T40.3X3A ",.02)
 ;;T40.3X3A
 ;;9002226.02101,"873,T40.3X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.3X4A ",.01)
 ;;T40.3X4A
 ;;9002226.02101,"873,T40.3X4A ",.02)
 ;;T40.3X4A
 ;;9002226.02101,"873,T40.3X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.4X1A ",.01)
 ;;T40.4X1A
 ;;9002226.02101,"873,T40.4X1A ",.02)
 ;;T40.4X1A
 ;;9002226.02101,"873,T40.4X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.4X2A ",.01)
 ;;T40.4X2A
 ;;9002226.02101,"873,T40.4X2A ",.02)
 ;;T40.4X2A
 ;;9002226.02101,"873,T40.4X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.4X3A ",.01)
 ;;T40.4X3A
 ;;9002226.02101,"873,T40.4X3A ",.02)
 ;;T40.4X3A
 ;;9002226.02101,"873,T40.4X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.4X4A ",.01)
 ;;T40.4X4A
 ;;9002226.02101,"873,T40.4X4A ",.02)
 ;;T40.4X4A
 ;;9002226.02101,"873,T40.4X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.5X1A ",.01)
 ;;T40.5X1A
 ;;9002226.02101,"873,T40.5X1A ",.02)
 ;;T40.5X1A
 ;;9002226.02101,"873,T40.5X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.5X2A ",.01)
 ;;T40.5X2A
 ;;9002226.02101,"873,T40.5X2A ",.02)
 ;;T40.5X2A
 ;;9002226.02101,"873,T40.5X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.5X3A ",.01)
 ;;T40.5X3A
 ;;9002226.02101,"873,T40.5X3A ",.02)
 ;;T40.5X3A
 ;;9002226.02101,"873,T40.5X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T40.5X4A ",.01)
 ;;T40.5X4A
 ;;9002226.02101,"873,T40.5X4A ",.02)
 ;;T40.5X4A
 ;;9002226.02101,"873,T40.5X4A ",.03)
 ;;30