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

ATXXA97.m

Go to the documentation of this file.
ATXXA97 ;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,S67.10XA ",.02)
 ;;S67.10XA
 ;;9002226.02101,"873,S67.10XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.190A ",.01)
 ;;S67.190A
 ;;9002226.02101,"873,S67.190A ",.02)
 ;;S67.190A
 ;;9002226.02101,"873,S67.190A ",.03)
 ;;30
 ;;9002226.02101,"873,S67.191A ",.01)
 ;;S67.191A
 ;;9002226.02101,"873,S67.191A ",.02)
 ;;S67.191A
 ;;9002226.02101,"873,S67.191A ",.03)
 ;;30
 ;;9002226.02101,"873,S67.192A ",.01)
 ;;S67.192A
 ;;9002226.02101,"873,S67.192A ",.02)
 ;;S67.192A
 ;;9002226.02101,"873,S67.192A ",.03)
 ;;30
 ;;9002226.02101,"873,S67.193A ",.01)
 ;;S67.193A
 ;;9002226.02101,"873,S67.193A ",.02)
 ;;S67.193A
 ;;9002226.02101,"873,S67.193A ",.03)
 ;;30
 ;;9002226.02101,"873,S67.194A ",.01)
 ;;S67.194A
 ;;9002226.02101,"873,S67.194A ",.02)
 ;;S67.194A
 ;;9002226.02101,"873,S67.194A ",.03)
 ;;30
 ;;9002226.02101,"873,S67.195A ",.01)
 ;;S67.195A
 ;;9002226.02101,"873,S67.195A ",.02)
 ;;S67.195A
 ;;9002226.02101,"873,S67.195A ",.03)
 ;;30
 ;;9002226.02101,"873,S67.196A ",.01)
 ;;S67.196A
 ;;9002226.02101,"873,S67.196A ",.02)
 ;;S67.196A
 ;;9002226.02101,"873,S67.196A ",.03)
 ;;30
 ;;9002226.02101,"873,S67.197A ",.01)
 ;;S67.197A
 ;;9002226.02101,"873,S67.197A ",.02)
 ;;S67.197A
 ;;9002226.02101,"873,S67.197A ",.03)
 ;;30
 ;;9002226.02101,"873,S67.198A ",.01)
 ;;S67.198A
 ;;9002226.02101,"873,S67.198A ",.02)
 ;;S67.198A
 ;;9002226.02101,"873,S67.198A ",.03)
 ;;30
 ;;9002226.02101,"873,S67.20XA ",.01)
 ;;S67.20XA
 ;;9002226.02101,"873,S67.20XA ",.02)
 ;;S67.20XA
 ;;9002226.02101,"873,S67.20XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.21XA ",.01)
 ;;S67.21XA
 ;;9002226.02101,"873,S67.21XA ",.02)
 ;;S67.21XA
 ;;9002226.02101,"873,S67.21XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.22XA ",.01)
 ;;S67.22XA
 ;;9002226.02101,"873,S67.22XA ",.02)
 ;;S67.22XA
 ;;9002226.02101,"873,S67.22XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.30XA ",.01)
 ;;S67.30XA
 ;;9002226.02101,"873,S67.30XA ",.02)
 ;;S67.30XA
 ;;9002226.02101,"873,S67.30XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.31XA ",.01)
 ;;S67.31XA
 ;;9002226.02101,"873,S67.31XA ",.02)
 ;;S67.31XA
 ;;9002226.02101,"873,S67.31XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.32XA ",.01)
 ;;S67.32XA
 ;;9002226.02101,"873,S67.32XA ",.02)
 ;;S67.32XA
 ;;9002226.02101,"873,S67.32XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.40XA ",.01)
 ;;S67.40XA
 ;;9002226.02101,"873,S67.40XA ",.02)
 ;;S67.40XA
 ;;9002226.02101,"873,S67.40XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.41XA ",.01)
 ;;S67.41XA
 ;;9002226.02101,"873,S67.41XA ",.02)
 ;;S67.41XA
 ;;9002226.02101,"873,S67.41XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.42XA ",.01)
 ;;S67.42XA
 ;;9002226.02101,"873,S67.42XA ",.02)
 ;;S67.42XA
 ;;9002226.02101,"873,S67.42XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.90XA ",.01)
 ;;S67.90XA
 ;;9002226.02101,"873,S67.90XA ",.02)
 ;;S67.90XA
 ;;9002226.02101,"873,S67.90XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.91XA ",.01)
 ;;S67.91XA
 ;;9002226.02101,"873,S67.91XA ",.02)
 ;;S67.91XA
 ;;9002226.02101,"873,S67.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,S67.92XA ",.01)
 ;;S67.92XA
 ;;9002226.02101,"873,S67.92XA ",.02)
 ;;S67.92XA
 ;;9002226.02101,"873,S67.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,S68.011A ",.01)
 ;;S68.011A
 ;;9002226.02101,"873,S68.011A ",.02)
 ;;S68.011A
 ;;9002226.02101,"873,S68.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.012A ",.01)
 ;;S68.012A
 ;;9002226.02101,"873,S68.012A ",.02)
 ;;S68.012A
 ;;9002226.02101,"873,S68.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.019A ",.01)
 ;;S68.019A
 ;;9002226.02101,"873,S68.019A ",.02)
 ;;S68.019A
 ;;9002226.02101,"873,S68.019A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.021A ",.01)
 ;;S68.021A
 ;;9002226.02101,"873,S68.021A ",.02)
 ;;S68.021A
 ;;9002226.02101,"873,S68.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.022A ",.01)
 ;;S68.022A
 ;;9002226.02101,"873,S68.022A ",.02)
 ;;S68.022A
 ;;9002226.02101,"873,S68.022A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.029A ",.01)
 ;;S68.029A
 ;;9002226.02101,"873,S68.029A ",.02)
 ;;S68.029A
 ;;9002226.02101,"873,S68.029A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.110A ",.01)
 ;;S68.110A
 ;;9002226.02101,"873,S68.110A ",.02)
 ;;S68.110A
 ;;9002226.02101,"873,S68.110A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.111A ",.01)
 ;;S68.111A
 ;;9002226.02101,"873,S68.111A ",.02)
 ;;S68.111A
 ;;9002226.02101,"873,S68.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.112A ",.01)
 ;;S68.112A
 ;;9002226.02101,"873,S68.112A ",.02)
 ;;S68.112A
 ;;9002226.02101,"873,S68.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.113A ",.01)
 ;;S68.113A
 ;;9002226.02101,"873,S68.113A ",.02)
 ;;S68.113A
 ;;9002226.02101,"873,S68.113A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.114A ",.01)
 ;;S68.114A
 ;;9002226.02101,"873,S68.114A ",.02)
 ;;S68.114A
 ;;9002226.02101,"873,S68.114A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.115A ",.01)
 ;;S68.115A
 ;;9002226.02101,"873,S68.115A ",.02)
 ;;S68.115A
 ;;9002226.02101,"873,S68.115A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.116A ",.01)
 ;;S68.116A
 ;;9002226.02101,"873,S68.116A ",.02)
 ;;S68.116A
 ;;9002226.02101,"873,S68.116A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.117A ",.01)
 ;;S68.117A
 ;;9002226.02101,"873,S68.117A ",.02)
 ;;S68.117A
 ;;9002226.02101,"873,S68.117A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.118A ",.01)
 ;;S68.118A
 ;;9002226.02101,"873,S68.118A ",.02)
 ;;S68.118A
 ;;9002226.02101,"873,S68.118A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.119A ",.01)
 ;;S68.119A
 ;;9002226.02101,"873,S68.119A ",.02)
 ;;S68.119A
 ;;9002226.02101,"873,S68.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.120A ",.01)
 ;;S68.120A
 ;;9002226.02101,"873,S68.120A ",.02)
 ;;S68.120A
 ;;9002226.02101,"873,S68.120A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.121A ",.01)
 ;;S68.121A
 ;;9002226.02101,"873,S68.121A ",.02)
 ;;S68.121A
 ;;9002226.02101,"873,S68.121A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.122A ",.01)
 ;;S68.122A
 ;;9002226.02101,"873,S68.122A ",.02)
 ;;S68.122A
 ;;9002226.02101,"873,S68.122A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.123A ",.01)
 ;;S68.123A
 ;;9002226.02101,"873,S68.123A ",.02)
 ;;S68.123A
 ;;9002226.02101,"873,S68.123A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.124A ",.01)
 ;;S68.124A
 ;;9002226.02101,"873,S68.124A ",.02)
 ;;S68.124A
 ;;9002226.02101,"873,S68.124A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.125A ",.01)
 ;;S68.125A
 ;;9002226.02101,"873,S68.125A ",.02)
 ;;S68.125A
 ;;9002226.02101,"873,S68.125A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.126A ",.01)
 ;;S68.126A
 ;;9002226.02101,"873,S68.126A ",.02)
 ;;S68.126A
 ;;9002226.02101,"873,S68.126A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.127A ",.01)
 ;;S68.127A
 ;;9002226.02101,"873,S68.127A ",.02)
 ;;S68.127A
 ;;9002226.02101,"873,S68.127A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.128A ",.01)
 ;;S68.128A
 ;;9002226.02101,"873,S68.128A ",.02)
 ;;S68.128A
 ;;9002226.02101,"873,S68.128A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.129A ",.01)
 ;;S68.129A
 ;;9002226.02101,"873,S68.129A ",.02)
 ;;S68.129A
 ;;9002226.02101,"873,S68.129A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.411A ",.01)
 ;;S68.411A
 ;;9002226.02101,"873,S68.411A ",.02)
 ;;S68.411A
 ;;9002226.02101,"873,S68.411A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.412A ",.01)
 ;;S68.412A
 ;;9002226.02101,"873,S68.412A ",.02)
 ;;S68.412A
 ;;9002226.02101,"873,S68.412A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.419A ",.01)
 ;;S68.419A
 ;;9002226.02101,"873,S68.419A ",.02)
 ;;S68.419A
 ;;9002226.02101,"873,S68.419A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.421A ",.01)
 ;;S68.421A
 ;;9002226.02101,"873,S68.421A ",.02)
 ;;S68.421A
 ;;9002226.02101,"873,S68.421A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.422A ",.01)
 ;;S68.422A
 ;;9002226.02101,"873,S68.422A ",.02)
 ;;S68.422A
 ;;9002226.02101,"873,S68.422A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.429A ",.01)
 ;;S68.429A
 ;;9002226.02101,"873,S68.429A ",.02)
 ;;S68.429A
 ;;9002226.02101,"873,S68.429A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.511A ",.01)
 ;;S68.511A
 ;;9002226.02101,"873,S68.511A ",.02)
 ;;S68.511A
 ;;9002226.02101,"873,S68.511A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.512A ",.01)
 ;;S68.512A
 ;;9002226.02101,"873,S68.512A ",.02)
 ;;S68.512A
 ;;9002226.02101,"873,S68.512A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.519A ",.01)
 ;;S68.519A
 ;;9002226.02101,"873,S68.519A ",.02)
 ;;S68.519A
 ;;9002226.02101,"873,S68.519A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.521A ",.01)
 ;;S68.521A
 ;;9002226.02101,"873,S68.521A ",.02)
 ;;S68.521A
 ;;9002226.02101,"873,S68.521A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.522A ",.01)
 ;;S68.522A
 ;;9002226.02101,"873,S68.522A ",.02)
 ;;S68.522A
 ;;9002226.02101,"873,S68.522A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.529A ",.01)
 ;;S68.529A
 ;;9002226.02101,"873,S68.529A ",.02)
 ;;S68.529A
 ;;9002226.02101,"873,S68.529A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.610A ",.01)
 ;;S68.610A
 ;;9002226.02101,"873,S68.610A ",.02)
 ;;S68.610A
 ;;9002226.02101,"873,S68.610A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.611A ",.01)
 ;;S68.611A
 ;;9002226.02101,"873,S68.611A ",.02)
 ;;S68.611A
 ;;9002226.02101,"873,S68.611A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.612A ",.01)
 ;;S68.612A
 ;;9002226.02101,"873,S68.612A ",.02)
 ;;S68.612A
 ;;9002226.02101,"873,S68.612A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.613A ",.01)
 ;;S68.613A
 ;;9002226.02101,"873,S68.613A ",.02)
 ;;S68.613A
 ;;9002226.02101,"873,S68.613A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.614A ",.01)
 ;;S68.614A
 ;;9002226.02101,"873,S68.614A ",.02)
 ;;S68.614A
 ;;9002226.02101,"873,S68.614A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.615A ",.01)
 ;;S68.615A
 ;;9002226.02101,"873,S68.615A ",.02)
 ;;S68.615A
 ;;9002226.02101,"873,S68.615A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.616A ",.01)
 ;;S68.616A
 ;;9002226.02101,"873,S68.616A ",.02)
 ;;S68.616A
 ;;9002226.02101,"873,S68.616A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.617A ",.01)
 ;;S68.617A
 ;;9002226.02101,"873,S68.617A ",.02)
 ;;S68.617A
 ;;9002226.02101,"873,S68.617A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.618A ",.01)
 ;;S68.618A
 ;;9002226.02101,"873,S68.618A ",.02)
 ;;S68.618A
 ;;9002226.02101,"873,S68.618A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.619A ",.01)
 ;;S68.619A
 ;;9002226.02101,"873,S68.619A ",.02)
 ;;S68.619A
 ;;9002226.02101,"873,S68.619A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.620A ",.01)
 ;;S68.620A
 ;;9002226.02101,"873,S68.620A ",.02)
 ;;S68.620A
 ;;9002226.02101,"873,S68.620A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.621A ",.01)
 ;;S68.621A
 ;;9002226.02101,"873,S68.621A ",.02)
 ;;S68.621A
 ;;9002226.02101,"873,S68.621A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.622A ",.01)
 ;;S68.622A
 ;;9002226.02101,"873,S68.622A ",.02)
 ;;S68.622A
 ;;9002226.02101,"873,S68.622A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.623A ",.01)
 ;;S68.623A
 ;;9002226.02101,"873,S68.623A ",.02)
 ;;S68.623A
 ;;9002226.02101,"873,S68.623A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.624A ",.01)
 ;;S68.624A
 ;;9002226.02101,"873,S68.624A ",.02)
 ;;S68.624A
 ;;9002226.02101,"873,S68.624A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.625A ",.01)
 ;;S68.625A
 ;;9002226.02101,"873,S68.625A ",.02)
 ;;S68.625A
 ;;9002226.02101,"873,S68.625A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.626A ",.01)
 ;;S68.626A
 ;;9002226.02101,"873,S68.626A ",.02)
 ;;S68.626A
 ;;9002226.02101,"873,S68.626A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.627A ",.01)
 ;;S68.627A
 ;;9002226.02101,"873,S68.627A ",.02)
 ;;S68.627A
 ;;9002226.02101,"873,S68.627A ",.03)
 ;;30
 ;;9002226.02101,"873,S68.628A ",.01)
 ;;S68.628A
 ;;9002226.02101,"873,S68.628A ",.02)
 ;;S68.628A