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

ATXD5Q5.m

Go to the documentation of this file.
ATXD5Q5 ;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,"170,T41.5X1A ",.02)
 ;;T41.5X1A 
 ;;9002226.02101,"170,T41.5X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T41.5X1D ",.01)
 ;;T41.5X1D 
 ;;9002226.02101,"170,T41.5X1D ",.02)
 ;;T41.5X1D 
 ;;9002226.02101,"170,T41.5X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T41.5X1S ",.01)
 ;;T41.5X1S 
 ;;9002226.02101,"170,T41.5X1S ",.02)
 ;;T41.5X1S 
 ;;9002226.02101,"170,T41.5X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T42.0X1A ",.01)
 ;;T42.0X1A 
 ;;9002226.02101,"170,T42.0X1A ",.02)
 ;;T42.0X1A 
 ;;9002226.02101,"170,T42.0X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T42.0X1D ",.01)
 ;;T42.0X1D 
 ;;9002226.02101,"170,T42.0X1D ",.02)
 ;;T42.0X1D 
 ;;9002226.02101,"170,T42.0X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T42.0X1S ",.01)
 ;;T42.0X1S 
 ;;9002226.02101,"170,T42.0X1S ",.02)
 ;;T42.0X1S 
 ;;9002226.02101,"170,T42.0X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T42.1X1A ",.01)
 ;;T42.1X1A 
 ;;9002226.02101,"170,T42.1X1A ",.02)
 ;;T42.1X1A 
 ;;9002226.02101,"170,T42.1X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T42.1X1D ",.01)
 ;;T42.1X1D 
 ;;9002226.02101,"170,T42.1X1D ",.02)
 ;;T42.1X1D 
 ;;9002226.02101,"170,T42.1X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T42.1X1S ",.01)
 ;;T42.1X1S 
 ;;9002226.02101,"170,T42.1X1S ",.02)
 ;;T42.1X1S 
 ;;9002226.02101,"170,T42.1X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T42.2X1A ",.01)
 ;;T42.2X1A 
 ;;9002226.02101,"170,T42.2X1A ",.02)
 ;;T42.2X1A 
 ;;9002226.02101,"170,T42.2X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T42.2X1D ",.01)
 ;;T42.2X1D 
 ;;9002226.02101,"170,T42.2X1D ",.02)
 ;;T42.2X1D 
 ;;9002226.02101,"170,T42.2X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T42.2X1S ",.01)
 ;;T42.2X1S 
 ;;9002226.02101,"170,T42.2X1S ",.02)
 ;;T42.2X1S 
 ;;9002226.02101,"170,T42.2X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T42.3X1A ",.01)
 ;;T42.3X1A 
 ;;9002226.02101,"170,T42.3X1A ",.02)
 ;;T42.3X1A 
 ;;9002226.02101,"170,T42.3X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T42.3X1D ",.01)
 ;;T42.3X1D 
 ;;9002226.02101,"170,T42.3X1D ",.02)
 ;;T42.3X1D 
 ;;9002226.02101,"170,T42.3X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T42.3X1S ",.01)
 ;;T42.3X1S 
 ;;9002226.02101,"170,T42.3X1S ",.02)
 ;;T42.3X1S 
 ;;9002226.02101,"170,T42.3X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T42.4X1A ",.01)
 ;;T42.4X1A 
 ;;9002226.02101,"170,T42.4X1A ",.02)
 ;;T42.4X1A 
 ;;9002226.02101,"170,T42.4X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T42.4X1D ",.01)
 ;;T42.4X1D 
 ;;9002226.02101,"170,T42.4X1D ",.02)
 ;;T42.4X1D 
 ;;9002226.02101,"170,T42.4X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T42.4X1S ",.01)
 ;;T42.4X1S 
 ;;9002226.02101,"170,T42.4X1S ",.02)
 ;;T42.4X1S 
 ;;9002226.02101,"170,T42.4X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T42.5X1A ",.01)
 ;;T42.5X1A 
 ;;9002226.02101,"170,T42.5X1A ",.02)
 ;;T42.5X1A 
 ;;9002226.02101,"170,T42.5X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T42.5X1D ",.01)
 ;;T42.5X1D 
 ;;9002226.02101,"170,T42.5X1D ",.02)
 ;;T42.5X1D 
 ;;9002226.02101,"170,T42.5X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T42.5X1S ",.01)
 ;;T42.5X1S 
 ;;9002226.02101,"170,T42.5X1S ",.02)
 ;;T42.5X1S 
 ;;9002226.02101,"170,T42.5X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T42.6X1A ",.01)
 ;;T42.6X1A 
 ;;9002226.02101,"170,T42.6X1A ",.02)
 ;;T42.6X1A 
 ;;9002226.02101,"170,T42.6X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T42.6X1D ",.01)
 ;;T42.6X1D 
 ;;9002226.02101,"170,T42.6X1D ",.02)
 ;;T42.6X1D 
 ;;9002226.02101,"170,T42.6X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T42.6X1S ",.01)
 ;;T42.6X1S 
 ;;9002226.02101,"170,T42.6X1S ",.02)
 ;;T42.6X1S 
 ;;9002226.02101,"170,T42.6X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T42.71XA ",.01)
 ;;T42.71XA 
 ;;9002226.02101,"170,T42.71XA ",.02)
 ;;T42.71XA 
 ;;9002226.02101,"170,T42.71XA ",.03)
 ;;30
 ;;9002226.02101,"170,T42.71XD ",.01)
 ;;T42.71XD 
 ;;9002226.02101,"170,T42.71XD ",.02)
 ;;T42.71XD 
 ;;9002226.02101,"170,T42.71XD ",.03)
 ;;30
 ;;9002226.02101,"170,T42.71XS ",.01)
 ;;T42.71XS 
 ;;9002226.02101,"170,T42.71XS ",.02)
 ;;T42.71XS 
 ;;9002226.02101,"170,T42.71XS ",.03)
 ;;30
 ;;9002226.02101,"170,T42.8X1A ",.01)
 ;;T42.8X1A 
 ;;9002226.02101,"170,T42.8X1A ",.02)
 ;;T42.8X1A 
 ;;9002226.02101,"170,T42.8X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T42.8X1D ",.01)
 ;;T42.8X1D 
 ;;9002226.02101,"170,T42.8X1D ",.02)
 ;;T42.8X1D 
 ;;9002226.02101,"170,T42.8X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T42.8X1S ",.01)
 ;;T42.8X1S 
 ;;9002226.02101,"170,T42.8X1S ",.02)
 ;;T42.8X1S 
 ;;9002226.02101,"170,T42.8X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.011A ",.01)
 ;;T43.011A 
 ;;9002226.02101,"170,T43.011A ",.02)
 ;;T43.011A 
 ;;9002226.02101,"170,T43.011A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.011D ",.01)
 ;;T43.011D 
 ;;9002226.02101,"170,T43.011D ",.02)
 ;;T43.011D 
 ;;9002226.02101,"170,T43.011D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.011S ",.01)
 ;;T43.011S 
 ;;9002226.02101,"170,T43.011S ",.02)
 ;;T43.011S 
 ;;9002226.02101,"170,T43.011S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.021A ",.01)
 ;;T43.021A 
 ;;9002226.02101,"170,T43.021A ",.02)
 ;;T43.021A 
 ;;9002226.02101,"170,T43.021A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.021D ",.01)
 ;;T43.021D 
 ;;9002226.02101,"170,T43.021D ",.02)
 ;;T43.021D 
 ;;9002226.02101,"170,T43.021D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.021S ",.01)
 ;;T43.021S 
 ;;9002226.02101,"170,T43.021S ",.02)
 ;;T43.021S 
 ;;9002226.02101,"170,T43.021S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.1X1A ",.01)
 ;;T43.1X1A 
 ;;9002226.02101,"170,T43.1X1A ",.02)
 ;;T43.1X1A 
 ;;9002226.02101,"170,T43.1X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.1X1D ",.01)
 ;;T43.1X1D 
 ;;9002226.02101,"170,T43.1X1D ",.02)
 ;;T43.1X1D 
 ;;9002226.02101,"170,T43.1X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.1X1S ",.01)
 ;;T43.1X1S 
 ;;9002226.02101,"170,T43.1X1S ",.02)
 ;;T43.1X1S 
 ;;9002226.02101,"170,T43.1X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.201A ",.01)
 ;;T43.201A 
 ;;9002226.02101,"170,T43.201A ",.02)
 ;;T43.201A 
 ;;9002226.02101,"170,T43.201A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.201D ",.01)
 ;;T43.201D 
 ;;9002226.02101,"170,T43.201D ",.02)
 ;;T43.201D 
 ;;9002226.02101,"170,T43.201D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.201S ",.01)
 ;;T43.201S 
 ;;9002226.02101,"170,T43.201S ",.02)
 ;;T43.201S 
 ;;9002226.02101,"170,T43.201S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.211A ",.01)
 ;;T43.211A 
 ;;9002226.02101,"170,T43.211A ",.02)
 ;;T43.211A 
 ;;9002226.02101,"170,T43.211A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.211D ",.01)
 ;;T43.211D 
 ;;9002226.02101,"170,T43.211D ",.02)
 ;;T43.211D 
 ;;9002226.02101,"170,T43.211D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.211S ",.01)
 ;;T43.211S 
 ;;9002226.02101,"170,T43.211S ",.02)
 ;;T43.211S 
 ;;9002226.02101,"170,T43.211S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.221A ",.01)
 ;;T43.221A 
 ;;9002226.02101,"170,T43.221A ",.02)
 ;;T43.221A 
 ;;9002226.02101,"170,T43.221A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.221D ",.01)
 ;;T43.221D 
 ;;9002226.02101,"170,T43.221D ",.02)
 ;;T43.221D 
 ;;9002226.02101,"170,T43.221D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.221S ",.01)
 ;;T43.221S 
 ;;9002226.02101,"170,T43.221S ",.02)
 ;;T43.221S 
 ;;9002226.02101,"170,T43.221S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.291A ",.01)
 ;;T43.291A 
 ;;9002226.02101,"170,T43.291A ",.02)
 ;;T43.291A 
 ;;9002226.02101,"170,T43.291A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.291D ",.01)
 ;;T43.291D 
 ;;9002226.02101,"170,T43.291D ",.02)
 ;;T43.291D 
 ;;9002226.02101,"170,T43.291D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.291S ",.01)
 ;;T43.291S 
 ;;9002226.02101,"170,T43.291S ",.02)
 ;;T43.291S 
 ;;9002226.02101,"170,T43.291S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.3X1A ",.01)
 ;;T43.3X1A 
 ;;9002226.02101,"170,T43.3X1A ",.02)
 ;;T43.3X1A 
 ;;9002226.02101,"170,T43.3X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.3X1D ",.01)
 ;;T43.3X1D 
 ;;9002226.02101,"170,T43.3X1D ",.02)
 ;;T43.3X1D 
 ;;9002226.02101,"170,T43.3X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.3X1S ",.01)
 ;;T43.3X1S 
 ;;9002226.02101,"170,T43.3X1S ",.02)
 ;;T43.3X1S 
 ;;9002226.02101,"170,T43.3X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.4X1A ",.01)
 ;;T43.4X1A 
 ;;9002226.02101,"170,T43.4X1A ",.02)
 ;;T43.4X1A 
 ;;9002226.02101,"170,T43.4X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.4X1D ",.01)
 ;;T43.4X1D 
 ;;9002226.02101,"170,T43.4X1D ",.02)
 ;;T43.4X1D 
 ;;9002226.02101,"170,T43.4X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.4X1S ",.01)
 ;;T43.4X1S 
 ;;9002226.02101,"170,T43.4X1S ",.02)
 ;;T43.4X1S 
 ;;9002226.02101,"170,T43.4X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.501A ",.01)
 ;;T43.501A 
 ;;9002226.02101,"170,T43.501A ",.02)
 ;;T43.501A 
 ;;9002226.02101,"170,T43.501A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.501D ",.01)
 ;;T43.501D 
 ;;9002226.02101,"170,T43.501D ",.02)
 ;;T43.501D 
 ;;9002226.02101,"170,T43.501D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.501S ",.01)
 ;;T43.501S 
 ;;9002226.02101,"170,T43.501S ",.02)
 ;;T43.501S 
 ;;9002226.02101,"170,T43.501S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.591A ",.01)
 ;;T43.591A 
 ;;9002226.02101,"170,T43.591A ",.02)
 ;;T43.591A 
 ;;9002226.02101,"170,T43.591A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.591D ",.01)
 ;;T43.591D 
 ;;9002226.02101,"170,T43.591D ",.02)
 ;;T43.591D 
 ;;9002226.02101,"170,T43.591D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.591S ",.01)
 ;;T43.591S 
 ;;9002226.02101,"170,T43.591S ",.02)
 ;;T43.591S 
 ;;9002226.02101,"170,T43.591S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.601A ",.01)
 ;;T43.601A 
 ;;9002226.02101,"170,T43.601A ",.02)
 ;;T43.601A 
 ;;9002226.02101,"170,T43.601A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.601D ",.01)
 ;;T43.601D 
 ;;9002226.02101,"170,T43.601D ",.02)
 ;;T43.601D 
 ;;9002226.02101,"170,T43.601D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.601S ",.01)
 ;;T43.601S 
 ;;9002226.02101,"170,T43.601S ",.02)
 ;;T43.601S 
 ;;9002226.02101,"170,T43.601S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.611A ",.01)
 ;;T43.611A 
 ;;9002226.02101,"170,T43.611A ",.02)
 ;;T43.611A 
 ;;9002226.02101,"170,T43.611A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.611D ",.01)
 ;;T43.611D 
 ;;9002226.02101,"170,T43.611D ",.02)
 ;;T43.611D 
 ;;9002226.02101,"170,T43.611D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.611S ",.01)
 ;;T43.611S 
 ;;9002226.02101,"170,T43.611S ",.02)
 ;;T43.611S 
 ;;9002226.02101,"170,T43.611S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.621A ",.01)
 ;;T43.621A 
 ;;9002226.02101,"170,T43.621A ",.02)
 ;;T43.621A 
 ;;9002226.02101,"170,T43.621A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.621D ",.01)
 ;;T43.621D 
 ;;9002226.02101,"170,T43.621D ",.02)
 ;;T43.621D 
 ;;9002226.02101,"170,T43.621D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.621S ",.01)
 ;;T43.621S 
 ;;9002226.02101,"170,T43.621S ",.02)
 ;;T43.621S 
 ;;9002226.02101,"170,T43.621S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.631A ",.01)
 ;;T43.631A 
 ;;9002226.02101,"170,T43.631A ",.02)
 ;;T43.631A 
 ;;9002226.02101,"170,T43.631A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.631D ",.01)
 ;;T43.631D 
 ;;9002226.02101,"170,T43.631D ",.02)
 ;;T43.631D 
 ;;9002226.02101,"170,T43.631D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.631S ",.01)
 ;;T43.631S 
 ;;9002226.02101,"170,T43.631S ",.02)
 ;;T43.631S 
 ;;9002226.02101,"170,T43.631S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.691A ",.01)
 ;;T43.691A 
 ;;9002226.02101,"170,T43.691A ",.02)
 ;;T43.691A 
 ;;9002226.02101,"170,T43.691A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.691D ",.01)
 ;;T43.691D 
 ;;9002226.02101,"170,T43.691D ",.02)
 ;;T43.691D 
 ;;9002226.02101,"170,T43.691D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.691S ",.01)
 ;;T43.691S 
 ;;9002226.02101,"170,T43.691S ",.02)
 ;;T43.691S 
 ;;9002226.02101,"170,T43.691S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.8X1A ",.01)
 ;;T43.8X1A 
 ;;9002226.02101,"170,T43.8X1A ",.02)
 ;;T43.8X1A 
 ;;9002226.02101,"170,T43.8X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T43.8X1D ",.01)
 ;;T43.8X1D 
 ;;9002226.02101,"170,T43.8X1D ",.02)
 ;;T43.8X1D 
 ;;9002226.02101,"170,T43.8X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T43.8X1S ",.01)
 ;;T43.8X1S 
 ;;9002226.02101,"170,T43.8X1S ",.02)
 ;;T43.8X1S 
 ;;9002226.02101,"170,T43.8X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T43.91XA ",.01)
 ;;T43.91XA 
 ;;9002226.02101,"170,T43.91XA ",.02)
 ;;T43.91XA 
 ;;9002226.02101,"170,T43.91XA ",.03)
 ;;30
 ;;9002226.02101,"170,T43.91XD ",.01)
 ;;T43.91XD 
 ;;9002226.02101,"170,T43.91XD ",.02)
 ;;T43.91XD 
 ;;9002226.02101,"170,T43.91XD ",.03)
 ;;30
 ;;9002226.02101,"170,T43.91XS ",.01)
 ;;T43.91XS 
 ;;9002226.02101,"170,T43.91XS ",.02)
 ;;T43.91XS 
 ;;9002226.02101,"170,T43.91XS ",.03)
 ;;30
 ;;9002226.02101,"170,T44.0X1A ",.01)
 ;;T44.0X1A 
 ;;9002226.02101,"170,T44.0X1A ",.02)
 ;;T44.0X1A 
 ;;9002226.02101,"170,T44.0X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T44.0X1D ",.01)
 ;;T44.0X1D 
 ;;9002226.02101,"170,T44.0X1D ",.02)
 ;;T44.0X1D 
 ;;9002226.02101,"170,T44.0X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T44.0X1S ",.01)
 ;;T44.0X1S 
 ;;9002226.02101,"170,T44.0X1S ",.02)
 ;;T44.0X1S 
 ;;9002226.02101,"170,T44.0X1S ",.03)
 ;;30
 ;;9002226.02101,"170,T44.1X1A ",.01)
 ;;T44.1X1A 
 ;;9002226.02101,"170,T44.1X1A ",.02)
 ;;T44.1X1A 
 ;;9002226.02101,"170,T44.1X1A ",.03)
 ;;30
 ;;9002226.02101,"170,T44.1X1D ",.01)
 ;;T44.1X1D 
 ;;9002226.02101,"170,T44.1X1D ",.02)
 ;;T44.1X1D 
 ;;9002226.02101,"170,T44.1X1D ",.03)
 ;;30
 ;;9002226.02101,"170,T44.1X1S ",.01)
 ;;T44.1X1S 
 ;;9002226.02101,"170,T44.1X1S ",.02)
 ;;T44.1X1S 
 ;;9002226.02101,"170,T44.1X1S ",.03)
 ;;30