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

ATXD5J2.m

Go to the documentation of this file.
ATXD5J2 ;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,"163,V90.12XS ",.02)
 ;;V90.12XS 
 ;;9002226.02101,"163,V90.12XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.13XA ",.01)
 ;;V90.13XA 
 ;;9002226.02101,"163,V90.13XA ",.02)
 ;;V90.13XA 
 ;;9002226.02101,"163,V90.13XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.13XD ",.01)
 ;;V90.13XD 
 ;;9002226.02101,"163,V90.13XD ",.02)
 ;;V90.13XD 
 ;;9002226.02101,"163,V90.13XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.13XS ",.01)
 ;;V90.13XS 
 ;;9002226.02101,"163,V90.13XS ",.02)
 ;;V90.13XS 
 ;;9002226.02101,"163,V90.13XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.14XA ",.01)
 ;;V90.14XA 
 ;;9002226.02101,"163,V90.14XA ",.02)
 ;;V90.14XA 
 ;;9002226.02101,"163,V90.14XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.14XD ",.01)
 ;;V90.14XD 
 ;;9002226.02101,"163,V90.14XD ",.02)
 ;;V90.14XD 
 ;;9002226.02101,"163,V90.14XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.14XS ",.01)
 ;;V90.14XS 
 ;;9002226.02101,"163,V90.14XS ",.02)
 ;;V90.14XS 
 ;;9002226.02101,"163,V90.14XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.15XA ",.01)
 ;;V90.15XA 
 ;;9002226.02101,"163,V90.15XA ",.02)
 ;;V90.15XA 
 ;;9002226.02101,"163,V90.15XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.15XD ",.01)
 ;;V90.15XD 
 ;;9002226.02101,"163,V90.15XD ",.02)
 ;;V90.15XD 
 ;;9002226.02101,"163,V90.15XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.15XS ",.01)
 ;;V90.15XS 
 ;;9002226.02101,"163,V90.15XS ",.02)
 ;;V90.15XS 
 ;;9002226.02101,"163,V90.15XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.16XA ",.01)
 ;;V90.16XA 
 ;;9002226.02101,"163,V90.16XA ",.02)
 ;;V90.16XA 
 ;;9002226.02101,"163,V90.16XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.16XD ",.01)
 ;;V90.16XD 
 ;;9002226.02101,"163,V90.16XD ",.02)
 ;;V90.16XD 
 ;;9002226.02101,"163,V90.16XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.16XS ",.01)
 ;;V90.16XS 
 ;;9002226.02101,"163,V90.16XS ",.02)
 ;;V90.16XS 
 ;;9002226.02101,"163,V90.16XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.18XA ",.01)
 ;;V90.18XA 
 ;;9002226.02101,"163,V90.18XA ",.02)
 ;;V90.18XA 
 ;;9002226.02101,"163,V90.18XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.18XD ",.01)
 ;;V90.18XD 
 ;;9002226.02101,"163,V90.18XD ",.02)
 ;;V90.18XD 
 ;;9002226.02101,"163,V90.18XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.18XS ",.01)
 ;;V90.18XS 
 ;;9002226.02101,"163,V90.18XS ",.02)
 ;;V90.18XS 
 ;;9002226.02101,"163,V90.18XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.19XA ",.01)
 ;;V90.19XA 
 ;;9002226.02101,"163,V90.19XA ",.02)
 ;;V90.19XA 
 ;;9002226.02101,"163,V90.19XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.19XD ",.01)
 ;;V90.19XD 
 ;;9002226.02101,"163,V90.19XD ",.02)
 ;;V90.19XD 
 ;;9002226.02101,"163,V90.19XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.19XS ",.01)
 ;;V90.19XS 
 ;;9002226.02101,"163,V90.19XS ",.02)
 ;;V90.19XS 
 ;;9002226.02101,"163,V90.19XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.20XA ",.01)
 ;;V90.20XA 
 ;;9002226.02101,"163,V90.20XA ",.02)
 ;;V90.20XA 
 ;;9002226.02101,"163,V90.20XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.20XD ",.01)
 ;;V90.20XD 
 ;;9002226.02101,"163,V90.20XD ",.02)
 ;;V90.20XD 
 ;;9002226.02101,"163,V90.20XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.20XS ",.01)
 ;;V90.20XS 
 ;;9002226.02101,"163,V90.20XS ",.02)
 ;;V90.20XS 
 ;;9002226.02101,"163,V90.20XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.21XA ",.01)
 ;;V90.21XA 
 ;;9002226.02101,"163,V90.21XA ",.02)
 ;;V90.21XA 
 ;;9002226.02101,"163,V90.21XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.21XD ",.01)
 ;;V90.21XD 
 ;;9002226.02101,"163,V90.21XD ",.02)
 ;;V90.21XD 
 ;;9002226.02101,"163,V90.21XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.21XS ",.01)
 ;;V90.21XS 
 ;;9002226.02101,"163,V90.21XS ",.02)
 ;;V90.21XS 
 ;;9002226.02101,"163,V90.21XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.22XA ",.01)
 ;;V90.22XA 
 ;;9002226.02101,"163,V90.22XA ",.02)
 ;;V90.22XA 
 ;;9002226.02101,"163,V90.22XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.22XD ",.01)
 ;;V90.22XD 
 ;;9002226.02101,"163,V90.22XD ",.02)
 ;;V90.22XD 
 ;;9002226.02101,"163,V90.22XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.22XS ",.01)
 ;;V90.22XS 
 ;;9002226.02101,"163,V90.22XS ",.02)
 ;;V90.22XS 
 ;;9002226.02101,"163,V90.22XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.23XA ",.01)
 ;;V90.23XA 
 ;;9002226.02101,"163,V90.23XA ",.02)
 ;;V90.23XA 
 ;;9002226.02101,"163,V90.23XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.23XD ",.01)
 ;;V90.23XD 
 ;;9002226.02101,"163,V90.23XD ",.02)
 ;;V90.23XD 
 ;;9002226.02101,"163,V90.23XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.23XS ",.01)
 ;;V90.23XS 
 ;;9002226.02101,"163,V90.23XS ",.02)
 ;;V90.23XS 
 ;;9002226.02101,"163,V90.23XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.24XA ",.01)
 ;;V90.24XA 
 ;;9002226.02101,"163,V90.24XA ",.02)
 ;;V90.24XA 
 ;;9002226.02101,"163,V90.24XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.24XD ",.01)
 ;;V90.24XD 
 ;;9002226.02101,"163,V90.24XD ",.02)
 ;;V90.24XD 
 ;;9002226.02101,"163,V90.24XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.24XS ",.01)
 ;;V90.24XS 
 ;;9002226.02101,"163,V90.24XS ",.02)
 ;;V90.24XS 
 ;;9002226.02101,"163,V90.24XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.25XA ",.01)
 ;;V90.25XA 
 ;;9002226.02101,"163,V90.25XA ",.02)
 ;;V90.25XA 
 ;;9002226.02101,"163,V90.25XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.25XD ",.01)
 ;;V90.25XD 
 ;;9002226.02101,"163,V90.25XD ",.02)
 ;;V90.25XD 
 ;;9002226.02101,"163,V90.25XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.25XS ",.01)
 ;;V90.25XS 
 ;;9002226.02101,"163,V90.25XS ",.02)
 ;;V90.25XS 
 ;;9002226.02101,"163,V90.25XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.26XA ",.01)
 ;;V90.26XA 
 ;;9002226.02101,"163,V90.26XA ",.02)
 ;;V90.26XA 
 ;;9002226.02101,"163,V90.26XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.26XD ",.01)
 ;;V90.26XD 
 ;;9002226.02101,"163,V90.26XD ",.02)
 ;;V90.26XD 
 ;;9002226.02101,"163,V90.26XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.26XS ",.01)
 ;;V90.26XS 
 ;;9002226.02101,"163,V90.26XS ",.02)
 ;;V90.26XS 
 ;;9002226.02101,"163,V90.26XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.27XA ",.01)
 ;;V90.27XA 
 ;;9002226.02101,"163,V90.27XA ",.02)
 ;;V90.27XA 
 ;;9002226.02101,"163,V90.27XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.27XD ",.01)
 ;;V90.27XD 
 ;;9002226.02101,"163,V90.27XD ",.02)
 ;;V90.27XD 
 ;;9002226.02101,"163,V90.27XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.27XS ",.01)
 ;;V90.27XS 
 ;;9002226.02101,"163,V90.27XS ",.02)
 ;;V90.27XS 
 ;;9002226.02101,"163,V90.27XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.28XA ",.01)
 ;;V90.28XA 
 ;;9002226.02101,"163,V90.28XA ",.02)
 ;;V90.28XA 
 ;;9002226.02101,"163,V90.28XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.28XD ",.01)
 ;;V90.28XD 
 ;;9002226.02101,"163,V90.28XD ",.02)
 ;;V90.28XD 
 ;;9002226.02101,"163,V90.28XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.28XS ",.01)
 ;;V90.28XS 
 ;;9002226.02101,"163,V90.28XS ",.02)
 ;;V90.28XS 
 ;;9002226.02101,"163,V90.28XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.29XA ",.01)
 ;;V90.29XA 
 ;;9002226.02101,"163,V90.29XA ",.02)
 ;;V90.29XA 
 ;;9002226.02101,"163,V90.29XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.29XD ",.01)
 ;;V90.29XD 
 ;;9002226.02101,"163,V90.29XD ",.02)
 ;;V90.29XD 
 ;;9002226.02101,"163,V90.29XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.29XS ",.01)
 ;;V90.29XS 
 ;;9002226.02101,"163,V90.29XS ",.02)
 ;;V90.29XS 
 ;;9002226.02101,"163,V90.29XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.30XA ",.01)
 ;;V90.30XA 
 ;;9002226.02101,"163,V90.30XA ",.02)
 ;;V90.30XA 
 ;;9002226.02101,"163,V90.30XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.30XD ",.01)
 ;;V90.30XD 
 ;;9002226.02101,"163,V90.30XD ",.02)
 ;;V90.30XD 
 ;;9002226.02101,"163,V90.30XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.30XS ",.01)
 ;;V90.30XS 
 ;;9002226.02101,"163,V90.30XS ",.02)
 ;;V90.30XS 
 ;;9002226.02101,"163,V90.30XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.31XA ",.01)
 ;;V90.31XA 
 ;;9002226.02101,"163,V90.31XA ",.02)
 ;;V90.31XA 
 ;;9002226.02101,"163,V90.31XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.31XD ",.01)
 ;;V90.31XD 
 ;;9002226.02101,"163,V90.31XD ",.02)
 ;;V90.31XD 
 ;;9002226.02101,"163,V90.31XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.31XS ",.01)
 ;;V90.31XS 
 ;;9002226.02101,"163,V90.31XS ",.02)
 ;;V90.31XS 
 ;;9002226.02101,"163,V90.31XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.32XA ",.01)
 ;;V90.32XA 
 ;;9002226.02101,"163,V90.32XA ",.02)
 ;;V90.32XA 
 ;;9002226.02101,"163,V90.32XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.32XD ",.01)
 ;;V90.32XD 
 ;;9002226.02101,"163,V90.32XD ",.02)
 ;;V90.32XD 
 ;;9002226.02101,"163,V90.32XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.32XS ",.01)
 ;;V90.32XS 
 ;;9002226.02101,"163,V90.32XS ",.02)
 ;;V90.32XS 
 ;;9002226.02101,"163,V90.32XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.33XA ",.01)
 ;;V90.33XA 
 ;;9002226.02101,"163,V90.33XA ",.02)
 ;;V90.33XA 
 ;;9002226.02101,"163,V90.33XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.33XD ",.01)
 ;;V90.33XD 
 ;;9002226.02101,"163,V90.33XD ",.02)
 ;;V90.33XD 
 ;;9002226.02101,"163,V90.33XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.33XS ",.01)
 ;;V90.33XS 
 ;;9002226.02101,"163,V90.33XS ",.02)
 ;;V90.33XS 
 ;;9002226.02101,"163,V90.33XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.34XA ",.01)
 ;;V90.34XA 
 ;;9002226.02101,"163,V90.34XA ",.02)
 ;;V90.34XA 
 ;;9002226.02101,"163,V90.34XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.34XD ",.01)
 ;;V90.34XD 
 ;;9002226.02101,"163,V90.34XD ",.02)
 ;;V90.34XD 
 ;;9002226.02101,"163,V90.34XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.34XS ",.01)
 ;;V90.34XS 
 ;;9002226.02101,"163,V90.34XS ",.02)
 ;;V90.34XS 
 ;;9002226.02101,"163,V90.34XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.35XA ",.01)
 ;;V90.35XA 
 ;;9002226.02101,"163,V90.35XA ",.02)
 ;;V90.35XA 
 ;;9002226.02101,"163,V90.35XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.35XD ",.01)
 ;;V90.35XD 
 ;;9002226.02101,"163,V90.35XD ",.02)
 ;;V90.35XD 
 ;;9002226.02101,"163,V90.35XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.35XS ",.01)
 ;;V90.35XS 
 ;;9002226.02101,"163,V90.35XS ",.02)
 ;;V90.35XS 
 ;;9002226.02101,"163,V90.35XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.36XA ",.01)
 ;;V90.36XA 
 ;;9002226.02101,"163,V90.36XA ",.02)
 ;;V90.36XA 
 ;;9002226.02101,"163,V90.36XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.36XD ",.01)
 ;;V90.36XD 
 ;;9002226.02101,"163,V90.36XD ",.02)
 ;;V90.36XD 
 ;;9002226.02101,"163,V90.36XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.36XS ",.01)
 ;;V90.36XS 
 ;;9002226.02101,"163,V90.36XS ",.02)
 ;;V90.36XS 
 ;;9002226.02101,"163,V90.36XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.37XA ",.01)
 ;;V90.37XA 
 ;;9002226.02101,"163,V90.37XA ",.02)
 ;;V90.37XA 
 ;;9002226.02101,"163,V90.37XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.37XD ",.01)
 ;;V90.37XD 
 ;;9002226.02101,"163,V90.37XD ",.02)
 ;;V90.37XD 
 ;;9002226.02101,"163,V90.37XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.37XS ",.01)
 ;;V90.37XS 
 ;;9002226.02101,"163,V90.37XS ",.02)
 ;;V90.37XS 
 ;;9002226.02101,"163,V90.37XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.38XA ",.01)
 ;;V90.38XA 
 ;;9002226.02101,"163,V90.38XA ",.02)
 ;;V90.38XA 
 ;;9002226.02101,"163,V90.38XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.38XD ",.01)
 ;;V90.38XD 
 ;;9002226.02101,"163,V90.38XD ",.02)
 ;;V90.38XD 
 ;;9002226.02101,"163,V90.38XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.38XS ",.01)
 ;;V90.38XS 
 ;;9002226.02101,"163,V90.38XS ",.02)
 ;;V90.38XS 
 ;;9002226.02101,"163,V90.38XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.39XA ",.01)
 ;;V90.39XA 
 ;;9002226.02101,"163,V90.39XA ",.02)
 ;;V90.39XA 
 ;;9002226.02101,"163,V90.39XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.39XD ",.01)
 ;;V90.39XD 
 ;;9002226.02101,"163,V90.39XD ",.02)
 ;;V90.39XD 
 ;;9002226.02101,"163,V90.39XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.39XS ",.01)
 ;;V90.39XS 
 ;;9002226.02101,"163,V90.39XS ",.02)
 ;;V90.39XS 
 ;;9002226.02101,"163,V90.39XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.80XA ",.01)
 ;;V90.80XA 
 ;;9002226.02101,"163,V90.80XA ",.02)
 ;;V90.80XA 
 ;;9002226.02101,"163,V90.80XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.80XD ",.01)
 ;;V90.80XD 
 ;;9002226.02101,"163,V90.80XD ",.02)
 ;;V90.80XD 
 ;;9002226.02101,"163,V90.80XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.80XS ",.01)
 ;;V90.80XS 
 ;;9002226.02101,"163,V90.80XS ",.02)
 ;;V90.80XS 
 ;;9002226.02101,"163,V90.80XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.81XA ",.01)
 ;;V90.81XA 
 ;;9002226.02101,"163,V90.81XA ",.02)
 ;;V90.81XA 
 ;;9002226.02101,"163,V90.81XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.81XD ",.01)
 ;;V90.81XD 
 ;;9002226.02101,"163,V90.81XD ",.02)
 ;;V90.81XD 
 ;;9002226.02101,"163,V90.81XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.81XS ",.01)
 ;;V90.81XS 
 ;;9002226.02101,"163,V90.81XS ",.02)
 ;;V90.81XS 
 ;;9002226.02101,"163,V90.81XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.82XA ",.01)
 ;;V90.82XA 
 ;;9002226.02101,"163,V90.82XA ",.02)
 ;;V90.82XA 
 ;;9002226.02101,"163,V90.82XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.82XD ",.01)
 ;;V90.82XD 
 ;;9002226.02101,"163,V90.82XD ",.02)
 ;;V90.82XD 
 ;;9002226.02101,"163,V90.82XD ",.03)
 ;;30
 ;;9002226.02101,"163,V90.82XS ",.01)
 ;;V90.82XS 
 ;;9002226.02101,"163,V90.82XS ",.02)
 ;;V90.82XS 
 ;;9002226.02101,"163,V90.82XS ",.03)
 ;;30
 ;;9002226.02101,"163,V90.83XA ",.01)
 ;;V90.83XA 
 ;;9002226.02101,"163,V90.83XA ",.02)
 ;;V90.83XA 
 ;;9002226.02101,"163,V90.83XA ",.03)
 ;;30
 ;;9002226.02101,"163,V90.83XD ",.01)
 ;;V90.83XD 
 ;;9002226.02101,"163,V90.83XD ",.02)
 ;;V90.83XD 
 ;;9002226.02101,"163,V90.83XD ",.03)
 ;;30