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.
  1. ATXXB160 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
  1. ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;9002226.02101,"1804,30233N1 ",.01)
  1. ;;30233N1
  1. ;;9002226.02101,"1804,30233N1 ",.02)
  1. ;;30233N1
  1. ;;9002226.02101,"1804,30233N1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233P0 ",.01)
  1. ;;30233P0
  1. ;;9002226.02101,"1804,30233P0 ",.02)
  1. ;;30233P0
  1. ;;9002226.02101,"1804,30233P0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233P1 ",.01)
  1. ;;30233P1
  1. ;;9002226.02101,"1804,30233P1 ",.02)
  1. ;;30233P1
  1. ;;9002226.02101,"1804,30233P1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233Q0 ",.01)
  1. ;;30233Q0
  1. ;;9002226.02101,"1804,30233Q0 ",.02)
  1. ;;30233Q0
  1. ;;9002226.02101,"1804,30233Q0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233Q1 ",.01)
  1. ;;30233Q1
  1. ;;9002226.02101,"1804,30233Q1 ",.02)
  1. ;;30233Q1
  1. ;;9002226.02101,"1804,30233Q1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233R0 ",.01)
  1. ;;30233R0
  1. ;;9002226.02101,"1804,30233R0 ",.02)
  1. ;;30233R0
  1. ;;9002226.02101,"1804,30233R0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233R1 ",.01)
  1. ;;30233R1
  1. ;;9002226.02101,"1804,30233R1 ",.02)
  1. ;;30233R1
  1. ;;9002226.02101,"1804,30233R1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233S0 ",.01)
  1. ;;30233S0
  1. ;;9002226.02101,"1804,30233S0 ",.02)
  1. ;;30233S0
  1. ;;9002226.02101,"1804,30233S0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233S1 ",.01)
  1. ;;30233S1
  1. ;;9002226.02101,"1804,30233S1 ",.02)
  1. ;;30233S1
  1. ;;9002226.02101,"1804,30233S1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233T0 ",.01)
  1. ;;30233T0
  1. ;;9002226.02101,"1804,30233T0 ",.02)
  1. ;;30233T0
  1. ;;9002226.02101,"1804,30233T0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233T1 ",.01)
  1. ;;30233T1
  1. ;;9002226.02101,"1804,30233T1 ",.02)
  1. ;;30233T1
  1. ;;9002226.02101,"1804,30233T1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233V0 ",.01)
  1. ;;30233V0
  1. ;;9002226.02101,"1804,30233V0 ",.02)
  1. ;;30233V0
  1. ;;9002226.02101,"1804,30233V0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233V1 ",.01)
  1. ;;30233V1
  1. ;;9002226.02101,"1804,30233V1 ",.02)
  1. ;;30233V1
  1. ;;9002226.02101,"1804,30233V1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233W0 ",.01)
  1. ;;30233W0
  1. ;;9002226.02101,"1804,30233W0 ",.02)
  1. ;;30233W0
  1. ;;9002226.02101,"1804,30233W0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30233W1 ",.01)
  1. ;;30233W1
  1. ;;9002226.02101,"1804,30233W1 ",.02)
  1. ;;30233W1
  1. ;;9002226.02101,"1804,30233W1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240H0 ",.01)
  1. ;;30240H0
  1. ;;9002226.02101,"1804,30240H0 ",.02)
  1. ;;30240H0
  1. ;;9002226.02101,"1804,30240H0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240H1 ",.01)
  1. ;;30240H1
  1. ;;9002226.02101,"1804,30240H1 ",.02)
  1. ;;30240H1
  1. ;;9002226.02101,"1804,30240H1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240J0 ",.01)
  1. ;;30240J0
  1. ;;9002226.02101,"1804,30240J0 ",.02)
  1. ;;30240J0
  1. ;;9002226.02101,"1804,30240J0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240J1 ",.01)
  1. ;;30240J1
  1. ;;9002226.02101,"1804,30240J1 ",.02)
  1. ;;30240J1
  1. ;;9002226.02101,"1804,30240J1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240K0 ",.01)
  1. ;;30240K0
  1. ;;9002226.02101,"1804,30240K0 ",.02)
  1. ;;30240K0
  1. ;;9002226.02101,"1804,30240K0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240K1 ",.01)
  1. ;;30240K1
  1. ;;9002226.02101,"1804,30240K1 ",.02)
  1. ;;30240K1
  1. ;;9002226.02101,"1804,30240K1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240L0 ",.01)
  1. ;;30240L0
  1. ;;9002226.02101,"1804,30240L0 ",.02)
  1. ;;30240L0
  1. ;;9002226.02101,"1804,30240L0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240L1 ",.01)
  1. ;;30240L1
  1. ;;9002226.02101,"1804,30240L1 ",.02)
  1. ;;30240L1
  1. ;;9002226.02101,"1804,30240L1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240M0 ",.01)
  1. ;;30240M0
  1. ;;9002226.02101,"1804,30240M0 ",.02)
  1. ;;30240M0
  1. ;;9002226.02101,"1804,30240M0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240M1 ",.01)
  1. ;;30240M1
  1. ;;9002226.02101,"1804,30240M1 ",.02)
  1. ;;30240M1
  1. ;;9002226.02101,"1804,30240M1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240N0 ",.01)
  1. ;;30240N0
  1. ;;9002226.02101,"1804,30240N0 ",.02)
  1. ;;30240N0
  1. ;;9002226.02101,"1804,30240N0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240N1 ",.01)
  1. ;;30240N1
  1. ;;9002226.02101,"1804,30240N1 ",.02)
  1. ;;30240N1
  1. ;;9002226.02101,"1804,30240N1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240P0 ",.01)
  1. ;;30240P0
  1. ;;9002226.02101,"1804,30240P0 ",.02)
  1. ;;30240P0
  1. ;;9002226.02101,"1804,30240P0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240P1 ",.01)
  1. ;;30240P1
  1. ;;9002226.02101,"1804,30240P1 ",.02)
  1. ;;30240P1
  1. ;;9002226.02101,"1804,30240P1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240Q0 ",.01)
  1. ;;30240Q0
  1. ;;9002226.02101,"1804,30240Q0 ",.02)
  1. ;;30240Q0
  1. ;;9002226.02101,"1804,30240Q0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240Q1 ",.01)
  1. ;;30240Q1
  1. ;;9002226.02101,"1804,30240Q1 ",.02)
  1. ;;30240Q1
  1. ;;9002226.02101,"1804,30240Q1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240R0 ",.01)
  1. ;;30240R0
  1. ;;9002226.02101,"1804,30240R0 ",.02)
  1. ;;30240R0
  1. ;;9002226.02101,"1804,30240R0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240R1 ",.01)
  1. ;;30240R1
  1. ;;9002226.02101,"1804,30240R1 ",.02)
  1. ;;30240R1
  1. ;;9002226.02101,"1804,30240R1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240S0 ",.01)
  1. ;;30240S0
  1. ;;9002226.02101,"1804,30240S0 ",.02)
  1. ;;30240S0
  1. ;;9002226.02101,"1804,30240S0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240S1 ",.01)
  1. ;;30240S1
  1. ;;9002226.02101,"1804,30240S1 ",.02)
  1. ;;30240S1
  1. ;;9002226.02101,"1804,30240S1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240T0 ",.01)
  1. ;;30240T0
  1. ;;9002226.02101,"1804,30240T0 ",.02)
  1. ;;30240T0
  1. ;;9002226.02101,"1804,30240T0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240T1 ",.01)
  1. ;;30240T1
  1. ;;9002226.02101,"1804,30240T1 ",.02)
  1. ;;30240T1
  1. ;;9002226.02101,"1804,30240T1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240V0 ",.01)
  1. ;;30240V0
  1. ;;9002226.02101,"1804,30240V0 ",.02)
  1. ;;30240V0
  1. ;;9002226.02101,"1804,30240V0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240V1 ",.01)
  1. ;;30240V1
  1. ;;9002226.02101,"1804,30240V1 ",.02)
  1. ;;30240V1
  1. ;;9002226.02101,"1804,30240V1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240W0 ",.01)
  1. ;;30240W0
  1. ;;9002226.02101,"1804,30240W0 ",.02)
  1. ;;30240W0
  1. ;;9002226.02101,"1804,30240W0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30240W1 ",.01)
  1. ;;30240W1
  1. ;;9002226.02101,"1804,30240W1 ",.02)
  1. ;;30240W1
  1. ;;9002226.02101,"1804,30240W1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243H0 ",.01)
  1. ;;30243H0
  1. ;;9002226.02101,"1804,30243H0 ",.02)
  1. ;;30243H0
  1. ;;9002226.02101,"1804,30243H0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243H1 ",.01)
  1. ;;30243H1
  1. ;;9002226.02101,"1804,30243H1 ",.02)
  1. ;;30243H1
  1. ;;9002226.02101,"1804,30243H1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243J0 ",.01)
  1. ;;30243J0
  1. ;;9002226.02101,"1804,30243J0 ",.02)
  1. ;;30243J0
  1. ;;9002226.02101,"1804,30243J0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243J1 ",.01)
  1. ;;30243J1
  1. ;;9002226.02101,"1804,30243J1 ",.02)
  1. ;;30243J1
  1. ;;9002226.02101,"1804,30243J1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243K0 ",.01)
  1. ;;30243K0
  1. ;;9002226.02101,"1804,30243K0 ",.02)
  1. ;;30243K0
  1. ;;9002226.02101,"1804,30243K0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243K1 ",.01)
  1. ;;30243K1
  1. ;;9002226.02101,"1804,30243K1 ",.02)
  1. ;;30243K1
  1. ;;9002226.02101,"1804,30243K1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243L0 ",.01)
  1. ;;30243L0
  1. ;;9002226.02101,"1804,30243L0 ",.02)
  1. ;;30243L0
  1. ;;9002226.02101,"1804,30243L0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243L1 ",.01)
  1. ;;30243L1
  1. ;;9002226.02101,"1804,30243L1 ",.02)
  1. ;;30243L1
  1. ;;9002226.02101,"1804,30243L1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243M0 ",.01)
  1. ;;30243M0
  1. ;;9002226.02101,"1804,30243M0 ",.02)
  1. ;;30243M0
  1. ;;9002226.02101,"1804,30243M0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243M1 ",.01)
  1. ;;30243M1
  1. ;;9002226.02101,"1804,30243M1 ",.02)
  1. ;;30243M1
  1. ;;9002226.02101,"1804,30243M1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243N0 ",.01)
  1. ;;30243N0
  1. ;;9002226.02101,"1804,30243N0 ",.02)
  1. ;;30243N0
  1. ;;9002226.02101,"1804,30243N0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243N1 ",.01)
  1. ;;30243N1
  1. ;;9002226.02101,"1804,30243N1 ",.02)
  1. ;;30243N1
  1. ;;9002226.02101,"1804,30243N1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243P0 ",.01)
  1. ;;30243P0
  1. ;;9002226.02101,"1804,30243P0 ",.02)
  1. ;;30243P0
  1. ;;9002226.02101,"1804,30243P0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243P1 ",.01)
  1. ;;30243P1
  1. ;;9002226.02101,"1804,30243P1 ",.02)
  1. ;;30243P1
  1. ;;9002226.02101,"1804,30243P1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243Q0 ",.01)
  1. ;;30243Q0
  1. ;;9002226.02101,"1804,30243Q0 ",.02)
  1. ;;30243Q0
  1. ;;9002226.02101,"1804,30243Q0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243Q1 ",.01)
  1. ;;30243Q1
  1. ;;9002226.02101,"1804,30243Q1 ",.02)
  1. ;;30243Q1
  1. ;;9002226.02101,"1804,30243Q1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243R0 ",.01)
  1. ;;30243R0
  1. ;;9002226.02101,"1804,30243R0 ",.02)
  1. ;;30243R0
  1. ;;9002226.02101,"1804,30243R0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243R1 ",.01)
  1. ;;30243R1
  1. ;;9002226.02101,"1804,30243R1 ",.02)
  1. ;;30243R1
  1. ;;9002226.02101,"1804,30243R1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243S0 ",.01)
  1. ;;30243S0
  1. ;;9002226.02101,"1804,30243S0 ",.02)
  1. ;;30243S0
  1. ;;9002226.02101,"1804,30243S0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243S1 ",.01)
  1. ;;30243S1
  1. ;;9002226.02101,"1804,30243S1 ",.02)
  1. ;;30243S1
  1. ;;9002226.02101,"1804,30243S1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243T0 ",.01)
  1. ;;30243T0
  1. ;;9002226.02101,"1804,30243T0 ",.02)
  1. ;;30243T0
  1. ;;9002226.02101,"1804,30243T0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243T1 ",.01)
  1. ;;30243T1
  1. ;;9002226.02101,"1804,30243T1 ",.02)
  1. ;;30243T1
  1. ;;9002226.02101,"1804,30243T1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243V0 ",.01)
  1. ;;30243V0
  1. ;;9002226.02101,"1804,30243V0 ",.02)
  1. ;;30243V0
  1. ;;9002226.02101,"1804,30243V0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243V1 ",.01)
  1. ;;30243V1
  1. ;;9002226.02101,"1804,30243V1 ",.02)
  1. ;;30243V1
  1. ;;9002226.02101,"1804,30243V1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243W0 ",.01)
  1. ;;30243W0
  1. ;;9002226.02101,"1804,30243W0 ",.02)
  1. ;;30243W0
  1. ;;9002226.02101,"1804,30243W0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30243W1 ",.01)
  1. ;;30243W1
  1. ;;9002226.02101,"1804,30243W1 ",.02)
  1. ;;30243W1
  1. ;;9002226.02101,"1804,30243W1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250H0 ",.01)
  1. ;;30250H0
  1. ;;9002226.02101,"1804,30250H0 ",.02)
  1. ;;30250H0
  1. ;;9002226.02101,"1804,30250H0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250H1 ",.01)
  1. ;;30250H1
  1. ;;9002226.02101,"1804,30250H1 ",.02)
  1. ;;30250H1
  1. ;;9002226.02101,"1804,30250H1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250J0 ",.01)
  1. ;;30250J0
  1. ;;9002226.02101,"1804,30250J0 ",.02)
  1. ;;30250J0
  1. ;;9002226.02101,"1804,30250J0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250J1 ",.01)
  1. ;;30250J1
  1. ;;9002226.02101,"1804,30250J1 ",.02)
  1. ;;30250J1
  1. ;;9002226.02101,"1804,30250J1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250K0 ",.01)
  1. ;;30250K0
  1. ;;9002226.02101,"1804,30250K0 ",.02)
  1. ;;30250K0
  1. ;;9002226.02101,"1804,30250K0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250K1 ",.01)
  1. ;;30250K1
  1. ;;9002226.02101,"1804,30250K1 ",.02)
  1. ;;30250K1
  1. ;;9002226.02101,"1804,30250K1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250L0 ",.01)
  1. ;;30250L0
  1. ;;9002226.02101,"1804,30250L0 ",.02)
  1. ;;30250L0
  1. ;;9002226.02101,"1804,30250L0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250L1 ",.01)
  1. ;;30250L1
  1. ;;9002226.02101,"1804,30250L1 ",.02)
  1. ;;30250L1
  1. ;;9002226.02101,"1804,30250L1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250M0 ",.01)
  1. ;;30250M0
  1. ;;9002226.02101,"1804,30250M0 ",.02)
  1. ;;30250M0
  1. ;;9002226.02101,"1804,30250M0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250M1 ",.01)
  1. ;;30250M1
  1. ;;9002226.02101,"1804,30250M1 ",.02)
  1. ;;30250M1
  1. ;;9002226.02101,"1804,30250M1 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250N0 ",.01)
  1. ;;30250N0
  1. ;;9002226.02101,"1804,30250N0 ",.02)
  1. ;;30250N0
  1. ;;9002226.02101,"1804,30250N0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,30250N1 ",.01)
  1. ;;30250N1