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

ATXXB174.m

Go to the documentation of this file.
ATXXB174 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 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,"1804,7W02X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W02X1Z ",.01)
 ;;7W02X1Z 
 ;;9002226.02101,"1804,7W02X1Z ",.02)
 ;;7W02X1Z 
 ;;9002226.02101,"1804,7W02X1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W02X2Z ",.01)
 ;;7W02X2Z 
 ;;9002226.02101,"1804,7W02X2Z ",.02)
 ;;7W02X2Z 
 ;;9002226.02101,"1804,7W02X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W02X3Z ",.01)
 ;;7W02X3Z 
 ;;9002226.02101,"1804,7W02X3Z ",.02)
 ;;7W02X3Z 
 ;;9002226.02101,"1804,7W02X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W02X4Z ",.01)
 ;;7W02X4Z 
 ;;9002226.02101,"1804,7W02X4Z ",.02)
 ;;7W02X4Z 
 ;;9002226.02101,"1804,7W02X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W02X5Z ",.01)
 ;;7W02X5Z 
 ;;9002226.02101,"1804,7W02X5Z ",.02)
 ;;7W02X5Z 
 ;;9002226.02101,"1804,7W02X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W02X6Z ",.01)
 ;;7W02X6Z 
 ;;9002226.02101,"1804,7W02X6Z ",.02)
 ;;7W02X6Z 
 ;;9002226.02101,"1804,7W02X6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W02X7Z ",.01)
 ;;7W02X7Z 
 ;;9002226.02101,"1804,7W02X7Z ",.02)
 ;;7W02X7Z 
 ;;9002226.02101,"1804,7W02X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W02X8Z ",.01)
 ;;7W02X8Z 
 ;;9002226.02101,"1804,7W02X8Z ",.02)
 ;;7W02X8Z 
 ;;9002226.02101,"1804,7W02X8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W02X9Z ",.01)
 ;;7W02X9Z 
 ;;9002226.02101,"1804,7W02X9Z ",.02)
 ;;7W02X9Z 
 ;;9002226.02101,"1804,7W02X9Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W03X0Z ",.01)
 ;;7W03X0Z 
 ;;9002226.02101,"1804,7W03X0Z ",.02)
 ;;7W03X0Z 
 ;;9002226.02101,"1804,7W03X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W03X1Z ",.01)
 ;;7W03X1Z 
 ;;9002226.02101,"1804,7W03X1Z ",.02)
 ;;7W03X1Z 
 ;;9002226.02101,"1804,7W03X1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W03X2Z ",.01)
 ;;7W03X2Z 
 ;;9002226.02101,"1804,7W03X2Z ",.02)
 ;;7W03X2Z 
 ;;9002226.02101,"1804,7W03X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W03X3Z ",.01)
 ;;7W03X3Z 
 ;;9002226.02101,"1804,7W03X3Z ",.02)
 ;;7W03X3Z 
 ;;9002226.02101,"1804,7W03X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W03X4Z ",.01)
 ;;7W03X4Z 
 ;;9002226.02101,"1804,7W03X4Z ",.02)
 ;;7W03X4Z 
 ;;9002226.02101,"1804,7W03X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W03X5Z ",.01)
 ;;7W03X5Z 
 ;;9002226.02101,"1804,7W03X5Z ",.02)
 ;;7W03X5Z 
 ;;9002226.02101,"1804,7W03X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W03X6Z ",.01)
 ;;7W03X6Z 
 ;;9002226.02101,"1804,7W03X6Z ",.02)
 ;;7W03X6Z 
 ;;9002226.02101,"1804,7W03X6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W03X7Z ",.01)
 ;;7W03X7Z 
 ;;9002226.02101,"1804,7W03X7Z ",.02)
 ;;7W03X7Z 
 ;;9002226.02101,"1804,7W03X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W03X8Z ",.01)
 ;;7W03X8Z 
 ;;9002226.02101,"1804,7W03X8Z ",.02)
 ;;7W03X8Z 
 ;;9002226.02101,"1804,7W03X8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W03X9Z ",.01)
 ;;7W03X9Z 
 ;;9002226.02101,"1804,7W03X9Z ",.02)
 ;;7W03X9Z 
 ;;9002226.02101,"1804,7W03X9Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W04X0Z ",.01)
 ;;7W04X0Z 
 ;;9002226.02101,"1804,7W04X0Z ",.02)
 ;;7W04X0Z 
 ;;9002226.02101,"1804,7W04X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W04X1Z ",.01)
 ;;7W04X1Z 
 ;;9002226.02101,"1804,7W04X1Z ",.02)
 ;;7W04X1Z 
 ;;9002226.02101,"1804,7W04X1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W04X2Z ",.01)
 ;;7W04X2Z 
 ;;9002226.02101,"1804,7W04X2Z ",.02)
 ;;7W04X2Z 
 ;;9002226.02101,"1804,7W04X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W04X3Z ",.01)
 ;;7W04X3Z 
 ;;9002226.02101,"1804,7W04X3Z ",.02)
 ;;7W04X3Z 
 ;;9002226.02101,"1804,7W04X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W04X4Z ",.01)
 ;;7W04X4Z 
 ;;9002226.02101,"1804,7W04X4Z ",.02)
 ;;7W04X4Z 
 ;;9002226.02101,"1804,7W04X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W04X5Z ",.01)
 ;;7W04X5Z 
 ;;9002226.02101,"1804,7W04X5Z ",.02)
 ;;7W04X5Z 
 ;;9002226.02101,"1804,7W04X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W04X6Z ",.01)
 ;;7W04X6Z 
 ;;9002226.02101,"1804,7W04X6Z ",.02)
 ;;7W04X6Z 
 ;;9002226.02101,"1804,7W04X6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W04X7Z ",.01)
 ;;7W04X7Z 
 ;;9002226.02101,"1804,7W04X7Z ",.02)
 ;;7W04X7Z 
 ;;9002226.02101,"1804,7W04X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W04X8Z ",.01)
 ;;7W04X8Z 
 ;;9002226.02101,"1804,7W04X8Z ",.02)
 ;;7W04X8Z 
 ;;9002226.02101,"1804,7W04X8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W04X9Z ",.01)
 ;;7W04X9Z 
 ;;9002226.02101,"1804,7W04X9Z ",.02)
 ;;7W04X9Z 
 ;;9002226.02101,"1804,7W04X9Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W05X0Z ",.01)
 ;;7W05X0Z 
 ;;9002226.02101,"1804,7W05X0Z ",.02)
 ;;7W05X0Z 
 ;;9002226.02101,"1804,7W05X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W05X1Z ",.01)
 ;;7W05X1Z 
 ;;9002226.02101,"1804,7W05X1Z ",.02)
 ;;7W05X1Z 
 ;;9002226.02101,"1804,7W05X1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W05X2Z ",.01)
 ;;7W05X2Z 
 ;;9002226.02101,"1804,7W05X2Z ",.02)
 ;;7W05X2Z 
 ;;9002226.02101,"1804,7W05X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W05X3Z ",.01)
 ;;7W05X3Z 
 ;;9002226.02101,"1804,7W05X3Z ",.02)
 ;;7W05X3Z 
 ;;9002226.02101,"1804,7W05X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W05X4Z ",.01)
 ;;7W05X4Z 
 ;;9002226.02101,"1804,7W05X4Z ",.02)
 ;;7W05X4Z 
 ;;9002226.02101,"1804,7W05X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W05X5Z ",.01)
 ;;7W05X5Z 
 ;;9002226.02101,"1804,7W05X5Z ",.02)
 ;;7W05X5Z 
 ;;9002226.02101,"1804,7W05X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W05X6Z ",.01)
 ;;7W05X6Z 
 ;;9002226.02101,"1804,7W05X6Z ",.02)
 ;;7W05X6Z 
 ;;9002226.02101,"1804,7W05X6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W05X7Z ",.01)
 ;;7W05X7Z 
 ;;9002226.02101,"1804,7W05X7Z ",.02)
 ;;7W05X7Z 
 ;;9002226.02101,"1804,7W05X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W05X8Z ",.01)
 ;;7W05X8Z 
 ;;9002226.02101,"1804,7W05X8Z ",.02)
 ;;7W05X8Z 
 ;;9002226.02101,"1804,7W05X8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W05X9Z ",.01)
 ;;7W05X9Z 
 ;;9002226.02101,"1804,7W05X9Z ",.02)
 ;;7W05X9Z 
 ;;9002226.02101,"1804,7W05X9Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W06X0Z ",.01)
 ;;7W06X0Z 
 ;;9002226.02101,"1804,7W06X0Z ",.02)
 ;;7W06X0Z 
 ;;9002226.02101,"1804,7W06X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W06X1Z ",.01)
 ;;7W06X1Z 
 ;;9002226.02101,"1804,7W06X1Z ",.02)
 ;;7W06X1Z 
 ;;9002226.02101,"1804,7W06X1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W06X2Z ",.01)
 ;;7W06X2Z 
 ;;9002226.02101,"1804,7W06X2Z ",.02)
 ;;7W06X2Z 
 ;;9002226.02101,"1804,7W06X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W06X3Z ",.01)
 ;;7W06X3Z 
 ;;9002226.02101,"1804,7W06X3Z ",.02)
 ;;7W06X3Z 
 ;;9002226.02101,"1804,7W06X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W06X4Z ",.01)
 ;;7W06X4Z 
 ;;9002226.02101,"1804,7W06X4Z ",.02)
 ;;7W06X4Z 
 ;;9002226.02101,"1804,7W06X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W06X5Z ",.01)
 ;;7W06X5Z 
 ;;9002226.02101,"1804,7W06X5Z ",.02)
 ;;7W06X5Z 
 ;;9002226.02101,"1804,7W06X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W06X6Z ",.01)
 ;;7W06X6Z 
 ;;9002226.02101,"1804,7W06X6Z ",.02)
 ;;7W06X6Z 
 ;;9002226.02101,"1804,7W06X6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W06X7Z ",.01)
 ;;7W06X7Z 
 ;;9002226.02101,"1804,7W06X7Z ",.02)
 ;;7W06X7Z 
 ;;9002226.02101,"1804,7W06X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W06X8Z ",.01)
 ;;7W06X8Z 
 ;;9002226.02101,"1804,7W06X8Z ",.02)
 ;;7W06X8Z 
 ;;9002226.02101,"1804,7W06X8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W06X9Z ",.01)
 ;;7W06X9Z 
 ;;9002226.02101,"1804,7W06X9Z ",.02)
 ;;7W06X9Z 
 ;;9002226.02101,"1804,7W06X9Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W07X0Z ",.01)
 ;;7W07X0Z 
 ;;9002226.02101,"1804,7W07X0Z ",.02)
 ;;7W07X0Z 
 ;;9002226.02101,"1804,7W07X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W07X1Z ",.01)
 ;;7W07X1Z 
 ;;9002226.02101,"1804,7W07X1Z ",.02)
 ;;7W07X1Z 
 ;;9002226.02101,"1804,7W07X1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W07X2Z ",.01)
 ;;7W07X2Z 
 ;;9002226.02101,"1804,7W07X2Z ",.02)
 ;;7W07X2Z 
 ;;9002226.02101,"1804,7W07X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W07X3Z ",.01)
 ;;7W07X3Z 
 ;;9002226.02101,"1804,7W07X3Z ",.02)
 ;;7W07X3Z 
 ;;9002226.02101,"1804,7W07X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W07X4Z ",.01)
 ;;7W07X4Z 
 ;;9002226.02101,"1804,7W07X4Z ",.02)
 ;;7W07X4Z 
 ;;9002226.02101,"1804,7W07X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W07X5Z ",.01)
 ;;7W07X5Z 
 ;;9002226.02101,"1804,7W07X5Z ",.02)
 ;;7W07X5Z 
 ;;9002226.02101,"1804,7W07X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W07X6Z ",.01)
 ;;7W07X6Z 
 ;;9002226.02101,"1804,7W07X6Z ",.02)
 ;;7W07X6Z 
 ;;9002226.02101,"1804,7W07X6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W07X7Z ",.01)
 ;;7W07X7Z 
 ;;9002226.02101,"1804,7W07X7Z ",.02)
 ;;7W07X7Z 
 ;;9002226.02101,"1804,7W07X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W07X8Z ",.01)
 ;;7W07X8Z 
 ;;9002226.02101,"1804,7W07X8Z ",.02)
 ;;7W07X8Z 
 ;;9002226.02101,"1804,7W07X8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W07X9Z ",.01)
 ;;7W07X9Z 
 ;;9002226.02101,"1804,7W07X9Z ",.02)
 ;;7W07X9Z 
 ;;9002226.02101,"1804,7W07X9Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W08X0Z ",.01)
 ;;7W08X0Z 
 ;;9002226.02101,"1804,7W08X0Z ",.02)
 ;;7W08X0Z 
 ;;9002226.02101,"1804,7W08X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W08X1Z ",.01)
 ;;7W08X1Z 
 ;;9002226.02101,"1804,7W08X1Z ",.02)
 ;;7W08X1Z 
 ;;9002226.02101,"1804,7W08X1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W08X2Z ",.01)
 ;;7W08X2Z 
 ;;9002226.02101,"1804,7W08X2Z ",.02)
 ;;7W08X2Z 
 ;;9002226.02101,"1804,7W08X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W08X3Z ",.01)
 ;;7W08X3Z 
 ;;9002226.02101,"1804,7W08X3Z ",.02)
 ;;7W08X3Z 
 ;;9002226.02101,"1804,7W08X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W08X4Z ",.01)
 ;;7W08X4Z 
 ;;9002226.02101,"1804,7W08X4Z ",.02)
 ;;7W08X4Z 
 ;;9002226.02101,"1804,7W08X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W08X5Z ",.01)
 ;;7W08X5Z 
 ;;9002226.02101,"1804,7W08X5Z ",.02)
 ;;7W08X5Z 
 ;;9002226.02101,"1804,7W08X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W08X6Z ",.01)
 ;;7W08X6Z 
 ;;9002226.02101,"1804,7W08X6Z ",.02)
 ;;7W08X6Z 
 ;;9002226.02101,"1804,7W08X6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W08X7Z ",.01)
 ;;7W08X7Z 
 ;;9002226.02101,"1804,7W08X7Z ",.02)
 ;;7W08X7Z 
 ;;9002226.02101,"1804,7W08X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W08X8Z ",.01)
 ;;7W08X8Z 
 ;;9002226.02101,"1804,7W08X8Z ",.02)
 ;;7W08X8Z 
 ;;9002226.02101,"1804,7W08X8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W08X9Z ",.01)
 ;;7W08X9Z 
 ;;9002226.02101,"1804,7W08X9Z ",.02)
 ;;7W08X9Z 
 ;;9002226.02101,"1804,7W08X9Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W09X0Z ",.01)
 ;;7W09X0Z 
 ;;9002226.02101,"1804,7W09X0Z ",.02)
 ;;7W09X0Z 
 ;;9002226.02101,"1804,7W09X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W09X1Z ",.01)
 ;;7W09X1Z 
 ;;9002226.02101,"1804,7W09X1Z ",.02)
 ;;7W09X1Z 
 ;;9002226.02101,"1804,7W09X1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W09X2Z ",.01)
 ;;7W09X2Z 
 ;;9002226.02101,"1804,7W09X2Z ",.02)
 ;;7W09X2Z 
 ;;9002226.02101,"1804,7W09X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W09X3Z ",.01)
 ;;7W09X3Z 
 ;;9002226.02101,"1804,7W09X3Z ",.02)
 ;;7W09X3Z 
 ;;9002226.02101,"1804,7W09X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W09X4Z ",.01)
 ;;7W09X4Z 
 ;;9002226.02101,"1804,7W09X4Z ",.02)
 ;;7W09X4Z 
 ;;9002226.02101,"1804,7W09X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W09X5Z ",.01)
 ;;7W09X5Z 
 ;;9002226.02101,"1804,7W09X5Z ",.02)
 ;;7W09X5Z 
 ;;9002226.02101,"1804,7W09X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W09X6Z ",.01)
 ;;7W09X6Z 
 ;;9002226.02101,"1804,7W09X6Z ",.02)
 ;;7W09X6Z 
 ;;9002226.02101,"1804,7W09X6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W09X7Z ",.01)
 ;;7W09X7Z 
 ;;9002226.02101,"1804,7W09X7Z ",.02)
 ;;7W09X7Z 
 ;;9002226.02101,"1804,7W09X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,7W09X8Z ",.01)
 ;;7W09X8Z 
 ;;9002226.02101,"1804,7W09X8Z ",.02)
 ;;7W09X8Z 
 ;;9002226.02101,"1804,7W09X8Z ",.03)
 ;;31