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

ATXXA150.m

Go to the documentation of this file.
ATXXA150 ;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,T42.6X3A ",.02)
 ;;T42.6X3A
 ;;9002226.02101,"873,T42.6X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T42.6X4A ",.01)
 ;;T42.6X4A
 ;;9002226.02101,"873,T42.6X4A ",.02)
 ;;T42.6X4A
 ;;9002226.02101,"873,T42.6X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T42.71XA ",.01)
 ;;T42.71XA
 ;;9002226.02101,"873,T42.71XA ",.02)
 ;;T42.71XA
 ;;9002226.02101,"873,T42.71XA ",.03)
 ;;30
 ;;9002226.02101,"873,T42.72XA ",.01)
 ;;T42.72XA
 ;;9002226.02101,"873,T42.72XA ",.02)
 ;;T42.72XA
 ;;9002226.02101,"873,T42.72XA ",.03)
 ;;30
 ;;9002226.02101,"873,T42.73XA ",.01)
 ;;T42.73XA
 ;;9002226.02101,"873,T42.73XA ",.02)
 ;;T42.73XA
 ;;9002226.02101,"873,T42.73XA ",.03)
 ;;30
 ;;9002226.02101,"873,T42.74XA ",.01)
 ;;T42.74XA
 ;;9002226.02101,"873,T42.74XA ",.02)
 ;;T42.74XA
 ;;9002226.02101,"873,T42.74XA ",.03)
 ;;30
 ;;9002226.02101,"873,T42.8X1A ",.01)
 ;;T42.8X1A
 ;;9002226.02101,"873,T42.8X1A ",.02)
 ;;T42.8X1A
 ;;9002226.02101,"873,T42.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T42.8X2A ",.01)
 ;;T42.8X2A
 ;;9002226.02101,"873,T42.8X2A ",.02)
 ;;T42.8X2A
 ;;9002226.02101,"873,T42.8X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T42.8X3A ",.01)
 ;;T42.8X3A
 ;;9002226.02101,"873,T42.8X3A ",.02)
 ;;T42.8X3A
 ;;9002226.02101,"873,T42.8X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T42.8X4A ",.01)
 ;;T42.8X4A
 ;;9002226.02101,"873,T42.8X4A ",.02)
 ;;T42.8X4A
 ;;9002226.02101,"873,T42.8X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.011A ",.01)
 ;;T43.011A
 ;;9002226.02101,"873,T43.011A ",.02)
 ;;T43.011A
 ;;9002226.02101,"873,T43.011A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.012A ",.01)
 ;;T43.012A
 ;;9002226.02101,"873,T43.012A ",.02)
 ;;T43.012A
 ;;9002226.02101,"873,T43.012A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.013A ",.01)
 ;;T43.013A
 ;;9002226.02101,"873,T43.013A ",.02)
 ;;T43.013A
 ;;9002226.02101,"873,T43.013A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.014A ",.01)
 ;;T43.014A
 ;;9002226.02101,"873,T43.014A ",.02)
 ;;T43.014A
 ;;9002226.02101,"873,T43.014A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.021A ",.01)
 ;;T43.021A
 ;;9002226.02101,"873,T43.021A ",.02)
 ;;T43.021A
 ;;9002226.02101,"873,T43.021A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.022A ",.01)
 ;;T43.022A
 ;;9002226.02101,"873,T43.022A ",.02)
 ;;T43.022A
 ;;9002226.02101,"873,T43.022A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.023A ",.01)
 ;;T43.023A
 ;;9002226.02101,"873,T43.023A ",.02)
 ;;T43.023A
 ;;9002226.02101,"873,T43.023A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.024A ",.01)
 ;;T43.024A
 ;;9002226.02101,"873,T43.024A ",.02)
 ;;T43.024A
 ;;9002226.02101,"873,T43.024A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.1X1A ",.01)
 ;;T43.1X1A
 ;;9002226.02101,"873,T43.1X1A ",.02)
 ;;T43.1X1A
 ;;9002226.02101,"873,T43.1X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.1X2A ",.01)
 ;;T43.1X2A
 ;;9002226.02101,"873,T43.1X2A ",.02)
 ;;T43.1X2A
 ;;9002226.02101,"873,T43.1X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.1X3A ",.01)
 ;;T43.1X3A
 ;;9002226.02101,"873,T43.1X3A ",.02)
 ;;T43.1X3A
 ;;9002226.02101,"873,T43.1X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.1X4A ",.01)
 ;;T43.1X4A
 ;;9002226.02101,"873,T43.1X4A ",.02)
 ;;T43.1X4A
 ;;9002226.02101,"873,T43.1X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.201A ",.01)
 ;;T43.201A
 ;;9002226.02101,"873,T43.201A ",.02)
 ;;T43.201A
 ;;9002226.02101,"873,T43.201A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.202A ",.01)
 ;;T43.202A
 ;;9002226.02101,"873,T43.202A ",.02)
 ;;T43.202A
 ;;9002226.02101,"873,T43.202A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.203A ",.01)
 ;;T43.203A
 ;;9002226.02101,"873,T43.203A ",.02)
 ;;T43.203A
 ;;9002226.02101,"873,T43.203A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.204A ",.01)
 ;;T43.204A
 ;;9002226.02101,"873,T43.204A ",.02)
 ;;T43.204A
 ;;9002226.02101,"873,T43.204A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.211A ",.01)
 ;;T43.211A
 ;;9002226.02101,"873,T43.211A ",.02)
 ;;T43.211A
 ;;9002226.02101,"873,T43.211A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.212A ",.01)
 ;;T43.212A
 ;;9002226.02101,"873,T43.212A ",.02)
 ;;T43.212A
 ;;9002226.02101,"873,T43.212A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.213A ",.01)
 ;;T43.213A
 ;;9002226.02101,"873,T43.213A ",.02)
 ;;T43.213A
 ;;9002226.02101,"873,T43.213A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.214A ",.01)
 ;;T43.214A
 ;;9002226.02101,"873,T43.214A ",.02)
 ;;T43.214A
 ;;9002226.02101,"873,T43.214A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.221A ",.01)
 ;;T43.221A
 ;;9002226.02101,"873,T43.221A ",.02)
 ;;T43.221A
 ;;9002226.02101,"873,T43.221A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.222A ",.01)
 ;;T43.222A
 ;;9002226.02101,"873,T43.222A ",.02)
 ;;T43.222A
 ;;9002226.02101,"873,T43.222A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.223A ",.01)
 ;;T43.223A
 ;;9002226.02101,"873,T43.223A ",.02)
 ;;T43.223A
 ;;9002226.02101,"873,T43.223A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.224A ",.01)
 ;;T43.224A
 ;;9002226.02101,"873,T43.224A ",.02)
 ;;T43.224A
 ;;9002226.02101,"873,T43.224A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.291A ",.01)
 ;;T43.291A
 ;;9002226.02101,"873,T43.291A ",.02)
 ;;T43.291A
 ;;9002226.02101,"873,T43.291A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.292A ",.01)
 ;;T43.292A
 ;;9002226.02101,"873,T43.292A ",.02)
 ;;T43.292A
 ;;9002226.02101,"873,T43.292A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.293A ",.01)
 ;;T43.293A
 ;;9002226.02101,"873,T43.293A ",.02)
 ;;T43.293A
 ;;9002226.02101,"873,T43.293A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.294A ",.01)
 ;;T43.294A
 ;;9002226.02101,"873,T43.294A ",.02)
 ;;T43.294A
 ;;9002226.02101,"873,T43.294A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.3X1A ",.01)
 ;;T43.3X1A
 ;;9002226.02101,"873,T43.3X1A ",.02)
 ;;T43.3X1A
 ;;9002226.02101,"873,T43.3X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.3X2A ",.01)
 ;;T43.3X2A
 ;;9002226.02101,"873,T43.3X2A ",.02)
 ;;T43.3X2A
 ;;9002226.02101,"873,T43.3X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.3X3A ",.01)
 ;;T43.3X3A
 ;;9002226.02101,"873,T43.3X3A ",.02)
 ;;T43.3X3A
 ;;9002226.02101,"873,T43.3X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.3X4A ",.01)
 ;;T43.3X4A
 ;;9002226.02101,"873,T43.3X4A ",.02)
 ;;T43.3X4A
 ;;9002226.02101,"873,T43.3X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.4X1A ",.01)
 ;;T43.4X1A
 ;;9002226.02101,"873,T43.4X1A ",.02)
 ;;T43.4X1A
 ;;9002226.02101,"873,T43.4X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.4X2A ",.01)
 ;;T43.4X2A
 ;;9002226.02101,"873,T43.4X2A ",.02)
 ;;T43.4X2A
 ;;9002226.02101,"873,T43.4X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.4X3A ",.01)
 ;;T43.4X3A
 ;;9002226.02101,"873,T43.4X3A ",.02)
 ;;T43.4X3A
 ;;9002226.02101,"873,T43.4X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.4X4A ",.01)
 ;;T43.4X4A
 ;;9002226.02101,"873,T43.4X4A ",.02)
 ;;T43.4X4A
 ;;9002226.02101,"873,T43.4X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.501A ",.01)
 ;;T43.501A
 ;;9002226.02101,"873,T43.501A ",.02)
 ;;T43.501A
 ;;9002226.02101,"873,T43.501A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.502A ",.01)
 ;;T43.502A
 ;;9002226.02101,"873,T43.502A ",.02)
 ;;T43.502A
 ;;9002226.02101,"873,T43.502A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.503A ",.01)
 ;;T43.503A
 ;;9002226.02101,"873,T43.503A ",.02)
 ;;T43.503A
 ;;9002226.02101,"873,T43.503A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.504A ",.01)
 ;;T43.504A
 ;;9002226.02101,"873,T43.504A ",.02)
 ;;T43.504A
 ;;9002226.02101,"873,T43.504A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.591A ",.01)
 ;;T43.591A
 ;;9002226.02101,"873,T43.591A ",.02)
 ;;T43.591A
 ;;9002226.02101,"873,T43.591A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.592A ",.01)
 ;;T43.592A
 ;;9002226.02101,"873,T43.592A ",.02)
 ;;T43.592A
 ;;9002226.02101,"873,T43.592A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.593A ",.01)
 ;;T43.593A
 ;;9002226.02101,"873,T43.593A ",.02)
 ;;T43.593A
 ;;9002226.02101,"873,T43.593A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.594A ",.01)
 ;;T43.594A
 ;;9002226.02101,"873,T43.594A ",.02)
 ;;T43.594A
 ;;9002226.02101,"873,T43.594A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.601A ",.01)
 ;;T43.601A
 ;;9002226.02101,"873,T43.601A ",.02)
 ;;T43.601A
 ;;9002226.02101,"873,T43.601A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.602A ",.01)
 ;;T43.602A
 ;;9002226.02101,"873,T43.602A ",.02)
 ;;T43.602A
 ;;9002226.02101,"873,T43.602A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.603A ",.01)
 ;;T43.603A
 ;;9002226.02101,"873,T43.603A ",.02)
 ;;T43.603A
 ;;9002226.02101,"873,T43.603A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.604A ",.01)
 ;;T43.604A
 ;;9002226.02101,"873,T43.604A ",.02)
 ;;T43.604A
 ;;9002226.02101,"873,T43.604A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.611A ",.01)
 ;;T43.611A
 ;;9002226.02101,"873,T43.611A ",.02)
 ;;T43.611A
 ;;9002226.02101,"873,T43.611A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.612A ",.01)
 ;;T43.612A
 ;;9002226.02101,"873,T43.612A ",.02)
 ;;T43.612A
 ;;9002226.02101,"873,T43.612A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.613A ",.01)
 ;;T43.613A
 ;;9002226.02101,"873,T43.613A ",.02)
 ;;T43.613A
 ;;9002226.02101,"873,T43.613A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.614A ",.01)
 ;;T43.614A
 ;;9002226.02101,"873,T43.614A ",.02)
 ;;T43.614A
 ;;9002226.02101,"873,T43.614A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.621A ",.01)
 ;;T43.621A
 ;;9002226.02101,"873,T43.621A ",.02)
 ;;T43.621A
 ;;9002226.02101,"873,T43.621A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.622A ",.01)
 ;;T43.622A
 ;;9002226.02101,"873,T43.622A ",.02)
 ;;T43.622A
 ;;9002226.02101,"873,T43.622A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.623A ",.01)
 ;;T43.623A
 ;;9002226.02101,"873,T43.623A ",.02)
 ;;T43.623A
 ;;9002226.02101,"873,T43.623A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.624A ",.01)
 ;;T43.624A
 ;;9002226.02101,"873,T43.624A ",.02)
 ;;T43.624A
 ;;9002226.02101,"873,T43.624A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.631A ",.01)
 ;;T43.631A
 ;;9002226.02101,"873,T43.631A ",.02)
 ;;T43.631A
 ;;9002226.02101,"873,T43.631A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.632A ",.01)
 ;;T43.632A
 ;;9002226.02101,"873,T43.632A ",.02)
 ;;T43.632A
 ;;9002226.02101,"873,T43.632A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.633A ",.01)
 ;;T43.633A
 ;;9002226.02101,"873,T43.633A ",.02)
 ;;T43.633A
 ;;9002226.02101,"873,T43.633A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.634A ",.01)
 ;;T43.634A
 ;;9002226.02101,"873,T43.634A ",.02)
 ;;T43.634A
 ;;9002226.02101,"873,T43.634A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.691A ",.01)
 ;;T43.691A
 ;;9002226.02101,"873,T43.691A ",.02)
 ;;T43.691A
 ;;9002226.02101,"873,T43.691A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.692A ",.01)
 ;;T43.692A
 ;;9002226.02101,"873,T43.692A ",.02)
 ;;T43.692A
 ;;9002226.02101,"873,T43.692A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.693A ",.01)
 ;;T43.693A
 ;;9002226.02101,"873,T43.693A ",.02)
 ;;T43.693A
 ;;9002226.02101,"873,T43.693A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.694A ",.01)
 ;;T43.694A
 ;;9002226.02101,"873,T43.694A ",.02)
 ;;T43.694A
 ;;9002226.02101,"873,T43.694A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.8X1A ",.01)
 ;;T43.8X1A
 ;;9002226.02101,"873,T43.8X1A ",.02)
 ;;T43.8X1A
 ;;9002226.02101,"873,T43.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.8X2A ",.01)
 ;;T43.8X2A
 ;;9002226.02101,"873,T43.8X2A ",.02)
 ;;T43.8X2A
 ;;9002226.02101,"873,T43.8X2A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.8X3A ",.01)
 ;;T43.8X3A
 ;;9002226.02101,"873,T43.8X3A ",.02)
 ;;T43.8X3A
 ;;9002226.02101,"873,T43.8X3A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.8X4A ",.01)
 ;;T43.8X4A
 ;;9002226.02101,"873,T43.8X4A ",.02)
 ;;T43.8X4A
 ;;9002226.02101,"873,T43.8X4A ",.03)
 ;;30
 ;;9002226.02101,"873,T43.91XA ",.01)
 ;;T43.91XA
 ;;9002226.02101,"873,T43.91XA ",.02)
 ;;T43.91XA