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

ATXDBH10.m

Go to the documentation of this file.
ATXDBH10 ;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,659.73 ",.02)
 ;;659.73
 ;;9002226.02101,"1959,659.73 ",.03)
 ;;1
 ;;9002226.02101,"1959,659.74 ",.01)
 ;;659.74
 ;;9002226.02101,"1959,659.74 ",.02)
 ;;659.74
 ;;9002226.02101,"1959,659.74 ",.03)
 ;;1
 ;;9002226.02101,"1959,659.83 ",.01)
 ;;659.83
 ;;9002226.02101,"1959,659.83 ",.02)
 ;;659.83
 ;;9002226.02101,"1959,659.83 ",.03)
 ;;1
 ;;9002226.02101,"1959,659.93 ",.01)
 ;;659.93
 ;;9002226.02101,"1959,659.93 ",.02)
 ;;659.93
 ;;9002226.02101,"1959,659.93 ",.03)
 ;;1
 ;;9002226.02101,"1959,660.03 ",.01)
 ;;660.03
 ;;9002226.02101,"1959,660.03 ",.02)
 ;;660.03
 ;;9002226.02101,"1959,660.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,660.13 ",.01)
 ;;660.13
 ;;9002226.02101,"1959,660.13 ",.02)
 ;;660.13
 ;;9002226.02101,"1959,660.13 ",.03)
 ;;1
 ;;9002226.02101,"1959,660.23 ",.01)
 ;;660.23
 ;;9002226.02101,"1959,660.23 ",.02)
 ;;660.23
 ;;9002226.02101,"1959,660.23 ",.03)
 ;;1
 ;;9002226.02101,"1959,660.33 ",.01)
 ;;660.33
 ;;9002226.02101,"1959,660.33 ",.02)
 ;;660.33
 ;;9002226.02101,"1959,660.33 ",.03)
 ;;1
 ;;9002226.02101,"1959,660.43 ",.01)
 ;;660.43
 ;;9002226.02101,"1959,660.43 ",.02)
 ;;660.43
 ;;9002226.02101,"1959,660.43 ",.03)
 ;;1
 ;;9002226.02101,"1959,660.53 ",.01)
 ;;660.53
 ;;9002226.02101,"1959,660.53 ",.02)
 ;;660.53
 ;;9002226.02101,"1959,660.53 ",.03)
 ;;1
 ;;9002226.02101,"1959,660.63 ",.01)
 ;;660.63
 ;;9002226.02101,"1959,660.63 ",.02)
 ;;660.63
 ;;9002226.02101,"1959,660.63 ",.03)
 ;;1
 ;;9002226.02101,"1959,660.73 ",.01)
 ;;660.73
 ;;9002226.02101,"1959,660.73 ",.02)
 ;;660.73
 ;;9002226.02101,"1959,660.73 ",.03)
 ;;1
 ;;9002226.02101,"1959,660.83 ",.01)
 ;;660.83
 ;;9002226.02101,"1959,660.83 ",.02)
 ;;660.83
 ;;9002226.02101,"1959,660.83 ",.03)
 ;;1
 ;;9002226.02101,"1959,660.93 ",.01)
 ;;660.93
 ;;9002226.02101,"1959,660.93 ",.02)
 ;;660.93
 ;;9002226.02101,"1959,660.93 ",.03)
 ;;1
 ;;9002226.02101,"1959,661.03 ",.01)
 ;;661.03
 ;;9002226.02101,"1959,661.03 ",.02)
 ;;661.03
 ;;9002226.02101,"1959,661.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,661.13 ",.01)
 ;;661.13
 ;;9002226.02101,"1959,661.13 ",.02)
 ;;661.13
 ;;9002226.02101,"1959,661.13 ",.03)
 ;;1
 ;;9002226.02101,"1959,661.23 ",.01)
 ;;661.23
 ;;9002226.02101,"1959,661.23 ",.02)
 ;;661.23
 ;;9002226.02101,"1959,661.23 ",.03)
 ;;1
 ;;9002226.02101,"1959,661.33 ",.01)
 ;;661.33
 ;;9002226.02101,"1959,661.33 ",.02)
 ;;661.33
 ;;9002226.02101,"1959,661.33 ",.03)
 ;;1
 ;;9002226.02101,"1959,661.43 ",.01)
 ;;661.43
 ;;9002226.02101,"1959,661.43 ",.02)
 ;;661.43
 ;;9002226.02101,"1959,661.43 ",.03)
 ;;1
 ;;9002226.02101,"1959,661.93 ",.01)
 ;;661.93
 ;;9002226.02101,"1959,661.93 ",.02)
 ;;661.93
 ;;9002226.02101,"1959,661.93 ",.03)
 ;;1
 ;;9002226.02101,"1959,662.03 ",.01)
 ;;662.03
 ;;9002226.02101,"1959,662.03 ",.02)
 ;;662.03
 ;;9002226.02101,"1959,662.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,662.13 ",.01)
 ;;662.13
 ;;9002226.02101,"1959,662.13 ",.02)
 ;;662.13
 ;;9002226.02101,"1959,662.13 ",.03)
 ;;1
 ;;9002226.02101,"1959,662.23 ",.01)
 ;;662.23
 ;;9002226.02101,"1959,662.23 ",.02)
 ;;662.23
 ;;9002226.02101,"1959,662.23 ",.03)
 ;;1
 ;;9002226.02101,"1959,662.33 ",.01)
 ;;662.33
 ;;9002226.02101,"1959,662.33 ",.02)
 ;;662.33
 ;;9002226.02101,"1959,662.33 ",.03)
 ;;1
 ;;9002226.02101,"1959,663.03 ",.01)
 ;;663.03
 ;;9002226.02101,"1959,663.03 ",.02)
 ;;663.03
 ;;9002226.02101,"1959,663.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,663.13 ",.01)
 ;;663.13
 ;;9002226.02101,"1959,663.13 ",.02)
 ;;663.13
 ;;9002226.02101,"1959,663.13 ",.03)
 ;;1
 ;;9002226.02101,"1959,663.23 ",.01)
 ;;663.23
 ;;9002226.02101,"1959,663.23 ",.02)
 ;;663.23
 ;;9002226.02101,"1959,663.23 ",.03)
 ;;1
 ;;9002226.02101,"1959,663.33 ",.01)
 ;;663.33
 ;;9002226.02101,"1959,663.33 ",.02)
 ;;663.33
 ;;9002226.02101,"1959,663.33 ",.03)
 ;;1
 ;;9002226.02101,"1959,663.43 ",.01)
 ;;663.43
 ;;9002226.02101,"1959,663.43 ",.02)
 ;;663.43
 ;;9002226.02101,"1959,663.43 ",.03)
 ;;1
 ;;9002226.02101,"1959,663.53 ",.01)
 ;;663.53
 ;;9002226.02101,"1959,663.53 ",.02)
 ;;663.53
 ;;9002226.02101,"1959,663.53 ",.03)
 ;;1
 ;;9002226.02101,"1959,663.63 ",.01)
 ;;663.63
 ;;9002226.02101,"1959,663.63 ",.02)
 ;;663.63
 ;;9002226.02101,"1959,663.63 ",.03)
 ;;1
 ;;9002226.02101,"1959,663.83 ",.01)
 ;;663.83
 ;;9002226.02101,"1959,663.83 ",.02)
 ;;663.83
 ;;9002226.02101,"1959,663.83 ",.03)
 ;;1
 ;;9002226.02101,"1959,663.93 ",.01)
 ;;663.93
 ;;9002226.02101,"1959,663.93 ",.02)
 ;;663.93
 ;;9002226.02101,"1959,663.93 ",.03)
 ;;1
 ;;9002226.02101,"1959,665.03 ",.01)
 ;;665.03
 ;;9002226.02101,"1959,665.03 ",.02)
 ;;665.03
 ;;9002226.02101,"1959,665.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,665.83 ",.01)
 ;;665.83
 ;;9002226.02101,"1959,665.83 ",.02)
 ;;665.83
 ;;9002226.02101,"1959,665.83 ",.03)
 ;;1
 ;;9002226.02101,"1959,665.93 ",.01)
 ;;665.93
 ;;9002226.02101,"1959,665.93 ",.02)
 ;;665.93
 ;;9002226.02101,"1959,665.93 ",.03)
 ;;1
 ;;9002226.02101,"1959,668.03 ",.01)
 ;;668.03
 ;;9002226.02101,"1959,668.03 ",.02)
 ;;668.03
 ;;9002226.02101,"1959,668.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,668.13 ",.01)
 ;;668.13
 ;;9002226.02101,"1959,668.13 ",.02)
 ;;668.13
 ;;9002226.02101,"1959,668.13 ",.03)
 ;;1
 ;;9002226.02101,"1959,668.23 ",.01)
 ;;668.23
 ;;9002226.02101,"1959,668.23 ",.02)
 ;;668.23
 ;;9002226.02101,"1959,668.23 ",.03)
 ;;1
 ;;9002226.02101,"1959,668.83 ",.01)
 ;;668.83
 ;;9002226.02101,"1959,668.83 ",.02)
 ;;668.83
 ;;9002226.02101,"1959,668.83 ",.03)
 ;;1
 ;;9002226.02101,"1959,668.93 ",.01)
 ;;668.93
 ;;9002226.02101,"1959,668.93 ",.02)
 ;;668.93
 ;;9002226.02101,"1959,668.93 ",.03)
 ;;1
 ;;9002226.02101,"1959,669.03 ",.01)
 ;;669.03
 ;;9002226.02101,"1959,669.03 ",.02)
 ;;669.03
 ;;9002226.02101,"1959,669.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,669.13 ",.01)
 ;;669.13
 ;;9002226.02101,"1959,669.13 ",.02)
 ;;669.13
 ;;9002226.02101,"1959,669.13 ",.03)
 ;;1
 ;;9002226.02101,"1959,669.23 ",.01)
 ;;669.23
 ;;9002226.02101,"1959,669.23 ",.02)
 ;;669.23
 ;;9002226.02101,"1959,669.23 ",.03)
 ;;1
 ;;9002226.02101,"1959,669.43 ",.01)
 ;;669.43
 ;;9002226.02101,"1959,669.43 ",.02)
 ;;669.43
 ;;9002226.02101,"1959,669.43 ",.03)
 ;;1
 ;;9002226.02101,"1959,669.83 ",.01)
 ;;669.83
 ;;9002226.02101,"1959,669.83 ",.02)
 ;;669.83
 ;;9002226.02101,"1959,669.83 ",.03)
 ;;1
 ;;9002226.02101,"1959,669.93 ",.01)
 ;;669.93
 ;;9002226.02101,"1959,669.93 ",.02)
 ;;669.93
 ;;9002226.02101,"1959,669.93 ",.03)
 ;;1
 ;;9002226.02101,"1959,671.03 ",.01)
 ;;671.03
 ;;9002226.02101,"1959,671.03 ",.02)
 ;;671.03
 ;;9002226.02101,"1959,671.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,671.13 ",.01)
 ;;671.13
 ;;9002226.02101,"1959,671.13 ",.02)
 ;;671.13
 ;;9002226.02101,"1959,671.13 ",.03)
 ;;1
 ;;9002226.02101,"1959,671.23 ",.01)
 ;;671.23
 ;;9002226.02101,"1959,671.23 ",.02)
 ;;671.23
 ;;9002226.02101,"1959,671.23 ",.03)
 ;;1
 ;;9002226.02101,"1959,671.30 ",.01)
 ;;671.30
 ;;9002226.02101,"1959,671.30 ",.02)
 ;;671.30
 ;;9002226.02101,"1959,671.30 ",.03)
 ;;1
 ;;9002226.02101,"1959,671.33 ",.01)
 ;;671.33
 ;;9002226.02101,"1959,671.33 ",.02)
 ;;671.33
 ;;9002226.02101,"1959,671.33 ",.03)
 ;;1
 ;;9002226.02101,"1959,671.50 ",.01)
 ;;671.50
 ;;9002226.02101,"1959,671.50 ",.02)
 ;;671.50
 ;;9002226.02101,"1959,671.50 ",.03)
 ;;1
 ;;9002226.02101,"1959,671.53 ",.01)
 ;;671.53
 ;;9002226.02101,"1959,671.53 ",.02)
 ;;671.53
 ;;9002226.02101,"1959,671.53 ",.03)
 ;;1
 ;;9002226.02101,"1959,671.80 ",.01)
 ;;671.80
 ;;9002226.02101,"1959,671.80 ",.02)
 ;;671.80
 ;;9002226.02101,"1959,671.80 ",.03)
 ;;1
 ;;9002226.02101,"1959,671.83 ",.01)
 ;;671.83
 ;;9002226.02101,"1959,671.83 ",.02)
 ;;671.83
 ;;9002226.02101,"1959,671.83 ",.03)
 ;;1
 ;;9002226.02101,"1959,671.90 ",.01)
 ;;671.90
 ;;9002226.02101,"1959,671.90 ",.02)
 ;;671.90
 ;;9002226.02101,"1959,671.90 ",.03)
 ;;1
 ;;9002226.02101,"1959,671.93 ",.01)
 ;;671.93
 ;;9002226.02101,"1959,671.93 ",.02)
 ;;671.93
 ;;9002226.02101,"1959,671.93 ",.03)
 ;;1
 ;;9002226.02101,"1959,673.03 ",.01)
 ;;673.03
 ;;9002226.02101,"1959,673.03 ",.02)
 ;;673.03
 ;;9002226.02101,"1959,673.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,673.13 ",.01)
 ;;673.13
 ;;9002226.02101,"1959,673.13 ",.02)
 ;;673.13
 ;;9002226.02101,"1959,673.13 ",.03)
 ;;1
 ;;9002226.02101,"1959,673.20 ",.01)
 ;;673.20
 ;;9002226.02101,"1959,673.20 ",.02)
 ;;673.20
 ;;9002226.02101,"1959,673.20 ",.03)
 ;;1
 ;;9002226.02101,"1959,673.23 ",.01)
 ;;673.23
 ;;9002226.02101,"1959,673.23 ",.02)
 ;;673.23
 ;;9002226.02101,"1959,673.23 ",.03)
 ;;1
 ;;9002226.02101,"1959,673.33 ",.01)
 ;;673.33
 ;;9002226.02101,"1959,673.33 ",.02)
 ;;673.33
 ;;9002226.02101,"1959,673.33 ",.03)
 ;;1
 ;;9002226.02101,"1959,673.80 ",.01)
 ;;673.80
 ;;9002226.02101,"1959,673.80 ",.02)
 ;;673.80
 ;;9002226.02101,"1959,673.80 ",.03)
 ;;1
 ;;9002226.02101,"1959,673.83 ",.01)
 ;;673.83
 ;;9002226.02101,"1959,673.83 ",.02)
 ;;673.83
 ;;9002226.02101,"1959,673.83 ",.03)
 ;;1
 ;;9002226.02101,"1959,674.03 ",.01)
 ;;674.03
 ;;9002226.02101,"1959,674.03 ",.02)
 ;;674.03
 ;;9002226.02101,"1959,674.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,674.30 ",.01)
 ;;674.30
 ;;9002226.02101,"1959,674.30 ",.02)
 ;;674.30
 ;;9002226.02101,"1959,674.30 ",.03)
 ;;1
 ;;9002226.02101,"1959,674.40 ",.01)
 ;;674.40
 ;;9002226.02101,"1959,674.40 ",.02)
 ;;674.40
 ;;9002226.02101,"1959,674.40 ",.03)
 ;;1
 ;;9002226.02101,"1959,675.00 ",.01)
 ;;675.00
 ;;9002226.02101,"1959,675.00 ",.02)
 ;;675.00
 ;;9002226.02101,"1959,675.00 ",.03)
 ;;1
 ;;9002226.02101,"1959,675.03 ",.01)
 ;;675.03
 ;;9002226.02101,"1959,675.03 ",.02)
 ;;675.03
 ;;9002226.02101,"1959,675.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,675.10 ",.01)
 ;;675.10
 ;;9002226.02101,"1959,675.10 ",.02)
 ;;675.10
 ;;9002226.02101,"1959,675.10 ",.03)
 ;;1
 ;;9002226.02101,"1959,675.13 ",.01)
 ;;675.13
 ;;9002226.02101,"1959,675.13 ",.02)
 ;;675.13
 ;;9002226.02101,"1959,675.13 ",.03)
 ;;1
 ;;9002226.02101,"1959,675.20 ",.01)
 ;;675.20
 ;;9002226.02101,"1959,675.20 ",.02)
 ;;675.20
 ;;9002226.02101,"1959,675.20 ",.03)
 ;;1
 ;;9002226.02101,"1959,675.23 ",.01)
 ;;675.23
 ;;9002226.02101,"1959,675.23 ",.02)
 ;;675.23
 ;;9002226.02101,"1959,675.23 ",.03)
 ;;1
 ;;9002226.02101,"1959,675.80 ",.01)
 ;;675.80
 ;;9002226.02101,"1959,675.80 ",.02)
 ;;675.80
 ;;9002226.02101,"1959,675.80 ",.03)
 ;;1
 ;;9002226.02101,"1959,675.83 ",.01)
 ;;675.83
 ;;9002226.02101,"1959,675.83 ",.02)
 ;;675.83
 ;;9002226.02101,"1959,675.83 ",.03)
 ;;1
 ;;9002226.02101,"1959,675.90 ",.01)
 ;;675.90
 ;;9002226.02101,"1959,675.90 ",.02)
 ;;675.90
 ;;9002226.02101,"1959,675.90 ",.03)
 ;;1
 ;;9002226.02101,"1959,675.93 ",.01)
 ;;675.93
 ;;9002226.02101,"1959,675.93 ",.02)
 ;;675.93
 ;;9002226.02101,"1959,675.93 ",.03)
 ;;1
 ;;9002226.02101,"1959,676.00 ",.01)
 ;;676.00
 ;;9002226.02101,"1959,676.00 ",.02)
 ;;676.00
 ;;9002226.02101,"1959,676.00 ",.03)
 ;;1
 ;;9002226.02101,"1959,676.03 ",.01)
 ;;676.03
 ;;9002226.02101,"1959,676.03 ",.02)
 ;;676.03
 ;;9002226.02101,"1959,676.03 ",.03)
 ;;1
 ;;9002226.02101,"1959,676.10 ",.01)
 ;;676.10
 ;;9002226.02101,"1959,676.10 ",.02)
 ;;676.10
 ;;9002226.02101,"1959,676.10 ",.03)
 ;;1
 ;;9002226.02101,"1959,676.13 ",.01)
 ;;676.13
 ;;9002226.02101,"1959,676.13 ",.02)
 ;;676.13
 ;;9002226.02101,"1959,676.13 ",.03)
 ;;1
 ;;9002226.02101,"1959,676.20 ",.01)
 ;;676.20
 ;;9002226.02101,"1959,676.20 ",.02)
 ;;676.20