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

ATXXA140.m

Go to the documentation of this file.
ATXXA140 ;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,T23.539A ",.01)
 ;;T23.539A
 ;;9002226.02101,"873,T23.539A ",.02)
 ;;T23.539A
 ;;9002226.02101,"873,T23.539A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.541A ",.01)
 ;;T23.541A
 ;;9002226.02101,"873,T23.541A ",.02)
 ;;T23.541A
 ;;9002226.02101,"873,T23.541A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.542A ",.01)
 ;;T23.542A
 ;;9002226.02101,"873,T23.542A ",.02)
 ;;T23.542A
 ;;9002226.02101,"873,T23.542A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.549A ",.01)
 ;;T23.549A
 ;;9002226.02101,"873,T23.549A ",.02)
 ;;T23.549A
 ;;9002226.02101,"873,T23.549A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.551A ",.01)
 ;;T23.551A
 ;;9002226.02101,"873,T23.551A ",.02)
 ;;T23.551A
 ;;9002226.02101,"873,T23.551A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.552A ",.01)
 ;;T23.552A
 ;;9002226.02101,"873,T23.552A ",.02)
 ;;T23.552A
 ;;9002226.02101,"873,T23.552A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.559A ",.01)
 ;;T23.559A
 ;;9002226.02101,"873,T23.559A ",.02)
 ;;T23.559A
 ;;9002226.02101,"873,T23.559A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.561A ",.01)
 ;;T23.561A
 ;;9002226.02101,"873,T23.561A ",.02)
 ;;T23.561A
 ;;9002226.02101,"873,T23.561A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.562A ",.01)
 ;;T23.562A
 ;;9002226.02101,"873,T23.562A ",.02)
 ;;T23.562A
 ;;9002226.02101,"873,T23.562A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.569A ",.01)
 ;;T23.569A
 ;;9002226.02101,"873,T23.569A ",.02)
 ;;T23.569A
 ;;9002226.02101,"873,T23.569A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.571A ",.01)
 ;;T23.571A
 ;;9002226.02101,"873,T23.571A ",.02)
 ;;T23.571A
 ;;9002226.02101,"873,T23.571A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.572A ",.01)
 ;;T23.572A
 ;;9002226.02101,"873,T23.572A ",.02)
 ;;T23.572A
 ;;9002226.02101,"873,T23.572A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.579A ",.01)
 ;;T23.579A
 ;;9002226.02101,"873,T23.579A ",.02)
 ;;T23.579A
 ;;9002226.02101,"873,T23.579A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.591A ",.01)
 ;;T23.591A
 ;;9002226.02101,"873,T23.591A ",.02)
 ;;T23.591A
 ;;9002226.02101,"873,T23.591A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.592A ",.01)
 ;;T23.592A
 ;;9002226.02101,"873,T23.592A ",.02)
 ;;T23.592A
 ;;9002226.02101,"873,T23.592A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.599A ",.01)
 ;;T23.599A
 ;;9002226.02101,"873,T23.599A ",.02)
 ;;T23.599A
 ;;9002226.02101,"873,T23.599A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.601A ",.01)
 ;;T23.601A
 ;;9002226.02101,"873,T23.601A ",.02)
 ;;T23.601A
 ;;9002226.02101,"873,T23.601A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.602A ",.01)
 ;;T23.602A
 ;;9002226.02101,"873,T23.602A ",.02)
 ;;T23.602A
 ;;9002226.02101,"873,T23.602A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.609A ",.01)
 ;;T23.609A
 ;;9002226.02101,"873,T23.609A ",.02)
 ;;T23.609A
 ;;9002226.02101,"873,T23.609A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.611A ",.01)
 ;;T23.611A
 ;;9002226.02101,"873,T23.611A ",.02)
 ;;T23.611A
 ;;9002226.02101,"873,T23.611A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.612A ",.01)
 ;;T23.612A
 ;;9002226.02101,"873,T23.612A ",.02)
 ;;T23.612A
 ;;9002226.02101,"873,T23.612A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.619A ",.01)
 ;;T23.619A
 ;;9002226.02101,"873,T23.619A ",.02)
 ;;T23.619A
 ;;9002226.02101,"873,T23.619A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.621A ",.01)
 ;;T23.621A
 ;;9002226.02101,"873,T23.621A ",.02)
 ;;T23.621A
 ;;9002226.02101,"873,T23.621A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.622A ",.01)
 ;;T23.622A
 ;;9002226.02101,"873,T23.622A ",.02)
 ;;T23.622A
 ;;9002226.02101,"873,T23.622A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.629A ",.01)
 ;;T23.629A
 ;;9002226.02101,"873,T23.629A ",.02)
 ;;T23.629A
 ;;9002226.02101,"873,T23.629A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.631A ",.01)
 ;;T23.631A
 ;;9002226.02101,"873,T23.631A ",.02)
 ;;T23.631A
 ;;9002226.02101,"873,T23.631A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.632A ",.01)
 ;;T23.632A
 ;;9002226.02101,"873,T23.632A ",.02)
 ;;T23.632A
 ;;9002226.02101,"873,T23.632A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.639A ",.01)
 ;;T23.639A
 ;;9002226.02101,"873,T23.639A ",.02)
 ;;T23.639A
 ;;9002226.02101,"873,T23.639A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.641A ",.01)
 ;;T23.641A
 ;;9002226.02101,"873,T23.641A ",.02)
 ;;T23.641A
 ;;9002226.02101,"873,T23.641A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.642A ",.01)
 ;;T23.642A
 ;;9002226.02101,"873,T23.642A ",.02)
 ;;T23.642A
 ;;9002226.02101,"873,T23.642A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.649A ",.01)
 ;;T23.649A
 ;;9002226.02101,"873,T23.649A ",.02)
 ;;T23.649A
 ;;9002226.02101,"873,T23.649A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.651A ",.01)
 ;;T23.651A
 ;;9002226.02101,"873,T23.651A ",.02)
 ;;T23.651A
 ;;9002226.02101,"873,T23.651A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.652A ",.01)
 ;;T23.652A
 ;;9002226.02101,"873,T23.652A ",.02)
 ;;T23.652A
 ;;9002226.02101,"873,T23.652A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.659A ",.01)
 ;;T23.659A
 ;;9002226.02101,"873,T23.659A ",.02)
 ;;T23.659A
 ;;9002226.02101,"873,T23.659A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.661A ",.01)
 ;;T23.661A
 ;;9002226.02101,"873,T23.661A ",.02)
 ;;T23.661A
 ;;9002226.02101,"873,T23.661A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.662A ",.01)
 ;;T23.662A
 ;;9002226.02101,"873,T23.662A ",.02)
 ;;T23.662A
 ;;9002226.02101,"873,T23.662A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.669A ",.01)
 ;;T23.669A
 ;;9002226.02101,"873,T23.669A ",.02)
 ;;T23.669A
 ;;9002226.02101,"873,T23.669A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.671A ",.01)
 ;;T23.671A
 ;;9002226.02101,"873,T23.671A ",.02)
 ;;T23.671A
 ;;9002226.02101,"873,T23.671A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.672A ",.01)
 ;;T23.672A
 ;;9002226.02101,"873,T23.672A ",.02)
 ;;T23.672A
 ;;9002226.02101,"873,T23.672A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.679A ",.01)
 ;;T23.679A
 ;;9002226.02101,"873,T23.679A ",.02)
 ;;T23.679A
 ;;9002226.02101,"873,T23.679A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.691A ",.01)
 ;;T23.691A
 ;;9002226.02101,"873,T23.691A ",.02)
 ;;T23.691A
 ;;9002226.02101,"873,T23.691A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.692A ",.01)
 ;;T23.692A
 ;;9002226.02101,"873,T23.692A ",.02)
 ;;T23.692A
 ;;9002226.02101,"873,T23.692A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.699A ",.01)
 ;;T23.699A
 ;;9002226.02101,"873,T23.699A ",.02)
 ;;T23.699A
 ;;9002226.02101,"873,T23.699A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.701A ",.01)
 ;;T23.701A
 ;;9002226.02101,"873,T23.701A ",.02)
 ;;T23.701A
 ;;9002226.02101,"873,T23.701A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.702A ",.01)
 ;;T23.702A
 ;;9002226.02101,"873,T23.702A ",.02)
 ;;T23.702A
 ;;9002226.02101,"873,T23.702A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.709A ",.01)
 ;;T23.709A
 ;;9002226.02101,"873,T23.709A ",.02)
 ;;T23.709A
 ;;9002226.02101,"873,T23.709A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.711A ",.01)
 ;;T23.711A
 ;;9002226.02101,"873,T23.711A ",.02)
 ;;T23.711A
 ;;9002226.02101,"873,T23.711A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.712A ",.01)
 ;;T23.712A
 ;;9002226.02101,"873,T23.712A ",.02)
 ;;T23.712A
 ;;9002226.02101,"873,T23.712A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.719A ",.01)
 ;;T23.719A
 ;;9002226.02101,"873,T23.719A ",.02)
 ;;T23.719A
 ;;9002226.02101,"873,T23.719A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.721A ",.01)
 ;;T23.721A
 ;;9002226.02101,"873,T23.721A ",.02)
 ;;T23.721A
 ;;9002226.02101,"873,T23.721A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.722A ",.01)
 ;;T23.722A
 ;;9002226.02101,"873,T23.722A ",.02)
 ;;T23.722A
 ;;9002226.02101,"873,T23.722A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.729A ",.01)
 ;;T23.729A
 ;;9002226.02101,"873,T23.729A ",.02)
 ;;T23.729A
 ;;9002226.02101,"873,T23.729A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.731A ",.01)
 ;;T23.731A
 ;;9002226.02101,"873,T23.731A ",.02)
 ;;T23.731A
 ;;9002226.02101,"873,T23.731A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.732A ",.01)
 ;;T23.732A
 ;;9002226.02101,"873,T23.732A ",.02)
 ;;T23.732A
 ;;9002226.02101,"873,T23.732A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.739A ",.01)
 ;;T23.739A
 ;;9002226.02101,"873,T23.739A ",.02)
 ;;T23.739A
 ;;9002226.02101,"873,T23.739A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.741A ",.01)
 ;;T23.741A
 ;;9002226.02101,"873,T23.741A ",.02)
 ;;T23.741A
 ;;9002226.02101,"873,T23.741A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.742A ",.01)
 ;;T23.742A
 ;;9002226.02101,"873,T23.742A ",.02)
 ;;T23.742A
 ;;9002226.02101,"873,T23.742A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.749A ",.01)
 ;;T23.749A
 ;;9002226.02101,"873,T23.749A ",.02)
 ;;T23.749A
 ;;9002226.02101,"873,T23.749A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.751A ",.01)
 ;;T23.751A
 ;;9002226.02101,"873,T23.751A ",.02)
 ;;T23.751A
 ;;9002226.02101,"873,T23.751A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.752A ",.01)
 ;;T23.752A
 ;;9002226.02101,"873,T23.752A ",.02)
 ;;T23.752A
 ;;9002226.02101,"873,T23.752A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.759A ",.01)
 ;;T23.759A
 ;;9002226.02101,"873,T23.759A ",.02)
 ;;T23.759A
 ;;9002226.02101,"873,T23.759A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.761A ",.01)
 ;;T23.761A
 ;;9002226.02101,"873,T23.761A ",.02)
 ;;T23.761A
 ;;9002226.02101,"873,T23.761A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.762A ",.01)
 ;;T23.762A
 ;;9002226.02101,"873,T23.762A ",.02)
 ;;T23.762A
 ;;9002226.02101,"873,T23.762A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.769A ",.01)
 ;;T23.769A
 ;;9002226.02101,"873,T23.769A ",.02)
 ;;T23.769A
 ;;9002226.02101,"873,T23.769A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.771A ",.01)
 ;;T23.771A
 ;;9002226.02101,"873,T23.771A ",.02)
 ;;T23.771A
 ;;9002226.02101,"873,T23.771A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.772A ",.01)
 ;;T23.772A
 ;;9002226.02101,"873,T23.772A ",.02)
 ;;T23.772A
 ;;9002226.02101,"873,T23.772A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.779A ",.01)
 ;;T23.779A
 ;;9002226.02101,"873,T23.779A ",.02)
 ;;T23.779A
 ;;9002226.02101,"873,T23.779A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.791A ",.01)
 ;;T23.791A
 ;;9002226.02101,"873,T23.791A ",.02)
 ;;T23.791A
 ;;9002226.02101,"873,T23.791A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.792A ",.01)
 ;;T23.792A
 ;;9002226.02101,"873,T23.792A ",.02)
 ;;T23.792A
 ;;9002226.02101,"873,T23.792A ",.03)
 ;;30
 ;;9002226.02101,"873,T23.799A ",.01)
 ;;T23.799A
 ;;9002226.02101,"873,T23.799A ",.02)
 ;;T23.799A
 ;;9002226.02101,"873,T23.799A ",.03)
 ;;30
 ;;9002226.02101,"873,T24.001A ",.01)
 ;;T24.001A
 ;;9002226.02101,"873,T24.001A ",.02)
 ;;T24.001A
 ;;9002226.02101,"873,T24.001A ",.03)
 ;;30
 ;;9002226.02101,"873,T24.002A ",.01)
 ;;T24.002A
 ;;9002226.02101,"873,T24.002A ",.02)
 ;;T24.002A
 ;;9002226.02101,"873,T24.002A ",.03)
 ;;30
 ;;9002226.02101,"873,T24.009A ",.01)
 ;;T24.009A
 ;;9002226.02101,"873,T24.009A ",.02)
 ;;T24.009A
 ;;9002226.02101,"873,T24.009A ",.03)
 ;;30
 ;;9002226.02101,"873,T24.011A ",.01)
 ;;T24.011A
 ;;9002226.02101,"873,T24.011A ",.02)
 ;;T24.011A
 ;;9002226.02101,"873,T24.011A ",.03)
 ;;30
 ;;9002226.02101,"873,T24.012A ",.01)
 ;;T24.012A
 ;;9002226.02101,"873,T24.012A ",.02)
 ;;T24.012A
 ;;9002226.02101,"873,T24.012A ",.03)
 ;;30
 ;;9002226.02101,"873,T24.019A ",.01)
 ;;T24.019A
 ;;9002226.02101,"873,T24.019A ",.02)
 ;;T24.019A
 ;;9002226.02101,"873,T24.019A ",.03)
 ;;30
 ;;9002226.02101,"873,T24.021A ",.01)
 ;;T24.021A
 ;;9002226.02101,"873,T24.021A ",.02)
 ;;T24.021A
 ;;9002226.02101,"873,T24.021A ",.03)
 ;;30
 ;;9002226.02101,"873,T24.022A ",.01)
 ;;T24.022A
 ;;9002226.02101,"873,T24.022A ",.02)
 ;;T24.022A
 ;;9002226.02101,"873,T24.022A ",.03)
 ;;30
 ;;9002226.02101,"873,T24.029A ",.01)
 ;;T24.029A