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

ATXD1S16.m

Go to the documentation of this file.
ATXD1S16 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON OCT 28, 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,"821,V90.19XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.20XA ",.01)
 ;;V90.20XA
 ;;9002226.02101,"821,V90.20XA ",.02)
 ;;V90.20XA
 ;;9002226.02101,"821,V90.20XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.21XA ",.01)
 ;;V90.21XA
 ;;9002226.02101,"821,V90.21XA ",.02)
 ;;V90.21XA
 ;;9002226.02101,"821,V90.21XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.22XA ",.01)
 ;;V90.22XA
 ;;9002226.02101,"821,V90.22XA ",.02)
 ;;V90.22XA
 ;;9002226.02101,"821,V90.22XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.23XA ",.01)
 ;;V90.23XA
 ;;9002226.02101,"821,V90.23XA ",.02)
 ;;V90.23XA
 ;;9002226.02101,"821,V90.23XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.24XA ",.01)
 ;;V90.24XA
 ;;9002226.02101,"821,V90.24XA ",.02)
 ;;V90.24XA
 ;;9002226.02101,"821,V90.24XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.25XA ",.01)
 ;;V90.25XA
 ;;9002226.02101,"821,V90.25XA ",.02)
 ;;V90.25XA
 ;;9002226.02101,"821,V90.25XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.26XA ",.01)
 ;;V90.26XA
 ;;9002226.02101,"821,V90.26XA ",.02)
 ;;V90.26XA
 ;;9002226.02101,"821,V90.26XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.27XA ",.01)
 ;;V90.27XA
 ;;9002226.02101,"821,V90.27XA ",.02)
 ;;V90.27XA
 ;;9002226.02101,"821,V90.27XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.28XA ",.01)
 ;;V90.28XA
 ;;9002226.02101,"821,V90.28XA ",.02)
 ;;V90.28XA
 ;;9002226.02101,"821,V90.28XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.29XA ",.01)
 ;;V90.29XA
 ;;9002226.02101,"821,V90.29XA ",.02)
 ;;V90.29XA
 ;;9002226.02101,"821,V90.29XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.30XA ",.01)
 ;;V90.30XA
 ;;9002226.02101,"821,V90.30XA ",.02)
 ;;V90.30XA
 ;;9002226.02101,"821,V90.30XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.31XA ",.01)
 ;;V90.31XA
 ;;9002226.02101,"821,V90.31XA ",.02)
 ;;V90.31XA
 ;;9002226.02101,"821,V90.31XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.32XA ",.01)
 ;;V90.32XA
 ;;9002226.02101,"821,V90.32XA ",.02)
 ;;V90.32XA
 ;;9002226.02101,"821,V90.32XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.33XA ",.01)
 ;;V90.33XA
 ;;9002226.02101,"821,V90.33XA ",.02)
 ;;V90.33XA
 ;;9002226.02101,"821,V90.33XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.34XA ",.01)
 ;;V90.34XA
 ;;9002226.02101,"821,V90.34XA ",.02)
 ;;V90.34XA
 ;;9002226.02101,"821,V90.34XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.35XA ",.01)
 ;;V90.35XA
 ;;9002226.02101,"821,V90.35XA ",.02)
 ;;V90.35XA
 ;;9002226.02101,"821,V90.35XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.36XA ",.01)
 ;;V90.36XA
 ;;9002226.02101,"821,V90.36XA ",.02)
 ;;V90.36XA
 ;;9002226.02101,"821,V90.36XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.37XA ",.01)
 ;;V90.37XA
 ;;9002226.02101,"821,V90.37XA ",.02)
 ;;V90.37XA
 ;;9002226.02101,"821,V90.37XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.38XA ",.01)
 ;;V90.38XA
 ;;9002226.02101,"821,V90.38XA ",.02)
 ;;V90.38XA
 ;;9002226.02101,"821,V90.38XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.39XA ",.01)
 ;;V90.39XA
 ;;9002226.02101,"821,V90.39XA ",.02)
 ;;V90.39XA
 ;;9002226.02101,"821,V90.39XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.80XA ",.01)
 ;;V90.80XA
 ;;9002226.02101,"821,V90.80XA ",.02)
 ;;V90.80XA
 ;;9002226.02101,"821,V90.80XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.81XA ",.01)
 ;;V90.81XA
 ;;9002226.02101,"821,V90.81XA ",.02)
 ;;V90.81XA
 ;;9002226.02101,"821,V90.81XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.82XA ",.01)
 ;;V90.82XA
 ;;9002226.02101,"821,V90.82XA ",.02)
 ;;V90.82XA
 ;;9002226.02101,"821,V90.82XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.83XA ",.01)
 ;;V90.83XA
 ;;9002226.02101,"821,V90.83XA ",.02)
 ;;V90.83XA
 ;;9002226.02101,"821,V90.83XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.84XA ",.01)
 ;;V90.84XA
 ;;9002226.02101,"821,V90.84XA ",.02)
 ;;V90.84XA
 ;;9002226.02101,"821,V90.84XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.85XA ",.01)
 ;;V90.85XA
 ;;9002226.02101,"821,V90.85XA ",.02)
 ;;V90.85XA
 ;;9002226.02101,"821,V90.85XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.86XA ",.01)
 ;;V90.86XA
 ;;9002226.02101,"821,V90.86XA ",.02)
 ;;V90.86XA
 ;;9002226.02101,"821,V90.86XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.87XA ",.01)
 ;;V90.87XA
 ;;9002226.02101,"821,V90.87XA ",.02)
 ;;V90.87XA
 ;;9002226.02101,"821,V90.87XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.88XA ",.01)
 ;;V90.88XA
 ;;9002226.02101,"821,V90.88XA ",.02)
 ;;V90.88XA
 ;;9002226.02101,"821,V90.88XA ",.03)
 ;;30
 ;;9002226.02101,"821,V90.89XA ",.01)
 ;;V90.89XA
 ;;9002226.02101,"821,V90.89XA ",.02)
 ;;V90.89XA
 ;;9002226.02101,"821,V90.89XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.00XA ",.01)
 ;;V91.00XA
 ;;9002226.02101,"821,V91.00XA ",.02)
 ;;V91.00XA
 ;;9002226.02101,"821,V91.00XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.01XA ",.01)
 ;;V91.01XA
 ;;9002226.02101,"821,V91.01XA ",.02)
 ;;V91.01XA
 ;;9002226.02101,"821,V91.01XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.02XA ",.01)
 ;;V91.02XA
 ;;9002226.02101,"821,V91.02XA ",.02)
 ;;V91.02XA
 ;;9002226.02101,"821,V91.02XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.03XA ",.01)
 ;;V91.03XA
 ;;9002226.02101,"821,V91.03XA ",.02)
 ;;V91.03XA
 ;;9002226.02101,"821,V91.03XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.04XA ",.01)
 ;;V91.04XA
 ;;9002226.02101,"821,V91.04XA ",.02)
 ;;V91.04XA
 ;;9002226.02101,"821,V91.04XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.05XA ",.01)
 ;;V91.05XA
 ;;9002226.02101,"821,V91.05XA ",.02)
 ;;V91.05XA
 ;;9002226.02101,"821,V91.05XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.06XA ",.01)
 ;;V91.06XA
 ;;9002226.02101,"821,V91.06XA ",.02)
 ;;V91.06XA
 ;;9002226.02101,"821,V91.06XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.07XA ",.01)
 ;;V91.07XA
 ;;9002226.02101,"821,V91.07XA ",.02)
 ;;V91.07XA
 ;;9002226.02101,"821,V91.07XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.08XA ",.01)
 ;;V91.08XA
 ;;9002226.02101,"821,V91.08XA ",.02)
 ;;V91.08XA
 ;;9002226.02101,"821,V91.08XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.09XA ",.01)
 ;;V91.09XA
 ;;9002226.02101,"821,V91.09XA ",.02)
 ;;V91.09XA
 ;;9002226.02101,"821,V91.09XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.10XA ",.01)
 ;;V91.10XA
 ;;9002226.02101,"821,V91.10XA ",.02)
 ;;V91.10XA
 ;;9002226.02101,"821,V91.10XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.11XA ",.01)
 ;;V91.11XA
 ;;9002226.02101,"821,V91.11XA ",.02)
 ;;V91.11XA
 ;;9002226.02101,"821,V91.11XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.12XA ",.01)
 ;;V91.12XA
 ;;9002226.02101,"821,V91.12XA ",.02)
 ;;V91.12XA
 ;;9002226.02101,"821,V91.12XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.13XA ",.01)
 ;;V91.13XA
 ;;9002226.02101,"821,V91.13XA ",.02)
 ;;V91.13XA
 ;;9002226.02101,"821,V91.13XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.14XA ",.01)
 ;;V91.14XA
 ;;9002226.02101,"821,V91.14XA ",.02)
 ;;V91.14XA
 ;;9002226.02101,"821,V91.14XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.15XA ",.01)
 ;;V91.15XA
 ;;9002226.02101,"821,V91.15XA ",.02)
 ;;V91.15XA
 ;;9002226.02101,"821,V91.15XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.16XA ",.01)
 ;;V91.16XA
 ;;9002226.02101,"821,V91.16XA ",.02)
 ;;V91.16XA
 ;;9002226.02101,"821,V91.16XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.18XA ",.01)
 ;;V91.18XA
 ;;9002226.02101,"821,V91.18XA ",.02)
 ;;V91.18XA
 ;;9002226.02101,"821,V91.18XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.19XA ",.01)
 ;;V91.19XA
 ;;9002226.02101,"821,V91.19XA ",.02)
 ;;V91.19XA
 ;;9002226.02101,"821,V91.19XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.20XA ",.01)
 ;;V91.20XA
 ;;9002226.02101,"821,V91.20XA ",.02)
 ;;V91.20XA
 ;;9002226.02101,"821,V91.20XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.21XA ",.01)
 ;;V91.21XA
 ;;9002226.02101,"821,V91.21XA ",.02)
 ;;V91.21XA
 ;;9002226.02101,"821,V91.21XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.22XA ",.01)
 ;;V91.22XA
 ;;9002226.02101,"821,V91.22XA ",.02)
 ;;V91.22XA
 ;;9002226.02101,"821,V91.22XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.23XA ",.01)
 ;;V91.23XA
 ;;9002226.02101,"821,V91.23XA ",.02)
 ;;V91.23XA
 ;;9002226.02101,"821,V91.23XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.24XA ",.01)
 ;;V91.24XA
 ;;9002226.02101,"821,V91.24XA ",.02)
 ;;V91.24XA
 ;;9002226.02101,"821,V91.24XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.25XA ",.01)
 ;;V91.25XA
 ;;9002226.02101,"821,V91.25XA ",.02)
 ;;V91.25XA
 ;;9002226.02101,"821,V91.25XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.26XA ",.01)
 ;;V91.26XA
 ;;9002226.02101,"821,V91.26XA ",.02)
 ;;V91.26XA
 ;;9002226.02101,"821,V91.26XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.29XA ",.01)
 ;;V91.29XA
 ;;9002226.02101,"821,V91.29XA ",.02)
 ;;V91.29XA
 ;;9002226.02101,"821,V91.29XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.30XA ",.01)
 ;;V91.30XA
 ;;9002226.02101,"821,V91.30XA ",.02)
 ;;V91.30XA
 ;;9002226.02101,"821,V91.30XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.31XA ",.01)
 ;;V91.31XA
 ;;9002226.02101,"821,V91.31XA ",.02)
 ;;V91.31XA
 ;;9002226.02101,"821,V91.31XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.32XA ",.01)
 ;;V91.32XA
 ;;9002226.02101,"821,V91.32XA ",.02)
 ;;V91.32XA
 ;;9002226.02101,"821,V91.32XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.33XA ",.01)
 ;;V91.33XA
 ;;9002226.02101,"821,V91.33XA ",.02)
 ;;V91.33XA
 ;;9002226.02101,"821,V91.33XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.34XA ",.01)
 ;;V91.34XA
 ;;9002226.02101,"821,V91.34XA ",.02)
 ;;V91.34XA
 ;;9002226.02101,"821,V91.34XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.35XA ",.01)
 ;;V91.35XA
 ;;9002226.02101,"821,V91.35XA ",.02)
 ;;V91.35XA
 ;;9002226.02101,"821,V91.35XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.36XA ",.01)
 ;;V91.36XA
 ;;9002226.02101,"821,V91.36XA ",.02)
 ;;V91.36XA
 ;;9002226.02101,"821,V91.36XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.37XA ",.01)
 ;;V91.37XA
 ;;9002226.02101,"821,V91.37XA ",.02)
 ;;V91.37XA
 ;;9002226.02101,"821,V91.37XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.38XA ",.01)
 ;;V91.38XA
 ;;9002226.02101,"821,V91.38XA ",.02)
 ;;V91.38XA
 ;;9002226.02101,"821,V91.38XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.39XA ",.01)
 ;;V91.39XA
 ;;9002226.02101,"821,V91.39XA ",.02)
 ;;V91.39XA
 ;;9002226.02101,"821,V91.39XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.80XA ",.01)
 ;;V91.80XA
 ;;9002226.02101,"821,V91.80XA ",.02)
 ;;V91.80XA
 ;;9002226.02101,"821,V91.80XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.81XA ",.01)
 ;;V91.81XA
 ;;9002226.02101,"821,V91.81XA ",.02)
 ;;V91.81XA
 ;;9002226.02101,"821,V91.81XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.82XA ",.01)
 ;;V91.82XA
 ;;9002226.02101,"821,V91.82XA ",.02)
 ;;V91.82XA
 ;;9002226.02101,"821,V91.82XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.83XA ",.01)
 ;;V91.83XA
 ;;9002226.02101,"821,V91.83XA ",.02)
 ;;V91.83XA
 ;;9002226.02101,"821,V91.83XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.84XA ",.01)
 ;;V91.84XA
 ;;9002226.02101,"821,V91.84XA ",.02)
 ;;V91.84XA
 ;;9002226.02101,"821,V91.84XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.85XA ",.01)
 ;;V91.85XA
 ;;9002226.02101,"821,V91.85XA ",.02)
 ;;V91.85XA
 ;;9002226.02101,"821,V91.85XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.86XA ",.01)
 ;;V91.86XA
 ;;9002226.02101,"821,V91.86XA ",.02)
 ;;V91.86XA
 ;;9002226.02101,"821,V91.86XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.87XA ",.01)
 ;;V91.87XA
 ;;9002226.02101,"821,V91.87XA ",.02)
 ;;V91.87XA
 ;;9002226.02101,"821,V91.87XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.88XA ",.01)
 ;;V91.88XA
 ;;9002226.02101,"821,V91.88XA ",.02)
 ;;V91.88XA
 ;;9002226.02101,"821,V91.88XA ",.03)
 ;;30
 ;;9002226.02101,"821,V91.89XA ",.01)
 ;;V91.89XA
 ;;9002226.02101,"821,V91.89XA ",.02)
 ;;V91.89XA
 ;;9002226.02101,"821,V91.89XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.00XA ",.01)
 ;;V92.00XA
 ;;9002226.02101,"821,V92.00XA ",.02)
 ;;V92.00XA
 ;;9002226.02101,"821,V92.00XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.01XA ",.01)
 ;;V92.01XA
 ;;9002226.02101,"821,V92.01XA ",.02)
 ;;V92.01XA
 ;;9002226.02101,"821,V92.01XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.02XA ",.01)
 ;;V92.02XA
 ;;9002226.02101,"821,V92.02XA ",.02)
 ;;V92.02XA
 ;;9002226.02101,"821,V92.02XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.03XA ",.01)
 ;;V92.03XA
 ;;9002226.02101,"821,V92.03XA ",.02)
 ;;V92.03XA
 ;;9002226.02101,"821,V92.03XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.04XA ",.01)
 ;;V92.04XA
 ;;9002226.02101,"821,V92.04XA ",.02)
 ;;V92.04XA
 ;;9002226.02101,"821,V92.04XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.05XA ",.01)
 ;;V92.05XA
 ;;9002226.02101,"821,V92.05XA ",.02)
 ;;V92.05XA
 ;;9002226.02101,"821,V92.05XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.06XA ",.01)
 ;;V92.06XA
 ;;9002226.02101,"821,V92.06XA ",.02)
 ;;V92.06XA
 ;;9002226.02101,"821,V92.06XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.07XA ",.01)
 ;;V92.07XA
 ;;9002226.02101,"821,V92.07XA ",.02)
 ;;V92.07XA
 ;;9002226.02101,"821,V92.07XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.08XA ",.01)
 ;;V92.08XA
 ;;9002226.02101,"821,V92.08XA ",.02)
 ;;V92.08XA
 ;;9002226.02101,"821,V92.08XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.09XA ",.01)
 ;;V92.09XA
 ;;9002226.02101,"821,V92.09XA ",.02)
 ;;V92.09XA
 ;;9002226.02101,"821,V92.09XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.10XA ",.01)
 ;;V92.10XA
 ;;9002226.02101,"821,V92.10XA ",.02)
 ;;V92.10XA
 ;;9002226.02101,"821,V92.10XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.11XA ",.01)
 ;;V92.11XA
 ;;9002226.02101,"821,V92.11XA ",.02)
 ;;V92.11XA
 ;;9002226.02101,"821,V92.11XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.12XA ",.01)
 ;;V92.12XA
 ;;9002226.02101,"821,V92.12XA ",.02)
 ;;V92.12XA
 ;;9002226.02101,"821,V92.12XA ",.03)
 ;;30
 ;;9002226.02101,"821,V92.13XA ",.01)
 ;;V92.13XA