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

ATXD5P12.m

Go to the documentation of this file.
ATXD5P12 ;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,"169,W16.711D ",.03)
 ;;30
 ;;9002226.02101,"169,W16.711S ",.01)
 ;;W16.711S 
 ;;9002226.02101,"169,W16.711S ",.02)
 ;;W16.711S 
 ;;9002226.02101,"169,W16.711S ",.03)
 ;;30
 ;;9002226.02101,"169,W16.712A ",.01)
 ;;W16.712A 
 ;;9002226.02101,"169,W16.712A ",.02)
 ;;W16.712A 
 ;;9002226.02101,"169,W16.712A ",.03)
 ;;30
 ;;9002226.02101,"169,W16.712D ",.01)
 ;;W16.712D 
 ;;9002226.02101,"169,W16.712D ",.02)
 ;;W16.712D 
 ;;9002226.02101,"169,W16.712D ",.03)
 ;;30
 ;;9002226.02101,"169,W16.712S ",.01)
 ;;W16.712S 
 ;;9002226.02101,"169,W16.712S ",.02)
 ;;W16.712S 
 ;;9002226.02101,"169,W16.712S ",.03)
 ;;30
 ;;9002226.02101,"169,W16.721A ",.01)
 ;;W16.721A 
 ;;9002226.02101,"169,W16.721A ",.02)
 ;;W16.721A 
 ;;9002226.02101,"169,W16.721A ",.03)
 ;;30
 ;;9002226.02101,"169,W16.721D ",.01)
 ;;W16.721D 
 ;;9002226.02101,"169,W16.721D ",.02)
 ;;W16.721D 
 ;;9002226.02101,"169,W16.721D ",.03)
 ;;30
 ;;9002226.02101,"169,W16.721S ",.01)
 ;;W16.721S 
 ;;9002226.02101,"169,W16.721S ",.02)
 ;;W16.721S 
 ;;9002226.02101,"169,W16.721S ",.03)
 ;;30
 ;;9002226.02101,"169,W16.722A ",.01)
 ;;W16.722A 
 ;;9002226.02101,"169,W16.722A ",.02)
 ;;W16.722A 
 ;;9002226.02101,"169,W16.722A ",.03)
 ;;30
 ;;9002226.02101,"169,W16.722D ",.01)
 ;;W16.722D 
 ;;9002226.02101,"169,W16.722D ",.02)
 ;;W16.722D 
 ;;9002226.02101,"169,W16.722D ",.03)
 ;;30
 ;;9002226.02101,"169,W16.722S ",.01)
 ;;W16.722S 
 ;;9002226.02101,"169,W16.722S ",.02)
 ;;W16.722S 
 ;;9002226.02101,"169,W16.722S ",.03)
 ;;30
 ;;9002226.02101,"169,W16.811A ",.01)
 ;;W16.811A 
 ;;9002226.02101,"169,W16.811A ",.02)
 ;;W16.811A 
 ;;9002226.02101,"169,W16.811A ",.03)
 ;;30
 ;;9002226.02101,"169,W16.811D ",.01)
 ;;W16.811D 
 ;;9002226.02101,"169,W16.811D ",.02)
 ;;W16.811D 
 ;;9002226.02101,"169,W16.811D ",.03)
 ;;30
 ;;9002226.02101,"169,W16.811S ",.01)
 ;;W16.811S 
 ;;9002226.02101,"169,W16.811S ",.02)
 ;;W16.811S 
 ;;9002226.02101,"169,W16.811S ",.03)
 ;;30
 ;;9002226.02101,"169,W16.812A ",.01)
 ;;W16.812A 
 ;;9002226.02101,"169,W16.812A ",.02)
 ;;W16.812A 
 ;;9002226.02101,"169,W16.812A ",.03)
 ;;30
 ;;9002226.02101,"169,W16.812D ",.01)
 ;;W16.812D 
 ;;9002226.02101,"169,W16.812D ",.02)
 ;;W16.812D 
 ;;9002226.02101,"169,W16.812D ",.03)
 ;;30
 ;;9002226.02101,"169,W16.812S ",.01)
 ;;W16.812S 
 ;;9002226.02101,"169,W16.812S ",.02)
 ;;W16.812S 
 ;;9002226.02101,"169,W16.812S ",.03)
 ;;30
 ;;9002226.02101,"169,W16.821A ",.01)
 ;;W16.821A 
 ;;9002226.02101,"169,W16.821A ",.02)
 ;;W16.821A 
 ;;9002226.02101,"169,W16.821A ",.03)
 ;;30
 ;;9002226.02101,"169,W16.821D ",.01)
 ;;W16.821D 
 ;;9002226.02101,"169,W16.821D ",.02)
 ;;W16.821D 
 ;;9002226.02101,"169,W16.821D ",.03)
 ;;30
 ;;9002226.02101,"169,W16.821S ",.01)
 ;;W16.821S 
 ;;9002226.02101,"169,W16.821S ",.02)
 ;;W16.821S 
 ;;9002226.02101,"169,W16.821S ",.03)
 ;;30
 ;;9002226.02101,"169,W16.822A ",.01)
 ;;W16.822A 
 ;;9002226.02101,"169,W16.822A ",.02)
 ;;W16.822A 
 ;;9002226.02101,"169,W16.822A ",.03)
 ;;30
 ;;9002226.02101,"169,W16.822D ",.01)
 ;;W16.822D 
 ;;9002226.02101,"169,W16.822D ",.02)
 ;;W16.822D 
 ;;9002226.02101,"169,W16.822D ",.03)
 ;;30
 ;;9002226.02101,"169,W16.822S ",.01)
 ;;W16.822S 
 ;;9002226.02101,"169,W16.822S ",.02)
 ;;W16.822S 
 ;;9002226.02101,"169,W16.822S ",.03)
 ;;30
 ;;9002226.02101,"169,W16.831A ",.01)
 ;;W16.831A 
 ;;9002226.02101,"169,W16.831A ",.02)
 ;;W16.831A 
 ;;9002226.02101,"169,W16.831A ",.03)
 ;;30
 ;;9002226.02101,"169,W16.831D ",.01)
 ;;W16.831D 
 ;;9002226.02101,"169,W16.831D ",.02)
 ;;W16.831D 
 ;;9002226.02101,"169,W16.831D ",.03)
 ;;30
 ;;9002226.02101,"169,W16.831S ",.01)
 ;;W16.831S 
 ;;9002226.02101,"169,W16.831S ",.02)
 ;;W16.831S 
 ;;9002226.02101,"169,W16.831S ",.03)
 ;;30
 ;;9002226.02101,"169,W16.832A ",.01)
 ;;W16.832A 
 ;;9002226.02101,"169,W16.832A ",.02)
 ;;W16.832A 
 ;;9002226.02101,"169,W16.832A ",.03)
 ;;30
 ;;9002226.02101,"169,W16.832D ",.01)
 ;;W16.832D 
 ;;9002226.02101,"169,W16.832D ",.02)
 ;;W16.832D 
 ;;9002226.02101,"169,W16.832D ",.03)
 ;;30
 ;;9002226.02101,"169,W16.832S ",.01)
 ;;W16.832S 
 ;;9002226.02101,"169,W16.832S ",.02)
 ;;W16.832S 
 ;;9002226.02101,"169,W16.832S ",.03)
 ;;30
 ;;9002226.02101,"169,W16.91XA ",.01)
 ;;W16.91XA 
 ;;9002226.02101,"169,W16.91XA ",.02)
 ;;W16.91XA 
 ;;9002226.02101,"169,W16.91XA ",.03)
 ;;30
 ;;9002226.02101,"169,W16.91XD ",.01)
 ;;W16.91XD 
 ;;9002226.02101,"169,W16.91XD ",.02)
 ;;W16.91XD 
 ;;9002226.02101,"169,W16.91XD ",.03)
 ;;30
 ;;9002226.02101,"169,W16.91XS ",.01)
 ;;W16.91XS 
 ;;9002226.02101,"169,W16.91XS ",.02)
 ;;W16.91XS 
 ;;9002226.02101,"169,W16.91XS ",.03)
 ;;30
 ;;9002226.02101,"169,W16.92XA ",.01)
 ;;W16.92XA 
 ;;9002226.02101,"169,W16.92XA ",.02)
 ;;W16.92XA 
 ;;9002226.02101,"169,W16.92XA ",.03)
 ;;30
 ;;9002226.02101,"169,W16.92XD ",.01)
 ;;W16.92XD 
 ;;9002226.02101,"169,W16.92XD ",.02)
 ;;W16.92XD 
 ;;9002226.02101,"169,W16.92XD ",.03)
 ;;30
 ;;9002226.02101,"169,W16.92XS ",.01)
 ;;W16.92XS 
 ;;9002226.02101,"169,W16.92XS ",.02)
 ;;W16.92XS 
 ;;9002226.02101,"169,W16.92XS ",.03)
 ;;30
 ;;9002226.02101,"169,W18.40XA ",.01)
 ;;W18.40XA 
 ;;9002226.02101,"169,W18.40XA ",.02)
 ;;W18.40XA 
 ;;9002226.02101,"169,W18.40XA ",.03)
 ;;30
 ;;9002226.02101,"169,W18.40XD ",.01)
 ;;W18.40XD 
 ;;9002226.02101,"169,W18.40XD ",.02)
 ;;W18.40XD 
 ;;9002226.02101,"169,W18.40XD ",.03)
 ;;30
 ;;9002226.02101,"169,W18.40XS ",.01)
 ;;W18.40XS 
 ;;9002226.02101,"169,W18.40XS ",.02)
 ;;W18.40XS 
 ;;9002226.02101,"169,W18.40XS ",.03)
 ;;30
 ;;9002226.02101,"169,W18.41XA ",.01)
 ;;W18.41XA 
 ;;9002226.02101,"169,W18.41XA ",.02)
 ;;W18.41XA 
 ;;9002226.02101,"169,W18.41XA ",.03)
 ;;30
 ;;9002226.02101,"169,W18.41XD ",.01)
 ;;W18.41XD 
 ;;9002226.02101,"169,W18.41XD ",.02)
 ;;W18.41XD 
 ;;9002226.02101,"169,W18.41XD ",.03)
 ;;30
 ;;9002226.02101,"169,W18.41XS ",.01)
 ;;W18.41XS 
 ;;9002226.02101,"169,W18.41XS ",.02)
 ;;W18.41XS 
 ;;9002226.02101,"169,W18.41XS ",.03)
 ;;30
 ;;9002226.02101,"169,W18.42XA ",.01)
 ;;W18.42XA 
 ;;9002226.02101,"169,W18.42XA ",.02)
 ;;W18.42XA 
 ;;9002226.02101,"169,W18.42XA ",.03)
 ;;30
 ;;9002226.02101,"169,W18.42XD ",.01)
 ;;W18.42XD 
 ;;9002226.02101,"169,W18.42XD ",.02)
 ;;W18.42XD 
 ;;9002226.02101,"169,W18.42XD ",.03)
 ;;30
 ;;9002226.02101,"169,W18.42XS ",.01)
 ;;W18.42XS 
 ;;9002226.02101,"169,W18.42XS ",.02)
 ;;W18.42XS 
 ;;9002226.02101,"169,W18.42XS ",.03)
 ;;30
 ;;9002226.02101,"169,W18.43XA ",.01)
 ;;W18.43XA 
 ;;9002226.02101,"169,W18.43XA ",.02)
 ;;W18.43XA 
 ;;9002226.02101,"169,W18.43XA ",.03)
 ;;30
 ;;9002226.02101,"169,W18.43XD ",.01)
 ;;W18.43XD 
 ;;9002226.02101,"169,W18.43XD ",.02)
 ;;W18.43XD 
 ;;9002226.02101,"169,W18.43XD ",.03)
 ;;30
 ;;9002226.02101,"169,W18.43XS ",.01)
 ;;W18.43XS 
 ;;9002226.02101,"169,W18.43XS ",.02)
 ;;W18.43XS 
 ;;9002226.02101,"169,W18.43XS ",.03)
 ;;30
 ;;9002226.02101,"169,W18.49XA ",.01)
 ;;W18.49XA 
 ;;9002226.02101,"169,W18.49XA ",.02)
 ;;W18.49XA 
 ;;9002226.02101,"169,W18.49XA ",.03)
 ;;30
 ;;9002226.02101,"169,W18.49XD ",.01)
 ;;W18.49XD 
 ;;9002226.02101,"169,W18.49XD ",.02)
 ;;W18.49XD 
 ;;9002226.02101,"169,W18.49XD ",.03)
 ;;30
 ;;9002226.02101,"169,W18.49XS ",.01)
 ;;W18.49XS 
 ;;9002226.02101,"169,W18.49XS ",.02)
 ;;W18.49XS 
 ;;9002226.02101,"169,W18.49XS ",.03)
 ;;30
 ;;9002226.02101,"169,W19.XXXA ",.01)
 ;;W19.XXXA 
 ;;9002226.02101,"169,W19.XXXA ",.02)
 ;;W19.XXXA 
 ;;9002226.02101,"169,W19.XXXA ",.03)
 ;;30
 ;;9002226.02101,"169,W19.XXXD ",.01)
 ;;W19.XXXD 
 ;;9002226.02101,"169,W19.XXXD ",.02)
 ;;W19.XXXD 
 ;;9002226.02101,"169,W19.XXXD ",.03)
 ;;30
 ;;9002226.02101,"169,W19.XXXS ",.01)
 ;;W19.XXXS 
 ;;9002226.02101,"169,W19.XXXS ",.02)
 ;;W19.XXXS 
 ;;9002226.02101,"169,W19.XXXS ",.03)
 ;;30
 ;;9002226.02101,"169,W20.0XXA ",.01)
 ;;W20.0XXA 
 ;;9002226.02101,"169,W20.0XXA ",.02)
 ;;W20.0XXA 
 ;;9002226.02101,"169,W20.0XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W20.0XXD ",.01)
 ;;W20.0XXD 
 ;;9002226.02101,"169,W20.0XXD ",.02)
 ;;W20.0XXD 
 ;;9002226.02101,"169,W20.0XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W20.0XXS ",.01)
 ;;W20.0XXS 
 ;;9002226.02101,"169,W20.0XXS ",.02)
 ;;W20.0XXS 
 ;;9002226.02101,"169,W20.0XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W20.1XXA ",.01)
 ;;W20.1XXA 
 ;;9002226.02101,"169,W20.1XXA ",.02)
 ;;W20.1XXA 
 ;;9002226.02101,"169,W20.1XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W20.1XXD ",.01)
 ;;W20.1XXD 
 ;;9002226.02101,"169,W20.1XXD ",.02)
 ;;W20.1XXD 
 ;;9002226.02101,"169,W20.1XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W20.1XXS ",.01)
 ;;W20.1XXS 
 ;;9002226.02101,"169,W20.1XXS ",.02)
 ;;W20.1XXS 
 ;;9002226.02101,"169,W20.1XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W20.8XXA ",.01)
 ;;W20.8XXA 
 ;;9002226.02101,"169,W20.8XXA ",.02)
 ;;W20.8XXA 
 ;;9002226.02101,"169,W20.8XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W20.8XXD ",.01)
 ;;W20.8XXD 
 ;;9002226.02101,"169,W20.8XXD ",.02)
 ;;W20.8XXD 
 ;;9002226.02101,"169,W20.8XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W20.8XXS ",.01)
 ;;W20.8XXS 
 ;;9002226.02101,"169,W20.8XXS ",.02)
 ;;W20.8XXS 
 ;;9002226.02101,"169,W20.8XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.00XA ",.01)
 ;;W21.00XA 
 ;;9002226.02101,"169,W21.00XA ",.02)
 ;;W21.00XA 
 ;;9002226.02101,"169,W21.00XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.00XD ",.01)
 ;;W21.00XD 
 ;;9002226.02101,"169,W21.00XD ",.02)
 ;;W21.00XD 
 ;;9002226.02101,"169,W21.00XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.00XS ",.01)
 ;;W21.00XS 
 ;;9002226.02101,"169,W21.00XS ",.02)
 ;;W21.00XS 
 ;;9002226.02101,"169,W21.00XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.01XA ",.01)
 ;;W21.01XA 
 ;;9002226.02101,"169,W21.01XA ",.02)
 ;;W21.01XA 
 ;;9002226.02101,"169,W21.01XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.01XD ",.01)
 ;;W21.01XD 
 ;;9002226.02101,"169,W21.01XD ",.02)
 ;;W21.01XD 
 ;;9002226.02101,"169,W21.01XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.01XS ",.01)
 ;;W21.01XS 
 ;;9002226.02101,"169,W21.01XS ",.02)
 ;;W21.01XS 
 ;;9002226.02101,"169,W21.01XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.02XA ",.01)
 ;;W21.02XA 
 ;;9002226.02101,"169,W21.02XA ",.02)
 ;;W21.02XA 
 ;;9002226.02101,"169,W21.02XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.02XD ",.01)
 ;;W21.02XD 
 ;;9002226.02101,"169,W21.02XD ",.02)
 ;;W21.02XD 
 ;;9002226.02101,"169,W21.02XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.02XS ",.01)
 ;;W21.02XS 
 ;;9002226.02101,"169,W21.02XS ",.02)
 ;;W21.02XS 
 ;;9002226.02101,"169,W21.02XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.03XA ",.01)
 ;;W21.03XA 
 ;;9002226.02101,"169,W21.03XA ",.02)
 ;;W21.03XA 
 ;;9002226.02101,"169,W21.03XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.03XD ",.01)
 ;;W21.03XD 
 ;;9002226.02101,"169,W21.03XD ",.02)
 ;;W21.03XD 
 ;;9002226.02101,"169,W21.03XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.03XS ",.01)
 ;;W21.03XS 
 ;;9002226.02101,"169,W21.03XS ",.02)
 ;;W21.03XS 
 ;;9002226.02101,"169,W21.03XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.04XA ",.01)
 ;;W21.04XA 
 ;;9002226.02101,"169,W21.04XA ",.02)
 ;;W21.04XA 
 ;;9002226.02101,"169,W21.04XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.04XD ",.01)
 ;;W21.04XD 
 ;;9002226.02101,"169,W21.04XD ",.02)
 ;;W21.04XD 
 ;;9002226.02101,"169,W21.04XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.04XS ",.01)
 ;;W21.04XS 
 ;;9002226.02101,"169,W21.04XS ",.02)
 ;;W21.04XS 
 ;;9002226.02101,"169,W21.04XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.05XA ",.01)
 ;;W21.05XA 
 ;;9002226.02101,"169,W21.05XA ",.02)
 ;;W21.05XA 
 ;;9002226.02101,"169,W21.05XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.05XD ",.01)
 ;;W21.05XD 
 ;;9002226.02101,"169,W21.05XD ",.02)
 ;;W21.05XD 
 ;;9002226.02101,"169,W21.05XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.05XS ",.01)
 ;;W21.05XS 
 ;;9002226.02101,"169,W21.05XS ",.02)
 ;;W21.05XS 
 ;;9002226.02101,"169,W21.05XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.06XA ",.01)
 ;;W21.06XA 
 ;;9002226.02101,"169,W21.06XA ",.02)
 ;;W21.06XA 
 ;;9002226.02101,"169,W21.06XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.06XD ",.01)
 ;;W21.06XD 
 ;;9002226.02101,"169,W21.06XD ",.02)
 ;;W21.06XD 
 ;;9002226.02101,"169,W21.06XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.06XS ",.01)
 ;;W21.06XS 
 ;;9002226.02101,"169,W21.06XS ",.02)
 ;;W21.06XS 
 ;;9002226.02101,"169,W21.06XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.07XA ",.01)
 ;;W21.07XA 
 ;;9002226.02101,"169,W21.07XA ",.02)
 ;;W21.07XA 
 ;;9002226.02101,"169,W21.07XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.07XD ",.01)
 ;;W21.07XD 
 ;;9002226.02101,"169,W21.07XD ",.02)
 ;;W21.07XD 
 ;;9002226.02101,"169,W21.07XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.07XS ",.01)
 ;;W21.07XS 
 ;;9002226.02101,"169,W21.07XS ",.02)
 ;;W21.07XS 
 ;;9002226.02101,"169,W21.07XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.09XA ",.01)
 ;;W21.09XA 
 ;;9002226.02101,"169,W21.09XA ",.02)
 ;;W21.09XA 
 ;;9002226.02101,"169,W21.09XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.09XD ",.01)
 ;;W21.09XD 
 ;;9002226.02101,"169,W21.09XD ",.02)
 ;;W21.09XD 
 ;;9002226.02101,"169,W21.09XD ",.03)
 ;;30
 ;;9002226.02101,"169,W21.09XS ",.01)
 ;;W21.09XS 
 ;;9002226.02101,"169,W21.09XS ",.02)
 ;;W21.09XS 
 ;;9002226.02101,"169,W21.09XS ",.03)
 ;;30
 ;;9002226.02101,"169,W21.11XA ",.01)
 ;;W21.11XA 
 ;;9002226.02101,"169,W21.11XA ",.02)
 ;;W21.11XA 
 ;;9002226.02101,"169,W21.11XA ",.03)
 ;;30
 ;;9002226.02101,"169,W21.11XD ",.01)
 ;;W21.11XD