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

ATXXA159.m

Go to the documentation of this file.
ATXXA159 ;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,T61.774A ",.02)
 ;;T61.774A
 ;;9002226.02101,"873,T61.774A ",.03)
 ;;30
 ;;9002226.02101,"873,T61.781A ",.01)
 ;;T61.781A
 ;;9002226.02101,"873,T61.781A ",.02)
 ;;T61.781A
 ;;9002226.02101,"873,T61.781A ",.03)
 ;;30
 ;;9002226.02101,"873,T61.782A ",.01)
 ;;T61.782A
 ;;9002226.02101,"873,T61.782A ",.02)
 ;;T61.782A
 ;;9002226.02101,"873,T61.782A ",.03)
 ;;30
 ;;9002226.02101,"873,T61.783A ",.01)
 ;;T61.783A
 ;;9002226.02101,"873,T61.783A ",.02)
 ;;T61.783A
 ;;9002226.02101,"873,T61.783A ",.03)
 ;;30
 ;;9002226.02101,"873,T61.784A ",.01)
 ;;T61.784A
 ;;9002226.02101,"873,T61.784A ",.02)
 ;;T61.784A
 ;;9002226.02101,"873,T61.784A ",.03)
 ;;30
 ;;9002226.02101,"873,T61.8X1A ",.01)
 ;;T61.8X1A
 ;;9002226.02101,"873,T61.8X1A ",.02)
 ;;T61.8X1A
 ;;9002226.02101,"873,T61.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T61.8X2A ",.01)
 ;;T61.8X2A
 ;;9002226.02101,"873,T61.8X2A ",.02)
 ;;T61.8X2A
 ;;9002226.02101,"873,T61.8X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T61.8X3A ",.01)
 ;;T61.8X3A
 ;;9002226.02101,"873,T61.8X3A ",.02)
 ;;T61.8X3A
 ;;9002226.02101,"873,T61.8X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T61.8X4A ",.01)
 ;;T61.8X4A
 ;;9002226.02101,"873,T61.8X4A ",.02)
 ;;T61.8X4A
 ;;9002226.02101,"873,T61.8X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T61.91XA ",.01)
 ;;T61.91XA
 ;;9002226.02101,"873,T61.91XA ",.02)
 ;;T61.91XA
 ;;9002226.02101,"873,T61.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,T61.92XA ",.01)
 ;;T61.92XA
 ;;9002226.02101,"873,T61.92XA ",.02)
 ;;T61.92XA
 ;;9002226.02101,"873,T61.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,T61.93XA ",.01)
 ;;T61.93XA
 ;;9002226.02101,"873,T61.93XA ",.02)
 ;;T61.93XA
 ;;9002226.02101,"873,T61.93XA ",.03)
 ;;30
 ;;9002226.02101,"873,T61.94XA ",.01)
 ;;T61.94XA
 ;;9002226.02101,"873,T61.94XA ",.02)
 ;;T61.94XA
 ;;9002226.02101,"873,T61.94XA ",.03)
 ;;30
 ;;9002226.02101,"873,T62.0X1A ",.01)
 ;;T62.0X1A
 ;;9002226.02101,"873,T62.0X1A ",.02)
 ;;T62.0X1A
 ;;9002226.02101,"873,T62.0X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.0X2A ",.01)
 ;;T62.0X2A
 ;;9002226.02101,"873,T62.0X2A ",.02)
 ;;T62.0X2A
 ;;9002226.02101,"873,T62.0X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.0X3A ",.01)
 ;;T62.0X3A
 ;;9002226.02101,"873,T62.0X3A ",.02)
 ;;T62.0X3A
 ;;9002226.02101,"873,T62.0X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.0X4A ",.01)
 ;;T62.0X4A
 ;;9002226.02101,"873,T62.0X4A ",.02)
 ;;T62.0X4A
 ;;9002226.02101,"873,T62.0X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.1X1A ",.01)
 ;;T62.1X1A
 ;;9002226.02101,"873,T62.1X1A ",.02)
 ;;T62.1X1A
 ;;9002226.02101,"873,T62.1X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.1X2A ",.01)
 ;;T62.1X2A
 ;;9002226.02101,"873,T62.1X2A ",.02)
 ;;T62.1X2A
 ;;9002226.02101,"873,T62.1X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.1X3A ",.01)
 ;;T62.1X3A
 ;;9002226.02101,"873,T62.1X3A ",.02)
 ;;T62.1X3A
 ;;9002226.02101,"873,T62.1X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.1X4A ",.01)
 ;;T62.1X4A
 ;;9002226.02101,"873,T62.1X4A ",.02)
 ;;T62.1X4A
 ;;9002226.02101,"873,T62.1X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.2X1A ",.01)
 ;;T62.2X1A
 ;;9002226.02101,"873,T62.2X1A ",.02)
 ;;T62.2X1A
 ;;9002226.02101,"873,T62.2X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.2X2A ",.01)
 ;;T62.2X2A
 ;;9002226.02101,"873,T62.2X2A ",.02)
 ;;T62.2X2A
 ;;9002226.02101,"873,T62.2X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.2X3A ",.01)
 ;;T62.2X3A
 ;;9002226.02101,"873,T62.2X3A ",.02)
 ;;T62.2X3A
 ;;9002226.02101,"873,T62.2X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.2X4A ",.01)
 ;;T62.2X4A
 ;;9002226.02101,"873,T62.2X4A ",.02)
 ;;T62.2X4A
 ;;9002226.02101,"873,T62.2X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.8X1A ",.01)
 ;;T62.8X1A
 ;;9002226.02101,"873,T62.8X1A ",.02)
 ;;T62.8X1A
 ;;9002226.02101,"873,T62.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.8X2A ",.01)
 ;;T62.8X2A
 ;;9002226.02101,"873,T62.8X2A ",.02)
 ;;T62.8X2A
 ;;9002226.02101,"873,T62.8X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.8X3A ",.01)
 ;;T62.8X3A
 ;;9002226.02101,"873,T62.8X3A ",.02)
 ;;T62.8X3A
 ;;9002226.02101,"873,T62.8X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.8X4A ",.01)
 ;;T62.8X4A
 ;;9002226.02101,"873,T62.8X4A ",.02)
 ;;T62.8X4A
 ;;9002226.02101,"873,T62.8X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T62.91XA ",.01)
 ;;T62.91XA
 ;;9002226.02101,"873,T62.91XA ",.02)
 ;;T62.91XA
 ;;9002226.02101,"873,T62.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,T62.92XA ",.01)
 ;;T62.92XA
 ;;9002226.02101,"873,T62.92XA ",.02)
 ;;T62.92XA
 ;;9002226.02101,"873,T62.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,T62.93XA ",.01)
 ;;T62.93XA
 ;;9002226.02101,"873,T62.93XA ",.02)
 ;;T62.93XA
 ;;9002226.02101,"873,T62.93XA ",.03)
 ;;30
 ;;9002226.02101,"873,T62.94XA ",.01)
 ;;T62.94XA
 ;;9002226.02101,"873,T62.94XA ",.02)
 ;;T62.94XA
 ;;9002226.02101,"873,T62.94XA ",.03)
 ;;30
 ;;9002226.02101,"873,T63.001A ",.01)
 ;;T63.001A
 ;;9002226.02101,"873,T63.001A ",.02)
 ;;T63.001A
 ;;9002226.02101,"873,T63.001A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.002A ",.01)
 ;;T63.002A
 ;;9002226.02101,"873,T63.002A ",.02)
 ;;T63.002A
 ;;9002226.02101,"873,T63.002A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.003A ",.01)
 ;;T63.003A
 ;;9002226.02101,"873,T63.003A ",.02)
 ;;T63.003A
 ;;9002226.02101,"873,T63.003A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.004A ",.01)
 ;;T63.004A
 ;;9002226.02101,"873,T63.004A ",.02)
 ;;T63.004A
 ;;9002226.02101,"873,T63.004A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.011A ",.01)
 ;;T63.011A
 ;;9002226.02101,"873,T63.011A ",.02)
 ;;T63.011A
 ;;9002226.02101,"873,T63.011A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.012A ",.01)
 ;;T63.012A
 ;;9002226.02101,"873,T63.012A ",.02)
 ;;T63.012A
 ;;9002226.02101,"873,T63.012A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.013A ",.01)
 ;;T63.013A
 ;;9002226.02101,"873,T63.013A ",.02)
 ;;T63.013A
 ;;9002226.02101,"873,T63.013A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.014A ",.01)
 ;;T63.014A
 ;;9002226.02101,"873,T63.014A ",.02)
 ;;T63.014A
 ;;9002226.02101,"873,T63.014A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.021A ",.01)
 ;;T63.021A
 ;;9002226.02101,"873,T63.021A ",.02)
 ;;T63.021A
 ;;9002226.02101,"873,T63.021A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.022A ",.01)
 ;;T63.022A
 ;;9002226.02101,"873,T63.022A ",.02)
 ;;T63.022A
 ;;9002226.02101,"873,T63.022A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.023A ",.01)
 ;;T63.023A
 ;;9002226.02101,"873,T63.023A ",.02)
 ;;T63.023A
 ;;9002226.02101,"873,T63.023A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.024A ",.01)
 ;;T63.024A
 ;;9002226.02101,"873,T63.024A ",.02)
 ;;T63.024A
 ;;9002226.02101,"873,T63.024A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.031A ",.01)
 ;;T63.031A
 ;;9002226.02101,"873,T63.031A ",.02)
 ;;T63.031A
 ;;9002226.02101,"873,T63.031A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.032A ",.01)
 ;;T63.032A
 ;;9002226.02101,"873,T63.032A ",.02)
 ;;T63.032A
 ;;9002226.02101,"873,T63.032A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.033A ",.01)
 ;;T63.033A
 ;;9002226.02101,"873,T63.033A ",.02)
 ;;T63.033A
 ;;9002226.02101,"873,T63.033A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.034A ",.01)
 ;;T63.034A
 ;;9002226.02101,"873,T63.034A ",.02)
 ;;T63.034A
 ;;9002226.02101,"873,T63.034A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.041A ",.01)
 ;;T63.041A
 ;;9002226.02101,"873,T63.041A ",.02)
 ;;T63.041A
 ;;9002226.02101,"873,T63.041A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.042A ",.01)
 ;;T63.042A
 ;;9002226.02101,"873,T63.042A ",.02)
 ;;T63.042A
 ;;9002226.02101,"873,T63.042A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.043A ",.01)
 ;;T63.043A
 ;;9002226.02101,"873,T63.043A ",.02)
 ;;T63.043A
 ;;9002226.02101,"873,T63.043A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.044A ",.01)
 ;;T63.044A
 ;;9002226.02101,"873,T63.044A ",.02)
 ;;T63.044A
 ;;9002226.02101,"873,T63.044A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.061A ",.01)
 ;;T63.061A
 ;;9002226.02101,"873,T63.061A ",.02)
 ;;T63.061A
 ;;9002226.02101,"873,T63.061A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.062A ",.01)
 ;;T63.062A
 ;;9002226.02101,"873,T63.062A ",.02)
 ;;T63.062A
 ;;9002226.02101,"873,T63.062A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.063A ",.01)
 ;;T63.063A
 ;;9002226.02101,"873,T63.063A ",.02)
 ;;T63.063A
 ;;9002226.02101,"873,T63.063A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.064A ",.01)
 ;;T63.064A
 ;;9002226.02101,"873,T63.064A ",.02)
 ;;T63.064A
 ;;9002226.02101,"873,T63.064A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.071A ",.01)
 ;;T63.071A
 ;;9002226.02101,"873,T63.071A ",.02)
 ;;T63.071A
 ;;9002226.02101,"873,T63.071A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.072A ",.01)
 ;;T63.072A
 ;;9002226.02101,"873,T63.072A ",.02)
 ;;T63.072A
 ;;9002226.02101,"873,T63.072A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.073A ",.01)
 ;;T63.073A
 ;;9002226.02101,"873,T63.073A ",.02)
 ;;T63.073A
 ;;9002226.02101,"873,T63.073A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.074A ",.01)
 ;;T63.074A
 ;;9002226.02101,"873,T63.074A ",.02)
 ;;T63.074A
 ;;9002226.02101,"873,T63.074A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.081A ",.01)
 ;;T63.081A
 ;;9002226.02101,"873,T63.081A ",.02)
 ;;T63.081A
 ;;9002226.02101,"873,T63.081A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.082A ",.01)
 ;;T63.082A
 ;;9002226.02101,"873,T63.082A ",.02)
 ;;T63.082A
 ;;9002226.02101,"873,T63.082A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.083A ",.01)
 ;;T63.083A
 ;;9002226.02101,"873,T63.083A ",.02)
 ;;T63.083A
 ;;9002226.02101,"873,T63.083A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.084A ",.01)
 ;;T63.084A
 ;;9002226.02101,"873,T63.084A ",.02)
 ;;T63.084A
 ;;9002226.02101,"873,T63.084A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.091A ",.01)
 ;;T63.091A
 ;;9002226.02101,"873,T63.091A ",.02)
 ;;T63.091A
 ;;9002226.02101,"873,T63.091A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.092A ",.01)
 ;;T63.092A
 ;;9002226.02101,"873,T63.092A ",.02)
 ;;T63.092A
 ;;9002226.02101,"873,T63.092A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.093A ",.01)
 ;;T63.093A
 ;;9002226.02101,"873,T63.093A ",.02)
 ;;T63.093A
 ;;9002226.02101,"873,T63.093A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.094A ",.01)
 ;;T63.094A
 ;;9002226.02101,"873,T63.094A ",.02)
 ;;T63.094A
 ;;9002226.02101,"873,T63.094A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.111A ",.01)
 ;;T63.111A
 ;;9002226.02101,"873,T63.111A ",.02)
 ;;T63.111A
 ;;9002226.02101,"873,T63.111A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.112A ",.01)
 ;;T63.112A
 ;;9002226.02101,"873,T63.112A ",.02)
 ;;T63.112A
 ;;9002226.02101,"873,T63.112A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.113A ",.01)
 ;;T63.113A
 ;;9002226.02101,"873,T63.113A ",.02)
 ;;T63.113A
 ;;9002226.02101,"873,T63.113A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.114A ",.01)
 ;;T63.114A
 ;;9002226.02101,"873,T63.114A ",.02)
 ;;T63.114A
 ;;9002226.02101,"873,T63.114A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.121A ",.01)
 ;;T63.121A
 ;;9002226.02101,"873,T63.121A ",.02)
 ;;T63.121A
 ;;9002226.02101,"873,T63.121A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.122A ",.01)
 ;;T63.122A
 ;;9002226.02101,"873,T63.122A ",.02)
 ;;T63.122A
 ;;9002226.02101,"873,T63.122A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.123A ",.01)
 ;;T63.123A
 ;;9002226.02101,"873,T63.123A ",.02)
 ;;T63.123A
 ;;9002226.02101,"873,T63.123A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.124A ",.01)
 ;;T63.124A
 ;;9002226.02101,"873,T63.124A ",.02)
 ;;T63.124A
 ;;9002226.02101,"873,T63.124A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.191A ",.01)
 ;;T63.191A
 ;;9002226.02101,"873,T63.191A ",.02)
 ;;T63.191A
 ;;9002226.02101,"873,T63.191A ",.03)
 ;;30
 ;;9002226.02101,"873,T63.192A ",.01)
 ;;T63.192A
 ;;9002226.02101,"873,T63.192A ",.02)
 ;;T63.192A