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

ATXD8Q3.m

Go to the documentation of this file.
ATXD8Q3 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 12, 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,"911,646.81 ",.01)
 ;;646.81 
 ;;9002226.02101,"911,646.81 ",.02)
 ;;646.82 
 ;;9002226.02101,"911,646.81 ",.03)
 ;;1
 ;;9002226.02101,"911,646.84 ",.01)
 ;;646.84 
 ;;9002226.02101,"911,646.84 ",.02)
 ;;646.84 
 ;;9002226.02101,"911,646.84 ",.03)
 ;;1
 ;;9002226.02101,"911,646.91 ",.01)
 ;;646.91 
 ;;9002226.02101,"911,646.91 ",.02)
 ;;646.91 
 ;;9002226.02101,"911,646.91 ",.03)
 ;;1
 ;;9002226.02101,"911,647.01 ",.01)
 ;;647.01 
 ;;9002226.02101,"911,647.01 ",.02)
 ;;647.02 
 ;;9002226.02101,"911,647.01 ",.03)
 ;;1
 ;;9002226.02101,"911,647.04 ",.01)
 ;;647.04 
 ;;9002226.02101,"911,647.04 ",.02)
 ;;647.04 
 ;;9002226.02101,"911,647.04 ",.03)
 ;;1
 ;;9002226.02101,"911,647.11 ",.01)
 ;;647.11 
 ;;9002226.02101,"911,647.11 ",.02)
 ;;647.12 
 ;;9002226.02101,"911,647.11 ",.03)
 ;;1
 ;;9002226.02101,"911,647.14 ",.01)
 ;;647.14 
 ;;9002226.02101,"911,647.14 ",.02)
 ;;647.14 
 ;;9002226.02101,"911,647.14 ",.03)
 ;;1
 ;;9002226.02101,"911,647.21 ",.01)
 ;;647.21 
 ;;9002226.02101,"911,647.21 ",.02)
 ;;647.22 
 ;;9002226.02101,"911,647.21 ",.03)
 ;;1
 ;;9002226.02101,"911,647.24 ",.01)
 ;;647.24 
 ;;9002226.02101,"911,647.24 ",.02)
 ;;647.24 
 ;;9002226.02101,"911,647.24 ",.03)
 ;;1
 ;;9002226.02101,"911,647.31 ",.01)
 ;;647.31 
 ;;9002226.02101,"911,647.31 ",.02)
 ;;647.32 
 ;;9002226.02101,"911,647.31 ",.03)
 ;;1
 ;;9002226.02101,"911,647.34 ",.01)
 ;;647.34 
 ;;9002226.02101,"911,647.34 ",.02)
 ;;647.34 
 ;;9002226.02101,"911,647.34 ",.03)
 ;;1
 ;;9002226.02101,"911,647.41 ",.01)
 ;;647.41 
 ;;9002226.02101,"911,647.41 ",.02)
 ;;647.42 
 ;;9002226.02101,"911,647.41 ",.03)
 ;;1
 ;;9002226.02101,"911,647.44 ",.01)
 ;;647.44 
 ;;9002226.02101,"911,647.44 ",.02)
 ;;647.44 
 ;;9002226.02101,"911,647.44 ",.03)
 ;;1
 ;;9002226.02101,"911,647.51 ",.01)
 ;;647.51 
 ;;9002226.02101,"911,647.51 ",.02)
 ;;647.52 
 ;;9002226.02101,"911,647.51 ",.03)
 ;;1
 ;;9002226.02101,"911,647.54 ",.01)
 ;;647.54 
 ;;9002226.02101,"911,647.54 ",.02)
 ;;647.54 
 ;;9002226.02101,"911,647.54 ",.03)
 ;;1
 ;;9002226.02101,"911,647.61 ",.01)
 ;;647.61 
 ;;9002226.02101,"911,647.61 ",.02)
 ;;647.62 
 ;;9002226.02101,"911,647.61 ",.03)
 ;;1
 ;;9002226.02101,"911,647.64 ",.01)
 ;;647.64 
 ;;9002226.02101,"911,647.64 ",.02)
 ;;647.64 
 ;;9002226.02101,"911,647.64 ",.03)
 ;;1
 ;;9002226.02101,"911,647.81 ",.01)
 ;;647.81 
 ;;9002226.02101,"911,647.81 ",.02)
 ;;647.82 
 ;;9002226.02101,"911,647.81 ",.03)
 ;;1
 ;;9002226.02101,"911,647.84 ",.01)
 ;;647.84 
 ;;9002226.02101,"911,647.84 ",.02)
 ;;647.84 
 ;;9002226.02101,"911,647.84 ",.03)
 ;;1
 ;;9002226.02101,"911,647.91 ",.01)
 ;;647.91 
 ;;9002226.02101,"911,647.91 ",.02)
 ;;647.92 
 ;;9002226.02101,"911,647.91 ",.03)
 ;;1
 ;;9002226.02101,"911,647.94 ",.01)
 ;;647.94 
 ;;9002226.02101,"911,647.94 ",.02)
 ;;647.94 
 ;;9002226.02101,"911,647.94 ",.03)
 ;;1
 ;;9002226.02101,"911,648.01 ",.01)
 ;;648.01 
 ;;9002226.02101,"911,648.01 ",.02)
 ;;648.01 
 ;;9002226.02101,"911,648.01 ",.03)
 ;;1
 ;;9002226.02101,"911,648.02 ",.01)
 ;;648.02 
 ;;9002226.02101,"911,648.02 ",.02)
 ;;648.02 
 ;;9002226.02101,"911,648.02 ",.03)
 ;;1
 ;;9002226.02101,"911,648.04 ",.01)
 ;;648.04 
 ;;9002226.02101,"911,648.04 ",.02)
 ;;648.04 
 ;;9002226.02101,"911,648.04 ",.03)
 ;;1
 ;;9002226.02101,"911,648.11 ",.01)
 ;;648.11 
 ;;9002226.02101,"911,648.11 ",.02)
 ;;648.11 
 ;;9002226.02101,"911,648.11 ",.03)
 ;;1
 ;;9002226.02101,"911,648.12 ",.01)
 ;;648.12 
 ;;9002226.02101,"911,648.12 ",.02)
 ;;648.12 
 ;;9002226.02101,"911,648.12 ",.03)
 ;;1
 ;;9002226.02101,"911,648.14 ",.01)
 ;;648.14 
 ;;9002226.02101,"911,648.14 ",.02)
 ;;648.14 
 ;;9002226.02101,"911,648.14 ",.03)
 ;;1
 ;;9002226.02101,"911,648.21 ",.01)
 ;;648.21 
 ;;9002226.02101,"911,648.21 ",.02)
 ;;648.21 
 ;;9002226.02101,"911,648.21 ",.03)
 ;;1
 ;;9002226.02101,"911,648.22 ",.01)
 ;;648.22 
 ;;9002226.02101,"911,648.22 ",.02)
 ;;648.22 
 ;;9002226.02101,"911,648.22 ",.03)
 ;;1
 ;;9002226.02101,"911,648.24 ",.01)
 ;;648.24 
 ;;9002226.02101,"911,648.24 ",.02)
 ;;648.24 
 ;;9002226.02101,"911,648.24 ",.03)
 ;;1
 ;;9002226.02101,"911,648.31 ",.01)
 ;;648.31 
 ;;9002226.02101,"911,648.31 ",.02)
 ;;648.31 
 ;;9002226.02101,"911,648.31 ",.03)
 ;;1
 ;;9002226.02101,"911,648.32 ",.01)
 ;;648.32 
 ;;9002226.02101,"911,648.32 ",.02)
 ;;648.32 
 ;;9002226.02101,"911,648.32 ",.03)
 ;;1
 ;;9002226.02101,"911,648.34 ",.01)
 ;;648.34 
 ;;9002226.02101,"911,648.34 ",.02)
 ;;648.34 
 ;;9002226.02101,"911,648.34 ",.03)
 ;;1
 ;;9002226.02101,"911,648.41 ",.01)
 ;;648.41 
 ;;9002226.02101,"911,648.41 ",.02)
 ;;648.41 
 ;;9002226.02101,"911,648.41 ",.03)
 ;;1
 ;;9002226.02101,"911,648.42 ",.01)
 ;;648.42 
 ;;9002226.02101,"911,648.42 ",.02)
 ;;648.42 
 ;;9002226.02101,"911,648.42 ",.03)
 ;;1
 ;;9002226.02101,"911,648.44 ",.01)
 ;;648.44 
 ;;9002226.02101,"911,648.44 ",.02)
 ;;648.44 
 ;;9002226.02101,"911,648.44 ",.03)
 ;;1
 ;;9002226.02101,"911,648.51 ",.01)
 ;;648.51 
 ;;9002226.02101,"911,648.51 ",.02)
 ;;648.51 
 ;;9002226.02101,"911,648.51 ",.03)
 ;;1
 ;;9002226.02101,"911,648.52 ",.01)
 ;;648.52 
 ;;9002226.02101,"911,648.52 ",.02)
 ;;648.52 
 ;;9002226.02101,"911,648.52 ",.03)
 ;;1
 ;;9002226.02101,"911,648.54 ",.01)
 ;;648.54 
 ;;9002226.02101,"911,648.54 ",.02)
 ;;648.54 
 ;;9002226.02101,"911,648.54 ",.03)
 ;;1
 ;;9002226.02101,"911,648.61 ",.01)
 ;;648.61 
 ;;9002226.02101,"911,648.61 ",.02)
 ;;648.61 
 ;;9002226.02101,"911,648.61 ",.03)
 ;;1
 ;;9002226.02101,"911,648.62 ",.01)
 ;;648.62 
 ;;9002226.02101,"911,648.62 ",.02)
 ;;648.62 
 ;;9002226.02101,"911,648.62 ",.03)
 ;;1
 ;;9002226.02101,"911,648.64 ",.01)
 ;;648.64 
 ;;9002226.02101,"911,648.64 ",.02)
 ;;648.64 
 ;;9002226.02101,"911,648.64 ",.03)
 ;;1
 ;;9002226.02101,"911,648.71 ",.01)
 ;;648.71 
 ;;9002226.02101,"911,648.71 ",.02)
 ;;648.71 
 ;;9002226.02101,"911,648.71 ",.03)
 ;;1
 ;;9002226.02101,"911,648.72 ",.01)
 ;;648.72 
 ;;9002226.02101,"911,648.72 ",.02)
 ;;648.72 
 ;;9002226.02101,"911,648.72 ",.03)
 ;;1
 ;;9002226.02101,"911,648.74 ",.01)
 ;;648.74 
 ;;9002226.02101,"911,648.74 ",.02)
 ;;648.74 
 ;;9002226.02101,"911,648.74 ",.03)
 ;;1
 ;;9002226.02101,"911,648.81 ",.01)
 ;;648.81 
 ;;9002226.02101,"911,648.81 ",.02)
 ;;648.81 
 ;;9002226.02101,"911,648.81 ",.03)
 ;;1
 ;;9002226.02101,"911,648.82 ",.01)
 ;;648.82 
 ;;9002226.02101,"911,648.82 ",.02)
 ;;648.82 
 ;;9002226.02101,"911,648.82 ",.03)
 ;;1
 ;;9002226.02101,"911,648.84 ",.01)
 ;;648.84 
 ;;9002226.02101,"911,648.84 ",.02)
 ;;648.84 
 ;;9002226.02101,"911,648.84 ",.03)
 ;;1
 ;;9002226.02101,"911,648.91 ",.01)
 ;;648.91 
 ;;9002226.02101,"911,648.91 ",.02)
 ;;648.91 
 ;;9002226.02101,"911,648.91 ",.03)
 ;;1
 ;;9002226.02101,"911,648.92 ",.01)
 ;;648.92 
 ;;9002226.02101,"911,648.92 ",.02)
 ;;648.92 
 ;;9002226.02101,"911,648.92 ",.03)
 ;;1
 ;;9002226.02101,"911,648.94 ",.01)
 ;;648.94 
 ;;9002226.02101,"911,648.94 ",.02)
 ;;648.94 
 ;;9002226.02101,"911,648.94 ",.03)
 ;;1
 ;;9002226.02101,"911,649.01 ",.01)
 ;;649.01 
 ;;9002226.02101,"911,649.01 ",.02)
 ;;649.01 
 ;;9002226.02101,"911,649.01 ",.03)
 ;;1
 ;;9002226.02101,"911,649.02 ",.01)
 ;;649.02 
 ;;9002226.02101,"911,649.02 ",.02)
 ;;649.02 
 ;;9002226.02101,"911,649.02 ",.03)
 ;;1
 ;;9002226.02101,"911,649.04 ",.01)
 ;;649.04 
 ;;9002226.02101,"911,649.04 ",.02)
 ;;649.04 
 ;;9002226.02101,"911,649.04 ",.03)
 ;;1
 ;;9002226.02101,"911,649.11 ",.01)
 ;;649.11 
 ;;9002226.02101,"911,649.11 ",.02)
 ;;649.11 
 ;;9002226.02101,"911,649.11 ",.03)
 ;;1
 ;;9002226.02101,"911,649.12 ",.01)
 ;;649.12 
 ;;9002226.02101,"911,649.12 ",.02)
 ;;649.12 
 ;;9002226.02101,"911,649.12 ",.03)
 ;;1
 ;;9002226.02101,"911,649.14 ",.01)
 ;;649.14 
 ;;9002226.02101,"911,649.14 ",.02)
 ;;649.14 
 ;;9002226.02101,"911,649.14 ",.03)
 ;;1
 ;;9002226.02101,"911,649.21 ",.01)
 ;;649.21 
 ;;9002226.02101,"911,649.21 ",.02)
 ;;649.21 
 ;;9002226.02101,"911,649.21 ",.03)
 ;;1
 ;;9002226.02101,"911,649.22 ",.01)
 ;;649.22 
 ;;9002226.02101,"911,649.22 ",.02)
 ;;649.22 
 ;;9002226.02101,"911,649.22 ",.03)
 ;;1
 ;;9002226.02101,"911,649.24 ",.01)
 ;;649.24 
 ;;9002226.02101,"911,649.24 ",.02)
 ;;649.24 
 ;;9002226.02101,"911,649.24 ",.03)
 ;;1
 ;;9002226.02101,"911,649.31 ",.01)
 ;;649.31 
 ;;9002226.02101,"911,649.31 ",.02)
 ;;649.31 
 ;;9002226.02101,"911,649.31 ",.03)
 ;;1
 ;;9002226.02101,"911,649.32 ",.01)
 ;;649.32 
 ;;9002226.02101,"911,649.32 ",.02)
 ;;649.32 
 ;;9002226.02101,"911,649.32 ",.03)
 ;;1
 ;;9002226.02101,"911,649.34 ",.01)
 ;;649.34 
 ;;9002226.02101,"911,649.34 ",.02)
 ;;649.34 
 ;;9002226.02101,"911,649.34 ",.03)
 ;;1
 ;;9002226.02101,"911,649.41 ",.01)
 ;;649.41 
 ;;9002226.02101,"911,649.41 ",.02)
 ;;649.41 
 ;;9002226.02101,"911,649.41 ",.03)
 ;;1
 ;;9002226.02101,"911,649.42 ",.01)
 ;;649.42 
 ;;9002226.02101,"911,649.42 ",.02)
 ;;649.42 
 ;;9002226.02101,"911,649.42 ",.03)
 ;;1
 ;;9002226.02101,"911,649.44 ",.01)
 ;;649.44 
 ;;9002226.02101,"911,649.44 ",.02)
 ;;649.44 
 ;;9002226.02101,"911,649.44 ",.03)
 ;;1
 ;;9002226.02101,"911,649.51 ",.01)
 ;;649.51 
 ;;9002226.02101,"911,649.51 ",.02)
 ;;649.51 
 ;;9002226.02101,"911,649.51 ",.03)
 ;;1
 ;;9002226.02101,"911,649.61 ",.01)
 ;;649.61 
 ;;9002226.02101,"911,649.61 ",.02)
 ;;649.61 
 ;;9002226.02101,"911,649.61 ",.03)
 ;;1
 ;;9002226.02101,"911,649.62 ",.01)
 ;;649.62 
 ;;9002226.02101,"911,649.62 ",.02)
 ;;649.62 
 ;;9002226.02101,"911,649.62 ",.03)
 ;;1
 ;;9002226.02101,"911,649.64 ",.01)
 ;;649.64 
 ;;9002226.02101,"911,649.64 ",.02)
 ;;649.64 
 ;;9002226.02101,"911,649.64 ",.03)
 ;;1
 ;;9002226.02101,"911,649.71 ",.01)
 ;;649.71 
 ;;9002226.02101,"911,649.71 ",.02)
 ;;649.71 
 ;;9002226.02101,"911,649.71 ",.03)
 ;;1
 ;;9002226.02101,"911,650. ",.01)
 ;;650. 
 ;;9002226.02101,"911,650. ",.02)
 ;;650. 
 ;;9002226.02101,"911,650. ",.03)
 ;;1
 ;;9002226.02101,"911,651.01 ",.01)
 ;;651.01 
 ;;9002226.02101,"911,651.01 ",.02)
 ;;651.01 
 ;;9002226.02101,"911,651.01 ",.03)
 ;;1
 ;;9002226.02101,"911,651.11 ",.01)
 ;;651.11 
 ;;9002226.02101,"911,651.11 ",.02)
 ;;651.11 
 ;;9002226.02101,"911,651.11 ",.03)
 ;;1
 ;;9002226.02101,"911,651.21 ",.01)
 ;;651.21 
 ;;9002226.02101,"911,651.21 ",.02)
 ;;651.21 
 ;;9002226.02101,"911,651.21 ",.03)
 ;;1
 ;;9002226.02101,"911,651.31 ",.01)
 ;;651.31 
 ;;9002226.02101,"911,651.31 ",.02)
 ;;651.31 
 ;;9002226.02101,"911,651.31 ",.03)
 ;;1
 ;;9002226.02101,"911,651.41 ",.01)
 ;;651.41 
 ;;9002226.02101,"911,651.41 ",.02)
 ;;651.41 
 ;;9002226.02101,"911,651.41 ",.03)
 ;;1
 ;;9002226.02101,"911,651.51 ",.01)
 ;;651.51 
 ;;9002226.02101,"911,651.51 ",.02)
 ;;651.51 
 ;;9002226.02101,"911,651.51 ",.03)
 ;;1
 ;;9002226.02101,"911,651.61 ",.01)
 ;;651.61 
 ;;9002226.02101,"911,651.61 ",.02)
 ;;651.61 
 ;;9002226.02101,"911,651.61 ",.03)
 ;;1
 ;;9002226.02101,"911,651.71 ",.01)
 ;;651.71 
 ;;9002226.02101,"911,651.71 ",.02)
 ;;651.71 
 ;;9002226.02101,"911,651.71 ",.03)
 ;;1
 ;;9002226.02101,"911,651.81 ",.01)
 ;;651.81 
 ;;9002226.02101,"911,651.81 ",.02)
 ;;651.81 
 ;;9002226.02101,"911,651.81 ",.03)
 ;;1
 ;;9002226.02101,"911,651.91 ",.01)
 ;;651.91 
 ;;9002226.02101,"911,651.91 ",.02)
 ;;651.91 
 ;;9002226.02101,"911,651.91 ",.03)
 ;;1
 ;;9002226.02101,"911,652.01 ",.01)
 ;;652.01 
 ;;9002226.02101,"911,652.01 ",.02)
 ;;652.01 
 ;;9002226.02101,"911,652.01 ",.03)
 ;;1