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

ATXXA133.m

Go to the documentation of this file.
ATXXA133 ;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,T17.218A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.220A ",.01)
 ;;T17.220A
 ;;9002226.02101,"873,T17.220A ",.02)
 ;;T17.220A
 ;;9002226.02101,"873,T17.220A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.228A ",.01)
 ;;T17.228A
 ;;9002226.02101,"873,T17.228A ",.02)
 ;;T17.228A
 ;;9002226.02101,"873,T17.228A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.290A ",.01)
 ;;T17.290A
 ;;9002226.02101,"873,T17.290A ",.02)
 ;;T17.290A
 ;;9002226.02101,"873,T17.290A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.298A ",.01)
 ;;T17.298A
 ;;9002226.02101,"873,T17.298A ",.02)
 ;;T17.298A
 ;;9002226.02101,"873,T17.298A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.300A ",.01)
 ;;T17.300A
 ;;9002226.02101,"873,T17.300A ",.02)
 ;;T17.300A
 ;;9002226.02101,"873,T17.300A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.308A ",.01)
 ;;T17.308A
 ;;9002226.02101,"873,T17.308A ",.02)
 ;;T17.308A
 ;;9002226.02101,"873,T17.308A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.310A ",.01)
 ;;T17.310A
 ;;9002226.02101,"873,T17.310A ",.02)
 ;;T17.310A
 ;;9002226.02101,"873,T17.310A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.318A ",.01)
 ;;T17.318A
 ;;9002226.02101,"873,T17.318A ",.02)
 ;;T17.318A
 ;;9002226.02101,"873,T17.318A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.320A ",.01)
 ;;T17.320A
 ;;9002226.02101,"873,T17.320A ",.02)
 ;;T17.320A
 ;;9002226.02101,"873,T17.320A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.328A ",.01)
 ;;T17.328A
 ;;9002226.02101,"873,T17.328A ",.02)
 ;;T17.328A
 ;;9002226.02101,"873,T17.328A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.390A ",.01)
 ;;T17.390A
 ;;9002226.02101,"873,T17.390A ",.02)
 ;;T17.390A
 ;;9002226.02101,"873,T17.390A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.398A ",.01)
 ;;T17.398A
 ;;9002226.02101,"873,T17.398A ",.02)
 ;;T17.398A
 ;;9002226.02101,"873,T17.398A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.400A ",.01)
 ;;T17.400A
 ;;9002226.02101,"873,T17.400A ",.02)
 ;;T17.400A
 ;;9002226.02101,"873,T17.400A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.408A ",.01)
 ;;T17.408A
 ;;9002226.02101,"873,T17.408A ",.02)
 ;;T17.408A
 ;;9002226.02101,"873,T17.408A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.410A ",.01)
 ;;T17.410A
 ;;9002226.02101,"873,T17.410A ",.02)
 ;;T17.410A
 ;;9002226.02101,"873,T17.410A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.418A ",.01)
 ;;T17.418A
 ;;9002226.02101,"873,T17.418A ",.02)
 ;;T17.418A
 ;;9002226.02101,"873,T17.418A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.420A ",.01)
 ;;T17.420A
 ;;9002226.02101,"873,T17.420A ",.02)
 ;;T17.420A
 ;;9002226.02101,"873,T17.420A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.428A ",.01)
 ;;T17.428A
 ;;9002226.02101,"873,T17.428A ",.02)
 ;;T17.428A
 ;;9002226.02101,"873,T17.428A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.490A ",.01)
 ;;T17.490A
 ;;9002226.02101,"873,T17.490A ",.02)
 ;;T17.490A
 ;;9002226.02101,"873,T17.490A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.498A ",.01)
 ;;T17.498A
 ;;9002226.02101,"873,T17.498A ",.02)
 ;;T17.498A
 ;;9002226.02101,"873,T17.498A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.500A ",.01)
 ;;T17.500A
 ;;9002226.02101,"873,T17.500A ",.02)
 ;;T17.500A
 ;;9002226.02101,"873,T17.500A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.508A ",.01)
 ;;T17.508A
 ;;9002226.02101,"873,T17.508A ",.02)
 ;;T17.508A
 ;;9002226.02101,"873,T17.508A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.510A ",.01)
 ;;T17.510A
 ;;9002226.02101,"873,T17.510A ",.02)
 ;;T17.510A
 ;;9002226.02101,"873,T17.510A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.518A ",.01)
 ;;T17.518A
 ;;9002226.02101,"873,T17.518A ",.02)
 ;;T17.518A
 ;;9002226.02101,"873,T17.518A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.520A ",.01)
 ;;T17.520A
 ;;9002226.02101,"873,T17.520A ",.02)
 ;;T17.520A
 ;;9002226.02101,"873,T17.520A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.528A ",.01)
 ;;T17.528A
 ;;9002226.02101,"873,T17.528A ",.02)
 ;;T17.528A
 ;;9002226.02101,"873,T17.528A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.590A ",.01)
 ;;T17.590A
 ;;9002226.02101,"873,T17.590A ",.02)
 ;;T17.590A
 ;;9002226.02101,"873,T17.590A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.598A ",.01)
 ;;T17.598A
 ;;9002226.02101,"873,T17.598A ",.02)
 ;;T17.598A
 ;;9002226.02101,"873,T17.598A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.800A ",.01)
 ;;T17.800A
 ;;9002226.02101,"873,T17.800A ",.02)
 ;;T17.800A
 ;;9002226.02101,"873,T17.800A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.808A ",.01)
 ;;T17.808A
 ;;9002226.02101,"873,T17.808A ",.02)
 ;;T17.808A
 ;;9002226.02101,"873,T17.808A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.810A ",.01)
 ;;T17.810A
 ;;9002226.02101,"873,T17.810A ",.02)
 ;;T17.810A
 ;;9002226.02101,"873,T17.810A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.818A ",.01)
 ;;T17.818A
 ;;9002226.02101,"873,T17.818A ",.02)
 ;;T17.818A
 ;;9002226.02101,"873,T17.818A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.820A ",.01)
 ;;T17.820A
 ;;9002226.02101,"873,T17.820A ",.02)
 ;;T17.820A
 ;;9002226.02101,"873,T17.820A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.828A ",.01)
 ;;T17.828A
 ;;9002226.02101,"873,T17.828A ",.02)
 ;;T17.828A
 ;;9002226.02101,"873,T17.828A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.890A ",.01)
 ;;T17.890A
 ;;9002226.02101,"873,T17.890A ",.02)
 ;;T17.890A
 ;;9002226.02101,"873,T17.890A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.898A ",.01)
 ;;T17.898A
 ;;9002226.02101,"873,T17.898A ",.02)
 ;;T17.898A
 ;;9002226.02101,"873,T17.898A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.900A ",.01)
 ;;T17.900A
 ;;9002226.02101,"873,T17.900A ",.02)
 ;;T17.900A
 ;;9002226.02101,"873,T17.900A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.908A ",.01)
 ;;T17.908A
 ;;9002226.02101,"873,T17.908A ",.02)
 ;;T17.908A
 ;;9002226.02101,"873,T17.908A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.910A ",.01)
 ;;T17.910A
 ;;9002226.02101,"873,T17.910A ",.02)
 ;;T17.910A
 ;;9002226.02101,"873,T17.910A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.918A ",.01)
 ;;T17.918A
 ;;9002226.02101,"873,T17.918A ",.02)
 ;;T17.918A
 ;;9002226.02101,"873,T17.918A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.920A ",.01)
 ;;T17.920A
 ;;9002226.02101,"873,T17.920A ",.02)
 ;;T17.920A
 ;;9002226.02101,"873,T17.920A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.928A ",.01)
 ;;T17.928A
 ;;9002226.02101,"873,T17.928A ",.02)
 ;;T17.928A
 ;;9002226.02101,"873,T17.928A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.990A ",.01)
 ;;T17.990A
 ;;9002226.02101,"873,T17.990A ",.02)
 ;;T17.990A
 ;;9002226.02101,"873,T17.990A ",.03)
 ;;30
 ;;9002226.02101,"873,T17.998A ",.01)
 ;;T17.998A
 ;;9002226.02101,"873,T17.998A ",.02)
 ;;T17.998A
 ;;9002226.02101,"873,T17.998A ",.03)
 ;;30
 ;;9002226.02101,"873,T18.0XXA ",.01)
 ;;T18.0XXA
 ;;9002226.02101,"873,T18.0XXA ",.02)
 ;;T18.0XXA
 ;;9002226.02101,"873,T18.0XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T18.100A ",.01)
 ;;T18.100A
 ;;9002226.02101,"873,T18.100A ",.02)
 ;;T18.100A
 ;;9002226.02101,"873,T18.100A ",.03)
 ;;30
 ;;9002226.02101,"873,T18.108A ",.01)
 ;;T18.108A
 ;;9002226.02101,"873,T18.108A ",.02)
 ;;T18.108A
 ;;9002226.02101,"873,T18.108A ",.03)
 ;;30
 ;;9002226.02101,"873,T18.110A ",.01)
 ;;T18.110A
 ;;9002226.02101,"873,T18.110A ",.02)
 ;;T18.110A
 ;;9002226.02101,"873,T18.110A ",.03)
 ;;30
 ;;9002226.02101,"873,T18.118A ",.01)
 ;;T18.118A
 ;;9002226.02101,"873,T18.118A ",.02)
 ;;T18.118A
 ;;9002226.02101,"873,T18.118A ",.03)
 ;;30
 ;;9002226.02101,"873,T18.120A ",.01)
 ;;T18.120A
 ;;9002226.02101,"873,T18.120A ",.02)
 ;;T18.120A
 ;;9002226.02101,"873,T18.120A ",.03)
 ;;30
 ;;9002226.02101,"873,T18.128A ",.01)
 ;;T18.128A
 ;;9002226.02101,"873,T18.128A ",.02)
 ;;T18.128A
 ;;9002226.02101,"873,T18.128A ",.03)
 ;;30
 ;;9002226.02101,"873,T18.190A ",.01)
 ;;T18.190A
 ;;9002226.02101,"873,T18.190A ",.02)
 ;;T18.190A
 ;;9002226.02101,"873,T18.190A ",.03)
 ;;30
 ;;9002226.02101,"873,T18.198A ",.01)
 ;;T18.198A
 ;;9002226.02101,"873,T18.198A ",.02)
 ;;T18.198A
 ;;9002226.02101,"873,T18.198A ",.03)
 ;;30
 ;;9002226.02101,"873,T18.2XXA ",.01)
 ;;T18.2XXA
 ;;9002226.02101,"873,T18.2XXA ",.02)
 ;;T18.2XXA
 ;;9002226.02101,"873,T18.2XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T18.3XXA ",.01)
 ;;T18.3XXA
 ;;9002226.02101,"873,T18.3XXA ",.02)
 ;;T18.3XXA
 ;;9002226.02101,"873,T18.3XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T18.4XXA ",.01)
 ;;T18.4XXA
 ;;9002226.02101,"873,T18.4XXA ",.02)
 ;;T18.4XXA
 ;;9002226.02101,"873,T18.4XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T18.5XXA ",.01)
 ;;T18.5XXA
 ;;9002226.02101,"873,T18.5XXA ",.02)
 ;;T18.5XXA
 ;;9002226.02101,"873,T18.5XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T18.8XXA ",.01)
 ;;T18.8XXA
 ;;9002226.02101,"873,T18.8XXA ",.02)
 ;;T18.8XXA
 ;;9002226.02101,"873,T18.8XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T18.9XXA ",.01)
 ;;T18.9XXA
 ;;9002226.02101,"873,T18.9XXA ",.02)
 ;;T18.9XXA
 ;;9002226.02101,"873,T18.9XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T19.0XXA ",.01)
 ;;T19.0XXA
 ;;9002226.02101,"873,T19.0XXA ",.02)
 ;;T19.0XXA
 ;;9002226.02101,"873,T19.0XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T19.1XXA ",.01)
 ;;T19.1XXA
 ;;9002226.02101,"873,T19.1XXA ",.02)
 ;;T19.1XXA
 ;;9002226.02101,"873,T19.1XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T19.2XXA ",.01)
 ;;T19.2XXA
 ;;9002226.02101,"873,T19.2XXA ",.02)
 ;;T19.2XXA
 ;;9002226.02101,"873,T19.2XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T19.3XXA ",.01)
 ;;T19.3XXA
 ;;9002226.02101,"873,T19.3XXA ",.02)
 ;;T19.3XXA
 ;;9002226.02101,"873,T19.3XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T19.4XXA ",.01)
 ;;T19.4XXA
 ;;9002226.02101,"873,T19.4XXA ",.02)
 ;;T19.4XXA
 ;;9002226.02101,"873,T19.4XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T19.8XXA ",.01)
 ;;T19.8XXA
 ;;9002226.02101,"873,T19.8XXA ",.02)
 ;;T19.8XXA
 ;;9002226.02101,"873,T19.8XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T19.9XXA ",.01)
 ;;T19.9XXA
 ;;9002226.02101,"873,T19.9XXA ",.02)
 ;;T19.9XXA
 ;;9002226.02101,"873,T19.9XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.00XA ",.01)
 ;;T20.00XA
 ;;9002226.02101,"873,T20.00XA ",.02)
 ;;T20.00XA
 ;;9002226.02101,"873,T20.00XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.011A ",.01)
 ;;T20.011A
 ;;9002226.02101,"873,T20.011A ",.02)
 ;;T20.011A
 ;;9002226.02101,"873,T20.011A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.012A ",.01)
 ;;T20.012A
 ;;9002226.02101,"873,T20.012A ",.02)
 ;;T20.012A
 ;;9002226.02101,"873,T20.012A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.019A ",.01)
 ;;T20.019A
 ;;9002226.02101,"873,T20.019A ",.02)
 ;;T20.019A
 ;;9002226.02101,"873,T20.019A ",.03)
 ;;30
 ;;9002226.02101,"873,T20.02XA ",.01)
 ;;T20.02XA
 ;;9002226.02101,"873,T20.02XA ",.02)
 ;;T20.02XA
 ;;9002226.02101,"873,T20.02XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.03XA ",.01)
 ;;T20.03XA
 ;;9002226.02101,"873,T20.03XA ",.02)
 ;;T20.03XA
 ;;9002226.02101,"873,T20.03XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.04XA ",.01)
 ;;T20.04XA
 ;;9002226.02101,"873,T20.04XA ",.02)
 ;;T20.04XA
 ;;9002226.02101,"873,T20.04XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.05XA ",.01)
 ;;T20.05XA
 ;;9002226.02101,"873,T20.05XA ",.02)
 ;;T20.05XA
 ;;9002226.02101,"873,T20.05XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.06XA ",.01)
 ;;T20.06XA
 ;;9002226.02101,"873,T20.06XA ",.02)
 ;;T20.06XA
 ;;9002226.02101,"873,T20.06XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.07XA ",.01)
 ;;T20.07XA
 ;;9002226.02101,"873,T20.07XA ",.02)
 ;;T20.07XA
 ;;9002226.02101,"873,T20.07XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.09XA ",.01)
 ;;T20.09XA
 ;;9002226.02101,"873,T20.09XA ",.02)
 ;;T20.09XA
 ;;9002226.02101,"873,T20.09XA ",.03)
 ;;30
 ;;9002226.02101,"873,T20.10XA ",.01)
 ;;T20.10XA
 ;;9002226.02101,"873,T20.10XA ",.02)
 ;;T20.10XA
 ;;9002226.02101,"873,T20.10XA ",.03)
 ;;30