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

ATXXA48.m

Go to the documentation of this file.
ATXXA48 ;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,S32.10XA ",.01)
 ;;S32.10XA
 ;;9002226.02101,"873,S32.10XA ",.02)
 ;;S32.10XA
 ;;9002226.02101,"873,S32.10XA ",.03)
 ;;30
 ;;9002226.02101,"873,S32.10XB ",.01)
 ;;S32.10XB
 ;;9002226.02101,"873,S32.10XB ",.02)
 ;;S32.10XB
 ;;9002226.02101,"873,S32.10XB ",.03)
 ;;30
 ;;9002226.02101,"873,S32.110A ",.01)
 ;;S32.110A
 ;;9002226.02101,"873,S32.110A ",.02)
 ;;S32.110A
 ;;9002226.02101,"873,S32.110A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.110B ",.01)
 ;;S32.110B
 ;;9002226.02101,"873,S32.110B ",.02)
 ;;S32.110B
 ;;9002226.02101,"873,S32.110B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.111A ",.01)
 ;;S32.111A
 ;;9002226.02101,"873,S32.111A ",.02)
 ;;S32.111A
 ;;9002226.02101,"873,S32.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.111B ",.01)
 ;;S32.111B
 ;;9002226.02101,"873,S32.111B ",.02)
 ;;S32.111B
 ;;9002226.02101,"873,S32.111B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.112A ",.01)
 ;;S32.112A
 ;;9002226.02101,"873,S32.112A ",.02)
 ;;S32.112A
 ;;9002226.02101,"873,S32.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.112B ",.01)
 ;;S32.112B
 ;;9002226.02101,"873,S32.112B ",.02)
 ;;S32.112B
 ;;9002226.02101,"873,S32.112B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.119A ",.01)
 ;;S32.119A
 ;;9002226.02101,"873,S32.119A ",.02)
 ;;S32.119A
 ;;9002226.02101,"873,S32.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.119B ",.01)
 ;;S32.119B
 ;;9002226.02101,"873,S32.119B ",.02)
 ;;S32.119B
 ;;9002226.02101,"873,S32.119B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.120A ",.01)
 ;;S32.120A
 ;;9002226.02101,"873,S32.120A ",.02)
 ;;S32.120A
 ;;9002226.02101,"873,S32.120A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.120B ",.01)
 ;;S32.120B
 ;;9002226.02101,"873,S32.120B ",.02)
 ;;S32.120B
 ;;9002226.02101,"873,S32.120B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.121A ",.01)
 ;;S32.121A
 ;;9002226.02101,"873,S32.121A ",.02)
 ;;S32.121A
 ;;9002226.02101,"873,S32.121A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.121B ",.01)
 ;;S32.121B
 ;;9002226.02101,"873,S32.121B ",.02)
 ;;S32.121B
 ;;9002226.02101,"873,S32.121B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.122A ",.01)
 ;;S32.122A
 ;;9002226.02101,"873,S32.122A ",.02)
 ;;S32.122A
 ;;9002226.02101,"873,S32.122A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.122B ",.01)
 ;;S32.122B
 ;;9002226.02101,"873,S32.122B ",.02)
 ;;S32.122B
 ;;9002226.02101,"873,S32.122B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.129A ",.01)
 ;;S32.129A
 ;;9002226.02101,"873,S32.129A ",.02)
 ;;S32.129A
 ;;9002226.02101,"873,S32.129A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.129B ",.01)
 ;;S32.129B
 ;;9002226.02101,"873,S32.129B ",.02)
 ;;S32.129B
 ;;9002226.02101,"873,S32.129B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.130A ",.01)
 ;;S32.130A
 ;;9002226.02101,"873,S32.130A ",.02)
 ;;S32.130A
 ;;9002226.02101,"873,S32.130A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.130B ",.01)
 ;;S32.130B
 ;;9002226.02101,"873,S32.130B ",.02)
 ;;S32.130B
 ;;9002226.02101,"873,S32.130B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.131A ",.01)
 ;;S32.131A
 ;;9002226.02101,"873,S32.131A ",.02)
 ;;S32.131A
 ;;9002226.02101,"873,S32.131A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.131B ",.01)
 ;;S32.131B
 ;;9002226.02101,"873,S32.131B ",.02)
 ;;S32.131B
 ;;9002226.02101,"873,S32.131B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.132A ",.01)
 ;;S32.132A
 ;;9002226.02101,"873,S32.132A ",.02)
 ;;S32.132A
 ;;9002226.02101,"873,S32.132A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.132B ",.01)
 ;;S32.132B
 ;;9002226.02101,"873,S32.132B ",.02)
 ;;S32.132B
 ;;9002226.02101,"873,S32.132B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.139A ",.01)
 ;;S32.139A
 ;;9002226.02101,"873,S32.139A ",.02)
 ;;S32.139A
 ;;9002226.02101,"873,S32.139A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.139B ",.01)
 ;;S32.139B
 ;;9002226.02101,"873,S32.139B ",.02)
 ;;S32.139B
 ;;9002226.02101,"873,S32.139B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.14XA ",.01)
 ;;S32.14XA
 ;;9002226.02101,"873,S32.14XA ",.02)
 ;;S32.14XA
 ;;9002226.02101,"873,S32.14XA ",.03)
 ;;30
 ;;9002226.02101,"873,S32.14XB ",.01)
 ;;S32.14XB
 ;;9002226.02101,"873,S32.14XB ",.02)
 ;;S32.14XB
 ;;9002226.02101,"873,S32.14XB ",.03)
 ;;30
 ;;9002226.02101,"873,S32.15XA ",.01)
 ;;S32.15XA
 ;;9002226.02101,"873,S32.15XA ",.02)
 ;;S32.15XA
 ;;9002226.02101,"873,S32.15XA ",.03)
 ;;30
 ;;9002226.02101,"873,S32.15XB ",.01)
 ;;S32.15XB
 ;;9002226.02101,"873,S32.15XB ",.02)
 ;;S32.15XB
 ;;9002226.02101,"873,S32.15XB ",.03)
 ;;30
 ;;9002226.02101,"873,S32.16XA ",.01)
 ;;S32.16XA
 ;;9002226.02101,"873,S32.16XA ",.02)
 ;;S32.16XA
 ;;9002226.02101,"873,S32.16XA ",.03)
 ;;30
 ;;9002226.02101,"873,S32.16XB ",.01)
 ;;S32.16XB
 ;;9002226.02101,"873,S32.16XB ",.02)
 ;;S32.16XB
 ;;9002226.02101,"873,S32.16XB ",.03)
 ;;30
 ;;9002226.02101,"873,S32.17XA ",.01)
 ;;S32.17XA
 ;;9002226.02101,"873,S32.17XA ",.02)
 ;;S32.17XA
 ;;9002226.02101,"873,S32.17XA ",.03)
 ;;30
 ;;9002226.02101,"873,S32.17XB ",.01)
 ;;S32.17XB
 ;;9002226.02101,"873,S32.17XB ",.02)
 ;;S32.17XB
 ;;9002226.02101,"873,S32.17XB ",.03)
 ;;30
 ;;9002226.02101,"873,S32.19XA ",.01)
 ;;S32.19XA
 ;;9002226.02101,"873,S32.19XA ",.02)
 ;;S32.19XA
 ;;9002226.02101,"873,S32.19XA ",.03)
 ;;30
 ;;9002226.02101,"873,S32.19XB ",.01)
 ;;S32.19XB
 ;;9002226.02101,"873,S32.19XB ",.02)
 ;;S32.19XB
 ;;9002226.02101,"873,S32.19XB ",.03)
 ;;30
 ;;9002226.02101,"873,S32.2XXA ",.01)
 ;;S32.2XXA
 ;;9002226.02101,"873,S32.2XXA ",.02)
 ;;S32.2XXA
 ;;9002226.02101,"873,S32.2XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S32.2XXB ",.01)
 ;;S32.2XXB
 ;;9002226.02101,"873,S32.2XXB ",.02)
 ;;S32.2XXB
 ;;9002226.02101,"873,S32.2XXB ",.03)
 ;;30
 ;;9002226.02101,"873,S32.301A ",.01)
 ;;S32.301A
 ;;9002226.02101,"873,S32.301A ",.02)
 ;;S32.301A
 ;;9002226.02101,"873,S32.301A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.301B ",.01)
 ;;S32.301B
 ;;9002226.02101,"873,S32.301B ",.02)
 ;;S32.301B
 ;;9002226.02101,"873,S32.301B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.302A ",.01)
 ;;S32.302A
 ;;9002226.02101,"873,S32.302A ",.02)
 ;;S32.302A
 ;;9002226.02101,"873,S32.302A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.302B ",.01)
 ;;S32.302B
 ;;9002226.02101,"873,S32.302B ",.02)
 ;;S32.302B
 ;;9002226.02101,"873,S32.302B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.309A ",.01)
 ;;S32.309A
 ;;9002226.02101,"873,S32.309A ",.02)
 ;;S32.309A
 ;;9002226.02101,"873,S32.309A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.309B ",.01)
 ;;S32.309B
 ;;9002226.02101,"873,S32.309B ",.02)
 ;;S32.309B
 ;;9002226.02101,"873,S32.309B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.311A ",.01)
 ;;S32.311A
 ;;9002226.02101,"873,S32.311A ",.02)
 ;;S32.311A
 ;;9002226.02101,"873,S32.311A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.311B ",.01)
 ;;S32.311B
 ;;9002226.02101,"873,S32.311B ",.02)
 ;;S32.311B
 ;;9002226.02101,"873,S32.311B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.312A ",.01)
 ;;S32.312A
 ;;9002226.02101,"873,S32.312A ",.02)
 ;;S32.312A
 ;;9002226.02101,"873,S32.312A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.312B ",.01)
 ;;S32.312B
 ;;9002226.02101,"873,S32.312B ",.02)
 ;;S32.312B
 ;;9002226.02101,"873,S32.312B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.313A ",.01)
 ;;S32.313A
 ;;9002226.02101,"873,S32.313A ",.02)
 ;;S32.313A
 ;;9002226.02101,"873,S32.313A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.313B ",.01)
 ;;S32.313B
 ;;9002226.02101,"873,S32.313B ",.02)
 ;;S32.313B
 ;;9002226.02101,"873,S32.313B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.314A ",.01)
 ;;S32.314A
 ;;9002226.02101,"873,S32.314A ",.02)
 ;;S32.314A
 ;;9002226.02101,"873,S32.314A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.314B ",.01)
 ;;S32.314B
 ;;9002226.02101,"873,S32.314B ",.02)
 ;;S32.314B
 ;;9002226.02101,"873,S32.314B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.315A ",.01)
 ;;S32.315A
 ;;9002226.02101,"873,S32.315A ",.02)
 ;;S32.315A
 ;;9002226.02101,"873,S32.315A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.315B ",.01)
 ;;S32.315B
 ;;9002226.02101,"873,S32.315B ",.02)
 ;;S32.315B
 ;;9002226.02101,"873,S32.315B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.316A ",.01)
 ;;S32.316A
 ;;9002226.02101,"873,S32.316A ",.02)
 ;;S32.316A
 ;;9002226.02101,"873,S32.316A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.316B ",.01)
 ;;S32.316B
 ;;9002226.02101,"873,S32.316B ",.02)
 ;;S32.316B
 ;;9002226.02101,"873,S32.316B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.391A ",.01)
 ;;S32.391A
 ;;9002226.02101,"873,S32.391A ",.02)
 ;;S32.391A
 ;;9002226.02101,"873,S32.391A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.391B ",.01)
 ;;S32.391B
 ;;9002226.02101,"873,S32.391B ",.02)
 ;;S32.391B
 ;;9002226.02101,"873,S32.391B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.392A ",.01)
 ;;S32.392A
 ;;9002226.02101,"873,S32.392A ",.02)
 ;;S32.392A
 ;;9002226.02101,"873,S32.392A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.392B ",.01)
 ;;S32.392B
 ;;9002226.02101,"873,S32.392B ",.02)
 ;;S32.392B
 ;;9002226.02101,"873,S32.392B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.399A ",.01)
 ;;S32.399A
 ;;9002226.02101,"873,S32.399A ",.02)
 ;;S32.399A
 ;;9002226.02101,"873,S32.399A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.399B ",.01)
 ;;S32.399B
 ;;9002226.02101,"873,S32.399B ",.02)
 ;;S32.399B
 ;;9002226.02101,"873,S32.399B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.401A ",.01)
 ;;S32.401A
 ;;9002226.02101,"873,S32.401A ",.02)
 ;;S32.401A
 ;;9002226.02101,"873,S32.401A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.401B ",.01)
 ;;S32.401B
 ;;9002226.02101,"873,S32.401B ",.02)
 ;;S32.401B
 ;;9002226.02101,"873,S32.401B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.402A ",.01)
 ;;S32.402A
 ;;9002226.02101,"873,S32.402A ",.02)
 ;;S32.402A
 ;;9002226.02101,"873,S32.402A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.402B ",.01)
 ;;S32.402B
 ;;9002226.02101,"873,S32.402B ",.02)
 ;;S32.402B
 ;;9002226.02101,"873,S32.402B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.409A ",.01)
 ;;S32.409A
 ;;9002226.02101,"873,S32.409A ",.02)
 ;;S32.409A
 ;;9002226.02101,"873,S32.409A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.409B ",.01)
 ;;S32.409B
 ;;9002226.02101,"873,S32.409B ",.02)
 ;;S32.409B
 ;;9002226.02101,"873,S32.409B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.411A ",.01)
 ;;S32.411A
 ;;9002226.02101,"873,S32.411A ",.02)
 ;;S32.411A
 ;;9002226.02101,"873,S32.411A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.411B ",.01)
 ;;S32.411B
 ;;9002226.02101,"873,S32.411B ",.02)
 ;;S32.411B
 ;;9002226.02101,"873,S32.411B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.412A ",.01)
 ;;S32.412A
 ;;9002226.02101,"873,S32.412A ",.02)
 ;;S32.412A
 ;;9002226.02101,"873,S32.412A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.412B ",.01)
 ;;S32.412B
 ;;9002226.02101,"873,S32.412B ",.02)
 ;;S32.412B
 ;;9002226.02101,"873,S32.412B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.413A ",.01)
 ;;S32.413A
 ;;9002226.02101,"873,S32.413A ",.02)
 ;;S32.413A
 ;;9002226.02101,"873,S32.413A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.413B ",.01)
 ;;S32.413B
 ;;9002226.02101,"873,S32.413B ",.02)
 ;;S32.413B
 ;;9002226.02101,"873,S32.413B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.414A ",.01)
 ;;S32.414A
 ;;9002226.02101,"873,S32.414A ",.02)
 ;;S32.414A
 ;;9002226.02101,"873,S32.414A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.414B ",.01)
 ;;S32.414B
 ;;9002226.02101,"873,S32.414B ",.02)
 ;;S32.414B
 ;;9002226.02101,"873,S32.414B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.415A ",.01)
 ;;S32.415A
 ;;9002226.02101,"873,S32.415A ",.02)
 ;;S32.415A
 ;;9002226.02101,"873,S32.415A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.415B ",.01)
 ;;S32.415B
 ;;9002226.02101,"873,S32.415B ",.02)
 ;;S32.415B
 ;;9002226.02101,"873,S32.415B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.416A ",.01)
 ;;S32.416A