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

ATXXA137.m

Go to the documentation of this file.
ATXXA137 ;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,T22.399A ",.01)
 ;;T22.399A
 ;;9002226.02101,"873,T22.399A ",.02)
 ;;T22.399A
 ;;9002226.02101,"873,T22.399A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.40XA ",.01)
 ;;T22.40XA
 ;;9002226.02101,"873,T22.40XA ",.02)
 ;;T22.40XA
 ;;9002226.02101,"873,T22.40XA ",.03)
 ;;30
 ;;9002226.02101,"873,T22.411A ",.01)
 ;;T22.411A
 ;;9002226.02101,"873,T22.411A ",.02)
 ;;T22.411A
 ;;9002226.02101,"873,T22.411A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.412A ",.01)
 ;;T22.412A
 ;;9002226.02101,"873,T22.412A ",.02)
 ;;T22.412A
 ;;9002226.02101,"873,T22.412A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.419A ",.01)
 ;;T22.419A
 ;;9002226.02101,"873,T22.419A ",.02)
 ;;T22.419A
 ;;9002226.02101,"873,T22.419A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.421A ",.01)
 ;;T22.421A
 ;;9002226.02101,"873,T22.421A ",.02)
 ;;T22.421A
 ;;9002226.02101,"873,T22.421A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.422A ",.01)
 ;;T22.422A
 ;;9002226.02101,"873,T22.422A ",.02)
 ;;T22.422A
 ;;9002226.02101,"873,T22.422A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.429A ",.01)
 ;;T22.429A
 ;;9002226.02101,"873,T22.429A ",.02)
 ;;T22.429A
 ;;9002226.02101,"873,T22.429A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.431A ",.01)
 ;;T22.431A
 ;;9002226.02101,"873,T22.431A ",.02)
 ;;T22.431A
 ;;9002226.02101,"873,T22.431A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.432A ",.01)
 ;;T22.432A
 ;;9002226.02101,"873,T22.432A ",.02)
 ;;T22.432A
 ;;9002226.02101,"873,T22.432A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.439A ",.01)
 ;;T22.439A
 ;;9002226.02101,"873,T22.439A ",.02)
 ;;T22.439A
 ;;9002226.02101,"873,T22.439A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.441A ",.01)
 ;;T22.441A
 ;;9002226.02101,"873,T22.441A ",.02)
 ;;T22.441A
 ;;9002226.02101,"873,T22.441A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.442A ",.01)
 ;;T22.442A
 ;;9002226.02101,"873,T22.442A ",.02)
 ;;T22.442A
 ;;9002226.02101,"873,T22.442A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.449A ",.01)
 ;;T22.449A
 ;;9002226.02101,"873,T22.449A ",.02)
 ;;T22.449A
 ;;9002226.02101,"873,T22.449A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.451A ",.01)
 ;;T22.451A
 ;;9002226.02101,"873,T22.451A ",.02)
 ;;T22.451A
 ;;9002226.02101,"873,T22.451A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.452A ",.01)
 ;;T22.452A
 ;;9002226.02101,"873,T22.452A ",.02)
 ;;T22.452A
 ;;9002226.02101,"873,T22.452A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.459A ",.01)
 ;;T22.459A
 ;;9002226.02101,"873,T22.459A ",.02)
 ;;T22.459A
 ;;9002226.02101,"873,T22.459A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.461A ",.01)
 ;;T22.461A
 ;;9002226.02101,"873,T22.461A ",.02)
 ;;T22.461A
 ;;9002226.02101,"873,T22.461A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.462A ",.01)
 ;;T22.462A
 ;;9002226.02101,"873,T22.462A ",.02)
 ;;T22.462A
 ;;9002226.02101,"873,T22.462A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.469A ",.01)
 ;;T22.469A
 ;;9002226.02101,"873,T22.469A ",.02)
 ;;T22.469A
 ;;9002226.02101,"873,T22.469A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.491A ",.01)
 ;;T22.491A
 ;;9002226.02101,"873,T22.491A ",.02)
 ;;T22.491A
 ;;9002226.02101,"873,T22.491A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.492A ",.01)
 ;;T22.492A
 ;;9002226.02101,"873,T22.492A ",.02)
 ;;T22.492A
 ;;9002226.02101,"873,T22.492A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.499A ",.01)
 ;;T22.499A
 ;;9002226.02101,"873,T22.499A ",.02)
 ;;T22.499A
 ;;9002226.02101,"873,T22.499A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.50XA ",.01)
 ;;T22.50XA
 ;;9002226.02101,"873,T22.50XA ",.02)
 ;;T22.50XA
 ;;9002226.02101,"873,T22.50XA ",.03)
 ;;30
 ;;9002226.02101,"873,T22.511A ",.01)
 ;;T22.511A
 ;;9002226.02101,"873,T22.511A ",.02)
 ;;T22.511A
 ;;9002226.02101,"873,T22.511A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.512A ",.01)
 ;;T22.512A
 ;;9002226.02101,"873,T22.512A ",.02)
 ;;T22.512A
 ;;9002226.02101,"873,T22.512A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.519A ",.01)
 ;;T22.519A
 ;;9002226.02101,"873,T22.519A ",.02)
 ;;T22.519A
 ;;9002226.02101,"873,T22.519A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.521A ",.01)
 ;;T22.521A
 ;;9002226.02101,"873,T22.521A ",.02)
 ;;T22.521A
 ;;9002226.02101,"873,T22.521A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.522A ",.01)
 ;;T22.522A
 ;;9002226.02101,"873,T22.522A ",.02)
 ;;T22.522A
 ;;9002226.02101,"873,T22.522A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.529A ",.01)
 ;;T22.529A
 ;;9002226.02101,"873,T22.529A ",.02)
 ;;T22.529A
 ;;9002226.02101,"873,T22.529A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.531A ",.01)
 ;;T22.531A
 ;;9002226.02101,"873,T22.531A ",.02)
 ;;T22.531A
 ;;9002226.02101,"873,T22.531A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.532A ",.01)
 ;;T22.532A
 ;;9002226.02101,"873,T22.532A ",.02)
 ;;T22.532A
 ;;9002226.02101,"873,T22.532A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.539A ",.01)
 ;;T22.539A
 ;;9002226.02101,"873,T22.539A ",.02)
 ;;T22.539A
 ;;9002226.02101,"873,T22.539A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.541A ",.01)
 ;;T22.541A
 ;;9002226.02101,"873,T22.541A ",.02)
 ;;T22.541A
 ;;9002226.02101,"873,T22.541A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.542A ",.01)
 ;;T22.542A
 ;;9002226.02101,"873,T22.542A ",.02)
 ;;T22.542A
 ;;9002226.02101,"873,T22.542A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.549A ",.01)
 ;;T22.549A
 ;;9002226.02101,"873,T22.549A ",.02)
 ;;T22.549A
 ;;9002226.02101,"873,T22.549A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.551A ",.01)
 ;;T22.551A
 ;;9002226.02101,"873,T22.551A ",.02)
 ;;T22.551A
 ;;9002226.02101,"873,T22.551A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.552A ",.01)
 ;;T22.552A
 ;;9002226.02101,"873,T22.552A ",.02)
 ;;T22.552A
 ;;9002226.02101,"873,T22.552A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.559A ",.01)
 ;;T22.559A
 ;;9002226.02101,"873,T22.559A ",.02)
 ;;T22.559A
 ;;9002226.02101,"873,T22.559A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.561A ",.01)
 ;;T22.561A
 ;;9002226.02101,"873,T22.561A ",.02)
 ;;T22.561A
 ;;9002226.02101,"873,T22.561A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.562A ",.01)
 ;;T22.562A
 ;;9002226.02101,"873,T22.562A ",.02)
 ;;T22.562A
 ;;9002226.02101,"873,T22.562A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.569A ",.01)
 ;;T22.569A
 ;;9002226.02101,"873,T22.569A ",.02)
 ;;T22.569A
 ;;9002226.02101,"873,T22.569A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.591A ",.01)
 ;;T22.591A
 ;;9002226.02101,"873,T22.591A ",.02)
 ;;T22.591A
 ;;9002226.02101,"873,T22.591A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.592A ",.01)
 ;;T22.592A
 ;;9002226.02101,"873,T22.592A ",.02)
 ;;T22.592A
 ;;9002226.02101,"873,T22.592A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.599A ",.01)
 ;;T22.599A
 ;;9002226.02101,"873,T22.599A ",.02)
 ;;T22.599A
 ;;9002226.02101,"873,T22.599A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.60XA ",.01)
 ;;T22.60XA
 ;;9002226.02101,"873,T22.60XA ",.02)
 ;;T22.60XA
 ;;9002226.02101,"873,T22.60XA ",.03)
 ;;30
 ;;9002226.02101,"873,T22.611A ",.01)
 ;;T22.611A
 ;;9002226.02101,"873,T22.611A ",.02)
 ;;T22.611A
 ;;9002226.02101,"873,T22.611A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.612A ",.01)
 ;;T22.612A
 ;;9002226.02101,"873,T22.612A ",.02)
 ;;T22.612A
 ;;9002226.02101,"873,T22.612A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.619A ",.01)
 ;;T22.619A
 ;;9002226.02101,"873,T22.619A ",.02)
 ;;T22.619A
 ;;9002226.02101,"873,T22.619A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.621A ",.01)
 ;;T22.621A
 ;;9002226.02101,"873,T22.621A ",.02)
 ;;T22.621A
 ;;9002226.02101,"873,T22.621A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.622A ",.01)
 ;;T22.622A
 ;;9002226.02101,"873,T22.622A ",.02)
 ;;T22.622A
 ;;9002226.02101,"873,T22.622A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.629A ",.01)
 ;;T22.629A
 ;;9002226.02101,"873,T22.629A ",.02)
 ;;T22.629A
 ;;9002226.02101,"873,T22.629A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.631A ",.01)
 ;;T22.631A
 ;;9002226.02101,"873,T22.631A ",.02)
 ;;T22.631A
 ;;9002226.02101,"873,T22.631A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.632A ",.01)
 ;;T22.632A
 ;;9002226.02101,"873,T22.632A ",.02)
 ;;T22.632A
 ;;9002226.02101,"873,T22.632A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.639A ",.01)
 ;;T22.639A
 ;;9002226.02101,"873,T22.639A ",.02)
 ;;T22.639A
 ;;9002226.02101,"873,T22.639A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.641A ",.01)
 ;;T22.641A
 ;;9002226.02101,"873,T22.641A ",.02)
 ;;T22.641A
 ;;9002226.02101,"873,T22.641A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.642A ",.01)
 ;;T22.642A
 ;;9002226.02101,"873,T22.642A ",.02)
 ;;T22.642A
 ;;9002226.02101,"873,T22.642A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.649A ",.01)
 ;;T22.649A
 ;;9002226.02101,"873,T22.649A ",.02)
 ;;T22.649A
 ;;9002226.02101,"873,T22.649A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.651A ",.01)
 ;;T22.651A
 ;;9002226.02101,"873,T22.651A ",.02)
 ;;T22.651A
 ;;9002226.02101,"873,T22.651A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.652A ",.01)
 ;;T22.652A
 ;;9002226.02101,"873,T22.652A ",.02)
 ;;T22.652A
 ;;9002226.02101,"873,T22.652A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.659A ",.01)
 ;;T22.659A
 ;;9002226.02101,"873,T22.659A ",.02)
 ;;T22.659A
 ;;9002226.02101,"873,T22.659A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.661A ",.01)
 ;;T22.661A
 ;;9002226.02101,"873,T22.661A ",.02)
 ;;T22.661A
 ;;9002226.02101,"873,T22.661A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.662A ",.01)
 ;;T22.662A
 ;;9002226.02101,"873,T22.662A ",.02)
 ;;T22.662A
 ;;9002226.02101,"873,T22.662A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.669A ",.01)
 ;;T22.669A
 ;;9002226.02101,"873,T22.669A ",.02)
 ;;T22.669A
 ;;9002226.02101,"873,T22.669A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.691A ",.01)
 ;;T22.691A
 ;;9002226.02101,"873,T22.691A ",.02)
 ;;T22.691A
 ;;9002226.02101,"873,T22.691A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.692A ",.01)
 ;;T22.692A
 ;;9002226.02101,"873,T22.692A ",.02)
 ;;T22.692A
 ;;9002226.02101,"873,T22.692A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.699A ",.01)
 ;;T22.699A
 ;;9002226.02101,"873,T22.699A ",.02)
 ;;T22.699A
 ;;9002226.02101,"873,T22.699A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.70XA ",.01)
 ;;T22.70XA
 ;;9002226.02101,"873,T22.70XA ",.02)
 ;;T22.70XA
 ;;9002226.02101,"873,T22.70XA ",.03)
 ;;30
 ;;9002226.02101,"873,T22.711A ",.01)
 ;;T22.711A
 ;;9002226.02101,"873,T22.711A ",.02)
 ;;T22.711A
 ;;9002226.02101,"873,T22.711A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.712A ",.01)
 ;;T22.712A
 ;;9002226.02101,"873,T22.712A ",.02)
 ;;T22.712A
 ;;9002226.02101,"873,T22.712A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.719A ",.01)
 ;;T22.719A
 ;;9002226.02101,"873,T22.719A ",.02)
 ;;T22.719A
 ;;9002226.02101,"873,T22.719A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.721A ",.01)
 ;;T22.721A
 ;;9002226.02101,"873,T22.721A ",.02)
 ;;T22.721A
 ;;9002226.02101,"873,T22.721A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.722A ",.01)
 ;;T22.722A
 ;;9002226.02101,"873,T22.722A ",.02)
 ;;T22.722A
 ;;9002226.02101,"873,T22.722A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.729A ",.01)
 ;;T22.729A
 ;;9002226.02101,"873,T22.729A ",.02)
 ;;T22.729A
 ;;9002226.02101,"873,T22.729A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.731A ",.01)
 ;;T22.731A
 ;;9002226.02101,"873,T22.731A ",.02)
 ;;T22.731A
 ;;9002226.02101,"873,T22.731A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.732A ",.01)
 ;;T22.732A
 ;;9002226.02101,"873,T22.732A ",.02)
 ;;T22.732A
 ;;9002226.02101,"873,T22.732A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.739A ",.01)
 ;;T22.739A
 ;;9002226.02101,"873,T22.739A ",.02)
 ;;T22.739A
 ;;9002226.02101,"873,T22.739A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.741A ",.01)
 ;;T22.741A
 ;;9002226.02101,"873,T22.741A ",.02)
 ;;T22.741A
 ;;9002226.02101,"873,T22.741A ",.03)
 ;;30
 ;;9002226.02101,"873,T22.742A ",.01)
 ;;T22.742A