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

ATXXA44.m

Go to the documentation of this file.
ATXXA44 ;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,S27.402A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.409A ",.01)
 ;;S27.409A
 ;;9002226.02101,"873,S27.409A ",.02)
 ;;S27.409A
 ;;9002226.02101,"873,S27.409A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.411A ",.01)
 ;;S27.411A
 ;;9002226.02101,"873,S27.411A ",.02)
 ;;S27.411A
 ;;9002226.02101,"873,S27.411A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.412A ",.01)
 ;;S27.412A
 ;;9002226.02101,"873,S27.412A ",.02)
 ;;S27.412A
 ;;9002226.02101,"873,S27.412A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.419A ",.01)
 ;;S27.419A
 ;;9002226.02101,"873,S27.419A ",.02)
 ;;S27.419A
 ;;9002226.02101,"873,S27.419A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.421A ",.01)
 ;;S27.421A
 ;;9002226.02101,"873,S27.421A ",.02)
 ;;S27.421A
 ;;9002226.02101,"873,S27.421A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.422A ",.01)
 ;;S27.422A
 ;;9002226.02101,"873,S27.422A ",.02)
 ;;S27.422A
 ;;9002226.02101,"873,S27.422A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.429A ",.01)
 ;;S27.429A
 ;;9002226.02101,"873,S27.429A ",.02)
 ;;S27.429A
 ;;9002226.02101,"873,S27.429A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.431A ",.01)
 ;;S27.431A
 ;;9002226.02101,"873,S27.431A ",.02)
 ;;S27.431A
 ;;9002226.02101,"873,S27.431A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.432A ",.01)
 ;;S27.432A
 ;;9002226.02101,"873,S27.432A ",.02)
 ;;S27.432A
 ;;9002226.02101,"873,S27.432A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.439A ",.01)
 ;;S27.439A
 ;;9002226.02101,"873,S27.439A ",.02)
 ;;S27.439A
 ;;9002226.02101,"873,S27.439A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.491A ",.01)
 ;;S27.491A
 ;;9002226.02101,"873,S27.491A ",.02)
 ;;S27.491A
 ;;9002226.02101,"873,S27.491A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.492A ",.01)
 ;;S27.492A
 ;;9002226.02101,"873,S27.492A ",.02)
 ;;S27.492A
 ;;9002226.02101,"873,S27.492A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.499A ",.01)
 ;;S27.499A
 ;;9002226.02101,"873,S27.499A ",.02)
 ;;S27.499A
 ;;9002226.02101,"873,S27.499A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.50XA ",.01)
 ;;S27.50XA
 ;;9002226.02101,"873,S27.50XA ",.02)
 ;;S27.50XA
 ;;9002226.02101,"873,S27.50XA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.51XA ",.01)
 ;;S27.51XA
 ;;9002226.02101,"873,S27.51XA ",.02)
 ;;S27.51XA
 ;;9002226.02101,"873,S27.51XA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.52XA ",.01)
 ;;S27.52XA
 ;;9002226.02101,"873,S27.52XA ",.02)
 ;;S27.52XA
 ;;9002226.02101,"873,S27.52XA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.53XA ",.01)
 ;;S27.53XA
 ;;9002226.02101,"873,S27.53XA ",.02)
 ;;S27.53XA
 ;;9002226.02101,"873,S27.53XA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.59XA ",.01)
 ;;S27.59XA
 ;;9002226.02101,"873,S27.59XA ",.02)
 ;;S27.59XA
 ;;9002226.02101,"873,S27.59XA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.60XA ",.01)
 ;;S27.60XA
 ;;9002226.02101,"873,S27.60XA ",.02)
 ;;S27.60XA
 ;;9002226.02101,"873,S27.60XA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.63XA ",.01)
 ;;S27.63XA
 ;;9002226.02101,"873,S27.63XA ",.02)
 ;;S27.63XA
 ;;9002226.02101,"873,S27.63XA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.69XA ",.01)
 ;;S27.69XA
 ;;9002226.02101,"873,S27.69XA ",.02)
 ;;S27.69XA
 ;;9002226.02101,"873,S27.69XA ",.03)
 ;;30
 ;;9002226.02101,"873,S27.802A ",.01)
 ;;S27.802A
 ;;9002226.02101,"873,S27.802A ",.02)
 ;;S27.802A
 ;;9002226.02101,"873,S27.802A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.803A ",.01)
 ;;S27.803A
 ;;9002226.02101,"873,S27.803A ",.02)
 ;;S27.803A
 ;;9002226.02101,"873,S27.803A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.808A ",.01)
 ;;S27.808A
 ;;9002226.02101,"873,S27.808A ",.02)
 ;;S27.808A
 ;;9002226.02101,"873,S27.808A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.809A ",.01)
 ;;S27.809A
 ;;9002226.02101,"873,S27.809A ",.02)
 ;;S27.809A
 ;;9002226.02101,"873,S27.809A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.812A ",.01)
 ;;S27.812A
 ;;9002226.02101,"873,S27.812A ",.02)
 ;;S27.812A
 ;;9002226.02101,"873,S27.812A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.813A ",.01)
 ;;S27.813A
 ;;9002226.02101,"873,S27.813A ",.02)
 ;;S27.813A
 ;;9002226.02101,"873,S27.813A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.818A ",.01)
 ;;S27.818A
 ;;9002226.02101,"873,S27.818A ",.02)
 ;;S27.818A
 ;;9002226.02101,"873,S27.818A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.819A ",.01)
 ;;S27.819A
 ;;9002226.02101,"873,S27.819A ",.02)
 ;;S27.819A
 ;;9002226.02101,"873,S27.819A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.892A ",.01)
 ;;S27.892A
 ;;9002226.02101,"873,S27.892A ",.02)
 ;;S27.892A
 ;;9002226.02101,"873,S27.892A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.893A ",.01)
 ;;S27.893A
 ;;9002226.02101,"873,S27.893A ",.02)
 ;;S27.893A
 ;;9002226.02101,"873,S27.893A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.898A ",.01)
 ;;S27.898A
 ;;9002226.02101,"873,S27.898A ",.02)
 ;;S27.898A
 ;;9002226.02101,"873,S27.898A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.899A ",.01)
 ;;S27.899A
 ;;9002226.02101,"873,S27.899A ",.02)
 ;;S27.899A
 ;;9002226.02101,"873,S27.899A ",.03)
 ;;30
 ;;9002226.02101,"873,S27.9XXA ",.01)
 ;;S27.9XXA
 ;;9002226.02101,"873,S27.9XXA ",.02)
 ;;S27.9XXA
 ;;9002226.02101,"873,S27.9XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S28.0XXA ",.01)
 ;;S28.0XXA
 ;;9002226.02101,"873,S28.0XXA ",.02)
 ;;S28.0XXA
 ;;9002226.02101,"873,S28.0XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S28.1XXA ",.01)
 ;;S28.1XXA
 ;;9002226.02101,"873,S28.1XXA ",.02)
 ;;S28.1XXA
 ;;9002226.02101,"873,S28.1XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S28.211A ",.01)
 ;;S28.211A
 ;;9002226.02101,"873,S28.211A ",.02)
 ;;S28.211A
 ;;9002226.02101,"873,S28.211A ",.03)
 ;;30
 ;;9002226.02101,"873,S28.212A ",.01)
 ;;S28.212A
 ;;9002226.02101,"873,S28.212A ",.02)
 ;;S28.212A
 ;;9002226.02101,"873,S28.212A ",.03)
 ;;30
 ;;9002226.02101,"873,S28.219A ",.01)
 ;;S28.219A
 ;;9002226.02101,"873,S28.219A ",.02)
 ;;S28.219A
 ;;9002226.02101,"873,S28.219A ",.03)
 ;;30
 ;;9002226.02101,"873,S28.221A ",.01)
 ;;S28.221A
 ;;9002226.02101,"873,S28.221A ",.02)
 ;;S28.221A
 ;;9002226.02101,"873,S28.221A ",.03)
 ;;30
 ;;9002226.02101,"873,S28.222A ",.01)
 ;;S28.222A
 ;;9002226.02101,"873,S28.222A ",.02)
 ;;S28.222A
 ;;9002226.02101,"873,S28.222A ",.03)
 ;;30
 ;;9002226.02101,"873,S28.229A ",.01)
 ;;S28.229A
 ;;9002226.02101,"873,S28.229A ",.02)
 ;;S28.229A
 ;;9002226.02101,"873,S28.229A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.001A ",.01)
 ;;S29.001A
 ;;9002226.02101,"873,S29.001A ",.02)
 ;;S29.001A
 ;;9002226.02101,"873,S29.001A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.002A ",.01)
 ;;S29.002A
 ;;9002226.02101,"873,S29.002A ",.02)
 ;;S29.002A
 ;;9002226.02101,"873,S29.002A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.009A ",.01)
 ;;S29.009A
 ;;9002226.02101,"873,S29.009A ",.02)
 ;;S29.009A
 ;;9002226.02101,"873,S29.009A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.011A ",.01)
 ;;S29.011A
 ;;9002226.02101,"873,S29.011A ",.02)
 ;;S29.011A
 ;;9002226.02101,"873,S29.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.012A ",.01)
 ;;S29.012A
 ;;9002226.02101,"873,S29.012A ",.02)
 ;;S29.012A
 ;;9002226.02101,"873,S29.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.019A ",.01)
 ;;S29.019A
 ;;9002226.02101,"873,S29.019A ",.02)
 ;;S29.019A
 ;;9002226.02101,"873,S29.019A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.021A ",.01)
 ;;S29.021A
 ;;9002226.02101,"873,S29.021A ",.02)
 ;;S29.021A
 ;;9002226.02101,"873,S29.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.022A ",.01)
 ;;S29.022A
 ;;9002226.02101,"873,S29.022A ",.02)
 ;;S29.022A
 ;;9002226.02101,"873,S29.022A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.029A ",.01)
 ;;S29.029A
 ;;9002226.02101,"873,S29.029A ",.02)
 ;;S29.029A
 ;;9002226.02101,"873,S29.029A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.091A ",.01)
 ;;S29.091A
 ;;9002226.02101,"873,S29.091A ",.02)
 ;;S29.091A
 ;;9002226.02101,"873,S29.091A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.092A ",.01)
 ;;S29.092A
 ;;9002226.02101,"873,S29.092A ",.02)
 ;;S29.092A
 ;;9002226.02101,"873,S29.092A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.099A ",.01)
 ;;S29.099A
 ;;9002226.02101,"873,S29.099A ",.02)
 ;;S29.099A
 ;;9002226.02101,"873,S29.099A ",.03)
 ;;30
 ;;9002226.02101,"873,S29.8XXA ",.01)
 ;;S29.8XXA
 ;;9002226.02101,"873,S29.8XXA ",.02)
 ;;S29.8XXA
 ;;9002226.02101,"873,S29.8XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S29.9XXA ",.01)
 ;;S29.9XXA
 ;;9002226.02101,"873,S29.9XXA ",.02)
 ;;S29.9XXA
 ;;9002226.02101,"873,S29.9XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.0XXA ",.01)
 ;;S30.0XXA
 ;;9002226.02101,"873,S30.0XXA ",.02)
 ;;S30.0XXA
 ;;9002226.02101,"873,S30.0XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.1XXA ",.01)
 ;;S30.1XXA
 ;;9002226.02101,"873,S30.1XXA ",.02)
 ;;S30.1XXA
 ;;9002226.02101,"873,S30.1XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.201A ",.01)
 ;;S30.201A
 ;;9002226.02101,"873,S30.201A ",.02)
 ;;S30.201A
 ;;9002226.02101,"873,S30.201A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.202A ",.01)
 ;;S30.202A
 ;;9002226.02101,"873,S30.202A ",.02)
 ;;S30.202A
 ;;9002226.02101,"873,S30.202A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.21XA ",.01)
 ;;S30.21XA
 ;;9002226.02101,"873,S30.21XA ",.02)
 ;;S30.21XA
 ;;9002226.02101,"873,S30.21XA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.22XA ",.01)
 ;;S30.22XA
 ;;9002226.02101,"873,S30.22XA ",.02)
 ;;S30.22XA
 ;;9002226.02101,"873,S30.22XA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.23XA ",.01)
 ;;S30.23XA
 ;;9002226.02101,"873,S30.23XA ",.02)
 ;;S30.23XA
 ;;9002226.02101,"873,S30.23XA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.3XXA ",.01)
 ;;S30.3XXA
 ;;9002226.02101,"873,S30.3XXA ",.02)
 ;;S30.3XXA
 ;;9002226.02101,"873,S30.3XXA ",.03)
 ;;30
 ;;9002226.02101,"873,S30.810A ",.01)
 ;;S30.810A
 ;;9002226.02101,"873,S30.810A ",.02)
 ;;S30.810A
 ;;9002226.02101,"873,S30.810A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.811A ",.01)
 ;;S30.811A
 ;;9002226.02101,"873,S30.811A ",.02)
 ;;S30.811A
 ;;9002226.02101,"873,S30.811A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.812A ",.01)
 ;;S30.812A
 ;;9002226.02101,"873,S30.812A ",.02)
 ;;S30.812A
 ;;9002226.02101,"873,S30.812A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.813A ",.01)
 ;;S30.813A
 ;;9002226.02101,"873,S30.813A ",.02)
 ;;S30.813A
 ;;9002226.02101,"873,S30.813A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.814A ",.01)
 ;;S30.814A
 ;;9002226.02101,"873,S30.814A ",.02)
 ;;S30.814A
 ;;9002226.02101,"873,S30.814A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.815A ",.01)
 ;;S30.815A
 ;;9002226.02101,"873,S30.815A ",.02)
 ;;S30.815A
 ;;9002226.02101,"873,S30.815A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.816A ",.01)
 ;;S30.816A
 ;;9002226.02101,"873,S30.816A ",.02)
 ;;S30.816A
 ;;9002226.02101,"873,S30.816A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.817A ",.01)
 ;;S30.817A
 ;;9002226.02101,"873,S30.817A ",.02)
 ;;S30.817A
 ;;9002226.02101,"873,S30.817A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.840A ",.01)
 ;;S30.840A
 ;;9002226.02101,"873,S30.840A ",.02)
 ;;S30.840A
 ;;9002226.02101,"873,S30.840A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.841A ",.01)
 ;;S30.841A
 ;;9002226.02101,"873,S30.841A ",.02)
 ;;S30.841A
 ;;9002226.02101,"873,S30.841A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.842A ",.01)
 ;;S30.842A
 ;;9002226.02101,"873,S30.842A ",.02)
 ;;S30.842A
 ;;9002226.02101,"873,S30.842A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.843A ",.01)
 ;;S30.843A
 ;;9002226.02101,"873,S30.843A ",.02)
 ;;S30.843A
 ;;9002226.02101,"873,S30.843A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.844A ",.01)
 ;;S30.844A
 ;;9002226.02101,"873,S30.844A ",.02)
 ;;S30.844A
 ;;9002226.02101,"873,S30.844A ",.03)
 ;;30
 ;;9002226.02101,"873,S30.845A ",.01)
 ;;S30.845A
 ;;9002226.02101,"873,S30.845A ",.02)
 ;;S30.845A
 ;;9002226.02101,"873,S30.845A ",.03)
 ;;30