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

ATXXB160.m

Go to the documentation of this file.
ATXXB160 ;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,"1804,30233N1 ",.01)
 ;;30233N1 
 ;;9002226.02101,"1804,30233N1 ",.02)
 ;;30233N1 
 ;;9002226.02101,"1804,30233N1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233P0 ",.01)
 ;;30233P0 
 ;;9002226.02101,"1804,30233P0 ",.02)
 ;;30233P0 
 ;;9002226.02101,"1804,30233P0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233P1 ",.01)
 ;;30233P1 
 ;;9002226.02101,"1804,30233P1 ",.02)
 ;;30233P1 
 ;;9002226.02101,"1804,30233P1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233Q0 ",.01)
 ;;30233Q0 
 ;;9002226.02101,"1804,30233Q0 ",.02)
 ;;30233Q0 
 ;;9002226.02101,"1804,30233Q0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233Q1 ",.01)
 ;;30233Q1 
 ;;9002226.02101,"1804,30233Q1 ",.02)
 ;;30233Q1 
 ;;9002226.02101,"1804,30233Q1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233R0 ",.01)
 ;;30233R0 
 ;;9002226.02101,"1804,30233R0 ",.02)
 ;;30233R0 
 ;;9002226.02101,"1804,30233R0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233R1 ",.01)
 ;;30233R1 
 ;;9002226.02101,"1804,30233R1 ",.02)
 ;;30233R1 
 ;;9002226.02101,"1804,30233R1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233S0 ",.01)
 ;;30233S0 
 ;;9002226.02101,"1804,30233S0 ",.02)
 ;;30233S0 
 ;;9002226.02101,"1804,30233S0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233S1 ",.01)
 ;;30233S1 
 ;;9002226.02101,"1804,30233S1 ",.02)
 ;;30233S1 
 ;;9002226.02101,"1804,30233S1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233T0 ",.01)
 ;;30233T0 
 ;;9002226.02101,"1804,30233T0 ",.02)
 ;;30233T0 
 ;;9002226.02101,"1804,30233T0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233T1 ",.01)
 ;;30233T1 
 ;;9002226.02101,"1804,30233T1 ",.02)
 ;;30233T1 
 ;;9002226.02101,"1804,30233T1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233V0 ",.01)
 ;;30233V0 
 ;;9002226.02101,"1804,30233V0 ",.02)
 ;;30233V0 
 ;;9002226.02101,"1804,30233V0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233V1 ",.01)
 ;;30233V1 
 ;;9002226.02101,"1804,30233V1 ",.02)
 ;;30233V1 
 ;;9002226.02101,"1804,30233V1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233W0 ",.01)
 ;;30233W0 
 ;;9002226.02101,"1804,30233W0 ",.02)
 ;;30233W0 
 ;;9002226.02101,"1804,30233W0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30233W1 ",.01)
 ;;30233W1 
 ;;9002226.02101,"1804,30233W1 ",.02)
 ;;30233W1 
 ;;9002226.02101,"1804,30233W1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240H0 ",.01)
 ;;30240H0 
 ;;9002226.02101,"1804,30240H0 ",.02)
 ;;30240H0 
 ;;9002226.02101,"1804,30240H0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240H1 ",.01)
 ;;30240H1 
 ;;9002226.02101,"1804,30240H1 ",.02)
 ;;30240H1 
 ;;9002226.02101,"1804,30240H1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240J0 ",.01)
 ;;30240J0 
 ;;9002226.02101,"1804,30240J0 ",.02)
 ;;30240J0 
 ;;9002226.02101,"1804,30240J0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240J1 ",.01)
 ;;30240J1 
 ;;9002226.02101,"1804,30240J1 ",.02)
 ;;30240J1 
 ;;9002226.02101,"1804,30240J1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240K0 ",.01)
 ;;30240K0 
 ;;9002226.02101,"1804,30240K0 ",.02)
 ;;30240K0 
 ;;9002226.02101,"1804,30240K0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240K1 ",.01)
 ;;30240K1 
 ;;9002226.02101,"1804,30240K1 ",.02)
 ;;30240K1 
 ;;9002226.02101,"1804,30240K1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240L0 ",.01)
 ;;30240L0 
 ;;9002226.02101,"1804,30240L0 ",.02)
 ;;30240L0 
 ;;9002226.02101,"1804,30240L0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240L1 ",.01)
 ;;30240L1 
 ;;9002226.02101,"1804,30240L1 ",.02)
 ;;30240L1 
 ;;9002226.02101,"1804,30240L1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240M0 ",.01)
 ;;30240M0 
 ;;9002226.02101,"1804,30240M0 ",.02)
 ;;30240M0 
 ;;9002226.02101,"1804,30240M0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240M1 ",.01)
 ;;30240M1 
 ;;9002226.02101,"1804,30240M1 ",.02)
 ;;30240M1 
 ;;9002226.02101,"1804,30240M1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240N0 ",.01)
 ;;30240N0 
 ;;9002226.02101,"1804,30240N0 ",.02)
 ;;30240N0 
 ;;9002226.02101,"1804,30240N0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240N1 ",.01)
 ;;30240N1 
 ;;9002226.02101,"1804,30240N1 ",.02)
 ;;30240N1 
 ;;9002226.02101,"1804,30240N1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240P0 ",.01)
 ;;30240P0 
 ;;9002226.02101,"1804,30240P0 ",.02)
 ;;30240P0 
 ;;9002226.02101,"1804,30240P0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240P1 ",.01)
 ;;30240P1 
 ;;9002226.02101,"1804,30240P1 ",.02)
 ;;30240P1 
 ;;9002226.02101,"1804,30240P1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240Q0 ",.01)
 ;;30240Q0 
 ;;9002226.02101,"1804,30240Q0 ",.02)
 ;;30240Q0 
 ;;9002226.02101,"1804,30240Q0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240Q1 ",.01)
 ;;30240Q1 
 ;;9002226.02101,"1804,30240Q1 ",.02)
 ;;30240Q1 
 ;;9002226.02101,"1804,30240Q1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240R0 ",.01)
 ;;30240R0 
 ;;9002226.02101,"1804,30240R0 ",.02)
 ;;30240R0 
 ;;9002226.02101,"1804,30240R0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240R1 ",.01)
 ;;30240R1 
 ;;9002226.02101,"1804,30240R1 ",.02)
 ;;30240R1 
 ;;9002226.02101,"1804,30240R1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240S0 ",.01)
 ;;30240S0 
 ;;9002226.02101,"1804,30240S0 ",.02)
 ;;30240S0 
 ;;9002226.02101,"1804,30240S0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240S1 ",.01)
 ;;30240S1 
 ;;9002226.02101,"1804,30240S1 ",.02)
 ;;30240S1 
 ;;9002226.02101,"1804,30240S1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240T0 ",.01)
 ;;30240T0 
 ;;9002226.02101,"1804,30240T0 ",.02)
 ;;30240T0 
 ;;9002226.02101,"1804,30240T0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240T1 ",.01)
 ;;30240T1 
 ;;9002226.02101,"1804,30240T1 ",.02)
 ;;30240T1 
 ;;9002226.02101,"1804,30240T1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240V0 ",.01)
 ;;30240V0 
 ;;9002226.02101,"1804,30240V0 ",.02)
 ;;30240V0 
 ;;9002226.02101,"1804,30240V0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240V1 ",.01)
 ;;30240V1 
 ;;9002226.02101,"1804,30240V1 ",.02)
 ;;30240V1 
 ;;9002226.02101,"1804,30240V1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240W0 ",.01)
 ;;30240W0 
 ;;9002226.02101,"1804,30240W0 ",.02)
 ;;30240W0 
 ;;9002226.02101,"1804,30240W0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30240W1 ",.01)
 ;;30240W1 
 ;;9002226.02101,"1804,30240W1 ",.02)
 ;;30240W1 
 ;;9002226.02101,"1804,30240W1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243H0 ",.01)
 ;;30243H0 
 ;;9002226.02101,"1804,30243H0 ",.02)
 ;;30243H0 
 ;;9002226.02101,"1804,30243H0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243H1 ",.01)
 ;;30243H1 
 ;;9002226.02101,"1804,30243H1 ",.02)
 ;;30243H1 
 ;;9002226.02101,"1804,30243H1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243J0 ",.01)
 ;;30243J0 
 ;;9002226.02101,"1804,30243J0 ",.02)
 ;;30243J0 
 ;;9002226.02101,"1804,30243J0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243J1 ",.01)
 ;;30243J1 
 ;;9002226.02101,"1804,30243J1 ",.02)
 ;;30243J1 
 ;;9002226.02101,"1804,30243J1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243K0 ",.01)
 ;;30243K0 
 ;;9002226.02101,"1804,30243K0 ",.02)
 ;;30243K0 
 ;;9002226.02101,"1804,30243K0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243K1 ",.01)
 ;;30243K1 
 ;;9002226.02101,"1804,30243K1 ",.02)
 ;;30243K1 
 ;;9002226.02101,"1804,30243K1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243L0 ",.01)
 ;;30243L0 
 ;;9002226.02101,"1804,30243L0 ",.02)
 ;;30243L0 
 ;;9002226.02101,"1804,30243L0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243L1 ",.01)
 ;;30243L1 
 ;;9002226.02101,"1804,30243L1 ",.02)
 ;;30243L1 
 ;;9002226.02101,"1804,30243L1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243M0 ",.01)
 ;;30243M0 
 ;;9002226.02101,"1804,30243M0 ",.02)
 ;;30243M0 
 ;;9002226.02101,"1804,30243M0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243M1 ",.01)
 ;;30243M1 
 ;;9002226.02101,"1804,30243M1 ",.02)
 ;;30243M1 
 ;;9002226.02101,"1804,30243M1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243N0 ",.01)
 ;;30243N0 
 ;;9002226.02101,"1804,30243N0 ",.02)
 ;;30243N0 
 ;;9002226.02101,"1804,30243N0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243N1 ",.01)
 ;;30243N1 
 ;;9002226.02101,"1804,30243N1 ",.02)
 ;;30243N1 
 ;;9002226.02101,"1804,30243N1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243P0 ",.01)
 ;;30243P0 
 ;;9002226.02101,"1804,30243P0 ",.02)
 ;;30243P0 
 ;;9002226.02101,"1804,30243P0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243P1 ",.01)
 ;;30243P1 
 ;;9002226.02101,"1804,30243P1 ",.02)
 ;;30243P1 
 ;;9002226.02101,"1804,30243P1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243Q0 ",.01)
 ;;30243Q0 
 ;;9002226.02101,"1804,30243Q0 ",.02)
 ;;30243Q0 
 ;;9002226.02101,"1804,30243Q0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243Q1 ",.01)
 ;;30243Q1 
 ;;9002226.02101,"1804,30243Q1 ",.02)
 ;;30243Q1 
 ;;9002226.02101,"1804,30243Q1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243R0 ",.01)
 ;;30243R0 
 ;;9002226.02101,"1804,30243R0 ",.02)
 ;;30243R0 
 ;;9002226.02101,"1804,30243R0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243R1 ",.01)
 ;;30243R1 
 ;;9002226.02101,"1804,30243R1 ",.02)
 ;;30243R1 
 ;;9002226.02101,"1804,30243R1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243S0 ",.01)
 ;;30243S0 
 ;;9002226.02101,"1804,30243S0 ",.02)
 ;;30243S0 
 ;;9002226.02101,"1804,30243S0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243S1 ",.01)
 ;;30243S1 
 ;;9002226.02101,"1804,30243S1 ",.02)
 ;;30243S1 
 ;;9002226.02101,"1804,30243S1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243T0 ",.01)
 ;;30243T0 
 ;;9002226.02101,"1804,30243T0 ",.02)
 ;;30243T0 
 ;;9002226.02101,"1804,30243T0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243T1 ",.01)
 ;;30243T1 
 ;;9002226.02101,"1804,30243T1 ",.02)
 ;;30243T1 
 ;;9002226.02101,"1804,30243T1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243V0 ",.01)
 ;;30243V0 
 ;;9002226.02101,"1804,30243V0 ",.02)
 ;;30243V0 
 ;;9002226.02101,"1804,30243V0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243V1 ",.01)
 ;;30243V1 
 ;;9002226.02101,"1804,30243V1 ",.02)
 ;;30243V1 
 ;;9002226.02101,"1804,30243V1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243W0 ",.01)
 ;;30243W0 
 ;;9002226.02101,"1804,30243W0 ",.02)
 ;;30243W0 
 ;;9002226.02101,"1804,30243W0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30243W1 ",.01)
 ;;30243W1 
 ;;9002226.02101,"1804,30243W1 ",.02)
 ;;30243W1 
 ;;9002226.02101,"1804,30243W1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250H0 ",.01)
 ;;30250H0 
 ;;9002226.02101,"1804,30250H0 ",.02)
 ;;30250H0 
 ;;9002226.02101,"1804,30250H0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250H1 ",.01)
 ;;30250H1 
 ;;9002226.02101,"1804,30250H1 ",.02)
 ;;30250H1 
 ;;9002226.02101,"1804,30250H1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250J0 ",.01)
 ;;30250J0 
 ;;9002226.02101,"1804,30250J0 ",.02)
 ;;30250J0 
 ;;9002226.02101,"1804,30250J0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250J1 ",.01)
 ;;30250J1 
 ;;9002226.02101,"1804,30250J1 ",.02)
 ;;30250J1 
 ;;9002226.02101,"1804,30250J1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250K0 ",.01)
 ;;30250K0 
 ;;9002226.02101,"1804,30250K0 ",.02)
 ;;30250K0 
 ;;9002226.02101,"1804,30250K0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250K1 ",.01)
 ;;30250K1 
 ;;9002226.02101,"1804,30250K1 ",.02)
 ;;30250K1 
 ;;9002226.02101,"1804,30250K1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250L0 ",.01)
 ;;30250L0 
 ;;9002226.02101,"1804,30250L0 ",.02)
 ;;30250L0 
 ;;9002226.02101,"1804,30250L0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250L1 ",.01)
 ;;30250L1 
 ;;9002226.02101,"1804,30250L1 ",.02)
 ;;30250L1 
 ;;9002226.02101,"1804,30250L1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250M0 ",.01)
 ;;30250M0 
 ;;9002226.02101,"1804,30250M0 ",.02)
 ;;30250M0 
 ;;9002226.02101,"1804,30250M0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250M1 ",.01)
 ;;30250M1 
 ;;9002226.02101,"1804,30250M1 ",.02)
 ;;30250M1 
 ;;9002226.02101,"1804,30250M1 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250N0 ",.01)
 ;;30250N0 
 ;;9002226.02101,"1804,30250N0 ",.02)
 ;;30250N0 
 ;;9002226.02101,"1804,30250N0 ",.03)
 ;;31
 ;;9002226.02101,"1804,30250N1 ",.01)
 ;;30250N1