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

ATXD5S2.m

Go to the documentation of this file.
ATXD5S2 ;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,"172,T63.421D ",.01)
 ;;T63.421D 
 ;;9002226.02101,"172,T63.421D ",.02)
 ;;T63.421D 
 ;;9002226.02101,"172,T63.421D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.421S ",.01)
 ;;T63.421S 
 ;;9002226.02101,"172,T63.421S ",.02)
 ;;T63.421S 
 ;;9002226.02101,"172,T63.421S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.431A ",.01)
 ;;T63.431A 
 ;;9002226.02101,"172,T63.431A ",.02)
 ;;T63.431A 
 ;;9002226.02101,"172,T63.431A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.431D ",.01)
 ;;T63.431D 
 ;;9002226.02101,"172,T63.431D ",.02)
 ;;T63.431D 
 ;;9002226.02101,"172,T63.431D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.431S ",.01)
 ;;T63.431S 
 ;;9002226.02101,"172,T63.431S ",.02)
 ;;T63.431S 
 ;;9002226.02101,"172,T63.431S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.441A ",.01)
 ;;T63.441A 
 ;;9002226.02101,"172,T63.441A ",.02)
 ;;T63.441A 
 ;;9002226.02101,"172,T63.441A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.441D ",.01)
 ;;T63.441D 
 ;;9002226.02101,"172,T63.441D ",.02)
 ;;T63.441D 
 ;;9002226.02101,"172,T63.441D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.441S ",.01)
 ;;T63.441S 
 ;;9002226.02101,"172,T63.441S ",.02)
 ;;T63.441S 
 ;;9002226.02101,"172,T63.441S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.451A ",.01)
 ;;T63.451A 
 ;;9002226.02101,"172,T63.451A ",.02)
 ;;T63.451A 
 ;;9002226.02101,"172,T63.451A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.451D ",.01)
 ;;T63.451D 
 ;;9002226.02101,"172,T63.451D ",.02)
 ;;T63.451D 
 ;;9002226.02101,"172,T63.451D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.451S ",.01)
 ;;T63.451S 
 ;;9002226.02101,"172,T63.451S ",.02)
 ;;T63.451S 
 ;;9002226.02101,"172,T63.451S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.461A ",.01)
 ;;T63.461A 
 ;;9002226.02101,"172,T63.461A ",.02)
 ;;T63.461A 
 ;;9002226.02101,"172,T63.461A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.461D ",.01)
 ;;T63.461D 
 ;;9002226.02101,"172,T63.461D ",.02)
 ;;T63.461D 
 ;;9002226.02101,"172,T63.461D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.461S ",.01)
 ;;T63.461S 
 ;;9002226.02101,"172,T63.461S ",.02)
 ;;T63.461S 
 ;;9002226.02101,"172,T63.461S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.481A ",.01)
 ;;T63.481A 
 ;;9002226.02101,"172,T63.481A ",.02)
 ;;T63.481A 
 ;;9002226.02101,"172,T63.481A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.481D ",.01)
 ;;T63.481D 
 ;;9002226.02101,"172,T63.481D ",.02)
 ;;T63.481D 
 ;;9002226.02101,"172,T63.481D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.481S ",.01)
 ;;T63.481S 
 ;;9002226.02101,"172,T63.481S ",.02)
 ;;T63.481S 
 ;;9002226.02101,"172,T63.481S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.511A ",.01)
 ;;T63.511A 
 ;;9002226.02101,"172,T63.511A ",.02)
 ;;T63.511A 
 ;;9002226.02101,"172,T63.511A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.511D ",.01)
 ;;T63.511D 
 ;;9002226.02101,"172,T63.511D ",.02)
 ;;T63.511D 
 ;;9002226.02101,"172,T63.511D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.511S ",.01)
 ;;T63.511S 
 ;;9002226.02101,"172,T63.511S ",.02)
 ;;T63.511S 
 ;;9002226.02101,"172,T63.511S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.591A ",.01)
 ;;T63.591A 
 ;;9002226.02101,"172,T63.591A ",.02)
 ;;T63.591A 
 ;;9002226.02101,"172,T63.591A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.591D ",.01)
 ;;T63.591D 
 ;;9002226.02101,"172,T63.591D ",.02)
 ;;T63.591D 
 ;;9002226.02101,"172,T63.591D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.591S ",.01)
 ;;T63.591S 
 ;;9002226.02101,"172,T63.591S ",.02)
 ;;T63.591S 
 ;;9002226.02101,"172,T63.591S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.611A ",.01)
 ;;T63.611A 
 ;;9002226.02101,"172,T63.611A ",.02)
 ;;T63.611A 
 ;;9002226.02101,"172,T63.611A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.611D ",.01)
 ;;T63.611D 
 ;;9002226.02101,"172,T63.611D ",.02)
 ;;T63.611D 
 ;;9002226.02101,"172,T63.611D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.611S ",.01)
 ;;T63.611S 
 ;;9002226.02101,"172,T63.611S ",.02)
 ;;T63.611S 
 ;;9002226.02101,"172,T63.611S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.621A ",.01)
 ;;T63.621A 
 ;;9002226.02101,"172,T63.621A ",.02)
 ;;T63.621A 
 ;;9002226.02101,"172,T63.621A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.621D ",.01)
 ;;T63.621D 
 ;;9002226.02101,"172,T63.621D ",.02)
 ;;T63.621D 
 ;;9002226.02101,"172,T63.621D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.621S ",.01)
 ;;T63.621S 
 ;;9002226.02101,"172,T63.621S ",.02)
 ;;T63.621S 
 ;;9002226.02101,"172,T63.621S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.631A ",.01)
 ;;T63.631A 
 ;;9002226.02101,"172,T63.631A ",.02)
 ;;T63.631A 
 ;;9002226.02101,"172,T63.631A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.631D ",.01)
 ;;T63.631D 
 ;;9002226.02101,"172,T63.631D ",.02)
 ;;T63.631D 
 ;;9002226.02101,"172,T63.631D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.631S ",.01)
 ;;T63.631S 
 ;;9002226.02101,"172,T63.631S ",.02)
 ;;T63.631S 
 ;;9002226.02101,"172,T63.631S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.691A ",.01)
 ;;T63.691A 
 ;;9002226.02101,"172,T63.691A ",.02)
 ;;T63.691A 
 ;;9002226.02101,"172,T63.691A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.691D ",.01)
 ;;T63.691D 
 ;;9002226.02101,"172,T63.691D ",.02)
 ;;T63.691D 
 ;;9002226.02101,"172,T63.691D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.691S ",.01)
 ;;T63.691S 
 ;;9002226.02101,"172,T63.691S ",.02)
 ;;T63.691S 
 ;;9002226.02101,"172,T63.691S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.711A ",.01)
 ;;T63.711A 
 ;;9002226.02101,"172,T63.711A ",.02)
 ;;T63.711A 
 ;;9002226.02101,"172,T63.711A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.711D ",.01)
 ;;T63.711D 
 ;;9002226.02101,"172,T63.711D ",.02)
 ;;T63.711D 
 ;;9002226.02101,"172,T63.711D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.711S ",.01)
 ;;T63.711S 
 ;;9002226.02101,"172,T63.711S ",.02)
 ;;T63.711S 
 ;;9002226.02101,"172,T63.711S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.791A ",.01)
 ;;T63.791A 
 ;;9002226.02101,"172,T63.791A ",.02)
 ;;T63.791A 
 ;;9002226.02101,"172,T63.791A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.791D ",.01)
 ;;T63.791D 
 ;;9002226.02101,"172,T63.791D ",.02)
 ;;T63.791D 
 ;;9002226.02101,"172,T63.791D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.791S ",.01)
 ;;T63.791S 
 ;;9002226.02101,"172,T63.791S ",.02)
 ;;T63.791S 
 ;;9002226.02101,"172,T63.791S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.811A ",.01)
 ;;T63.811A 
 ;;9002226.02101,"172,T63.811A ",.02)
 ;;T63.811A 
 ;;9002226.02101,"172,T63.811A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.811D ",.01)
 ;;T63.811D 
 ;;9002226.02101,"172,T63.811D ",.02)
 ;;T63.811D 
 ;;9002226.02101,"172,T63.811D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.811S ",.01)
 ;;T63.811S 
 ;;9002226.02101,"172,T63.811S ",.02)
 ;;T63.811S 
 ;;9002226.02101,"172,T63.811S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.821A ",.01)
 ;;T63.821A 
 ;;9002226.02101,"172,T63.821A ",.02)
 ;;T63.821A 
 ;;9002226.02101,"172,T63.821A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.821D ",.01)
 ;;T63.821D 
 ;;9002226.02101,"172,T63.821D ",.02)
 ;;T63.821D 
 ;;9002226.02101,"172,T63.821D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.821S ",.01)
 ;;T63.821S 
 ;;9002226.02101,"172,T63.821S ",.02)
 ;;T63.821S 
 ;;9002226.02101,"172,T63.821S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.831A ",.01)
 ;;T63.831A 
 ;;9002226.02101,"172,T63.831A ",.02)
 ;;T63.831A 
 ;;9002226.02101,"172,T63.831A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.831D ",.01)
 ;;T63.831D 
 ;;9002226.02101,"172,T63.831D ",.02)
 ;;T63.831D 
 ;;9002226.02101,"172,T63.831D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.831S ",.01)
 ;;T63.831S 
 ;;9002226.02101,"172,T63.831S ",.02)
 ;;T63.831S 
 ;;9002226.02101,"172,T63.831S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.891A ",.01)
 ;;T63.891A 
 ;;9002226.02101,"172,T63.891A ",.02)
 ;;T63.891A 
 ;;9002226.02101,"172,T63.891A ",.03)
 ;;30
 ;;9002226.02101,"172,T63.891D ",.01)
 ;;T63.891D 
 ;;9002226.02101,"172,T63.891D ",.02)
 ;;T63.891D 
 ;;9002226.02101,"172,T63.891D ",.03)
 ;;30
 ;;9002226.02101,"172,T63.891S ",.01)
 ;;T63.891S 
 ;;9002226.02101,"172,T63.891S ",.02)
 ;;T63.891S 
 ;;9002226.02101,"172,T63.891S ",.03)
 ;;30
 ;;9002226.02101,"172,T63.91XA ",.01)
 ;;T63.91XA 
 ;;9002226.02101,"172,T63.91XA ",.02)
 ;;T63.91XA 
 ;;9002226.02101,"172,T63.91XA ",.03)
 ;;30
 ;;9002226.02101,"172,T63.91XD ",.01)
 ;;T63.91XD 
 ;;9002226.02101,"172,T63.91XD ",.02)
 ;;T63.91XD 
 ;;9002226.02101,"172,T63.91XD ",.03)
 ;;30
 ;;9002226.02101,"172,T63.91XS ",.01)
 ;;T63.91XS 
 ;;9002226.02101,"172,T63.91XS ",.02)
 ;;T63.91XS 
 ;;9002226.02101,"172,T63.91XS ",.03)
 ;;30
 ;;9002226.04101,"172,1",.01)
 ;;APCL