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

ATXDBH8.m

Go to the documentation of this file.
  1. ATXDBH8 ;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,648.80 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,648.83 ",.01)
  1. ;;648.83
  1. ;;9002226.02101,"1959,648.83 ",.02)
  1. ;;648.83
  1. ;;9002226.02101,"1959,648.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,648.90 ",.01)
  1. ;;648.90
  1. ;;9002226.02101,"1959,648.90 ",.02)
  1. ;;648.90
  1. ;;9002226.02101,"1959,648.90 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,648.93 ",.01)
  1. ;;648.93
  1. ;;9002226.02101,"1959,648.93 ",.02)
  1. ;;648.93
  1. ;;9002226.02101,"1959,648.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.00 ",.01)
  1. ;;649.00
  1. ;;9002226.02101,"1959,649.00 ",.02)
  1. ;;649.00
  1. ;;9002226.02101,"1959,649.00 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.03 ",.01)
  1. ;;649.03
  1. ;;9002226.02101,"1959,649.03 ",.02)
  1. ;;649.03
  1. ;;9002226.02101,"1959,649.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.10 ",.01)
  1. ;;649.10
  1. ;;9002226.02101,"1959,649.10 ",.02)
  1. ;;649.10
  1. ;;9002226.02101,"1959,649.10 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.13 ",.01)
  1. ;;649.13
  1. ;;9002226.02101,"1959,649.13 ",.02)
  1. ;;649.13
  1. ;;9002226.02101,"1959,649.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.20 ",.01)
  1. ;;649.20
  1. ;;9002226.02101,"1959,649.20 ",.02)
  1. ;;649.20
  1. ;;9002226.02101,"1959,649.20 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.23 ",.01)
  1. ;;649.23
  1. ;;9002226.02101,"1959,649.23 ",.02)
  1. ;;649.23
  1. ;;9002226.02101,"1959,649.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.30 ",.01)
  1. ;;649.30
  1. ;;9002226.02101,"1959,649.30 ",.02)
  1. ;;649.30
  1. ;;9002226.02101,"1959,649.30 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.33 ",.01)
  1. ;;649.33
  1. ;;9002226.02101,"1959,649.33 ",.02)
  1. ;;649.33
  1. ;;9002226.02101,"1959,649.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.40 ",.01)
  1. ;;649.40
  1. ;;9002226.02101,"1959,649.40 ",.02)
  1. ;;649.40
  1. ;;9002226.02101,"1959,649.40 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.43 ",.01)
  1. ;;649.43
  1. ;;9002226.02101,"1959,649.43 ",.02)
  1. ;;649.43
  1. ;;9002226.02101,"1959,649.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.50 ",.01)
  1. ;;649.50
  1. ;;9002226.02101,"1959,649.50 ",.02)
  1. ;;649.50
  1. ;;9002226.02101,"1959,649.50 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.53 ",.01)
  1. ;;649.53
  1. ;;9002226.02101,"1959,649.53 ",.02)
  1. ;;649.53
  1. ;;9002226.02101,"1959,649.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.60 ",.01)
  1. ;;649.60
  1. ;;9002226.02101,"1959,649.60 ",.02)
  1. ;;649.60
  1. ;;9002226.02101,"1959,649.60 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,649.63 ",.01)
  1. ;;649.63
  1. ;;9002226.02101,"1959,649.63 ",.02)
  1. ;;649.63
  1. ;;9002226.02101,"1959,649.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.00 ",.01)
  1. ;;651.00
  1. ;;9002226.02101,"1959,651.00 ",.02)
  1. ;;651.00
  1. ;;9002226.02101,"1959,651.00 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.03 ",.01)
  1. ;;651.03
  1. ;;9002226.02101,"1959,651.03 ",.02)
  1. ;;651.03
  1. ;;9002226.02101,"1959,651.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.10 ",.01)
  1. ;;651.10
  1. ;;9002226.02101,"1959,651.10 ",.02)
  1. ;;651.10
  1. ;;9002226.02101,"1959,651.10 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.13 ",.01)
  1. ;;651.13
  1. ;;9002226.02101,"1959,651.13 ",.02)
  1. ;;651.13
  1. ;;9002226.02101,"1959,651.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.20 ",.01)
  1. ;;651.20
  1. ;;9002226.02101,"1959,651.20 ",.02)
  1. ;;651.20
  1. ;;9002226.02101,"1959,651.20 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.23 ",.01)
  1. ;;651.23
  1. ;;9002226.02101,"1959,651.23 ",.02)
  1. ;;651.23
  1. ;;9002226.02101,"1959,651.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.30 ",.01)
  1. ;;651.30
  1. ;;9002226.02101,"1959,651.30 ",.02)
  1. ;;651.30
  1. ;;9002226.02101,"1959,651.30 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.33 ",.01)
  1. ;;651.33
  1. ;;9002226.02101,"1959,651.33 ",.02)
  1. ;;651.33
  1. ;;9002226.02101,"1959,651.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.40 ",.01)
  1. ;;651.40
  1. ;;9002226.02101,"1959,651.40 ",.02)
  1. ;;651.40
  1. ;;9002226.02101,"1959,651.40 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.43 ",.01)
  1. ;;651.43
  1. ;;9002226.02101,"1959,651.43 ",.02)
  1. ;;651.43
  1. ;;9002226.02101,"1959,651.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.50 ",.01)
  1. ;;651.50
  1. ;;9002226.02101,"1959,651.50 ",.02)
  1. ;;651.50
  1. ;;9002226.02101,"1959,651.50 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.53 ",.01)
  1. ;;651.53
  1. ;;9002226.02101,"1959,651.53 ",.02)
  1. ;;651.53
  1. ;;9002226.02101,"1959,651.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.60 ",.01)
  1. ;;651.60
  1. ;;9002226.02101,"1959,651.60 ",.02)
  1. ;;651.60
  1. ;;9002226.02101,"1959,651.60 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.63 ",.01)
  1. ;;651.63
  1. ;;9002226.02101,"1959,651.63 ",.02)
  1. ;;651.63
  1. ;;9002226.02101,"1959,651.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.70 ",.01)
  1. ;;651.70
  1. ;;9002226.02101,"1959,651.70 ",.02)
  1. ;;651.70
  1. ;;9002226.02101,"1959,651.70 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.73 ",.01)
  1. ;;651.73
  1. ;;9002226.02101,"1959,651.73 ",.02)
  1. ;;651.73
  1. ;;9002226.02101,"1959,651.73 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.80 ",.01)
  1. ;;651.80
  1. ;;9002226.02101,"1959,651.80 ",.02)
  1. ;;651.80
  1. ;;9002226.02101,"1959,651.80 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.83 ",.01)
  1. ;;651.83
  1. ;;9002226.02101,"1959,651.83 ",.02)
  1. ;;651.83
  1. ;;9002226.02101,"1959,651.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.90 ",.01)
  1. ;;651.90
  1. ;;9002226.02101,"1959,651.90 ",.02)
  1. ;;651.90
  1. ;;9002226.02101,"1959,651.90 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,651.93 ",.01)
  1. ;;651.93
  1. ;;9002226.02101,"1959,651.93 ",.02)
  1. ;;651.93
  1. ;;9002226.02101,"1959,651.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.00 ",.01)
  1. ;;652.00
  1. ;;9002226.02101,"1959,652.00 ",.02)
  1. ;;652.00
  1. ;;9002226.02101,"1959,652.00 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.03 ",.01)
  1. ;;652.03
  1. ;;9002226.02101,"1959,652.03 ",.02)
  1. ;;652.03
  1. ;;9002226.02101,"1959,652.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.10 ",.01)
  1. ;;652.10
  1. ;;9002226.02101,"1959,652.10 ",.02)
  1. ;;652.10
  1. ;;9002226.02101,"1959,652.10 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.13 ",.01)
  1. ;;652.13
  1. ;;9002226.02101,"1959,652.13 ",.02)
  1. ;;652.13
  1. ;;9002226.02101,"1959,652.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.20 ",.01)
  1. ;;652.20
  1. ;;9002226.02101,"1959,652.20 ",.02)
  1. ;;652.20
  1. ;;9002226.02101,"1959,652.20 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.23 ",.01)
  1. ;;652.23
  1. ;;9002226.02101,"1959,652.23 ",.02)
  1. ;;652.23
  1. ;;9002226.02101,"1959,652.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.30 ",.01)
  1. ;;652.30
  1. ;;9002226.02101,"1959,652.30 ",.02)
  1. ;;652.30
  1. ;;9002226.02101,"1959,652.30 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.33 ",.01)
  1. ;;652.33
  1. ;;9002226.02101,"1959,652.33 ",.02)
  1. ;;652.33
  1. ;;9002226.02101,"1959,652.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.40 ",.01)
  1. ;;652.40
  1. ;;9002226.02101,"1959,652.40 ",.02)
  1. ;;652.40
  1. ;;9002226.02101,"1959,652.40 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.43 ",.01)
  1. ;;652.43
  1. ;;9002226.02101,"1959,652.43 ",.02)
  1. ;;652.43
  1. ;;9002226.02101,"1959,652.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.50 ",.01)
  1. ;;652.50
  1. ;;9002226.02101,"1959,652.50 ",.02)
  1. ;;652.50
  1. ;;9002226.02101,"1959,652.50 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.53 ",.01)
  1. ;;652.53
  1. ;;9002226.02101,"1959,652.53 ",.02)
  1. ;;652.53
  1. ;;9002226.02101,"1959,652.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.60 ",.01)
  1. ;;652.60
  1. ;;9002226.02101,"1959,652.60 ",.02)
  1. ;;652.60
  1. ;;9002226.02101,"1959,652.60 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.63 ",.01)
  1. ;;652.63
  1. ;;9002226.02101,"1959,652.63 ",.02)
  1. ;;652.63
  1. ;;9002226.02101,"1959,652.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.70 ",.01)
  1. ;;652.70
  1. ;;9002226.02101,"1959,652.70 ",.02)
  1. ;;652.70
  1. ;;9002226.02101,"1959,652.70 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.73 ",.01)
  1. ;;652.73
  1. ;;9002226.02101,"1959,652.73 ",.02)
  1. ;;652.73
  1. ;;9002226.02101,"1959,652.73 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.80 ",.01)
  1. ;;652.80
  1. ;;9002226.02101,"1959,652.80 ",.02)
  1. ;;652.80
  1. ;;9002226.02101,"1959,652.80 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.83 ",.01)
  1. ;;652.83
  1. ;;9002226.02101,"1959,652.83 ",.02)
  1. ;;652.83
  1. ;;9002226.02101,"1959,652.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.90 ",.01)
  1. ;;652.90
  1. ;;9002226.02101,"1959,652.90 ",.02)
  1. ;;652.90
  1. ;;9002226.02101,"1959,652.90 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,652.93 ",.01)
  1. ;;652.93
  1. ;;9002226.02101,"1959,652.93 ",.02)
  1. ;;652.93
  1. ;;9002226.02101,"1959,652.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.00 ",.01)
  1. ;;653.00
  1. ;;9002226.02101,"1959,653.00 ",.02)
  1. ;;653.00
  1. ;;9002226.02101,"1959,653.00 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.03 ",.01)
  1. ;;653.03
  1. ;;9002226.02101,"1959,653.03 ",.02)
  1. ;;653.03
  1. ;;9002226.02101,"1959,653.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.10 ",.01)
  1. ;;653.10
  1. ;;9002226.02101,"1959,653.10 ",.02)
  1. ;;653.10
  1. ;;9002226.02101,"1959,653.10 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.13 ",.01)
  1. ;;653.13
  1. ;;9002226.02101,"1959,653.13 ",.02)
  1. ;;653.13
  1. ;;9002226.02101,"1959,653.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.20 ",.01)
  1. ;;653.20
  1. ;;9002226.02101,"1959,653.20 ",.02)
  1. ;;653.20
  1. ;;9002226.02101,"1959,653.20 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.23 ",.01)
  1. ;;653.23
  1. ;;9002226.02101,"1959,653.23 ",.02)
  1. ;;653.23
  1. ;;9002226.02101,"1959,653.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.30 ",.01)
  1. ;;653.30
  1. ;;9002226.02101,"1959,653.30 ",.02)
  1. ;;653.30
  1. ;;9002226.02101,"1959,653.30 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.33 ",.01)
  1. ;;653.33
  1. ;;9002226.02101,"1959,653.33 ",.02)
  1. ;;653.33
  1. ;;9002226.02101,"1959,653.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.40 ",.01)
  1. ;;653.40
  1. ;;9002226.02101,"1959,653.40 ",.02)
  1. ;;653.40
  1. ;;9002226.02101,"1959,653.40 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.43 ",.01)
  1. ;;653.43
  1. ;;9002226.02101,"1959,653.43 ",.02)
  1. ;;653.43
  1. ;;9002226.02101,"1959,653.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.50 ",.01)
  1. ;;653.50
  1. ;;9002226.02101,"1959,653.50 ",.02)
  1. ;;653.50
  1. ;;9002226.02101,"1959,653.50 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.53 ",.01)
  1. ;;653.53
  1. ;;9002226.02101,"1959,653.53 ",.02)
  1. ;;653.53
  1. ;;9002226.02101,"1959,653.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.60 ",.01)
  1. ;;653.60
  1. ;;9002226.02101,"1959,653.60 ",.02)
  1. ;;653.60
  1. ;;9002226.02101,"1959,653.60 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.63 ",.01)
  1. ;;653.63
  1. ;;9002226.02101,"1959,653.63 ",.02)
  1. ;;653.63
  1. ;;9002226.02101,"1959,653.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.70 ",.01)
  1. ;;653.70
  1. ;;9002226.02101,"1959,653.70 ",.02)
  1. ;;653.70
  1. ;;9002226.02101,"1959,653.70 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.73 ",.01)
  1. ;;653.73
  1. ;;9002226.02101,"1959,653.73 ",.02)
  1. ;;653.73
  1. ;;9002226.02101,"1959,653.73 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.80 ",.01)
  1. ;;653.80
  1. ;;9002226.02101,"1959,653.80 ",.02)
  1. ;;653.80
  1. ;;9002226.02101,"1959,653.80 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.83 ",.01)
  1. ;;653.83
  1. ;;9002226.02101,"1959,653.83 ",.02)
  1. ;;653.83
  1. ;;9002226.02101,"1959,653.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.90 ",.01)
  1. ;;653.90
  1. ;;9002226.02101,"1959,653.90 ",.02)
  1. ;;653.90
  1. ;;9002226.02101,"1959,653.90 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,653.93 ",.01)
  1. ;;653.93
  1. ;;9002226.02101,"1959,653.93 ",.02)
  1. ;;653.93
  1. ;;9002226.02101,"1959,653.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,654.00 ",.01)
  1. ;;654.00
  1. ;;9002226.02101,"1959,654.00 ",.02)
  1. ;;654.00
  1. ;;9002226.02101,"1959,654.00 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,654.03 ",.01)
  1. ;;654.03
  1. ;;9002226.02101,"1959,654.03 ",.02)
  1. ;;654.03
  1. ;;9002226.02101,"1959,654.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,654.10 ",.01)
  1. ;;654.10
  1. ;;9002226.02101,"1959,654.10 ",.02)
  1. ;;654.10
  1. ;;9002226.02101,"1959,654.10 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,654.13 ",.01)
  1. ;;654.13
  1. ;;9002226.02101,"1959,654.13 ",.02)
  1. ;;654.13
  1. ;;9002226.02101,"1959,654.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1959,654.20 ",.01)
  1. ;;654.20
  1. ;;9002226.02101,"1959,654.20 ",.02)
  1. ;;654.20
  1. ;;9002226.02101,"1959,654.20 ",.03)
  1. ;;1