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

ATXXA43.m

Go to the documentation of this file.
ATXXA43 ;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,S25.301A ",.02)
 ;;S25.301A
 ;;9002226.02101,"873,S25.301A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.302A ",.01)
 ;;S25.302A
 ;;9002226.02101,"873,S25.302A ",.02)
 ;;S25.302A
 ;;9002226.02101,"873,S25.302A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.309A ",.01)
 ;;S25.309A
 ;;9002226.02101,"873,S25.309A ",.02)
 ;;S25.309A
 ;;9002226.02101,"873,S25.309A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.311A ",.01)
 ;;S25.311A
 ;;9002226.02101,"873,S25.311A ",.02)
 ;;S25.311A
 ;;9002226.02101,"873,S25.311A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.312A ",.01)
 ;;S25.312A
 ;;9002226.02101,"873,S25.312A ",.02)
 ;;S25.312A
 ;;9002226.02101,"873,S25.312A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.319A ",.01)
 ;;S25.319A
 ;;9002226.02101,"873,S25.319A ",.02)
 ;;S25.319A
 ;;9002226.02101,"873,S25.319A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.321A ",.01)
 ;;S25.321A
 ;;9002226.02101,"873,S25.321A ",.02)
 ;;S25.321A
 ;;9002226.02101,"873,S25.321A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.322A ",.01)
 ;;S25.322A
 ;;9002226.02101,"873,S25.322A ",.02)
 ;;S25.322A
 ;;9002226.02101,"873,S25.322A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.329A ",.01)
 ;;S25.329A
 ;;9002226.02101,"873,S25.329A ",.02)
 ;;S25.329A
 ;;9002226.02101,"873,S25.329A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.391A ",.01)
 ;;S25.391A
 ;;9002226.02101,"873,S25.391A ",.02)
 ;;S25.391A
 ;;9002226.02101,"873,S25.391A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.392A ",.01)
 ;;S25.392A
 ;;9002226.02101,"873,S25.392A ",.02)
 ;;S25.392A
 ;;9002226.02101,"873,S25.392A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.399A ",.01)
 ;;S25.399A
 ;;9002226.02101,"873,S25.399A ",.02)
 ;;S25.399A
 ;;9002226.02101,"873,S25.399A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.401A ",.01)
 ;;S25.401A
 ;;9002226.02101,"873,S25.401A ",.02)
 ;;S25.401A
 ;;9002226.02101,"873,S25.401A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.402A ",.01)
 ;;S25.402A
 ;;9002226.02101,"873,S25.402A ",.02)
 ;;S25.402A
 ;;9002226.02101,"873,S25.402A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.409A ",.01)
 ;;S25.409A
 ;;9002226.02101,"873,S25.409A ",.02)
 ;;S25.409A
 ;;9002226.02101,"873,S25.409A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.411A ",.01)
 ;;S25.411A
 ;;9002226.02101,"873,S25.411A ",.02)
 ;;S25.411A
 ;;9002226.02101,"873,S25.411A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.412A ",.01)
 ;;S25.412A
 ;;9002226.02101,"873,S25.412A ",.02)
 ;;S25.412A
 ;;9002226.02101,"873,S25.412A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.419A ",.01)
 ;;S25.419A
 ;;9002226.02101,"873,S25.419A ",.02)
 ;;S25.419A
 ;;9002226.02101,"873,S25.419A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.421A ",.01)
 ;;S25.421A
 ;;9002226.02101,"873,S25.421A ",.02)
 ;;S25.421A
 ;;9002226.02101,"873,S25.421A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.422A ",.01)
 ;;S25.422A
 ;;9002226.02101,"873,S25.422A ",.02)
 ;;S25.422A
 ;;9002226.02101,"873,S25.422A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.429A ",.01)
 ;;S25.429A
 ;;9002226.02101,"873,S25.429A ",.02)
 ;;S25.429A
 ;;9002226.02101,"873,S25.429A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.491A ",.01)
 ;;S25.491A
 ;;9002226.02101,"873,S25.491A ",.02)
 ;;S25.491A
 ;;9002226.02101,"873,S25.491A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.492A ",.01)
 ;;S25.492A
 ;;9002226.02101,"873,S25.492A ",.02)
 ;;S25.492A
 ;;9002226.02101,"873,S25.492A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.499A ",.01)
 ;;S25.499A
 ;;9002226.02101,"873,S25.499A ",.02)
 ;;S25.499A
 ;;9002226.02101,"873,S25.499A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.501A ",.01)
 ;;S25.501A
 ;;9002226.02101,"873,S25.501A ",.02)
 ;;S25.501A
 ;;9002226.02101,"873,S25.501A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.502A ",.01)
 ;;S25.502A
 ;;9002226.02101,"873,S25.502A ",.02)
 ;;S25.502A
 ;;9002226.02101,"873,S25.502A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.509A ",.01)
 ;;S25.509A
 ;;9002226.02101,"873,S25.509A ",.02)
 ;;S25.509A
 ;;9002226.02101,"873,S25.509A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.511A ",.01)
 ;;S25.511A
 ;;9002226.02101,"873,S25.511A ",.02)
 ;;S25.511A
 ;;9002226.02101,"873,S25.511A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.512A ",.01)
 ;;S25.512A
 ;;9002226.02101,"873,S25.512A ",.02)
 ;;S25.512A
 ;;9002226.02101,"873,S25.512A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.519A ",.01)
 ;;S25.519A
 ;;9002226.02101,"873,S25.519A ",.02)
 ;;S25.519A
 ;;9002226.02101,"873,S25.519A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.591A ",.01)
 ;;S25.591A
 ;;9002226.02101,"873,S25.591A ",.02)
 ;;S25.591A
 ;;9002226.02101,"873,S25.591A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.592A ",.01)
 ;;S25.592A
 ;;9002226.02101,"873,S25.592A ",.02)
 ;;S25.592A
 ;;9002226.02101,"873,S25.592A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.599A ",.01)
 ;;S25.599A
 ;;9002226.02101,"873,S25.599A ",.02)
 ;;S25.599A
 ;;9002226.02101,"873,S25.599A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.801A ",.01)
 ;;S25.801A
 ;;9002226.02101,"873,S25.801A ",.02)
 ;;S25.801A
 ;;9002226.02101,"873,S25.801A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.802A ",.01)
 ;;S25.802A
 ;;9002226.02101,"873,S25.802A ",.02)
 ;;S25.802A
 ;;9002226.02101,"873,S25.802A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.809A ",.01)
 ;;S25.809A
 ;;9002226.02101,"873,S25.809A ",.02)
 ;;S25.809A
 ;;9002226.02101,"873,S25.809A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.811A ",.01)
 ;;S25.811A
 ;;9002226.02101,"873,S25.811A ",.02)
 ;;S25.811A
 ;;9002226.02101,"873,S25.811A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.812A ",.01)
 ;;S25.812A
 ;;9002226.02101,"873,S25.812A ",.02)
 ;;S25.812A
 ;;9002226.02101,"873,S25.812A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.819A ",.01)
 ;;S25.819A
 ;;9002226.02101,"873,S25.819A ",.02)
 ;;S25.819A
 ;;9002226.02101,"873,S25.819A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.891A ",.01)
 ;;S25.891A
 ;;9002226.02101,"873,S25.891A ",.02)
 ;;S25.891A
 ;;9002226.02101,"873,S25.891A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.892A ",.01)
 ;;S25.892A
 ;;9002226.02101,"873,S25.892A ",.02)
 ;;S25.892A
 ;;9002226.02101,"873,S25.892A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.899A ",.01)
 ;;S25.899A
 ;;9002226.02101,"873,S25.899A ",.02)
 ;;S25.899A
 ;;9002226.02101,"873,S25.899A ",.03)
 ;;30
 ;;9002226.02101,"873,S25.90XA ",.01)
 ;;S25.90XA
 ;;9002226.02101,"873,S25.90XA ",.02)
 ;;S25.90XA
 ;;9002226.02101,"873,S25.90XA ",.03)
 ;;30
 ;;9002226.02101,"873,S25.91XA ",.01)
 ;;S25.91XA
 ;;9002226.02101,"873,S25.91XA ",.02)
 ;;S25.91XA
 ;;9002226.02101,"873,S25.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,S25.99XA ",.01)
 ;;S25.99XA
 ;;9002226.02101,"873,S25.99XA ",.02)
 ;;S25.99XA
 ;;9002226.02101,"873,S25.99XA ",.03)
 ;;30
 ;;9002226.02101,"873,S26.00XA ",.01)
 ;;S26.00XA
 ;;9002226.02101,"873,S26.00XA ",.02)
 ;;S26.00XA
 ;;9002226.02101,"873,S26.00XA ",.03)
 ;;30
 ;;9002226.02101,"873,S26.01XA ",.01)
 ;;S26.01XA
 ;;9002226.02101,"873,S26.01XA ",.02)
 ;;S26.01XA
 ;;9002226.02101,"873,S26.01XA ",.03)
 ;;30
 ;;9002226.02101,"873,S26.020A ",.01)
 ;;S26.020A
 ;;9002226.02101,"873,S26.020A ",.02)
 ;;S26.020A
 ;;9002226.02101,"873,S26.020A ",.03)
 ;;30
 ;;9002226.02101,"873,S26.021A ",.01)
 ;;S26.021A
 ;;9002226.02101,"873,S26.021A ",.02)
 ;;S26.021A
 ;;9002226.02101,"873,S26.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S26.022A ",.01)
 ;;S26.022A
 ;;9002226.02101,"873,S26.022A ",.02)
 ;;S26.022A
 ;;9002226.02101,"873,S26.022A ",.03)
 ;;30
 ;;9002226.02101,"873,S26.09XA ",.01)
 ;;S26.09XA
 ;;9002226.02101,"873,S26.09XA ",.02)
 ;;S26.09XA
 ;;9002226.02101,"873,S26.09XA ",.03)
 ;;30
 ;;9002226.02101,"873,S26.10XA ",.01)
 ;;S26.10XA
 ;;9002226.02101,"873,S26.10XA ",.02)
 ;;S26.10XA
 ;;9002226.02101,"873,S26.10XA ",.03)
 ;;30
 ;;9002226.02101,"873,S26.11XA ",.01)
 ;;S26.11XA
 ;;9002226.02101,"873,S26.11XA ",.02)
 ;;S26.11XA
 ;;9002226.02101,"873,S26.11XA ",.03)
 ;;30
 ;;9002226.02101,"873,S26.12XA ",.01)
 ;;S26.12XA
 ;;9002226.02101,"873,S26.12XA ",.02)
 ;;S26.12XA
 ;;9002226.02101,"873,S26.12XA ",.03)
 ;;30
 ;;9002226.02101,"873,S26.19XA ",.01)
 ;;S26.19XA
 ;;9002226.02101,"873,S26.19XA ",.02)
 ;;S26.19XA
 ;;9002226.02101,"873,S26.19XA ",.03)
 ;;30
 ;;9002226.02101,"873,S26.90XA ",.01)
 ;;S26.90XA
 ;;9002226.02101,"873,S26.90XA ",.02)
 ;;S26.90XA
 ;;9002226.02101,"873,S26.90XA ",.03)
 ;;30
 ;;9002226.02101,"873,S26.91XA ",.01)
 ;;S26.91XA
 ;;9002226.02101,"873,S26.91XA ",.02)
 ;;S26.91XA
 ;;9002226.02101,"873,S26.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,S26.92XA ",.01)
 ;;S26.92XA
 ;;9002226.02101,"873,S26.92XA ",.02)
 ;;S26.92XA
 ;;9002226.02101,"873,S26.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,S26.99XA ",.01)
 ;;S26.99XA
 ;;9002226.02101,"873,S26.99XA ",.02)
 ;;S26.99XA
 ;;9002226.02101,"873,S26.99XA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.0XXA ",.01)
 ;;S27.0XXA
 ;;9002226.02101,"873,S27.0XXA ",.02)
 ;;S27.0XXA
 ;;9002226.02101,"873,S27.0XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.1XXA ",.01)
 ;;S27.1XXA
 ;;9002226.02101,"873,S27.1XXA ",.02)
 ;;S27.1XXA
 ;;9002226.02101,"873,S27.1XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.2XXA ",.01)
 ;;S27.2XXA
 ;;9002226.02101,"873,S27.2XXA ",.02)
 ;;S27.2XXA
 ;;9002226.02101,"873,S27.2XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.301A ",.01)
 ;;S27.301A
 ;;9002226.02101,"873,S27.301A ",.02)
 ;;S27.301A
 ;;9002226.02101,"873,S27.301A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.302A ",.01)
 ;;S27.302A
 ;;9002226.02101,"873,S27.302A ",.02)
 ;;S27.302A
 ;;9002226.02101,"873,S27.302A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.309A ",.01)
 ;;S27.309A
 ;;9002226.02101,"873,S27.309A ",.02)
 ;;S27.309A
 ;;9002226.02101,"873,S27.309A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.311A ",.01)
 ;;S27.311A
 ;;9002226.02101,"873,S27.311A ",.02)
 ;;S27.311A
 ;;9002226.02101,"873,S27.311A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.312A ",.01)
 ;;S27.312A
 ;;9002226.02101,"873,S27.312A ",.02)
 ;;S27.312A
 ;;9002226.02101,"873,S27.312A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.319A ",.01)
 ;;S27.319A
 ;;9002226.02101,"873,S27.319A ",.02)
 ;;S27.319A
 ;;9002226.02101,"873,S27.319A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.321A ",.01)
 ;;S27.321A
 ;;9002226.02101,"873,S27.321A ",.02)
 ;;S27.321A
 ;;9002226.02101,"873,S27.321A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.322A ",.01)
 ;;S27.322A
 ;;9002226.02101,"873,S27.322A ",.02)
 ;;S27.322A
 ;;9002226.02101,"873,S27.322A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.329A ",.01)
 ;;S27.329A
 ;;9002226.02101,"873,S27.329A ",.02)
 ;;S27.329A
 ;;9002226.02101,"873,S27.329A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.331A ",.01)
 ;;S27.331A
 ;;9002226.02101,"873,S27.331A ",.02)
 ;;S27.331A
 ;;9002226.02101,"873,S27.331A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.332A ",.01)
 ;;S27.332A
 ;;9002226.02101,"873,S27.332A ",.02)
 ;;S27.332A
 ;;9002226.02101,"873,S27.332A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.339A ",.01)
 ;;S27.339A
 ;;9002226.02101,"873,S27.339A ",.02)
 ;;S27.339A
 ;;9002226.02101,"873,S27.339A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.391A ",.01)
 ;;S27.391A
 ;;9002226.02101,"873,S27.391A ",.02)
 ;;S27.391A
 ;;9002226.02101,"873,S27.391A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.392A ",.01)
 ;;S27.392A
 ;;9002226.02101,"873,S27.392A ",.02)
 ;;S27.392A
 ;;9002226.02101,"873,S27.392A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.399A ",.01)
 ;;S27.399A
 ;;9002226.02101,"873,S27.399A ",.02)
 ;;S27.399A
 ;;9002226.02101,"873,S27.399A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.401A ",.01)
 ;;S27.401A
 ;;9002226.02101,"873,S27.401A ",.02)
 ;;S27.401A
 ;;9002226.02101,"873,S27.401A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.402A ",.01)
 ;;S27.402A
 ;;9002226.02101,"873,S27.402A ",.02)
 ;;S27.402A