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

ATXD8P7.m

Go to the documentation of this file.
ATXD8P7 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 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,"913,642.53 ",.01)
 ;;642.53 
 ;;9002226.02101,"913,642.53 ",.02)
 ;;642.53 
 ;;9002226.02101,"913,642.53 ",.03)
 ;;1
 ;;9002226.02101,"913,642.60 ",.01)
 ;;642.60 
 ;;9002226.02101,"913,642.60 ",.02)
 ;;642.60 
 ;;9002226.02101,"913,642.60 ",.03)
 ;;1
 ;;9002226.02101,"913,642.63 ",.01)
 ;;642.63 
 ;;9002226.02101,"913,642.63 ",.02)
 ;;642.63 
 ;;9002226.02101,"913,642.63 ",.03)
 ;;1
 ;;9002226.02101,"913,642.70 ",.01)
 ;;642.70 
 ;;9002226.02101,"913,642.70 ",.02)
 ;;642.70 
 ;;9002226.02101,"913,642.70 ",.03)
 ;;1
 ;;9002226.02101,"913,642.73 ",.01)
 ;;642.73 
 ;;9002226.02101,"913,642.73 ",.02)
 ;;642.73 
 ;;9002226.02101,"913,642.73 ",.03)
 ;;1
 ;;9002226.02101,"913,642.90 ",.01)
 ;;642.90 
 ;;9002226.02101,"913,642.90 ",.02)
 ;;642.90 
 ;;9002226.02101,"913,642.90 ",.03)
 ;;1
 ;;9002226.02101,"913,642.93 ",.01)
 ;;642.93 
 ;;9002226.02101,"913,642.93 ",.02)
 ;;642.93 
 ;;9002226.02101,"913,642.93 ",.03)
 ;;1
 ;;9002226.02101,"913,643.00 ",.01)
 ;;643.00 
 ;;9002226.02101,"913,643.00 ",.02)
 ;;643.00 
 ;;9002226.02101,"913,643.00 ",.03)
 ;;1
 ;;9002226.02101,"913,643.03 ",.01)
 ;;643.03 
 ;;9002226.02101,"913,643.03 ",.02)
 ;;643.10 
 ;;9002226.02101,"913,643.03 ",.03)
 ;;1
 ;;9002226.02101,"913,643.13 ",.01)
 ;;643.13 
 ;;9002226.02101,"913,643.13 ",.02)
 ;;643.20 
 ;;9002226.02101,"913,643.13 ",.03)
 ;;1
 ;;9002226.02101,"913,643.23 ",.01)
 ;;643.23 
 ;;9002226.02101,"913,643.23 ",.02)
 ;;643.80 
 ;;9002226.02101,"913,643.23 ",.03)
 ;;1
 ;;9002226.02101,"913,643.83 ",.01)
 ;;643.83 
 ;;9002226.02101,"913,643.83 ",.02)
 ;;643.90 
 ;;9002226.02101,"913,643.83 ",.03)
 ;;1
 ;;9002226.02101,"913,643.93 ",.01)
 ;;643.93 
 ;;9002226.02101,"913,643.93 ",.02)
 ;;644.13 
 ;;9002226.02101,"913,643.93 ",.03)
 ;;1
 ;;9002226.02101,"913,645.00 ",.01)
 ;;645.00 
 ;;9002226.02101,"913,645.00 ",.02)
 ;;645.00 
 ;;9002226.02101,"913,645.00 ",.03)
 ;;1
 ;;9002226.02101,"913,645.03 ",.01)
 ;;645.03 
 ;;9002226.02101,"913,645.03 ",.02)
 ;;645.10 
 ;;9002226.02101,"913,645.03 ",.03)
 ;;1
 ;;9002226.02101,"913,645.13 ",.01)
 ;;645.13 
 ;;9002226.02101,"913,645.13 ",.02)
 ;;645.20 
 ;;9002226.02101,"913,645.13 ",.03)
 ;;1
 ;;9002226.02101,"913,645.23 ",.01)
 ;;645.23 
 ;;9002226.02101,"913,645.23 ",.02)
 ;;646.00 
 ;;9002226.02101,"913,645.23 ",.03)
 ;;1
 ;;9002226.02101,"913,646.03 ",.01)
 ;;646.03 
 ;;9002226.02101,"913,646.03 ",.02)
 ;;646.10 
 ;;9002226.02101,"913,646.03 ",.03)
 ;;1
 ;;9002226.02101,"913,646.13 ",.01)
 ;;646.13 
 ;;9002226.02101,"913,646.13 ",.02)
 ;;646.20 
 ;;9002226.02101,"913,646.13 ",.03)
 ;;1
 ;;9002226.02101,"913,646.23 ",.01)
 ;;646.23 
 ;;9002226.02101,"913,646.23 ",.02)
 ;;646.23 
 ;;9002226.02101,"913,646.23 ",.03)
 ;;1
 ;;9002226.02101,"913,646.30 ",.01)
 ;;646.30 
 ;;9002226.02101,"913,646.30 ",.02)
 ;;646.30 
 ;;9002226.02101,"913,646.30 ",.03)
 ;;1
 ;;9002226.02101,"913,646.33 ",.01)
 ;;646.33 
 ;;9002226.02101,"913,646.33 ",.02)
 ;;646.40 
 ;;9002226.02101,"913,646.33 ",.03)
 ;;1
 ;;9002226.02101,"913,646.43 ",.01)
 ;;646.43 
 ;;9002226.02101,"913,646.43 ",.02)
 ;;646.43 
 ;;9002226.02101,"913,646.43 ",.03)
 ;;1
 ;;9002226.02101,"913,646.50 ",.01)
 ;;646.50 
 ;;9002226.02101,"913,646.50 ",.02)
 ;;646.50 
 ;;9002226.02101,"913,646.50 ",.03)
 ;;1
 ;;9002226.02101,"913,646.53 ",.01)
 ;;646.53 
 ;;9002226.02101,"913,646.53 ",.02)
 ;;646.53 
 ;;9002226.02101,"913,646.53 ",.03)
 ;;1
 ;;9002226.02101,"913,646.60 ",.01)
 ;;646.60 
 ;;9002226.02101,"913,646.60 ",.02)
 ;;646.60 
 ;;9002226.02101,"913,646.60 ",.03)
 ;;1
 ;;9002226.02101,"913,646.63 ",.01)
 ;;646.63 
 ;;9002226.02101,"913,646.63 ",.02)
 ;;646.63 
 ;;9002226.02101,"913,646.63 ",.03)
 ;;1
 ;;9002226.02101,"913,646.70 ",.01)
 ;;646.70 
 ;;9002226.02101,"913,646.70 ",.02)
 ;;646.70 
 ;;9002226.02101,"913,646.70 ",.03)
 ;;1
 ;;9002226.02101,"913,646.73 ",.01)
 ;;646.73 
 ;;9002226.02101,"913,646.73 ",.02)
 ;;646.80 
 ;;9002226.02101,"913,646.73 ",.03)
 ;;1
 ;;9002226.02101,"913,646.83 ",.01)
 ;;646.83 
 ;;9002226.02101,"913,646.83 ",.02)
 ;;646.83 
 ;;9002226.02101,"913,646.83 ",.03)
 ;;1
 ;;9002226.02101,"913,646.90 ",.01)
 ;;646.90 
 ;;9002226.02101,"913,646.90 ",.02)
 ;;646.90 
 ;;9002226.02101,"913,646.90 ",.03)
 ;;1
 ;;9002226.02101,"913,646.93 ",.01)
 ;;646.93 
 ;;9002226.02101,"913,646.93 ",.02)
 ;;647.00 
 ;;9002226.02101,"913,646.93 ",.03)
 ;;1
 ;;9002226.02101,"913,647.03 ",.01)
 ;;647.03 
 ;;9002226.02101,"913,647.03 ",.02)
 ;;647.03 
 ;;9002226.02101,"913,647.03 ",.03)
 ;;1
 ;;9002226.02101,"913,647.10 ",.01)
 ;;647.10 
 ;;9002226.02101,"913,647.10 ",.02)
 ;;647.10 
 ;;9002226.02101,"913,647.10 ",.03)
 ;;1
 ;;9002226.02101,"913,647.13 ",.01)
 ;;647.13 
 ;;9002226.02101,"913,647.13 ",.02)
 ;;647.13 
 ;;9002226.02101,"913,647.13 ",.03)
 ;;1
 ;;9002226.02101,"913,647.20 ",.01)
 ;;647.20 
 ;;9002226.02101,"913,647.20 ",.02)
 ;;647.20 
 ;;9002226.02101,"913,647.20 ",.03)
 ;;1
 ;;9002226.02101,"913,647.23 ",.01)
 ;;647.23 
 ;;9002226.02101,"913,647.23 ",.02)
 ;;647.23 
 ;;9002226.02101,"913,647.23 ",.03)
 ;;1
 ;;9002226.02101,"913,647.30 ",.01)
 ;;647.30 
 ;;9002226.02101,"913,647.30 ",.02)
 ;;647.30 
 ;;9002226.02101,"913,647.30 ",.03)
 ;;1
 ;;9002226.02101,"913,647.33 ",.01)
 ;;647.33 
 ;;9002226.02101,"913,647.33 ",.02)
 ;;647.33 
 ;;9002226.02101,"913,647.33 ",.03)
 ;;1
 ;;9002226.02101,"913,647.40 ",.01)
 ;;647.40 
 ;;9002226.02101,"913,647.40 ",.02)
 ;;647.40 
 ;;9002226.02101,"913,647.40 ",.03)
 ;;1
 ;;9002226.02101,"913,647.43 ",.01)
 ;;647.43 
 ;;9002226.02101,"913,647.43 ",.02)
 ;;647.43 
 ;;9002226.02101,"913,647.43 ",.03)
 ;;1
 ;;9002226.02101,"913,647.50 ",.01)
 ;;647.50 
 ;;9002226.02101,"913,647.50 ",.02)
 ;;647.50 
 ;;9002226.02101,"913,647.50 ",.03)
 ;;1
 ;;9002226.02101,"913,647.53 ",.01)
 ;;647.53 
 ;;9002226.02101,"913,647.53 ",.02)
 ;;647.53 
 ;;9002226.02101,"913,647.53 ",.03)
 ;;1
 ;;9002226.02101,"913,647.60 ",.01)
 ;;647.60 
 ;;9002226.02101,"913,647.60 ",.02)
 ;;647.60 
 ;;9002226.02101,"913,647.60 ",.03)
 ;;1
 ;;9002226.02101,"913,647.63 ",.01)
 ;;647.63 
 ;;9002226.02101,"913,647.63 ",.02)
 ;;647.63 
 ;;9002226.02101,"913,647.63 ",.03)
 ;;1
 ;;9002226.02101,"913,647.80 ",.01)
 ;;647.80 
 ;;9002226.02101,"913,647.80 ",.02)
 ;;647.80 
 ;;9002226.02101,"913,647.80 ",.03)
 ;;1
 ;;9002226.02101,"913,647.83 ",.01)
 ;;647.83 
 ;;9002226.02101,"913,647.83 ",.02)
 ;;647.83 
 ;;9002226.02101,"913,647.83 ",.03)
 ;;1
 ;;9002226.02101,"913,647.90 ",.01)
 ;;647.90 
 ;;9002226.02101,"913,647.90 ",.02)
 ;;647.90 
 ;;9002226.02101,"913,647.90 ",.03)
 ;;1
 ;;9002226.02101,"913,647.93 ",.01)
 ;;647.93 
 ;;9002226.02101,"913,647.93 ",.02)
 ;;647.93 
 ;;9002226.02101,"913,647.93 ",.03)
 ;;1
 ;;9002226.02101,"913,648.00 ",.01)
 ;;648.00 
 ;;9002226.02101,"913,648.00 ",.02)
 ;;648.00 
 ;;9002226.02101,"913,648.00 ",.03)
 ;;1
 ;;9002226.02101,"913,648.03 ",.01)
 ;;648.03 
 ;;9002226.02101,"913,648.03 ",.02)
 ;;648.03 
 ;;9002226.02101,"913,648.03 ",.03)
 ;;1
 ;;9002226.02101,"913,648.10 ",.01)
 ;;648.10 
 ;;9002226.02101,"913,648.10 ",.02)
 ;;648.10 
 ;;9002226.02101,"913,648.10 ",.03)
 ;;1
 ;;9002226.02101,"913,648.13 ",.01)
 ;;648.13 
 ;;9002226.02101,"913,648.13 ",.02)
 ;;648.13 
 ;;9002226.02101,"913,648.13 ",.03)
 ;;1
 ;;9002226.02101,"913,648.20 ",.01)
 ;;648.20 
 ;;9002226.02101,"913,648.20 ",.02)
 ;;648.20 
 ;;9002226.02101,"913,648.20 ",.03)
 ;;1
 ;;9002226.02101,"913,648.23 ",.01)
 ;;648.23 
 ;;9002226.02101,"913,648.23 ",.02)
 ;;648.23 
 ;;9002226.02101,"913,648.23 ",.03)
 ;;1
 ;;9002226.02101,"913,648.30 ",.01)
 ;;648.30 
 ;;9002226.02101,"913,648.30 ",.02)
 ;;648.30 
 ;;9002226.02101,"913,648.30 ",.03)
 ;;1
 ;;9002226.02101,"913,648.33 ",.01)
 ;;648.33 
 ;;9002226.02101,"913,648.33 ",.02)
 ;;648.33 
 ;;9002226.02101,"913,648.33 ",.03)
 ;;1
 ;;9002226.02101,"913,648.40 ",.01)
 ;;648.40 
 ;;9002226.02101,"913,648.40 ",.02)
 ;;648.40 
 ;;9002226.02101,"913,648.40 ",.03)
 ;;1
 ;;9002226.02101,"913,648.43 ",.01)
 ;;648.43 
 ;;9002226.02101,"913,648.43 ",.02)
 ;;648.43 
 ;;9002226.02101,"913,648.43 ",.03)
 ;;1
 ;;9002226.02101,"913,648.50 ",.01)
 ;;648.50 
 ;;9002226.02101,"913,648.50 ",.02)
 ;;648.50 
 ;;9002226.02101,"913,648.50 ",.03)
 ;;1
 ;;9002226.02101,"913,648.53 ",.01)
 ;;648.53 
 ;;9002226.02101,"913,648.53 ",.02)
 ;;648.53 
 ;;9002226.02101,"913,648.53 ",.03)
 ;;1
 ;;9002226.02101,"913,648.60 ",.01)
 ;;648.60 
 ;;9002226.02101,"913,648.60 ",.02)
 ;;648.60 
 ;;9002226.02101,"913,648.60 ",.03)
 ;;1
 ;;9002226.02101,"913,648.63 ",.01)
 ;;648.63 
 ;;9002226.02101,"913,648.63 ",.02)
 ;;648.63 
 ;;9002226.02101,"913,648.63 ",.03)
 ;;1
 ;;9002226.02101,"913,648.70 ",.01)
 ;;648.70 
 ;;9002226.02101,"913,648.70 ",.02)
 ;;648.70 
 ;;9002226.02101,"913,648.70 ",.03)
 ;;1
 ;;9002226.02101,"913,648.73 ",.01)
 ;;648.73 
 ;;9002226.02101,"913,648.73 ",.02)
 ;;648.73 
 ;;9002226.02101,"913,648.73 ",.03)
 ;;1
 ;;9002226.02101,"913,648.80 ",.01)
 ;;648.80 
 ;;9002226.02101,"913,648.80 ",.02)
 ;;648.80 
 ;;9002226.02101,"913,648.80 ",.03)
 ;;1
 ;;9002226.02101,"913,648.83 ",.01)
 ;;648.83 
 ;;9002226.02101,"913,648.83 ",.02)
 ;;648.83 
 ;;9002226.02101,"913,648.83 ",.03)
 ;;1
 ;;9002226.02101,"913,648.90 ",.01)
 ;;648.90 
 ;;9002226.02101,"913,648.90 ",.02)
 ;;648.90 
 ;;9002226.02101,"913,648.90 ",.03)
 ;;1
 ;;9002226.02101,"913,648.93 ",.01)
 ;;648.93 
 ;;9002226.02101,"913,648.93 ",.02)
 ;;648.93 
 ;;9002226.02101,"913,648.93 ",.03)
 ;;1
 ;;9002226.02101,"913,649.00 ",.01)
 ;;649.00 
 ;;9002226.02101,"913,649.00 ",.02)
 ;;649.00 
 ;;9002226.02101,"913,649.00 ",.03)
 ;;1
 ;;9002226.02101,"913,649.03 ",.01)
 ;;649.03 
 ;;9002226.02101,"913,649.03 ",.02)
 ;;649.03 
 ;;9002226.02101,"913,649.03 ",.03)
 ;;1
 ;;9002226.02101,"913,649.10 ",.01)
 ;;649.10 
 ;;9002226.02101,"913,649.10 ",.02)
 ;;649.10 
 ;;9002226.02101,"913,649.10 ",.03)
 ;;1
 ;;9002226.02101,"913,649.13 ",.01)
 ;;649.13 
 ;;9002226.02101,"913,649.13 ",.02)
 ;;649.13 
 ;;9002226.02101,"913,649.13 ",.03)
 ;;1
 ;;9002226.02101,"913,649.20 ",.01)
 ;;649.20 
 ;;9002226.02101,"913,649.20 ",.02)
 ;;649.20 
 ;;9002226.02101,"913,649.20 ",.03)
 ;;1
 ;;9002226.02101,"913,649.23 ",.01)
 ;;649.23 
 ;;9002226.02101,"913,649.23 ",.02)
 ;;649.23 
 ;;9002226.02101,"913,649.23 ",.03)
 ;;1
 ;;9002226.02101,"913,649.30 ",.01)
 ;;649.30 
 ;;9002226.02101,"913,649.30 ",.02)
 ;;649.30 
 ;;9002226.02101,"913,649.30 ",.03)
 ;;1
 ;;9002226.02101,"913,649.33 ",.01)
 ;;649.33 
 ;;9002226.02101,"913,649.33 ",.02)
 ;;649.33 
 ;;9002226.02101,"913,649.33 ",.03)
 ;;1
 ;;9002226.02101,"913,649.40 ",.01)
 ;;649.40 
 ;;9002226.02101,"913,649.40 ",.02)
 ;;649.40 
 ;;9002226.02101,"913,649.40 ",.03)
 ;;1
 ;;9002226.02101,"913,649.43 ",.01)
 ;;649.43 
 ;;9002226.02101,"913,649.43 ",.02)
 ;;649.43 
 ;;9002226.02101,"913,649.43 ",.03)
 ;;1
 ;;9002226.02101,"913,649.50 ",.01)
 ;;649.50 
 ;;9002226.02101,"913,649.50 ",.02)
 ;;649.50 
 ;;9002226.02101,"913,649.50 ",.03)
 ;;1
 ;;9002226.02101,"913,649.53 ",.01)
 ;;649.53 
 ;;9002226.02101,"913,649.53 ",.02)
 ;;649.53 
 ;;9002226.02101,"913,649.53 ",.03)
 ;;1
 ;;9002226.02101,"913,649.60 ",.01)
 ;;649.60 
 ;;9002226.02101,"913,649.60 ",.02)
 ;;649.60 
 ;;9002226.02101,"913,649.60 ",.03)
 ;;1
 ;;9002226.02101,"913,649.63 ",.01)
 ;;649.63 
 ;;9002226.02101,"913,649.63 ",.02)
 ;;649.63 
 ;;9002226.02101,"913,649.63 ",.03)
 ;;1