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

ATXDBH12.m

Go to the documentation of this file.
  1. ATXDBH12 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 20, 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,"1959,O10.211 ",.02)
  1. ;;O10.211
  1. ;;9002226.02101,"1959,O10.211 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.212 ",.01)
  1. ;;O10.212
  1. ;;9002226.02101,"1959,O10.212 ",.02)
  1. ;;O10.212
  1. ;;9002226.02101,"1959,O10.212 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.213 ",.01)
  1. ;;O10.213
  1. ;;9002226.02101,"1959,O10.213 ",.02)
  1. ;;O10.213
  1. ;;9002226.02101,"1959,O10.213 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.219 ",.01)
  1. ;;O10.219
  1. ;;9002226.02101,"1959,O10.219 ",.02)
  1. ;;O10.219
  1. ;;9002226.02101,"1959,O10.219 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.22 ",.01)
  1. ;;O10.22
  1. ;;9002226.02101,"1959,O10.22 ",.02)
  1. ;;O10.22
  1. ;;9002226.02101,"1959,O10.22 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.23 ",.01)
  1. ;;O10.23
  1. ;;9002226.02101,"1959,O10.23 ",.02)
  1. ;;O10.23
  1. ;;9002226.02101,"1959,O10.23 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.311 ",.01)
  1. ;;O10.311
  1. ;;9002226.02101,"1959,O10.311 ",.02)
  1. ;;O10.311
  1. ;;9002226.02101,"1959,O10.311 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.312 ",.01)
  1. ;;O10.312
  1. ;;9002226.02101,"1959,O10.312 ",.02)
  1. ;;O10.312
  1. ;;9002226.02101,"1959,O10.312 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.313 ",.01)
  1. ;;O10.313
  1. ;;9002226.02101,"1959,O10.313 ",.02)
  1. ;;O10.313
  1. ;;9002226.02101,"1959,O10.313 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.319 ",.01)
  1. ;;O10.319
  1. ;;9002226.02101,"1959,O10.319 ",.02)
  1. ;;O10.319
  1. ;;9002226.02101,"1959,O10.319 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.32 ",.01)
  1. ;;O10.32
  1. ;;9002226.02101,"1959,O10.32 ",.02)
  1. ;;O10.32
  1. ;;9002226.02101,"1959,O10.32 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.33 ",.01)
  1. ;;O10.33
  1. ;;9002226.02101,"1959,O10.33 ",.02)
  1. ;;O10.33
  1. ;;9002226.02101,"1959,O10.33 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.411 ",.01)
  1. ;;O10.411
  1. ;;9002226.02101,"1959,O10.411 ",.02)
  1. ;;O10.411
  1. ;;9002226.02101,"1959,O10.411 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.412 ",.01)
  1. ;;O10.412
  1. ;;9002226.02101,"1959,O10.412 ",.02)
  1. ;;O10.412
  1. ;;9002226.02101,"1959,O10.412 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.413 ",.01)
  1. ;;O10.413
  1. ;;9002226.02101,"1959,O10.413 ",.02)
  1. ;;O10.413
  1. ;;9002226.02101,"1959,O10.413 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.419 ",.01)
  1. ;;O10.419
  1. ;;9002226.02101,"1959,O10.419 ",.02)
  1. ;;O10.419
  1. ;;9002226.02101,"1959,O10.419 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.42 ",.01)
  1. ;;O10.42
  1. ;;9002226.02101,"1959,O10.42 ",.02)
  1. ;;O10.42
  1. ;;9002226.02101,"1959,O10.42 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.43 ",.01)
  1. ;;O10.43
  1. ;;9002226.02101,"1959,O10.43 ",.02)
  1. ;;O10.43
  1. ;;9002226.02101,"1959,O10.43 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.911 ",.01)
  1. ;;O10.911
  1. ;;9002226.02101,"1959,O10.911 ",.02)
  1. ;;O10.911
  1. ;;9002226.02101,"1959,O10.911 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.912 ",.01)
  1. ;;O10.912
  1. ;;9002226.02101,"1959,O10.912 ",.02)
  1. ;;O10.912
  1. ;;9002226.02101,"1959,O10.912 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.913 ",.01)
  1. ;;O10.913
  1. ;;9002226.02101,"1959,O10.913 ",.02)
  1. ;;O10.913
  1. ;;9002226.02101,"1959,O10.913 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.92 ",.01)
  1. ;;O10.92
  1. ;;9002226.02101,"1959,O10.92 ",.02)
  1. ;;O10.92
  1. ;;9002226.02101,"1959,O10.92 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O10.93 ",.01)
  1. ;;O10.93
  1. ;;9002226.02101,"1959,O10.93 ",.02)
  1. ;;O10.93
  1. ;;9002226.02101,"1959,O10.93 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O11.1 ",.01)
  1. ;;O11.1
  1. ;;9002226.02101,"1959,O11.1 ",.02)
  1. ;;O11.1
  1. ;;9002226.02101,"1959,O11.1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O11.2 ",.01)
  1. ;;O11.2
  1. ;;9002226.02101,"1959,O11.2 ",.02)
  1. ;;O11.2
  1. ;;9002226.02101,"1959,O11.2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O11.3 ",.01)
  1. ;;O11.3
  1. ;;9002226.02101,"1959,O11.3 ",.02)
  1. ;;O11.3
  1. ;;9002226.02101,"1959,O11.3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O11.9 ",.01)
  1. ;;O11.9
  1. ;;9002226.02101,"1959,O11.9 ",.02)
  1. ;;O11.9
  1. ;;9002226.02101,"1959,O11.9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.00 ",.01)
  1. ;;O12.00
  1. ;;9002226.02101,"1959,O12.00 ",.02)
  1. ;;O12.00
  1. ;;9002226.02101,"1959,O12.00 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.01 ",.01)
  1. ;;O12.01
  1. ;;9002226.02101,"1959,O12.01 ",.02)
  1. ;;O12.01
  1. ;;9002226.02101,"1959,O12.01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.02 ",.01)
  1. ;;O12.02
  1. ;;9002226.02101,"1959,O12.02 ",.02)
  1. ;;O12.02
  1. ;;9002226.02101,"1959,O12.02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.03 ",.01)
  1. ;;O12.03
  1. ;;9002226.02101,"1959,O12.03 ",.02)
  1. ;;O12.03
  1. ;;9002226.02101,"1959,O12.03 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.10 ",.01)
  1. ;;O12.10
  1. ;;9002226.02101,"1959,O12.10 ",.02)
  1. ;;O12.10
  1. ;;9002226.02101,"1959,O12.10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.11 ",.01)
  1. ;;O12.11
  1. ;;9002226.02101,"1959,O12.11 ",.02)
  1. ;;O12.11
  1. ;;9002226.02101,"1959,O12.11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.12 ",.01)
  1. ;;O12.12
  1. ;;9002226.02101,"1959,O12.12 ",.02)
  1. ;;O12.12
  1. ;;9002226.02101,"1959,O12.12 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.13 ",.01)
  1. ;;O12.13
  1. ;;9002226.02101,"1959,O12.13 ",.02)
  1. ;;O12.13
  1. ;;9002226.02101,"1959,O12.13 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.20 ",.01)
  1. ;;O12.20
  1. ;;9002226.02101,"1959,O12.20 ",.02)
  1. ;;O12.20
  1. ;;9002226.02101,"1959,O12.20 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.21 ",.01)
  1. ;;O12.21
  1. ;;9002226.02101,"1959,O12.21 ",.02)
  1. ;;O12.21
  1. ;;9002226.02101,"1959,O12.21 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.22 ",.01)
  1. ;;O12.22
  1. ;;9002226.02101,"1959,O12.22 ",.02)
  1. ;;O12.22
  1. ;;9002226.02101,"1959,O12.22 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O12.23 ",.01)
  1. ;;O12.23
  1. ;;9002226.02101,"1959,O12.23 ",.02)
  1. ;;O12.23
  1. ;;9002226.02101,"1959,O12.23 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O13.1 ",.01)
  1. ;;O13.1
  1. ;;9002226.02101,"1959,O13.1 ",.02)
  1. ;;O13.1
  1. ;;9002226.02101,"1959,O13.1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O13.2 ",.01)
  1. ;;O13.2
  1. ;;9002226.02101,"1959,O13.2 ",.02)
  1. ;;O13.2
  1. ;;9002226.02101,"1959,O13.2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O13.3 ",.01)
  1. ;;O13.3
  1. ;;9002226.02101,"1959,O13.3 ",.02)
  1. ;;O13.3
  1. ;;9002226.02101,"1959,O13.3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O13.9 ",.01)
  1. ;;O13.9
  1. ;;9002226.02101,"1959,O13.9 ",.02)
  1. ;;O13.9
  1. ;;9002226.02101,"1959,O13.9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.00 ",.01)
  1. ;;O14.00
  1. ;;9002226.02101,"1959,O14.00 ",.02)
  1. ;;O14.00
  1. ;;9002226.02101,"1959,O14.00 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.02 ",.01)
  1. ;;O14.02
  1. ;;9002226.02101,"1959,O14.02 ",.02)
  1. ;;O14.02
  1. ;;9002226.02101,"1959,O14.02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.03 ",.01)
  1. ;;O14.03
  1. ;;9002226.02101,"1959,O14.03 ",.02)
  1. ;;O14.03
  1. ;;9002226.02101,"1959,O14.03 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.10 ",.01)
  1. ;;O14.10
  1. ;;9002226.02101,"1959,O14.10 ",.02)
  1. ;;O14.10
  1. ;;9002226.02101,"1959,O14.10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.12 ",.01)
  1. ;;O14.12
  1. ;;9002226.02101,"1959,O14.12 ",.02)
  1. ;;O14.12
  1. ;;9002226.02101,"1959,O14.12 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.13 ",.01)
  1. ;;O14.13
  1. ;;9002226.02101,"1959,O14.13 ",.02)
  1. ;;O14.13
  1. ;;9002226.02101,"1959,O14.13 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.20 ",.01)
  1. ;;O14.20
  1. ;;9002226.02101,"1959,O14.20 ",.02)
  1. ;;O14.20
  1. ;;9002226.02101,"1959,O14.20 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.22 ",.01)
  1. ;;O14.22
  1. ;;9002226.02101,"1959,O14.22 ",.02)
  1. ;;O14.22
  1. ;;9002226.02101,"1959,O14.22 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.23 ",.01)
  1. ;;O14.23
  1. ;;9002226.02101,"1959,O14.23 ",.02)
  1. ;;O14.23
  1. ;;9002226.02101,"1959,O14.23 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.90 ",.01)
  1. ;;O14.90
  1. ;;9002226.02101,"1959,O14.90 ",.02)
  1. ;;O14.90
  1. ;;9002226.02101,"1959,O14.90 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.92 ",.01)
  1. ;;O14.92
  1. ;;9002226.02101,"1959,O14.92 ",.02)
  1. ;;O14.92
  1. ;;9002226.02101,"1959,O14.92 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O14.93 ",.01)
  1. ;;O14.93
  1. ;;9002226.02101,"1959,O14.93 ",.02)
  1. ;;O14.93
  1. ;;9002226.02101,"1959,O14.93 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O15.00 ",.01)
  1. ;;O15.00
  1. ;;9002226.02101,"1959,O15.00 ",.02)
  1. ;;O15.00
  1. ;;9002226.02101,"1959,O15.00 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O15.02 ",.01)
  1. ;;O15.02
  1. ;;9002226.02101,"1959,O15.02 ",.02)
  1. ;;O15.02
  1. ;;9002226.02101,"1959,O15.02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O15.03 ",.01)
  1. ;;O15.03
  1. ;;9002226.02101,"1959,O15.03 ",.02)
  1. ;;O15.03
  1. ;;9002226.02101,"1959,O15.03 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O15.1 ",.01)
  1. ;;O15.1
  1. ;;9002226.02101,"1959,O15.1 ",.02)
  1. ;;O15.1
  1. ;;9002226.02101,"1959,O15.1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O15.2 ",.01)
  1. ;;O15.2
  1. ;;9002226.02101,"1959,O15.2 ",.02)
  1. ;;O15.2
  1. ;;9002226.02101,"1959,O15.2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O15.9 ",.01)
  1. ;;O15.9
  1. ;;9002226.02101,"1959,O15.9 ",.02)
  1. ;;O15.9
  1. ;;9002226.02101,"1959,O15.9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O16.1 ",.01)
  1. ;;O16.1
  1. ;;9002226.02101,"1959,O16.1 ",.02)
  1. ;;O16.1
  1. ;;9002226.02101,"1959,O16.1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O16.2 ",.01)
  1. ;;O16.2
  1. ;;9002226.02101,"1959,O16.2 ",.02)
  1. ;;O16.2
  1. ;;9002226.02101,"1959,O16.2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O16.3 ",.01)
  1. ;;O16.3
  1. ;;9002226.02101,"1959,O16.3 ",.02)
  1. ;;O16.3
  1. ;;9002226.02101,"1959,O16.3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O16.9 ",.01)
  1. ;;O16.9
  1. ;;9002226.02101,"1959,O16.9 ",.02)
  1. ;;O16.9
  1. ;;9002226.02101,"1959,O16.9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O20.0 ",.01)
  1. ;;O20.0
  1. ;;9002226.02101,"1959,O20.0 ",.02)
  1. ;;O20.0
  1. ;;9002226.02101,"1959,O20.0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O20.8 ",.01)
  1. ;;O20.8
  1. ;;9002226.02101,"1959,O20.8 ",.02)
  1. ;;O20.8
  1. ;;9002226.02101,"1959,O20.8 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O20.9 ",.01)
  1. ;;O20.9
  1. ;;9002226.02101,"1959,O20.9 ",.02)
  1. ;;O20.9
  1. ;;9002226.02101,"1959,O20.9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O21.0 ",.01)
  1. ;;O21.0
  1. ;;9002226.02101,"1959,O21.0 ",.02)
  1. ;;O21.0
  1. ;;9002226.02101,"1959,O21.0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O21.1 ",.01)
  1. ;;O21.1
  1. ;;9002226.02101,"1959,O21.1 ",.02)
  1. ;;O21.1
  1. ;;9002226.02101,"1959,O21.1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O21.2 ",.01)
  1. ;;O21.2
  1. ;;9002226.02101,"1959,O21.2 ",.02)
  1. ;;O21.2
  1. ;;9002226.02101,"1959,O21.2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O21.8 ",.01)
  1. ;;O21.8
  1. ;;9002226.02101,"1959,O21.8 ",.02)
  1. ;;O21.8
  1. ;;9002226.02101,"1959,O21.8 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O21.9 ",.01)
  1. ;;O21.9
  1. ;;9002226.02101,"1959,O21.9 ",.02)
  1. ;;O21.9
  1. ;;9002226.02101,"1959,O21.9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O22.00 ",.01)
  1. ;;O22.00
  1. ;;9002226.02101,"1959,O22.00 ",.02)
  1. ;;O22.00
  1. ;;9002226.02101,"1959,O22.00 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O22.01 ",.01)
  1. ;;O22.01
  1. ;;9002226.02101,"1959,O22.01 ",.02)
  1. ;;O22.01
  1. ;;9002226.02101,"1959,O22.01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O22.02 ",.01)
  1. ;;O22.02
  1. ;;9002226.02101,"1959,O22.02 ",.02)
  1. ;;O22.02
  1. ;;9002226.02101,"1959,O22.02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O22.03 ",.01)
  1. ;;O22.03
  1. ;;9002226.02101,"1959,O22.03 ",.02)
  1. ;;O22.03
  1. ;;9002226.02101,"1959,O22.03 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O22.10 ",.01)
  1. ;;O22.10
  1. ;;9002226.02101,"1959,O22.10 ",.02)
  1. ;;O22.10
  1. ;;9002226.02101,"1959,O22.10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O22.11 ",.01)
  1. ;;O22.11
  1. ;;9002226.02101,"1959,O22.11 ",.02)
  1. ;;O22.11
  1. ;;9002226.02101,"1959,O22.11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O22.12 ",.01)
  1. ;;O22.12
  1. ;;9002226.02101,"1959,O22.12 ",.02)
  1. ;;O22.12
  1. ;;9002226.02101,"1959,O22.12 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O22.13 ",.01)
  1. ;;O22.13
  1. ;;9002226.02101,"1959,O22.13 ",.02)
  1. ;;O22.13
  1. ;;9002226.02101,"1959,O22.13 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1959,O22.20 ",.01)
  1. ;;O22.20