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

ATXF6O7.m

Go to the documentation of this file.
  1. ATXF6O7 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JAN 02, 2017;
  1. ;;5.1;TAXONOMY;**19**;FEB 04, 1997;Build 32
  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,"1075,649.23 ",.01)
  1. ;;649.23
  1. ;;9002226.02101,"1075,649.23 ",.02)
  1. ;;649.23
  1. ;;9002226.02101,"1075,649.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,649.33 ",.01)
  1. ;;649.33
  1. ;;9002226.02101,"1075,649.33 ",.02)
  1. ;;649.33
  1. ;;9002226.02101,"1075,649.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,649.43 ",.01)
  1. ;;649.43
  1. ;;9002226.02101,"1075,649.43 ",.02)
  1. ;;649.43
  1. ;;9002226.02101,"1075,649.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,649.53 ",.01)
  1. ;;649.53
  1. ;;9002226.02101,"1075,649.53 ",.02)
  1. ;;649.53
  1. ;;9002226.02101,"1075,649.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,649.63 ",.01)
  1. ;;649.63
  1. ;;9002226.02101,"1075,649.63 ",.02)
  1. ;;649.63
  1. ;;9002226.02101,"1075,649.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,649.73 ",.01)
  1. ;;649.73
  1. ;;9002226.02101,"1075,649.73 ",.02)
  1. ;;649.73
  1. ;;9002226.02101,"1075,649.73 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,651.03 ",.01)
  1. ;;651.03
  1. ;;9002226.02101,"1075,651.03 ",.02)
  1. ;;651.03
  1. ;;9002226.02101,"1075,651.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,651.13 ",.01)
  1. ;;651.13
  1. ;;9002226.02101,"1075,651.13 ",.02)
  1. ;;651.13
  1. ;;9002226.02101,"1075,651.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,651.23 ",.01)
  1. ;;651.23
  1. ;;9002226.02101,"1075,651.23 ",.02)
  1. ;;651.23
  1. ;;9002226.02101,"1075,651.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,651.33 ",.01)
  1. ;;651.33
  1. ;;9002226.02101,"1075,651.33 ",.02)
  1. ;;651.33
  1. ;;9002226.02101,"1075,651.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,651.43 ",.01)
  1. ;;651.43
  1. ;;9002226.02101,"1075,651.43 ",.02)
  1. ;;651.43
  1. ;;9002226.02101,"1075,651.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,651.53 ",.01)
  1. ;;651.53
  1. ;;9002226.02101,"1075,651.53 ",.02)
  1. ;;651.53
  1. ;;9002226.02101,"1075,651.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,651.63 ",.01)
  1. ;;651.63
  1. ;;9002226.02101,"1075,651.63 ",.02)
  1. ;;651.63
  1. ;;9002226.02101,"1075,651.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,651.73 ",.01)
  1. ;;651.73
  1. ;;9002226.02101,"1075,651.73 ",.02)
  1. ;;651.73
  1. ;;9002226.02101,"1075,651.73 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,651.83 ",.01)
  1. ;;651.83
  1. ;;9002226.02101,"1075,651.83 ",.02)
  1. ;;651.83
  1. ;;9002226.02101,"1075,651.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,651.93 ",.01)
  1. ;;651.93
  1. ;;9002226.02101,"1075,651.93 ",.02)
  1. ;;651.93
  1. ;;9002226.02101,"1075,651.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,652.03 ",.01)
  1. ;;652.03
  1. ;;9002226.02101,"1075,652.03 ",.02)
  1. ;;652.03
  1. ;;9002226.02101,"1075,652.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,652.13 ",.01)
  1. ;;652.13
  1. ;;9002226.02101,"1075,652.13 ",.02)
  1. ;;652.13
  1. ;;9002226.02101,"1075,652.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,652.23 ",.01)
  1. ;;652.23
  1. ;;9002226.02101,"1075,652.23 ",.02)
  1. ;;652.23
  1. ;;9002226.02101,"1075,652.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,652.33 ",.01)
  1. ;;652.33
  1. ;;9002226.02101,"1075,652.33 ",.02)
  1. ;;652.33
  1. ;;9002226.02101,"1075,652.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,652.43 ",.01)
  1. ;;652.43
  1. ;;9002226.02101,"1075,652.43 ",.02)
  1. ;;652.43
  1. ;;9002226.02101,"1075,652.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,652.53 ",.01)
  1. ;;652.53
  1. ;;9002226.02101,"1075,652.53 ",.02)
  1. ;;652.53
  1. ;;9002226.02101,"1075,652.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,652.63 ",.01)
  1. ;;652.63
  1. ;;9002226.02101,"1075,652.63 ",.02)
  1. ;;652.63
  1. ;;9002226.02101,"1075,652.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,652.73 ",.01)
  1. ;;652.73
  1. ;;9002226.02101,"1075,652.73 ",.02)
  1. ;;652.73
  1. ;;9002226.02101,"1075,652.73 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,652.83 ",.01)
  1. ;;652.83
  1. ;;9002226.02101,"1075,652.83 ",.02)
  1. ;;652.83
  1. ;;9002226.02101,"1075,652.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,652.93 ",.01)
  1. ;;652.93
  1. ;;9002226.02101,"1075,652.93 ",.02)
  1. ;;652.93
  1. ;;9002226.02101,"1075,652.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,653.03 ",.01)
  1. ;;653.03
  1. ;;9002226.02101,"1075,653.03 ",.02)
  1. ;;653.03
  1. ;;9002226.02101,"1075,653.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,653.13 ",.01)
  1. ;;653.13
  1. ;;9002226.02101,"1075,653.13 ",.02)
  1. ;;653.13
  1. ;;9002226.02101,"1075,653.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,653.23 ",.01)
  1. ;;653.23
  1. ;;9002226.02101,"1075,653.23 ",.02)
  1. ;;653.23
  1. ;;9002226.02101,"1075,653.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,653.33 ",.01)
  1. ;;653.33
  1. ;;9002226.02101,"1075,653.33 ",.02)
  1. ;;653.33
  1. ;;9002226.02101,"1075,653.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,653.43 ",.01)
  1. ;;653.43
  1. ;;9002226.02101,"1075,653.43 ",.02)
  1. ;;653.43
  1. ;;9002226.02101,"1075,653.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,653.53 ",.01)
  1. ;;653.53
  1. ;;9002226.02101,"1075,653.53 ",.02)
  1. ;;653.53
  1. ;;9002226.02101,"1075,653.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,653.63 ",.01)
  1. ;;653.63
  1. ;;9002226.02101,"1075,653.63 ",.02)
  1. ;;653.63
  1. ;;9002226.02101,"1075,653.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,653.73 ",.01)
  1. ;;653.73
  1. ;;9002226.02101,"1075,653.73 ",.02)
  1. ;;653.73
  1. ;;9002226.02101,"1075,653.73 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,653.83 ",.01)
  1. ;;653.83
  1. ;;9002226.02101,"1075,653.83 ",.02)
  1. ;;653.83
  1. ;;9002226.02101,"1075,653.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,653.93 ",.01)
  1. ;;653.93
  1. ;;9002226.02101,"1075,653.93 ",.02)
  1. ;;653.93
  1. ;;9002226.02101,"1075,653.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,654.03 ",.01)
  1. ;;654.03
  1. ;;9002226.02101,"1075,654.03 ",.02)
  1. ;;654.03
  1. ;;9002226.02101,"1075,654.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,654.13 ",.01)
  1. ;;654.13
  1. ;;9002226.02101,"1075,654.13 ",.02)
  1. ;;654.13
  1. ;;9002226.02101,"1075,654.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,654.23 ",.01)
  1. ;;654.23
  1. ;;9002226.02101,"1075,654.23 ",.02)
  1. ;;654.23
  1. ;;9002226.02101,"1075,654.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,654.33 ",.01)
  1. ;;654.33
  1. ;;9002226.02101,"1075,654.33 ",.02)
  1. ;;654.33
  1. ;;9002226.02101,"1075,654.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,654.43 ",.01)
  1. ;;654.43
  1. ;;9002226.02101,"1075,654.43 ",.02)
  1. ;;654.43
  1. ;;9002226.02101,"1075,654.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,654.53 ",.01)
  1. ;;654.53
  1. ;;9002226.02101,"1075,654.53 ",.02)
  1. ;;654.53
  1. ;;9002226.02101,"1075,654.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,654.63 ",.01)
  1. ;;654.63
  1. ;;9002226.02101,"1075,654.63 ",.02)
  1. ;;654.63
  1. ;;9002226.02101,"1075,654.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,654.73 ",.01)
  1. ;;654.73
  1. ;;9002226.02101,"1075,654.73 ",.02)
  1. ;;654.73
  1. ;;9002226.02101,"1075,654.73 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,654.83 ",.01)
  1. ;;654.83
  1. ;;9002226.02101,"1075,654.83 ",.02)
  1. ;;654.83
  1. ;;9002226.02101,"1075,654.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,654.93 ",.01)
  1. ;;654.93
  1. ;;9002226.02101,"1075,654.93 ",.02)
  1. ;;654.93
  1. ;;9002226.02101,"1075,654.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,655.03 ",.01)
  1. ;;655.03
  1. ;;9002226.02101,"1075,655.03 ",.02)
  1. ;;655.03
  1. ;;9002226.02101,"1075,655.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,655.13 ",.01)
  1. ;;655.13
  1. ;;9002226.02101,"1075,655.13 ",.02)
  1. ;;655.13
  1. ;;9002226.02101,"1075,655.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,655.23 ",.01)
  1. ;;655.23
  1. ;;9002226.02101,"1075,655.23 ",.02)
  1. ;;655.23
  1. ;;9002226.02101,"1075,655.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,655.33 ",.01)
  1. ;;655.33
  1. ;;9002226.02101,"1075,655.33 ",.02)
  1. ;;655.33
  1. ;;9002226.02101,"1075,655.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,655.43 ",.01)
  1. ;;655.43
  1. ;;9002226.02101,"1075,655.43 ",.02)
  1. ;;655.43
  1. ;;9002226.02101,"1075,655.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,655.53 ",.01)
  1. ;;655.53
  1. ;;9002226.02101,"1075,655.53 ",.02)
  1. ;;655.53
  1. ;;9002226.02101,"1075,655.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,655.63 ",.01)
  1. ;;655.63
  1. ;;9002226.02101,"1075,655.63 ",.02)
  1. ;;655.63
  1. ;;9002226.02101,"1075,655.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,655.73 ",.01)
  1. ;;655.73
  1. ;;9002226.02101,"1075,655.73 ",.02)
  1. ;;655.73
  1. ;;9002226.02101,"1075,655.73 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,655.83 ",.01)
  1. ;;655.83
  1. ;;9002226.02101,"1075,655.83 ",.02)
  1. ;;655.83
  1. ;;9002226.02101,"1075,655.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,655.93 ",.01)
  1. ;;655.93
  1. ;;9002226.02101,"1075,655.93 ",.02)
  1. ;;655.93
  1. ;;9002226.02101,"1075,655.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,656.03 ",.01)
  1. ;;656.03
  1. ;;9002226.02101,"1075,656.03 ",.02)
  1. ;;656.03
  1. ;;9002226.02101,"1075,656.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,656.13 ",.01)
  1. ;;656.13
  1. ;;9002226.02101,"1075,656.13 ",.02)
  1. ;;656.13
  1. ;;9002226.02101,"1075,656.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,656.23 ",.01)
  1. ;;656.23
  1. ;;9002226.02101,"1075,656.23 ",.02)
  1. ;;656.23
  1. ;;9002226.02101,"1075,656.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,656.33 ",.01)
  1. ;;656.33
  1. ;;9002226.02101,"1075,656.33 ",.02)
  1. ;;656.33
  1. ;;9002226.02101,"1075,656.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,656.43 ",.01)
  1. ;;656.43
  1. ;;9002226.02101,"1075,656.43 ",.02)
  1. ;;656.43
  1. ;;9002226.02101,"1075,656.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,656.53 ",.01)
  1. ;;656.53
  1. ;;9002226.02101,"1075,656.53 ",.02)
  1. ;;656.53
  1. ;;9002226.02101,"1075,656.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,656.63 ",.01)
  1. ;;656.63
  1. ;;9002226.02101,"1075,656.63 ",.02)
  1. ;;656.63
  1. ;;9002226.02101,"1075,656.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,656.73 ",.01)
  1. ;;656.73
  1. ;;9002226.02101,"1075,656.73 ",.02)
  1. ;;656.73
  1. ;;9002226.02101,"1075,656.73 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,656.83 ",.01)
  1. ;;656.83
  1. ;;9002226.02101,"1075,656.83 ",.02)
  1. ;;656.83
  1. ;;9002226.02101,"1075,656.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,656.93 ",.01)
  1. ;;656.93
  1. ;;9002226.02101,"1075,656.93 ",.02)
  1. ;;656.93
  1. ;;9002226.02101,"1075,656.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,657.03 ",.01)
  1. ;;657.03
  1. ;;9002226.02101,"1075,657.03 ",.02)
  1. ;;657.03
  1. ;;9002226.02101,"1075,657.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,658.03 ",.01)
  1. ;;658.03
  1. ;;9002226.02101,"1075,658.03 ",.02)
  1. ;;658.03
  1. ;;9002226.02101,"1075,658.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,658.13 ",.01)
  1. ;;658.13
  1. ;;9002226.02101,"1075,658.13 ",.02)
  1. ;;658.13
  1. ;;9002226.02101,"1075,658.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,658.23 ",.01)
  1. ;;658.23
  1. ;;9002226.02101,"1075,658.23 ",.02)
  1. ;;658.23
  1. ;;9002226.02101,"1075,658.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,658.33 ",.01)
  1. ;;658.33
  1. ;;9002226.02101,"1075,658.33 ",.02)
  1. ;;658.33
  1. ;;9002226.02101,"1075,658.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,658.43 ",.01)
  1. ;;658.43
  1. ;;9002226.02101,"1075,658.43 ",.02)
  1. ;;658.43
  1. ;;9002226.02101,"1075,658.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,658.83 ",.01)
  1. ;;658.83
  1. ;;9002226.02101,"1075,658.83 ",.02)
  1. ;;658.83
  1. ;;9002226.02101,"1075,658.83 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,658.93 ",.01)
  1. ;;658.93
  1. ;;9002226.02101,"1075,658.93 ",.02)
  1. ;;658.93
  1. ;;9002226.02101,"1075,658.93 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,659.03 ",.01)
  1. ;;659.03
  1. ;;9002226.02101,"1075,659.03 ",.02)
  1. ;;659.03
  1. ;;9002226.02101,"1075,659.03 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,659.13 ",.01)
  1. ;;659.13
  1. ;;9002226.02101,"1075,659.13 ",.02)
  1. ;;659.13
  1. ;;9002226.02101,"1075,659.13 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,659.23 ",.01)
  1. ;;659.23
  1. ;;9002226.02101,"1075,659.23 ",.02)
  1. ;;659.23
  1. ;;9002226.02101,"1075,659.23 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,659.33 ",.01)
  1. ;;659.33
  1. ;;9002226.02101,"1075,659.33 ",.02)
  1. ;;659.33
  1. ;;9002226.02101,"1075,659.33 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,659.43 ",.01)
  1. ;;659.43
  1. ;;9002226.02101,"1075,659.43 ",.02)
  1. ;;659.43
  1. ;;9002226.02101,"1075,659.43 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,659.53 ",.01)
  1. ;;659.53
  1. ;;9002226.02101,"1075,659.53 ",.02)
  1. ;;659.53
  1. ;;9002226.02101,"1075,659.53 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,659.63 ",.01)
  1. ;;659.63
  1. ;;9002226.02101,"1075,659.63 ",.02)
  1. ;;659.63
  1. ;;9002226.02101,"1075,659.63 ",.03)
  1. ;;1
  1. ;;9002226.02101,"1075,659.73 ",.01)
  1. ;;659.73