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

ATXDBH34.m

Go to the documentation of this file.
ATXDBH34 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 20, 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,"1959,O99.42 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.43 ",.01)
 ;;O99.43 
 ;;9002226.02101,"1959,O99.43 ",.02)
 ;;O99.43 
 ;;9002226.02101,"1959,O99.43 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.511 ",.01)
 ;;O99.511 
 ;;9002226.02101,"1959,O99.511 ",.02)
 ;;O99.511 
 ;;9002226.02101,"1959,O99.511 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.512 ",.01)
 ;;O99.512 
 ;;9002226.02101,"1959,O99.512 ",.02)
 ;;O99.512 
 ;;9002226.02101,"1959,O99.512 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.513 ",.01)
 ;;O99.513 
 ;;9002226.02101,"1959,O99.513 ",.02)
 ;;O99.513 
 ;;9002226.02101,"1959,O99.513 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.519 ",.01)
 ;;O99.519 
 ;;9002226.02101,"1959,O99.519 ",.02)
 ;;O99.519 
 ;;9002226.02101,"1959,O99.519 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.52 ",.01)
 ;;O99.52 
 ;;9002226.02101,"1959,O99.52 ",.02)
 ;;O99.52 
 ;;9002226.02101,"1959,O99.52 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.53 ",.01)
 ;;O99.53 
 ;;9002226.02101,"1959,O99.53 ",.02)
 ;;O99.53 
 ;;9002226.02101,"1959,O99.53 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.611 ",.01)
 ;;O99.611 
 ;;9002226.02101,"1959,O99.611 ",.02)
 ;;O99.611 
 ;;9002226.02101,"1959,O99.611 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.612 ",.01)
 ;;O99.612 
 ;;9002226.02101,"1959,O99.612 ",.02)
 ;;O99.612 
 ;;9002226.02101,"1959,O99.612 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.613 ",.01)
 ;;O99.613 
 ;;9002226.02101,"1959,O99.613 ",.02)
 ;;O99.613 
 ;;9002226.02101,"1959,O99.613 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.619 ",.01)
 ;;O99.619 
 ;;9002226.02101,"1959,O99.619 ",.02)
 ;;O99.619 
 ;;9002226.02101,"1959,O99.619 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.62 ",.01)
 ;;O99.62 
 ;;9002226.02101,"1959,O99.62 ",.02)
 ;;O99.62 
 ;;9002226.02101,"1959,O99.62 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.63 ",.01)
 ;;O99.63 
 ;;9002226.02101,"1959,O99.63 ",.02)
 ;;O99.63 
 ;;9002226.02101,"1959,O99.63 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.711 ",.01)
 ;;O99.711 
 ;;9002226.02101,"1959,O99.711 ",.02)
 ;;O99.711 
 ;;9002226.02101,"1959,O99.711 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.712 ",.01)
 ;;O99.712 
 ;;9002226.02101,"1959,O99.712 ",.02)
 ;;O99.712 
 ;;9002226.02101,"1959,O99.712 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.713 ",.01)
 ;;O99.713 
 ;;9002226.02101,"1959,O99.713 ",.02)
 ;;O99.713 
 ;;9002226.02101,"1959,O99.713 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.719 ",.01)
 ;;O99.719 
 ;;9002226.02101,"1959,O99.719 ",.02)
 ;;O99.719 
 ;;9002226.02101,"1959,O99.719 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.72 ",.01)
 ;;O99.72 
 ;;9002226.02101,"1959,O99.72 ",.02)
 ;;O99.72 
 ;;9002226.02101,"1959,O99.72 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.73 ",.01)
 ;;O99.73 
 ;;9002226.02101,"1959,O99.73 ",.02)
 ;;O99.73 
 ;;9002226.02101,"1959,O99.73 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.810 ",.01)
 ;;O99.810 
 ;;9002226.02101,"1959,O99.810 ",.02)
 ;;O99.810 
 ;;9002226.02101,"1959,O99.810 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.814 ",.01)
 ;;O99.814 
 ;;9002226.02101,"1959,O99.814 ",.02)
 ;;O99.814 
 ;;9002226.02101,"1959,O99.814 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.815 ",.01)
 ;;O99.815 
 ;;9002226.02101,"1959,O99.815 ",.02)
 ;;O99.815 
 ;;9002226.02101,"1959,O99.815 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.820 ",.01)
 ;;O99.820 
 ;;9002226.02101,"1959,O99.820 ",.02)
 ;;O99.820 
 ;;9002226.02101,"1959,O99.820 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.824 ",.01)
 ;;O99.824 
 ;;9002226.02101,"1959,O99.824 ",.02)
 ;;O99.824 
 ;;9002226.02101,"1959,O99.824 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.825 ",.01)
 ;;O99.825 
 ;;9002226.02101,"1959,O99.825 ",.02)
 ;;O99.825 
 ;;9002226.02101,"1959,O99.825 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.830 ",.01)
 ;;O99.830 
 ;;9002226.02101,"1959,O99.830 ",.02)
 ;;O99.830 
 ;;9002226.02101,"1959,O99.830 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.834 ",.01)
 ;;O99.834 
 ;;9002226.02101,"1959,O99.834 ",.02)
 ;;O99.834 
 ;;9002226.02101,"1959,O99.834 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.835 ",.01)
 ;;O99.835 
 ;;9002226.02101,"1959,O99.835 ",.02)
 ;;O99.835 
 ;;9002226.02101,"1959,O99.835 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.840 ",.01)
 ;;O99.840 
 ;;9002226.02101,"1959,O99.840 ",.02)
 ;;O99.840 
 ;;9002226.02101,"1959,O99.840 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.841 ",.01)
 ;;O99.841 
 ;;9002226.02101,"1959,O99.841 ",.02)
 ;;O99.841 
 ;;9002226.02101,"1959,O99.841 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.842 ",.01)
 ;;O99.842 
 ;;9002226.02101,"1959,O99.842 ",.02)
 ;;O99.842 
 ;;9002226.02101,"1959,O99.842 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.843 ",.01)
 ;;O99.843 
 ;;9002226.02101,"1959,O99.843 ",.02)
 ;;O99.843 
 ;;9002226.02101,"1959,O99.843 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.844 ",.01)
 ;;O99.844 
 ;;9002226.02101,"1959,O99.844 ",.02)
 ;;O99.844 
 ;;9002226.02101,"1959,O99.844 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.845 ",.01)
 ;;O99.845 
 ;;9002226.02101,"1959,O99.845 ",.02)
 ;;O99.845 
 ;;9002226.02101,"1959,O99.845 ",.03)
 ;;30
 ;;9002226.02101,"1959,O99.89 ",.01)
 ;;O99.89 
 ;;9002226.02101,"1959,O99.89 ",.02)
 ;;O99.89 
 ;;9002226.02101,"1959,O99.89 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.111 ",.01)
 ;;O9A.111 
 ;;9002226.02101,"1959,O9A.111 ",.02)
 ;;O9A.111 
 ;;9002226.02101,"1959,O9A.111 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.112 ",.01)
 ;;O9A.112 
 ;;9002226.02101,"1959,O9A.112 ",.02)
 ;;O9A.112 
 ;;9002226.02101,"1959,O9A.112 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.113 ",.01)
 ;;O9A.113 
 ;;9002226.02101,"1959,O9A.113 ",.02)
 ;;O9A.113 
 ;;9002226.02101,"1959,O9A.113 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.119 ",.01)
 ;;O9A.119 
 ;;9002226.02101,"1959,O9A.119 ",.02)
 ;;O9A.119 
 ;;9002226.02101,"1959,O9A.119 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.12 ",.01)
 ;;O9A.12 
 ;;9002226.02101,"1959,O9A.12 ",.02)
 ;;O9A.12 
 ;;9002226.02101,"1959,O9A.12 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.13 ",.01)
 ;;O9A.13 
 ;;9002226.02101,"1959,O9A.13 ",.02)
 ;;O9A.13 
 ;;9002226.02101,"1959,O9A.13 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.211 ",.01)
 ;;O9A.211 
 ;;9002226.02101,"1959,O9A.211 ",.02)
 ;;O9A.211 
 ;;9002226.02101,"1959,O9A.211 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.212 ",.01)
 ;;O9A.212 
 ;;9002226.02101,"1959,O9A.212 ",.02)
 ;;O9A.212 
 ;;9002226.02101,"1959,O9A.212 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.213 ",.01)
 ;;O9A.213 
 ;;9002226.02101,"1959,O9A.213 ",.02)
 ;;O9A.213 
 ;;9002226.02101,"1959,O9A.213 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.219 ",.01)
 ;;O9A.219 
 ;;9002226.02101,"1959,O9A.219 ",.02)
 ;;O9A.219 
 ;;9002226.02101,"1959,O9A.219 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.22 ",.01)
 ;;O9A.22 
 ;;9002226.02101,"1959,O9A.22 ",.02)
 ;;O9A.22 
 ;;9002226.02101,"1959,O9A.22 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.23 ",.01)
 ;;O9A.23 
 ;;9002226.02101,"1959,O9A.23 ",.02)
 ;;O9A.23 
 ;;9002226.02101,"1959,O9A.23 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.311 ",.01)
 ;;O9A.311 
 ;;9002226.02101,"1959,O9A.311 ",.02)
 ;;O9A.311 
 ;;9002226.02101,"1959,O9A.311 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.312 ",.01)
 ;;O9A.312 
 ;;9002226.02101,"1959,O9A.312 ",.02)
 ;;O9A.312 
 ;;9002226.02101,"1959,O9A.312 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.313 ",.01)
 ;;O9A.313 
 ;;9002226.02101,"1959,O9A.313 ",.02)
 ;;O9A.313 
 ;;9002226.02101,"1959,O9A.313 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.319 ",.01)
 ;;O9A.319 
 ;;9002226.02101,"1959,O9A.319 ",.02)
 ;;O9A.319 
 ;;9002226.02101,"1959,O9A.319 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.32 ",.01)
 ;;O9A.32 
 ;;9002226.02101,"1959,O9A.32 ",.02)
 ;;O9A.32 
 ;;9002226.02101,"1959,O9A.32 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.33 ",.01)
 ;;O9A.33 
 ;;9002226.02101,"1959,O9A.33 ",.02)
 ;;O9A.33 
 ;;9002226.02101,"1959,O9A.33 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.411 ",.01)
 ;;O9A.411 
 ;;9002226.02101,"1959,O9A.411 ",.02)
 ;;O9A.411 
 ;;9002226.02101,"1959,O9A.411 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.412 ",.01)
 ;;O9A.412 
 ;;9002226.02101,"1959,O9A.412 ",.02)
 ;;O9A.412 
 ;;9002226.02101,"1959,O9A.412 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.413 ",.01)
 ;;O9A.413 
 ;;9002226.02101,"1959,O9A.413 ",.02)
 ;;O9A.413 
 ;;9002226.02101,"1959,O9A.413 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.419 ",.01)
 ;;O9A.419 
 ;;9002226.02101,"1959,O9A.419 ",.02)
 ;;O9A.419 
 ;;9002226.02101,"1959,O9A.419 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.42 ",.01)
 ;;O9A.42 
 ;;9002226.02101,"1959,O9A.42 ",.02)
 ;;O9A.42 
 ;;9002226.02101,"1959,O9A.42 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.43 ",.01)
 ;;O9A.43 
 ;;9002226.02101,"1959,O9A.43 ",.02)
 ;;O9A.43 
 ;;9002226.02101,"1959,O9A.43 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.511 ",.01)
 ;;O9A.511 
 ;;9002226.02101,"1959,O9A.511 ",.02)
 ;;O9A.511 
 ;;9002226.02101,"1959,O9A.511 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.512 ",.01)
 ;;O9A.512 
 ;;9002226.02101,"1959,O9A.512 ",.02)
 ;;O9A.512 
 ;;9002226.02101,"1959,O9A.512 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.513 ",.01)
 ;;O9A.513 
 ;;9002226.02101,"1959,O9A.513 ",.02)
 ;;O9A.513 
 ;;9002226.02101,"1959,O9A.513 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.519 ",.01)
 ;;O9A.519 
 ;;9002226.02101,"1959,O9A.519 ",.02)
 ;;O9A.519 
 ;;9002226.02101,"1959,O9A.519 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.52 ",.01)
 ;;O9A.52 
 ;;9002226.02101,"1959,O9A.52 ",.02)
 ;;O9A.52 
 ;;9002226.02101,"1959,O9A.52 ",.03)
 ;;30
 ;;9002226.02101,"1959,O9A.53 ",.01)
 ;;O9A.53 
 ;;9002226.02101,"1959,O9A.53 ",.02)
 ;;O9A.53 
 ;;9002226.02101,"1959,O9A.53 ",.03)
 ;;30
 ;;9002226.02101,"1959,V22.0 ",.01)
 ;;V22.0
 ;;9002226.02101,"1959,V22.0 ",.02)
 ;;V22.0
 ;;9002226.02101,"1959,V22.0 ",.03)
 ;;1
 ;;9002226.02101,"1959,V22.1 ",.01)
 ;;V22.1
 ;;9002226.02101,"1959,V22.1 ",.02)
 ;;V22.1
 ;;9002226.02101,"1959,V22.1 ",.03)
 ;;1
 ;;9002226.02101,"1959,V22.2 ",.01)
 ;;V22.2
 ;;9002226.02101,"1959,V22.2 ",.02)
 ;;V22.2
 ;;9002226.02101,"1959,V22.2 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.0 ",.01)
 ;;V23.0
 ;;9002226.02101,"1959,V23.0 ",.02)
 ;;V23.0
 ;;9002226.02101,"1959,V23.0 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.1 ",.01)
 ;;V23.1
 ;;9002226.02101,"1959,V23.1 ",.02)
 ;;V23.1
 ;;9002226.02101,"1959,V23.1 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.2 ",.01)
 ;;V23.2
 ;;9002226.02101,"1959,V23.2 ",.02)
 ;;V23.2
 ;;9002226.02101,"1959,V23.2 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.3 ",.01)
 ;;V23.3
 ;;9002226.02101,"1959,V23.3 ",.02)
 ;;V23.3
 ;;9002226.02101,"1959,V23.3 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.4 ",.01)
 ;;V23.4
 ;;9002226.02101,"1959,V23.4 ",.02)
 ;;V23.4
 ;;9002226.02101,"1959,V23.4 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.41 ",.01)
 ;;V23.41
 ;;9002226.02101,"1959,V23.41 ",.02)
 ;;V23.41
 ;;9002226.02101,"1959,V23.41 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.42 ",.01)
 ;;V23.42
 ;;9002226.02101,"1959,V23.42 ",.02)
 ;;V23.42
 ;;9002226.02101,"1959,V23.42 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.49 ",.01)
 ;;V23.49
 ;;9002226.02101,"1959,V23.49 ",.02)
 ;;V23.49
 ;;9002226.02101,"1959,V23.49 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.5 ",.01)
 ;;V23.5
 ;;9002226.02101,"1959,V23.5 ",.02)
 ;;V23.5
 ;;9002226.02101,"1959,V23.5 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.7 ",.01)
 ;;V23.7
 ;;9002226.02101,"1959,V23.7 ",.02)
 ;;V23.7
 ;;9002226.02101,"1959,V23.7 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.8 ",.01)
 ;;V23.8
 ;;9002226.02101,"1959,V23.8 ",.02)
 ;;V23.8
 ;;9002226.02101,"1959,V23.8 ",.03)
 ;;1
 ;;9002226.02101,"1959,V23.81 ",.01)
 ;;V23.81
 ;;9002226.02101,"1959,V23.81 ",.02)
 ;;V23.81