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

ATXXA52.m

Go to the documentation of this file.
ATXXA52 ;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,S35.411A ",.02)
 ;;S35.411A
 ;;9002226.02101,"873,S35.411A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.412A ",.01)
 ;;S35.412A
 ;;9002226.02101,"873,S35.412A ",.02)
 ;;S35.412A
 ;;9002226.02101,"873,S35.412A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.413A ",.01)
 ;;S35.413A
 ;;9002226.02101,"873,S35.413A ",.02)
 ;;S35.413A
 ;;9002226.02101,"873,S35.413A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.414A ",.01)
 ;;S35.414A
 ;;9002226.02101,"873,S35.414A ",.02)
 ;;S35.414A
 ;;9002226.02101,"873,S35.414A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.415A ",.01)
 ;;S35.415A
 ;;9002226.02101,"873,S35.415A ",.02)
 ;;S35.415A
 ;;9002226.02101,"873,S35.415A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.416A ",.01)
 ;;S35.416A
 ;;9002226.02101,"873,S35.416A ",.02)
 ;;S35.416A
 ;;9002226.02101,"873,S35.416A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.491A ",.01)
 ;;S35.491A
 ;;9002226.02101,"873,S35.491A ",.02)
 ;;S35.491A
 ;;9002226.02101,"873,S35.491A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.492A ",.01)
 ;;S35.492A
 ;;9002226.02101,"873,S35.492A ",.02)
 ;;S35.492A
 ;;9002226.02101,"873,S35.492A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.493A ",.01)
 ;;S35.493A
 ;;9002226.02101,"873,S35.493A ",.02)
 ;;S35.493A
 ;;9002226.02101,"873,S35.493A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.494A ",.01)
 ;;S35.494A
 ;;9002226.02101,"873,S35.494A ",.02)
 ;;S35.494A
 ;;9002226.02101,"873,S35.494A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.495A ",.01)
 ;;S35.495A
 ;;9002226.02101,"873,S35.495A ",.02)
 ;;S35.495A
 ;;9002226.02101,"873,S35.495A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.496A ",.01)
 ;;S35.496A
 ;;9002226.02101,"873,S35.496A ",.02)
 ;;S35.496A
 ;;9002226.02101,"873,S35.496A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.50XA ",.01)
 ;;S35.50XA
 ;;9002226.02101,"873,S35.50XA ",.02)
 ;;S35.50XA
 ;;9002226.02101,"873,S35.50XA ",.03)
 ;;30
 ;;9002226.02101,"873,S35.511A ",.01)
 ;;S35.511A
 ;;9002226.02101,"873,S35.511A ",.02)
 ;;S35.511A
 ;;9002226.02101,"873,S35.511A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.512A ",.01)
 ;;S35.512A
 ;;9002226.02101,"873,S35.512A ",.02)
 ;;S35.512A
 ;;9002226.02101,"873,S35.512A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.513A ",.01)
 ;;S35.513A
 ;;9002226.02101,"873,S35.513A ",.02)
 ;;S35.513A
 ;;9002226.02101,"873,S35.513A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.514A ",.01)
 ;;S35.514A
 ;;9002226.02101,"873,S35.514A ",.02)
 ;;S35.514A
 ;;9002226.02101,"873,S35.514A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.515A ",.01)
 ;;S35.515A
 ;;9002226.02101,"873,S35.515A ",.02)
 ;;S35.515A
 ;;9002226.02101,"873,S35.515A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.516A ",.01)
 ;;S35.516A
 ;;9002226.02101,"873,S35.516A ",.02)
 ;;S35.516A
 ;;9002226.02101,"873,S35.516A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.531A ",.01)
 ;;S35.531A
 ;;9002226.02101,"873,S35.531A ",.02)
 ;;S35.531A
 ;;9002226.02101,"873,S35.531A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.532A ",.01)
 ;;S35.532A
 ;;9002226.02101,"873,S35.532A ",.02)
 ;;S35.532A
 ;;9002226.02101,"873,S35.532A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.533A ",.01)
 ;;S35.533A
 ;;9002226.02101,"873,S35.533A ",.02)
 ;;S35.533A
 ;;9002226.02101,"873,S35.533A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.534A ",.01)
 ;;S35.534A
 ;;9002226.02101,"873,S35.534A ",.02)
 ;;S35.534A
 ;;9002226.02101,"873,S35.534A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.535A ",.01)
 ;;S35.535A
 ;;9002226.02101,"873,S35.535A ",.02)
 ;;S35.535A
 ;;9002226.02101,"873,S35.535A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.536A ",.01)
 ;;S35.536A
 ;;9002226.02101,"873,S35.536A ",.02)
 ;;S35.536A
 ;;9002226.02101,"873,S35.536A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.59XA ",.01)
 ;;S35.59XA
 ;;9002226.02101,"873,S35.59XA ",.02)
 ;;S35.59XA
 ;;9002226.02101,"873,S35.59XA ",.03)
 ;;30
 ;;9002226.02101,"873,S35.8X1A ",.01)
 ;;S35.8X1A
 ;;9002226.02101,"873,S35.8X1A ",.02)
 ;;S35.8X1A
 ;;9002226.02101,"873,S35.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.8X8A ",.01)
 ;;S35.8X8A
 ;;9002226.02101,"873,S35.8X8A ",.02)
 ;;S35.8X8A
 ;;9002226.02101,"873,S35.8X8A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.8X9A ",.01)
 ;;S35.8X9A
 ;;9002226.02101,"873,S35.8X9A ",.02)
 ;;S35.8X9A
 ;;9002226.02101,"873,S35.8X9A ",.03)
 ;;30
 ;;9002226.02101,"873,S35.90XA ",.01)
 ;;S35.90XA
 ;;9002226.02101,"873,S35.90XA ",.02)
 ;;S35.90XA
 ;;9002226.02101,"873,S35.90XA ",.03)
 ;;30
 ;;9002226.02101,"873,S35.91XA ",.01)
 ;;S35.91XA
 ;;9002226.02101,"873,S35.91XA ",.02)
 ;;S35.91XA
 ;;9002226.02101,"873,S35.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,S35.99XA ",.01)
 ;;S35.99XA
 ;;9002226.02101,"873,S35.99XA ",.02)
 ;;S35.99XA
 ;;9002226.02101,"873,S35.99XA ",.03)
 ;;30
 ;;9002226.02101,"873,S36.00XA ",.01)
 ;;S36.00XA
 ;;9002226.02101,"873,S36.00XA ",.02)
 ;;S36.00XA
 ;;9002226.02101,"873,S36.00XA ",.03)
 ;;30
 ;;9002226.02101,"873,S36.020A ",.01)
 ;;S36.020A
 ;;9002226.02101,"873,S36.020A ",.02)
 ;;S36.020A
 ;;9002226.02101,"873,S36.020A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.021A ",.01)
 ;;S36.021A
 ;;9002226.02101,"873,S36.021A ",.02)
 ;;S36.021A
 ;;9002226.02101,"873,S36.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.029A ",.01)
 ;;S36.029A
 ;;9002226.02101,"873,S36.029A ",.02)
 ;;S36.029A
 ;;9002226.02101,"873,S36.029A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.030A ",.01)
 ;;S36.030A
 ;;9002226.02101,"873,S36.030A ",.02)
 ;;S36.030A
 ;;9002226.02101,"873,S36.030A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.031A ",.01)
 ;;S36.031A
 ;;9002226.02101,"873,S36.031A ",.02)
 ;;S36.031A
 ;;9002226.02101,"873,S36.031A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.032A ",.01)
 ;;S36.032A
 ;;9002226.02101,"873,S36.032A ",.02)
 ;;S36.032A
 ;;9002226.02101,"873,S36.032A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.039A ",.01)
 ;;S36.039A
 ;;9002226.02101,"873,S36.039A ",.02)
 ;;S36.039A
 ;;9002226.02101,"873,S36.039A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.09XA ",.01)
 ;;S36.09XA
 ;;9002226.02101,"873,S36.09XA ",.02)
 ;;S36.09XA
 ;;9002226.02101,"873,S36.09XA ",.03)
 ;;30
 ;;9002226.02101,"873,S36.112A ",.01)
 ;;S36.112A
 ;;9002226.02101,"873,S36.112A ",.02)
 ;;S36.112A
 ;;9002226.02101,"873,S36.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.113A ",.01)
 ;;S36.113A
 ;;9002226.02101,"873,S36.113A ",.02)
 ;;S36.113A
 ;;9002226.02101,"873,S36.113A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.114A ",.01)
 ;;S36.114A
 ;;9002226.02101,"873,S36.114A ",.02)
 ;;S36.114A
 ;;9002226.02101,"873,S36.114A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.115A ",.01)
 ;;S36.115A
 ;;9002226.02101,"873,S36.115A ",.02)
 ;;S36.115A
 ;;9002226.02101,"873,S36.115A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.116A ",.01)
 ;;S36.116A
 ;;9002226.02101,"873,S36.116A ",.02)
 ;;S36.116A
 ;;9002226.02101,"873,S36.116A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.118A ",.01)
 ;;S36.118A
 ;;9002226.02101,"873,S36.118A ",.02)
 ;;S36.118A
 ;;9002226.02101,"873,S36.118A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.119A ",.01)
 ;;S36.119A
 ;;9002226.02101,"873,S36.119A ",.02)
 ;;S36.119A
 ;;9002226.02101,"873,S36.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.122A ",.01)
 ;;S36.122A
 ;;9002226.02101,"873,S36.122A ",.02)
 ;;S36.122A
 ;;9002226.02101,"873,S36.122A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.123A ",.01)
 ;;S36.123A
 ;;9002226.02101,"873,S36.123A ",.02)
 ;;S36.123A
 ;;9002226.02101,"873,S36.123A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.128A ",.01)
 ;;S36.128A
 ;;9002226.02101,"873,S36.128A ",.02)
 ;;S36.128A
 ;;9002226.02101,"873,S36.128A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.129A ",.01)
 ;;S36.129A
 ;;9002226.02101,"873,S36.129A ",.02)
 ;;S36.129A
 ;;9002226.02101,"873,S36.129A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.13XA ",.01)
 ;;S36.13XA
 ;;9002226.02101,"873,S36.13XA ",.02)
 ;;S36.13XA
 ;;9002226.02101,"873,S36.13XA ",.03)
 ;;30
 ;;9002226.02101,"873,S36.200A ",.01)
 ;;S36.200A
 ;;9002226.02101,"873,S36.200A ",.02)
 ;;S36.200A
 ;;9002226.02101,"873,S36.200A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.201A ",.01)
 ;;S36.201A
 ;;9002226.02101,"873,S36.201A ",.02)
 ;;S36.201A
 ;;9002226.02101,"873,S36.201A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.202A ",.01)
 ;;S36.202A
 ;;9002226.02101,"873,S36.202A ",.02)
 ;;S36.202A
 ;;9002226.02101,"873,S36.202A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.209A ",.01)
 ;;S36.209A
 ;;9002226.02101,"873,S36.209A ",.02)
 ;;S36.209A
 ;;9002226.02101,"873,S36.209A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.220A ",.01)
 ;;S36.220A
 ;;9002226.02101,"873,S36.220A ",.02)
 ;;S36.220A
 ;;9002226.02101,"873,S36.220A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.221A ",.01)
 ;;S36.221A
 ;;9002226.02101,"873,S36.221A ",.02)
 ;;S36.221A
 ;;9002226.02101,"873,S36.221A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.222A ",.01)
 ;;S36.222A
 ;;9002226.02101,"873,S36.222A ",.02)
 ;;S36.222A
 ;;9002226.02101,"873,S36.222A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.229A ",.01)
 ;;S36.229A
 ;;9002226.02101,"873,S36.229A ",.02)
 ;;S36.229A
 ;;9002226.02101,"873,S36.229A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.230A ",.01)
 ;;S36.230A
 ;;9002226.02101,"873,S36.230A ",.02)
 ;;S36.230A
 ;;9002226.02101,"873,S36.230A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.231A ",.01)
 ;;S36.231A
 ;;9002226.02101,"873,S36.231A ",.02)
 ;;S36.231A
 ;;9002226.02101,"873,S36.231A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.232A ",.01)
 ;;S36.232A
 ;;9002226.02101,"873,S36.232A ",.02)
 ;;S36.232A
 ;;9002226.02101,"873,S36.232A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.239A ",.01)
 ;;S36.239A
 ;;9002226.02101,"873,S36.239A ",.02)
 ;;S36.239A
 ;;9002226.02101,"873,S36.239A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.240A ",.01)
 ;;S36.240A
 ;;9002226.02101,"873,S36.240A ",.02)
 ;;S36.240A
 ;;9002226.02101,"873,S36.240A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.241A ",.01)
 ;;S36.241A
 ;;9002226.02101,"873,S36.241A ",.02)
 ;;S36.241A
 ;;9002226.02101,"873,S36.241A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.242A ",.01)
 ;;S36.242A
 ;;9002226.02101,"873,S36.242A ",.02)
 ;;S36.242A
 ;;9002226.02101,"873,S36.242A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.249A ",.01)
 ;;S36.249A
 ;;9002226.02101,"873,S36.249A ",.02)
 ;;S36.249A
 ;;9002226.02101,"873,S36.249A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.250A ",.01)
 ;;S36.250A
 ;;9002226.02101,"873,S36.250A ",.02)
 ;;S36.250A
 ;;9002226.02101,"873,S36.250A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.251A ",.01)
 ;;S36.251A
 ;;9002226.02101,"873,S36.251A ",.02)
 ;;S36.251A
 ;;9002226.02101,"873,S36.251A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.252A ",.01)
 ;;S36.252A
 ;;9002226.02101,"873,S36.252A ",.02)
 ;;S36.252A
 ;;9002226.02101,"873,S36.252A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.259A ",.01)
 ;;S36.259A
 ;;9002226.02101,"873,S36.259A ",.02)
 ;;S36.259A
 ;;9002226.02101,"873,S36.259A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.260A ",.01)
 ;;S36.260A
 ;;9002226.02101,"873,S36.260A ",.02)
 ;;S36.260A
 ;;9002226.02101,"873,S36.260A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.261A ",.01)
 ;;S36.261A
 ;;9002226.02101,"873,S36.261A ",.02)
 ;;S36.261A
 ;;9002226.02101,"873,S36.261A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.262A ",.01)
 ;;S36.262A
 ;;9002226.02101,"873,S36.262A ",.02)
 ;;S36.262A
 ;;9002226.02101,"873,S36.262A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.269A ",.01)
 ;;S36.269A
 ;;9002226.02101,"873,S36.269A ",.02)
 ;;S36.269A
 ;;9002226.02101,"873,S36.269A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.290A ",.01)
 ;;S36.290A
 ;;9002226.02101,"873,S36.290A ",.02)
 ;;S36.290A
 ;;9002226.02101,"873,S36.290A ",.03)
 ;;30
 ;;9002226.02101,"873,S36.291A ",.01)
 ;;S36.291A
 ;;9002226.02101,"873,S36.291A ",.02)
 ;;S36.291A