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

ATXD5G4.m

Go to the documentation of this file.
ATXD5G4 ;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,"160,T37.5X3S ",.01)
 ;;T37.5X3S 
 ;;9002226.02101,"160,T37.5X3S ",.02)
 ;;T37.5X3S 
 ;;9002226.02101,"160,T37.5X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T37.8X3A ",.01)
 ;;T37.8X3A 
 ;;9002226.02101,"160,T37.8X3A ",.02)
 ;;T37.8X3A 
 ;;9002226.02101,"160,T37.8X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T37.8X3D ",.01)
 ;;T37.8X3D 
 ;;9002226.02101,"160,T37.8X3D ",.02)
 ;;T37.8X3D 
 ;;9002226.02101,"160,T37.8X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T37.8X3S ",.01)
 ;;T37.8X3S 
 ;;9002226.02101,"160,T37.8X3S ",.02)
 ;;T37.8X3S 
 ;;9002226.02101,"160,T37.8X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T37.93XA ",.01)
 ;;T37.93XA 
 ;;9002226.02101,"160,T37.93XA ",.02)
 ;;T37.93XA 
 ;;9002226.02101,"160,T37.93XA ",.03)
 ;;30
 ;;9002226.02101,"160,T37.93XD ",.01)
 ;;T37.93XD 
 ;;9002226.02101,"160,T37.93XD ",.02)
 ;;T37.93XD 
 ;;9002226.02101,"160,T37.93XD ",.03)
 ;;30
 ;;9002226.02101,"160,T37.93XS ",.01)
 ;;T37.93XS 
 ;;9002226.02101,"160,T37.93XS ",.02)
 ;;T37.93XS 
 ;;9002226.02101,"160,T37.93XS ",.03)
 ;;30
 ;;9002226.02101,"160,T38.0X3A ",.01)
 ;;T38.0X3A 
 ;;9002226.02101,"160,T38.0X3A ",.02)
 ;;T38.0X3A 
 ;;9002226.02101,"160,T38.0X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.0X3D ",.01)
 ;;T38.0X3D 
 ;;9002226.02101,"160,T38.0X3D ",.02)
 ;;T38.0X3D 
 ;;9002226.02101,"160,T38.0X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.0X3S ",.01)
 ;;T38.0X3S 
 ;;9002226.02101,"160,T38.0X3S ",.02)
 ;;T38.0X3S 
 ;;9002226.02101,"160,T38.0X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.1X3A ",.01)
 ;;T38.1X3A 
 ;;9002226.02101,"160,T38.1X3A ",.02)
 ;;T38.1X3A 
 ;;9002226.02101,"160,T38.1X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.1X3D ",.01)
 ;;T38.1X3D 
 ;;9002226.02101,"160,T38.1X3D ",.02)
 ;;T38.1X3D 
 ;;9002226.02101,"160,T38.1X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.1X3S ",.01)
 ;;T38.1X3S 
 ;;9002226.02101,"160,T38.1X3S ",.02)
 ;;T38.1X3S 
 ;;9002226.02101,"160,T38.1X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.2X3A ",.01)
 ;;T38.2X3A 
 ;;9002226.02101,"160,T38.2X3A ",.02)
 ;;T38.2X3A 
 ;;9002226.02101,"160,T38.2X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.2X3D ",.01)
 ;;T38.2X3D 
 ;;9002226.02101,"160,T38.2X3D ",.02)
 ;;T38.2X3D 
 ;;9002226.02101,"160,T38.2X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.2X3S ",.01)
 ;;T38.2X3S 
 ;;9002226.02101,"160,T38.2X3S ",.02)
 ;;T38.2X3S 
 ;;9002226.02101,"160,T38.2X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.3X3A ",.01)
 ;;T38.3X3A 
 ;;9002226.02101,"160,T38.3X3A ",.02)
 ;;T38.3X3A 
 ;;9002226.02101,"160,T38.3X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.3X3D ",.01)
 ;;T38.3X3D 
 ;;9002226.02101,"160,T38.3X3D ",.02)
 ;;T38.3X3D 
 ;;9002226.02101,"160,T38.3X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.3X3S ",.01)
 ;;T38.3X3S 
 ;;9002226.02101,"160,T38.3X3S ",.02)
 ;;T38.3X3S 
 ;;9002226.02101,"160,T38.3X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.4X3A ",.01)
 ;;T38.4X3A 
 ;;9002226.02101,"160,T38.4X3A ",.02)
 ;;T38.4X3A 
 ;;9002226.02101,"160,T38.4X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.4X3D ",.01)
 ;;T38.4X3D 
 ;;9002226.02101,"160,T38.4X3D ",.02)
 ;;T38.4X3D 
 ;;9002226.02101,"160,T38.4X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.4X3S ",.01)
 ;;T38.4X3S 
 ;;9002226.02101,"160,T38.4X3S ",.02)
 ;;T38.4X3S 
 ;;9002226.02101,"160,T38.4X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.5X3A ",.01)
 ;;T38.5X3A 
 ;;9002226.02101,"160,T38.5X3A ",.02)
 ;;T38.5X3A 
 ;;9002226.02101,"160,T38.5X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.5X3D ",.01)
 ;;T38.5X3D 
 ;;9002226.02101,"160,T38.5X3D ",.02)
 ;;T38.5X3D 
 ;;9002226.02101,"160,T38.5X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.5X3S ",.01)
 ;;T38.5X3S 
 ;;9002226.02101,"160,T38.5X3S ",.02)
 ;;T38.5X3S 
 ;;9002226.02101,"160,T38.5X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.6X3A ",.01)
 ;;T38.6X3A 
 ;;9002226.02101,"160,T38.6X3A ",.02)
 ;;T38.6X3A 
 ;;9002226.02101,"160,T38.6X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.6X3D ",.01)
 ;;T38.6X3D 
 ;;9002226.02101,"160,T38.6X3D ",.02)
 ;;T38.6X3D 
 ;;9002226.02101,"160,T38.6X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.6X3S ",.01)
 ;;T38.6X3S 
 ;;9002226.02101,"160,T38.6X3S ",.02)
 ;;T38.6X3S 
 ;;9002226.02101,"160,T38.6X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.7X3A ",.01)
 ;;T38.7X3A 
 ;;9002226.02101,"160,T38.7X3A ",.02)
 ;;T38.7X3A 
 ;;9002226.02101,"160,T38.7X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.7X3D ",.01)
 ;;T38.7X3D 
 ;;9002226.02101,"160,T38.7X3D ",.02)
 ;;T38.7X3D 
 ;;9002226.02101,"160,T38.7X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.7X3S ",.01)
 ;;T38.7X3S 
 ;;9002226.02101,"160,T38.7X3S ",.02)
 ;;T38.7X3S 
 ;;9002226.02101,"160,T38.7X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.803A ",.01)
 ;;T38.803A 
 ;;9002226.02101,"160,T38.803A ",.02)
 ;;T38.803A 
 ;;9002226.02101,"160,T38.803A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.803D ",.01)
 ;;T38.803D 
 ;;9002226.02101,"160,T38.803D ",.02)
 ;;T38.803D 
 ;;9002226.02101,"160,T38.803D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.803S ",.01)
 ;;T38.803S 
 ;;9002226.02101,"160,T38.803S ",.02)
 ;;T38.803S 
 ;;9002226.02101,"160,T38.803S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.813A ",.01)
 ;;T38.813A 
 ;;9002226.02101,"160,T38.813A ",.02)
 ;;T38.813A 
 ;;9002226.02101,"160,T38.813A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.813D ",.01)
 ;;T38.813D 
 ;;9002226.02101,"160,T38.813D ",.02)
 ;;T38.813D 
 ;;9002226.02101,"160,T38.813D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.813S ",.01)
 ;;T38.813S 
 ;;9002226.02101,"160,T38.813S ",.02)
 ;;T38.813S 
 ;;9002226.02101,"160,T38.813S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.893A ",.01)
 ;;T38.893A 
 ;;9002226.02101,"160,T38.893A ",.02)
 ;;T38.893A 
 ;;9002226.02101,"160,T38.893A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.893D ",.01)
 ;;T38.893D 
 ;;9002226.02101,"160,T38.893D ",.02)
 ;;T38.893D 
 ;;9002226.02101,"160,T38.893D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.893S ",.01)
 ;;T38.893S 
 ;;9002226.02101,"160,T38.893S ",.02)
 ;;T38.893S 
 ;;9002226.02101,"160,T38.893S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.903A ",.01)
 ;;T38.903A 
 ;;9002226.02101,"160,T38.903A ",.02)
 ;;T38.903A 
 ;;9002226.02101,"160,T38.903A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.903D ",.01)
 ;;T38.903D 
 ;;9002226.02101,"160,T38.903D ",.02)
 ;;T38.903D 
 ;;9002226.02101,"160,T38.903D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.903S ",.01)
 ;;T38.903S 
 ;;9002226.02101,"160,T38.903S ",.02)
 ;;T38.903S 
 ;;9002226.02101,"160,T38.903S ",.03)
 ;;30
 ;;9002226.02101,"160,T38.993A ",.01)
 ;;T38.993A 
 ;;9002226.02101,"160,T38.993A ",.02)
 ;;T38.993A 
 ;;9002226.02101,"160,T38.993A ",.03)
 ;;30
 ;;9002226.02101,"160,T38.993D ",.01)
 ;;T38.993D 
 ;;9002226.02101,"160,T38.993D ",.02)
 ;;T38.993D 
 ;;9002226.02101,"160,T38.993D ",.03)
 ;;30
 ;;9002226.02101,"160,T38.993S ",.01)
 ;;T38.993S 
 ;;9002226.02101,"160,T38.993S ",.02)
 ;;T38.993S 
 ;;9002226.02101,"160,T38.993S ",.03)
 ;;30
 ;;9002226.02101,"160,T39.013A ",.01)
 ;;T39.013A 
 ;;9002226.02101,"160,T39.013A ",.02)
 ;;T39.013A 
 ;;9002226.02101,"160,T39.013A ",.03)
 ;;30
 ;;9002226.02101,"160,T39.013D ",.01)
 ;;T39.013D 
 ;;9002226.02101,"160,T39.013D ",.02)
 ;;T39.013D 
 ;;9002226.02101,"160,T39.013D ",.03)
 ;;30
 ;;9002226.02101,"160,T39.013S ",.01)
 ;;T39.013S 
 ;;9002226.02101,"160,T39.013S ",.02)
 ;;T39.013S 
 ;;9002226.02101,"160,T39.013S ",.03)
 ;;30
 ;;9002226.02101,"160,T39.093A ",.01)
 ;;T39.093A 
 ;;9002226.02101,"160,T39.093A ",.02)
 ;;T39.093A 
 ;;9002226.02101,"160,T39.093A ",.03)
 ;;30
 ;;9002226.02101,"160,T39.093D ",.01)
 ;;T39.093D 
 ;;9002226.02101,"160,T39.093D ",.02)
 ;;T39.093D 
 ;;9002226.02101,"160,T39.093D ",.03)
 ;;30
 ;;9002226.02101,"160,T39.093S ",.01)
 ;;T39.093S 
 ;;9002226.02101,"160,T39.093S ",.02)
 ;;T39.093S 
 ;;9002226.02101,"160,T39.093S ",.03)
 ;;30
 ;;9002226.02101,"160,T39.1X3A ",.01)
 ;;T39.1X3A 
 ;;9002226.02101,"160,T39.1X3A ",.02)
 ;;T39.1X3A 
 ;;9002226.02101,"160,T39.1X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T39.1X3D ",.01)
 ;;T39.1X3D 
 ;;9002226.02101,"160,T39.1X3D ",.02)
 ;;T39.1X3D 
 ;;9002226.02101,"160,T39.1X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T39.1X3S ",.01)
 ;;T39.1X3S 
 ;;9002226.02101,"160,T39.1X3S ",.02)
 ;;T39.1X3S 
 ;;9002226.02101,"160,T39.1X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T39.2X3A ",.01)
 ;;T39.2X3A 
 ;;9002226.02101,"160,T39.2X3A ",.02)
 ;;T39.2X3A 
 ;;9002226.02101,"160,T39.2X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T39.2X3D ",.01)
 ;;T39.2X3D 
 ;;9002226.02101,"160,T39.2X3D ",.02)
 ;;T39.2X3D 
 ;;9002226.02101,"160,T39.2X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T39.2X3S ",.01)
 ;;T39.2X3S 
 ;;9002226.02101,"160,T39.2X3S ",.02)
 ;;T39.2X3S 
 ;;9002226.02101,"160,T39.2X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T39.313A ",.01)
 ;;T39.313A 
 ;;9002226.02101,"160,T39.313A ",.02)
 ;;T39.313A 
 ;;9002226.02101,"160,T39.313A ",.03)
 ;;30
 ;;9002226.02101,"160,T39.313D ",.01)
 ;;T39.313D 
 ;;9002226.02101,"160,T39.313D ",.02)
 ;;T39.313D 
 ;;9002226.02101,"160,T39.313D ",.03)
 ;;30
 ;;9002226.02101,"160,T39.313S ",.01)
 ;;T39.313S 
 ;;9002226.02101,"160,T39.313S ",.02)
 ;;T39.313S 
 ;;9002226.02101,"160,T39.313S ",.03)
 ;;30
 ;;9002226.02101,"160,T39.393A ",.01)
 ;;T39.393A 
 ;;9002226.02101,"160,T39.393A ",.02)
 ;;T39.393A 
 ;;9002226.02101,"160,T39.393A ",.03)
 ;;30
 ;;9002226.02101,"160,T39.393D ",.01)
 ;;T39.393D 
 ;;9002226.02101,"160,T39.393D ",.02)
 ;;T39.393D 
 ;;9002226.02101,"160,T39.393D ",.03)
 ;;30
 ;;9002226.02101,"160,T39.393S ",.01)
 ;;T39.393S 
 ;;9002226.02101,"160,T39.393S ",.02)
 ;;T39.393S 
 ;;9002226.02101,"160,T39.393S ",.03)
 ;;30
 ;;9002226.02101,"160,T39.4X3A ",.01)
 ;;T39.4X3A 
 ;;9002226.02101,"160,T39.4X3A ",.02)
 ;;T39.4X3A 
 ;;9002226.02101,"160,T39.4X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T39.4X3D ",.01)
 ;;T39.4X3D 
 ;;9002226.02101,"160,T39.4X3D ",.02)
 ;;T39.4X3D 
 ;;9002226.02101,"160,T39.4X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T39.4X3S ",.01)
 ;;T39.4X3S 
 ;;9002226.02101,"160,T39.4X3S ",.02)
 ;;T39.4X3S 
 ;;9002226.02101,"160,T39.4X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T39.8X3A ",.01)
 ;;T39.8X3A 
 ;;9002226.02101,"160,T39.8X3A ",.02)
 ;;T39.8X3A 
 ;;9002226.02101,"160,T39.8X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T39.8X3D ",.01)
 ;;T39.8X3D 
 ;;9002226.02101,"160,T39.8X3D ",.02)
 ;;T39.8X3D 
 ;;9002226.02101,"160,T39.8X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T39.8X3S ",.01)
 ;;T39.8X3S 
 ;;9002226.02101,"160,T39.8X3S ",.02)
 ;;T39.8X3S 
 ;;9002226.02101,"160,T39.8X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T39.93XA ",.01)
 ;;T39.93XA 
 ;;9002226.02101,"160,T39.93XA ",.02)
 ;;T39.93XA 
 ;;9002226.02101,"160,T39.93XA ",.03)
 ;;30
 ;;9002226.02101,"160,T39.93XD ",.01)
 ;;T39.93XD 
 ;;9002226.02101,"160,T39.93XD ",.02)
 ;;T39.93XD 
 ;;9002226.02101,"160,T39.93XD ",.03)
 ;;30
 ;;9002226.02101,"160,T39.93XS ",.01)
 ;;T39.93XS 
 ;;9002226.02101,"160,T39.93XS ",.02)
 ;;T39.93XS 
 ;;9002226.02101,"160,T39.93XS ",.03)
 ;;30
 ;;9002226.02101,"160,T40.0X3A ",.01)
 ;;T40.0X3A 
 ;;9002226.02101,"160,T40.0X3A ",.02)
 ;;T40.0X3A 
 ;;9002226.02101,"160,T40.0X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T40.0X3D ",.01)
 ;;T40.0X3D 
 ;;9002226.02101,"160,T40.0X3D ",.02)
 ;;T40.0X3D 
 ;;9002226.02101,"160,T40.0X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T40.0X3S ",.01)
 ;;T40.0X3S 
 ;;9002226.02101,"160,T40.0X3S ",.02)
 ;;T40.0X3S 
 ;;9002226.02101,"160,T40.0X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T40.1X3A ",.01)
 ;;T40.1X3A 
 ;;9002226.02101,"160,T40.1X3A ",.02)
 ;;T40.1X3A 
 ;;9002226.02101,"160,T40.1X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T40.1X3D ",.01)
 ;;T40.1X3D 
 ;;9002226.02101,"160,T40.1X3D ",.02)
 ;;T40.1X3D 
 ;;9002226.02101,"160,T40.1X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T40.1X3S ",.01)
 ;;T40.1X3S 
 ;;9002226.02101,"160,T40.1X3S ",.02)
 ;;T40.1X3S 
 ;;9002226.02101,"160,T40.1X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T40.2X3A ",.01)
 ;;T40.2X3A 
 ;;9002226.02101,"160,T40.2X3A ",.02)
 ;;T40.2X3A 
 ;;9002226.02101,"160,T40.2X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T40.2X3D ",.01)
 ;;T40.2X3D 
 ;;9002226.02101,"160,T40.2X3D ",.02)
 ;;T40.2X3D 
 ;;9002226.02101,"160,T40.2X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T40.2X3S ",.01)
 ;;T40.2X3S 
 ;;9002226.02101,"160,T40.2X3S ",.02)
 ;;T40.2X3S 
 ;;9002226.02101,"160,T40.2X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T40.3X3A ",.01)
 ;;T40.3X3A 
 ;;9002226.02101,"160,T40.3X3A ",.02)
 ;;T40.3X3A 
 ;;9002226.02101,"160,T40.3X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T40.3X3D ",.01)
 ;;T40.3X3D 
 ;;9002226.02101,"160,T40.3X3D ",.02)
 ;;T40.3X3D 
 ;;9002226.02101,"160,T40.3X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T40.3X3S ",.01)
 ;;T40.3X3S 
 ;;9002226.02101,"160,T40.3X3S ",.02)
 ;;T40.3X3S 
 ;;9002226.02101,"160,T40.3X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T40.4X3A ",.01)
 ;;T40.4X3A 
 ;;9002226.02101,"160,T40.4X3A ",.02)
 ;;T40.4X3A 
 ;;9002226.02101,"160,T40.4X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T40.4X3D ",.01)
 ;;T40.4X3D 
 ;;9002226.02101,"160,T40.4X3D ",.02)
 ;;T40.4X3D 
 ;;9002226.02101,"160,T40.4X3D ",.03)
 ;;30
 ;;9002226.02101,"160,T40.4X3S ",.01)
 ;;T40.4X3S 
 ;;9002226.02101,"160,T40.4X3S ",.02)
 ;;T40.4X3S 
 ;;9002226.02101,"160,T40.4X3S ",.03)
 ;;30
 ;;9002226.02101,"160,T40.5X3A ",.01)
 ;;T40.5X3A 
 ;;9002226.02101,"160,T40.5X3A ",.02)
 ;;T40.5X3A 
 ;;9002226.02101,"160,T40.5X3A ",.03)
 ;;30
 ;;9002226.02101,"160,T40.5X3D ",.01)
 ;;T40.5X3D 
 ;;9002226.02101,"160,T40.5X3D ",.02)
 ;;T40.5X3D