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

ATXD5T4.m

Go to the documentation of this file.
ATXD5T4 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 12, 2013;
 ;;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,"173,T38.0X2D ",.02)
 ;;T38.0X2D 
 ;;9002226.02101,"173,T38.0X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.0X2S ",.01)
 ;;T38.0X2S 
 ;;9002226.02101,"173,T38.0X2S ",.02)
 ;;T38.0X2S 
 ;;9002226.02101,"173,T38.0X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.1X2A ",.01)
 ;;T38.1X2A 
 ;;9002226.02101,"173,T38.1X2A ",.02)
 ;;T38.1X2A 
 ;;9002226.02101,"173,T38.1X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.1X2D ",.01)
 ;;T38.1X2D 
 ;;9002226.02101,"173,T38.1X2D ",.02)
 ;;T38.1X2D 
 ;;9002226.02101,"173,T38.1X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.1X2S ",.01)
 ;;T38.1X2S 
 ;;9002226.02101,"173,T38.1X2S ",.02)
 ;;T38.1X2S 
 ;;9002226.02101,"173,T38.1X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.2X2A ",.01)
 ;;T38.2X2A 
 ;;9002226.02101,"173,T38.2X2A ",.02)
 ;;T38.2X2A 
 ;;9002226.02101,"173,T38.2X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.2X2D ",.01)
 ;;T38.2X2D 
 ;;9002226.02101,"173,T38.2X2D ",.02)
 ;;T38.2X2D 
 ;;9002226.02101,"173,T38.2X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.2X2S ",.01)
 ;;T38.2X2S 
 ;;9002226.02101,"173,T38.2X2S ",.02)
 ;;T38.2X2S 
 ;;9002226.02101,"173,T38.2X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.3X2A ",.01)
 ;;T38.3X2A 
 ;;9002226.02101,"173,T38.3X2A ",.02)
 ;;T38.3X2A 
 ;;9002226.02101,"173,T38.3X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.3X2D ",.01)
 ;;T38.3X2D 
 ;;9002226.02101,"173,T38.3X2D ",.02)
 ;;T38.3X2D 
 ;;9002226.02101,"173,T38.3X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.3X2S ",.01)
 ;;T38.3X2S 
 ;;9002226.02101,"173,T38.3X2S ",.02)
 ;;T38.3X2S 
 ;;9002226.02101,"173,T38.3X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.4X2A ",.01)
 ;;T38.4X2A 
 ;;9002226.02101,"173,T38.4X2A ",.02)
 ;;T38.4X2A 
 ;;9002226.02101,"173,T38.4X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.4X2D ",.01)
 ;;T38.4X2D 
 ;;9002226.02101,"173,T38.4X2D ",.02)
 ;;T38.4X2D 
 ;;9002226.02101,"173,T38.4X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.4X2S ",.01)
 ;;T38.4X2S 
 ;;9002226.02101,"173,T38.4X2S ",.02)
 ;;T38.4X2S 
 ;;9002226.02101,"173,T38.4X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.5X2A ",.01)
 ;;T38.5X2A 
 ;;9002226.02101,"173,T38.5X2A ",.02)
 ;;T38.5X2A 
 ;;9002226.02101,"173,T38.5X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.5X2D ",.01)
 ;;T38.5X2D 
 ;;9002226.02101,"173,T38.5X2D ",.02)
 ;;T38.5X2D 
 ;;9002226.02101,"173,T38.5X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.5X2S ",.01)
 ;;T38.5X2S 
 ;;9002226.02101,"173,T38.5X2S ",.02)
 ;;T38.5X2S 
 ;;9002226.02101,"173,T38.5X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.6X2A ",.01)
 ;;T38.6X2A 
 ;;9002226.02101,"173,T38.6X2A ",.02)
 ;;T38.6X2A 
 ;;9002226.02101,"173,T38.6X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.6X2D ",.01)
 ;;T38.6X2D 
 ;;9002226.02101,"173,T38.6X2D ",.02)
 ;;T38.6X2D 
 ;;9002226.02101,"173,T38.6X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.6X2S ",.01)
 ;;T38.6X2S 
 ;;9002226.02101,"173,T38.6X2S ",.02)
 ;;T38.6X2S 
 ;;9002226.02101,"173,T38.6X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.7X2A ",.01)
 ;;T38.7X2A 
 ;;9002226.02101,"173,T38.7X2A ",.02)
 ;;T38.7X2A 
 ;;9002226.02101,"173,T38.7X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.7X2D ",.01)
 ;;T38.7X2D 
 ;;9002226.02101,"173,T38.7X2D ",.02)
 ;;T38.7X2D 
 ;;9002226.02101,"173,T38.7X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.7X2S ",.01)
 ;;T38.7X2S 
 ;;9002226.02101,"173,T38.7X2S ",.02)
 ;;T38.7X2S 
 ;;9002226.02101,"173,T38.7X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.802A ",.01)
 ;;T38.802A 
 ;;9002226.02101,"173,T38.802A ",.02)
 ;;T38.802A 
 ;;9002226.02101,"173,T38.802A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.802D ",.01)
 ;;T38.802D 
 ;;9002226.02101,"173,T38.802D ",.02)
 ;;T38.802D 
 ;;9002226.02101,"173,T38.802D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.802S ",.01)
 ;;T38.802S 
 ;;9002226.02101,"173,T38.802S ",.02)
 ;;T38.802S 
 ;;9002226.02101,"173,T38.802S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.812A ",.01)
 ;;T38.812A 
 ;;9002226.02101,"173,T38.812A ",.02)
 ;;T38.812A 
 ;;9002226.02101,"173,T38.812A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.812D ",.01)
 ;;T38.812D 
 ;;9002226.02101,"173,T38.812D ",.02)
 ;;T38.812D 
 ;;9002226.02101,"173,T38.812D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.812S ",.01)
 ;;T38.812S 
 ;;9002226.02101,"173,T38.812S ",.02)
 ;;T38.812S 
 ;;9002226.02101,"173,T38.812S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.892A ",.01)
 ;;T38.892A 
 ;;9002226.02101,"173,T38.892A ",.02)
 ;;T38.892A 
 ;;9002226.02101,"173,T38.892A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.892D ",.01)
 ;;T38.892D 
 ;;9002226.02101,"173,T38.892D ",.02)
 ;;T38.892D 
 ;;9002226.02101,"173,T38.892D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.892S ",.01)
 ;;T38.892S 
 ;;9002226.02101,"173,T38.892S ",.02)
 ;;T38.892S 
 ;;9002226.02101,"173,T38.892S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.902A ",.01)
 ;;T38.902A 
 ;;9002226.02101,"173,T38.902A ",.02)
 ;;T38.902A 
 ;;9002226.02101,"173,T38.902A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.902D ",.01)
 ;;T38.902D 
 ;;9002226.02101,"173,T38.902D ",.02)
 ;;T38.902D 
 ;;9002226.02101,"173,T38.902D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.902S ",.01)
 ;;T38.902S 
 ;;9002226.02101,"173,T38.902S ",.02)
 ;;T38.902S 
 ;;9002226.02101,"173,T38.902S ",.03)
 ;;30
 ;;9002226.02101,"173,T38.992A ",.01)
 ;;T38.992A 
 ;;9002226.02101,"173,T38.992A ",.02)
 ;;T38.992A 
 ;;9002226.02101,"173,T38.992A ",.03)
 ;;30
 ;;9002226.02101,"173,T38.992D ",.01)
 ;;T38.992D 
 ;;9002226.02101,"173,T38.992D ",.02)
 ;;T38.992D 
 ;;9002226.02101,"173,T38.992D ",.03)
 ;;30
 ;;9002226.02101,"173,T38.992S ",.01)
 ;;T38.992S 
 ;;9002226.02101,"173,T38.992S ",.02)
 ;;T38.992S 
 ;;9002226.02101,"173,T38.992S ",.03)
 ;;30
 ;;9002226.02101,"173,T39.012A ",.01)
 ;;T39.012A 
 ;;9002226.02101,"173,T39.012A ",.02)
 ;;T39.012A 
 ;;9002226.02101,"173,T39.012A ",.03)
 ;;30
 ;;9002226.02101,"173,T39.012D ",.01)
 ;;T39.012D 
 ;;9002226.02101,"173,T39.012D ",.02)
 ;;T39.012D 
 ;;9002226.02101,"173,T39.012D ",.03)
 ;;30
 ;;9002226.02101,"173,T39.012S ",.01)
 ;;T39.012S 
 ;;9002226.02101,"173,T39.012S ",.02)
 ;;T39.012S 
 ;;9002226.02101,"173,T39.012S ",.03)
 ;;30
 ;;9002226.02101,"173,T39.092A ",.01)
 ;;T39.092A 
 ;;9002226.02101,"173,T39.092A ",.02)
 ;;T39.092A 
 ;;9002226.02101,"173,T39.092A ",.03)
 ;;30
 ;;9002226.02101,"173,T39.092D ",.01)
 ;;T39.092D 
 ;;9002226.02101,"173,T39.092D ",.02)
 ;;T39.092D 
 ;;9002226.02101,"173,T39.092D ",.03)
 ;;30
 ;;9002226.02101,"173,T39.092S ",.01)
 ;;T39.092S 
 ;;9002226.02101,"173,T39.092S ",.02)
 ;;T39.092S 
 ;;9002226.02101,"173,T39.092S ",.03)
 ;;30
 ;;9002226.02101,"173,T39.1X2A ",.01)
 ;;T39.1X2A 
 ;;9002226.02101,"173,T39.1X2A ",.02)
 ;;T39.1X2A 
 ;;9002226.02101,"173,T39.1X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T39.1X2D ",.01)
 ;;T39.1X2D 
 ;;9002226.02101,"173,T39.1X2D ",.02)
 ;;T39.1X2D 
 ;;9002226.02101,"173,T39.1X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T39.1X2S ",.01)
 ;;T39.1X2S 
 ;;9002226.02101,"173,T39.1X2S ",.02)
 ;;T39.1X2S 
 ;;9002226.02101,"173,T39.1X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T39.2X2A ",.01)
 ;;T39.2X2A 
 ;;9002226.02101,"173,T39.2X2A ",.02)
 ;;T39.2X2A 
 ;;9002226.02101,"173,T39.2X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T39.2X2D ",.01)
 ;;T39.2X2D 
 ;;9002226.02101,"173,T39.2X2D ",.02)
 ;;T39.2X2D 
 ;;9002226.02101,"173,T39.2X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T39.2X2S ",.01)
 ;;T39.2X2S 
 ;;9002226.02101,"173,T39.2X2S ",.02)
 ;;T39.2X2S 
 ;;9002226.02101,"173,T39.2X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T39.312A ",.01)
 ;;T39.312A 
 ;;9002226.02101,"173,T39.312A ",.02)
 ;;T39.312A 
 ;;9002226.02101,"173,T39.312A ",.03)
 ;;30
 ;;9002226.02101,"173,T39.312D ",.01)
 ;;T39.312D 
 ;;9002226.02101,"173,T39.312D ",.02)
 ;;T39.312D 
 ;;9002226.02101,"173,T39.312D ",.03)
 ;;30
 ;;9002226.02101,"173,T39.312S ",.01)
 ;;T39.312S 
 ;;9002226.02101,"173,T39.312S ",.02)
 ;;T39.312S 
 ;;9002226.02101,"173,T39.312S ",.03)
 ;;30
 ;;9002226.02101,"173,T39.392A ",.01)
 ;;T39.392A 
 ;;9002226.02101,"173,T39.392A ",.02)
 ;;T39.392A 
 ;;9002226.02101,"173,T39.392A ",.03)
 ;;30
 ;;9002226.02101,"173,T39.392D ",.01)
 ;;T39.392D 
 ;;9002226.02101,"173,T39.392D ",.02)
 ;;T39.392D 
 ;;9002226.02101,"173,T39.392D ",.03)
 ;;30
 ;;9002226.02101,"173,T39.392S ",.01)
 ;;T39.392S 
 ;;9002226.02101,"173,T39.392S ",.02)
 ;;T39.392S 
 ;;9002226.02101,"173,T39.392S ",.03)
 ;;30
 ;;9002226.02101,"173,T39.4X2A ",.01)
 ;;T39.4X2A 
 ;;9002226.02101,"173,T39.4X2A ",.02)
 ;;T39.4X2A 
 ;;9002226.02101,"173,T39.4X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T39.4X2D ",.01)
 ;;T39.4X2D 
 ;;9002226.02101,"173,T39.4X2D ",.02)
 ;;T39.4X2D 
 ;;9002226.02101,"173,T39.4X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T39.4X2S ",.01)
 ;;T39.4X2S 
 ;;9002226.02101,"173,T39.4X2S ",.02)
 ;;T39.4X2S 
 ;;9002226.02101,"173,T39.4X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T39.8X2A ",.01)
 ;;T39.8X2A 
 ;;9002226.02101,"173,T39.8X2A ",.02)
 ;;T39.8X2A 
 ;;9002226.02101,"173,T39.8X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T39.8X2D ",.01)
 ;;T39.8X2D 
 ;;9002226.02101,"173,T39.8X2D ",.02)
 ;;T39.8X2D 
 ;;9002226.02101,"173,T39.8X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T39.8X2S ",.01)
 ;;T39.8X2S 
 ;;9002226.02101,"173,T39.8X2S ",.02)
 ;;T39.8X2S 
 ;;9002226.02101,"173,T39.8X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T39.92XA ",.01)
 ;;T39.92XA 
 ;;9002226.02101,"173,T39.92XA ",.02)
 ;;T39.92XA 
 ;;9002226.02101,"173,T39.92XA ",.03)
 ;;30
 ;;9002226.02101,"173,T39.92XD ",.01)
 ;;T39.92XD 
 ;;9002226.02101,"173,T39.92XD ",.02)
 ;;T39.92XD 
 ;;9002226.02101,"173,T39.92XD ",.03)
 ;;30
 ;;9002226.02101,"173,T39.92XS ",.01)
 ;;T39.92XS 
 ;;9002226.02101,"173,T39.92XS ",.02)
 ;;T39.92XS 
 ;;9002226.02101,"173,T39.92XS ",.03)
 ;;30
 ;;9002226.02101,"173,T40.0X2A ",.01)
 ;;T40.0X2A 
 ;;9002226.02101,"173,T40.0X2A ",.02)
 ;;T40.0X2A 
 ;;9002226.02101,"173,T40.0X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T40.0X2D ",.01)
 ;;T40.0X2D 
 ;;9002226.02101,"173,T40.0X2D ",.02)
 ;;T40.0X2D 
 ;;9002226.02101,"173,T40.0X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T40.0X2S ",.01)
 ;;T40.0X2S 
 ;;9002226.02101,"173,T40.0X2S ",.02)
 ;;T40.0X2S 
 ;;9002226.02101,"173,T40.0X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T40.1X2A ",.01)
 ;;T40.1X2A 
 ;;9002226.02101,"173,T40.1X2A ",.02)
 ;;T40.1X2A 
 ;;9002226.02101,"173,T40.1X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T40.1X2D ",.01)
 ;;T40.1X2D 
 ;;9002226.02101,"173,T40.1X2D ",.02)
 ;;T40.1X2D 
 ;;9002226.02101,"173,T40.1X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T40.1X2S ",.01)
 ;;T40.1X2S 
 ;;9002226.02101,"173,T40.1X2S ",.02)
 ;;T40.1X2S 
 ;;9002226.02101,"173,T40.1X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T40.2X2A ",.01)
 ;;T40.2X2A 
 ;;9002226.02101,"173,T40.2X2A ",.02)
 ;;T40.2X2A 
 ;;9002226.02101,"173,T40.2X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T40.2X2D ",.01)
 ;;T40.2X2D 
 ;;9002226.02101,"173,T40.2X2D ",.02)
 ;;T40.2X2D 
 ;;9002226.02101,"173,T40.2X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T40.2X2S ",.01)
 ;;T40.2X2S 
 ;;9002226.02101,"173,T40.2X2S ",.02)
 ;;T40.2X2S 
 ;;9002226.02101,"173,T40.2X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T40.3X2A ",.01)
 ;;T40.3X2A 
 ;;9002226.02101,"173,T40.3X2A ",.02)
 ;;T40.3X2A 
 ;;9002226.02101,"173,T40.3X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T40.3X2D ",.01)
 ;;T40.3X2D 
 ;;9002226.02101,"173,T40.3X2D ",.02)
 ;;T40.3X2D 
 ;;9002226.02101,"173,T40.3X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T40.3X2S ",.01)
 ;;T40.3X2S 
 ;;9002226.02101,"173,T40.3X2S ",.02)
 ;;T40.3X2S 
 ;;9002226.02101,"173,T40.3X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T40.4X2A ",.01)
 ;;T40.4X2A 
 ;;9002226.02101,"173,T40.4X2A ",.02)
 ;;T40.4X2A 
 ;;9002226.02101,"173,T40.4X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T40.4X2D ",.01)
 ;;T40.4X2D 
 ;;9002226.02101,"173,T40.4X2D ",.02)
 ;;T40.4X2D 
 ;;9002226.02101,"173,T40.4X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T40.4X2S ",.01)
 ;;T40.4X2S 
 ;;9002226.02101,"173,T40.4X2S ",.02)
 ;;T40.4X2S 
 ;;9002226.02101,"173,T40.4X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T40.5X2A ",.01)
 ;;T40.5X2A 
 ;;9002226.02101,"173,T40.5X2A ",.02)
 ;;T40.5X2A 
 ;;9002226.02101,"173,T40.5X2A ",.03)
 ;;30
 ;;9002226.02101,"173,T40.5X2D ",.01)
 ;;T40.5X2D 
 ;;9002226.02101,"173,T40.5X2D ",.02)
 ;;T40.5X2D 
 ;;9002226.02101,"173,T40.5X2D ",.03)
 ;;30
 ;;9002226.02101,"173,T40.5X2S ",.01)
 ;;T40.5X2S 
 ;;9002226.02101,"173,T40.5X2S ",.02)
 ;;T40.5X2S 
 ;;9002226.02101,"173,T40.5X2S ",.03)
 ;;30
 ;;9002226.02101,"173,T40.602A ",.01)
 ;;T40.602A 
 ;;9002226.02101,"173,T40.602A ",.02)
 ;;T40.602A 
 ;;9002226.02101,"173,T40.602A ",.03)
 ;;30
 ;;9002226.02101,"173,T40.602D ",.01)
 ;;T40.602D 
 ;;9002226.02101,"173,T40.602D ",.02)
 ;;T40.602D 
 ;;9002226.02101,"173,T40.602D ",.03)
 ;;30
 ;;9002226.02101,"173,T40.602S ",.01)
 ;;T40.602S 
 ;;9002226.02101,"173,T40.602S ",.02)
 ;;T40.602S 
 ;;9002226.02101,"173,T40.602S ",.03)
 ;;30
 ;;9002226.02101,"173,T40.692A ",.01)
 ;;T40.692A 
 ;;9002226.02101,"173,T40.692A ",.02)
 ;;T40.692A 
 ;;9002226.02101,"173,T40.692A ",.03)
 ;;30
 ;;9002226.02101,"173,T40.692D ",.01)
 ;;T40.692D 
 ;;9002226.02101,"173,T40.692D ",.02)
 ;;T40.692D 
 ;;9002226.02101,"173,T40.692D ",.03)
 ;;30
 ;;9002226.02101,"173,T40.692S ",.01)
 ;;T40.692S 
 ;;9002226.02101,"173,T40.692S ",.02)
 ;;T40.692S 
 ;;9002226.02101,"173,T40.692S ",.03)
 ;;30
 ;;9002226.02101,"173,T40.7X2A ",.01)
 ;;T40.7X2A 
 ;;9002226.02101,"173,T40.7X2A ",.02)
 ;;T40.7X2A 
 ;;9002226.02101,"173,T40.7X2A ",.03)
 ;;30