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
ATXD1S16 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON OCT 28, 2013;
+1 ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
+2 ;
START ;
+1 IF '$GET(ATXPGMC)
KILL ^TMP("ATX",$JOB)
+2 SET ATXPGMC=$GET(ATXPGMC)+1
+3 FOR ATXI=1:1
SET X=$PIECE($TEXT(TMP+ATXI),";;",2,99)
IF X=""
QUIT
SET X="^TMP(""ATX"",$J,"_X
SET ATXI=ATXI+1
SET Y=$PIECE($TEXT(TMP+ATXI),";;",2,99)
SET @X=Y
+4 QUIT
+5 ;
TMP ;;TAXONOMY (WITH BULLETIN)
+1 ;;9002226.02101,"821,V90.19XA ",.03)
+2 ;;30
+3 ;;9002226.02101,"821,V90.20XA ",.01)
+4 ;;V90.20XA
+5 ;;9002226.02101,"821,V90.20XA ",.02)
+6 ;;V90.20XA
+7 ;;9002226.02101,"821,V90.20XA ",.03)
+8 ;;30
+9 ;;9002226.02101,"821,V90.21XA ",.01)
+10 ;;V90.21XA
+11 ;;9002226.02101,"821,V90.21XA ",.02)
+12 ;;V90.21XA
+13 ;;9002226.02101,"821,V90.21XA ",.03)
+14 ;;30
+15 ;;9002226.02101,"821,V90.22XA ",.01)
+16 ;;V90.22XA
+17 ;;9002226.02101,"821,V90.22XA ",.02)
+18 ;;V90.22XA
+19 ;;9002226.02101,"821,V90.22XA ",.03)
+20 ;;30
+21 ;;9002226.02101,"821,V90.23XA ",.01)
+22 ;;V90.23XA
+23 ;;9002226.02101,"821,V90.23XA ",.02)
+24 ;;V90.23XA
+25 ;;9002226.02101,"821,V90.23XA ",.03)
+26 ;;30
+27 ;;9002226.02101,"821,V90.24XA ",.01)
+28 ;;V90.24XA
+29 ;;9002226.02101,"821,V90.24XA ",.02)
+30 ;;V90.24XA
+31 ;;9002226.02101,"821,V90.24XA ",.03)
+32 ;;30
+33 ;;9002226.02101,"821,V90.25XA ",.01)
+34 ;;V90.25XA
+35 ;;9002226.02101,"821,V90.25XA ",.02)
+36 ;;V90.25XA
+37 ;;9002226.02101,"821,V90.25XA ",.03)
+38 ;;30
+39 ;;9002226.02101,"821,V90.26XA ",.01)
+40 ;;V90.26XA
+41 ;;9002226.02101,"821,V90.26XA ",.02)
+42 ;;V90.26XA
+43 ;;9002226.02101,"821,V90.26XA ",.03)
+44 ;;30
+45 ;;9002226.02101,"821,V90.27XA ",.01)
+46 ;;V90.27XA
+47 ;;9002226.02101,"821,V90.27XA ",.02)
+48 ;;V90.27XA
+49 ;;9002226.02101,"821,V90.27XA ",.03)
+50 ;;30
+51 ;;9002226.02101,"821,V90.28XA ",.01)
+52 ;;V90.28XA
+53 ;;9002226.02101,"821,V90.28XA ",.02)
+54 ;;V90.28XA
+55 ;;9002226.02101,"821,V90.28XA ",.03)
+56 ;;30
+57 ;;9002226.02101,"821,V90.29XA ",.01)
+58 ;;V90.29XA
+59 ;;9002226.02101,"821,V90.29XA ",.02)
+60 ;;V90.29XA
+61 ;;9002226.02101,"821,V90.29XA ",.03)
+62 ;;30
+63 ;;9002226.02101,"821,V90.30XA ",.01)
+64 ;;V90.30XA
+65 ;;9002226.02101,"821,V90.30XA ",.02)
+66 ;;V90.30XA
+67 ;;9002226.02101,"821,V90.30XA ",.03)
+68 ;;30
+69 ;;9002226.02101,"821,V90.31XA ",.01)
+70 ;;V90.31XA
+71 ;;9002226.02101,"821,V90.31XA ",.02)
+72 ;;V90.31XA
+73 ;;9002226.02101,"821,V90.31XA ",.03)
+74 ;;30
+75 ;;9002226.02101,"821,V90.32XA ",.01)
+76 ;;V90.32XA
+77 ;;9002226.02101,"821,V90.32XA ",.02)
+78 ;;V90.32XA
+79 ;;9002226.02101,"821,V90.32XA ",.03)
+80 ;;30
+81 ;;9002226.02101,"821,V90.33XA ",.01)
+82 ;;V90.33XA
+83 ;;9002226.02101,"821,V90.33XA ",.02)
+84 ;;V90.33XA
+85 ;;9002226.02101,"821,V90.33XA ",.03)
+86 ;;30
+87 ;;9002226.02101,"821,V90.34XA ",.01)
+88 ;;V90.34XA
+89 ;;9002226.02101,"821,V90.34XA ",.02)
+90 ;;V90.34XA
+91 ;;9002226.02101,"821,V90.34XA ",.03)
+92 ;;30
+93 ;;9002226.02101,"821,V90.35XA ",.01)
+94 ;;V90.35XA
+95 ;;9002226.02101,"821,V90.35XA ",.02)
+96 ;;V90.35XA
+97 ;;9002226.02101,"821,V90.35XA ",.03)
+98 ;;30
+99 ;;9002226.02101,"821,V90.36XA ",.01)
+100 ;;V90.36XA
+101 ;;9002226.02101,"821,V90.36XA ",.02)
+102 ;;V90.36XA
+103 ;;9002226.02101,"821,V90.36XA ",.03)
+104 ;;30
+105 ;;9002226.02101,"821,V90.37XA ",.01)
+106 ;;V90.37XA
+107 ;;9002226.02101,"821,V90.37XA ",.02)
+108 ;;V90.37XA
+109 ;;9002226.02101,"821,V90.37XA ",.03)
+110 ;;30
+111 ;;9002226.02101,"821,V90.38XA ",.01)
+112 ;;V90.38XA
+113 ;;9002226.02101,"821,V90.38XA ",.02)
+114 ;;V90.38XA
+115 ;;9002226.02101,"821,V90.38XA ",.03)
+116 ;;30
+117 ;;9002226.02101,"821,V90.39XA ",.01)
+118 ;;V90.39XA
+119 ;;9002226.02101,"821,V90.39XA ",.02)
+120 ;;V90.39XA
+121 ;;9002226.02101,"821,V90.39XA ",.03)
+122 ;;30
+123 ;;9002226.02101,"821,V90.80XA ",.01)
+124 ;;V90.80XA
+125 ;;9002226.02101,"821,V90.80XA ",.02)
+126 ;;V90.80XA
+127 ;;9002226.02101,"821,V90.80XA ",.03)
+128 ;;30
+129 ;;9002226.02101,"821,V90.81XA ",.01)
+130 ;;V90.81XA
+131 ;;9002226.02101,"821,V90.81XA ",.02)
+132 ;;V90.81XA
+133 ;;9002226.02101,"821,V90.81XA ",.03)
+134 ;;30
+135 ;;9002226.02101,"821,V90.82XA ",.01)
+136 ;;V90.82XA
+137 ;;9002226.02101,"821,V90.82XA ",.02)
+138 ;;V90.82XA
+139 ;;9002226.02101,"821,V90.82XA ",.03)
+140 ;;30
+141 ;;9002226.02101,"821,V90.83XA ",.01)
+142 ;;V90.83XA
+143 ;;9002226.02101,"821,V90.83XA ",.02)
+144 ;;V90.83XA
+145 ;;9002226.02101,"821,V90.83XA ",.03)
+146 ;;30
+147 ;;9002226.02101,"821,V90.84XA ",.01)
+148 ;;V90.84XA
+149 ;;9002226.02101,"821,V90.84XA ",.02)
+150 ;;V90.84XA
+151 ;;9002226.02101,"821,V90.84XA ",.03)
+152 ;;30
+153 ;;9002226.02101,"821,V90.85XA ",.01)
+154 ;;V90.85XA
+155 ;;9002226.02101,"821,V90.85XA ",.02)
+156 ;;V90.85XA
+157 ;;9002226.02101,"821,V90.85XA ",.03)
+158 ;;30
+159 ;;9002226.02101,"821,V90.86XA ",.01)
+160 ;;V90.86XA
+161 ;;9002226.02101,"821,V90.86XA ",.02)
+162 ;;V90.86XA
+163 ;;9002226.02101,"821,V90.86XA ",.03)
+164 ;;30
+165 ;;9002226.02101,"821,V90.87XA ",.01)
+166 ;;V90.87XA
+167 ;;9002226.02101,"821,V90.87XA ",.02)
+168 ;;V90.87XA
+169 ;;9002226.02101,"821,V90.87XA ",.03)
+170 ;;30
+171 ;;9002226.02101,"821,V90.88XA ",.01)
+172 ;;V90.88XA
+173 ;;9002226.02101,"821,V90.88XA ",.02)
+174 ;;V90.88XA
+175 ;;9002226.02101,"821,V90.88XA ",.03)
+176 ;;30
+177 ;;9002226.02101,"821,V90.89XA ",.01)
+178 ;;V90.89XA
+179 ;;9002226.02101,"821,V90.89XA ",.02)
+180 ;;V90.89XA
+181 ;;9002226.02101,"821,V90.89XA ",.03)
+182 ;;30
+183 ;;9002226.02101,"821,V91.00XA ",.01)
+184 ;;V91.00XA
+185 ;;9002226.02101,"821,V91.00XA ",.02)
+186 ;;V91.00XA
+187 ;;9002226.02101,"821,V91.00XA ",.03)
+188 ;;30
+189 ;;9002226.02101,"821,V91.01XA ",.01)
+190 ;;V91.01XA
+191 ;;9002226.02101,"821,V91.01XA ",.02)
+192 ;;V91.01XA
+193 ;;9002226.02101,"821,V91.01XA ",.03)
+194 ;;30
+195 ;;9002226.02101,"821,V91.02XA ",.01)
+196 ;;V91.02XA
+197 ;;9002226.02101,"821,V91.02XA ",.02)
+198 ;;V91.02XA
+199 ;;9002226.02101,"821,V91.02XA ",.03)
+200 ;;30
+201 ;;9002226.02101,"821,V91.03XA ",.01)
+202 ;;V91.03XA
+203 ;;9002226.02101,"821,V91.03XA ",.02)
+204 ;;V91.03XA
+205 ;;9002226.02101,"821,V91.03XA ",.03)
+206 ;;30
+207 ;;9002226.02101,"821,V91.04XA ",.01)
+208 ;;V91.04XA
+209 ;;9002226.02101,"821,V91.04XA ",.02)
+210 ;;V91.04XA
+211 ;;9002226.02101,"821,V91.04XA ",.03)
+212 ;;30
+213 ;;9002226.02101,"821,V91.05XA ",.01)
+214 ;;V91.05XA
+215 ;;9002226.02101,"821,V91.05XA ",.02)
+216 ;;V91.05XA
+217 ;;9002226.02101,"821,V91.05XA ",.03)
+218 ;;30
+219 ;;9002226.02101,"821,V91.06XA ",.01)
+220 ;;V91.06XA
+221 ;;9002226.02101,"821,V91.06XA ",.02)
+222 ;;V91.06XA
+223 ;;9002226.02101,"821,V91.06XA ",.03)
+224 ;;30
+225 ;;9002226.02101,"821,V91.07XA ",.01)
+226 ;;V91.07XA
+227 ;;9002226.02101,"821,V91.07XA ",.02)
+228 ;;V91.07XA
+229 ;;9002226.02101,"821,V91.07XA ",.03)
+230 ;;30
+231 ;;9002226.02101,"821,V91.08XA ",.01)
+232 ;;V91.08XA
+233 ;;9002226.02101,"821,V91.08XA ",.02)
+234 ;;V91.08XA
+235 ;;9002226.02101,"821,V91.08XA ",.03)
+236 ;;30
+237 ;;9002226.02101,"821,V91.09XA ",.01)
+238 ;;V91.09XA
+239 ;;9002226.02101,"821,V91.09XA ",.02)
+240 ;;V91.09XA
+241 ;;9002226.02101,"821,V91.09XA ",.03)
+242 ;;30
+243 ;;9002226.02101,"821,V91.10XA ",.01)
+244 ;;V91.10XA
+245 ;;9002226.02101,"821,V91.10XA ",.02)
+246 ;;V91.10XA
+247 ;;9002226.02101,"821,V91.10XA ",.03)
+248 ;;30
+249 ;;9002226.02101,"821,V91.11XA ",.01)
+250 ;;V91.11XA
+251 ;;9002226.02101,"821,V91.11XA ",.02)
+252 ;;V91.11XA
+253 ;;9002226.02101,"821,V91.11XA ",.03)
+254 ;;30
+255 ;;9002226.02101,"821,V91.12XA ",.01)
+256 ;;V91.12XA
+257 ;;9002226.02101,"821,V91.12XA ",.02)
+258 ;;V91.12XA
+259 ;;9002226.02101,"821,V91.12XA ",.03)
+260 ;;30
+261 ;;9002226.02101,"821,V91.13XA ",.01)
+262 ;;V91.13XA
+263 ;;9002226.02101,"821,V91.13XA ",.02)
+264 ;;V91.13XA
+265 ;;9002226.02101,"821,V91.13XA ",.03)
+266 ;;30
+267 ;;9002226.02101,"821,V91.14XA ",.01)
+268 ;;V91.14XA
+269 ;;9002226.02101,"821,V91.14XA ",.02)
+270 ;;V91.14XA
+271 ;;9002226.02101,"821,V91.14XA ",.03)
+272 ;;30
+273 ;;9002226.02101,"821,V91.15XA ",.01)
+274 ;;V91.15XA
+275 ;;9002226.02101,"821,V91.15XA ",.02)
+276 ;;V91.15XA
+277 ;;9002226.02101,"821,V91.15XA ",.03)
+278 ;;30
+279 ;;9002226.02101,"821,V91.16XA ",.01)
+280 ;;V91.16XA
+281 ;;9002226.02101,"821,V91.16XA ",.02)
+282 ;;V91.16XA
+283 ;;9002226.02101,"821,V91.16XA ",.03)
+284 ;;30
+285 ;;9002226.02101,"821,V91.18XA ",.01)
+286 ;;V91.18XA
+287 ;;9002226.02101,"821,V91.18XA ",.02)
+288 ;;V91.18XA
+289 ;;9002226.02101,"821,V91.18XA ",.03)
+290 ;;30
+291 ;;9002226.02101,"821,V91.19XA ",.01)
+292 ;;V91.19XA
+293 ;;9002226.02101,"821,V91.19XA ",.02)
+294 ;;V91.19XA
+295 ;;9002226.02101,"821,V91.19XA ",.03)
+296 ;;30
+297 ;;9002226.02101,"821,V91.20XA ",.01)
+298 ;;V91.20XA
+299 ;;9002226.02101,"821,V91.20XA ",.02)
+300 ;;V91.20XA
+301 ;;9002226.02101,"821,V91.20XA ",.03)
+302 ;;30
+303 ;;9002226.02101,"821,V91.21XA ",.01)
+304 ;;V91.21XA
+305 ;;9002226.02101,"821,V91.21XA ",.02)
+306 ;;V91.21XA
+307 ;;9002226.02101,"821,V91.21XA ",.03)
+308 ;;30
+309 ;;9002226.02101,"821,V91.22XA ",.01)
+310 ;;V91.22XA
+311 ;;9002226.02101,"821,V91.22XA ",.02)
+312 ;;V91.22XA
+313 ;;9002226.02101,"821,V91.22XA ",.03)
+314 ;;30
+315 ;;9002226.02101,"821,V91.23XA ",.01)
+316 ;;V91.23XA
+317 ;;9002226.02101,"821,V91.23XA ",.02)
+318 ;;V91.23XA
+319 ;;9002226.02101,"821,V91.23XA ",.03)
+320 ;;30
+321 ;;9002226.02101,"821,V91.24XA ",.01)
+322 ;;V91.24XA
+323 ;;9002226.02101,"821,V91.24XA ",.02)
+324 ;;V91.24XA
+325 ;;9002226.02101,"821,V91.24XA ",.03)
+326 ;;30
+327 ;;9002226.02101,"821,V91.25XA ",.01)
+328 ;;V91.25XA
+329 ;;9002226.02101,"821,V91.25XA ",.02)
+330 ;;V91.25XA
+331 ;;9002226.02101,"821,V91.25XA ",.03)
+332 ;;30
+333 ;;9002226.02101,"821,V91.26XA ",.01)
+334 ;;V91.26XA
+335 ;;9002226.02101,"821,V91.26XA ",.02)
+336 ;;V91.26XA
+337 ;;9002226.02101,"821,V91.26XA ",.03)
+338 ;;30
+339 ;;9002226.02101,"821,V91.29XA ",.01)
+340 ;;V91.29XA
+341 ;;9002226.02101,"821,V91.29XA ",.02)
+342 ;;V91.29XA
+343 ;;9002226.02101,"821,V91.29XA ",.03)
+344 ;;30
+345 ;;9002226.02101,"821,V91.30XA ",.01)
+346 ;;V91.30XA
+347 ;;9002226.02101,"821,V91.30XA ",.02)
+348 ;;V91.30XA
+349 ;;9002226.02101,"821,V91.30XA ",.03)
+350 ;;30
+351 ;;9002226.02101,"821,V91.31XA ",.01)
+352 ;;V91.31XA
+353 ;;9002226.02101,"821,V91.31XA ",.02)
+354 ;;V91.31XA
+355 ;;9002226.02101,"821,V91.31XA ",.03)
+356 ;;30
+357 ;;9002226.02101,"821,V91.32XA ",.01)
+358 ;;V91.32XA
+359 ;;9002226.02101,"821,V91.32XA ",.02)
+360 ;;V91.32XA
+361 ;;9002226.02101,"821,V91.32XA ",.03)
+362 ;;30
+363 ;;9002226.02101,"821,V91.33XA ",.01)
+364 ;;V91.33XA
+365 ;;9002226.02101,"821,V91.33XA ",.02)
+366 ;;V91.33XA
+367 ;;9002226.02101,"821,V91.33XA ",.03)
+368 ;;30
+369 ;;9002226.02101,"821,V91.34XA ",.01)
+370 ;;V91.34XA
+371 ;;9002226.02101,"821,V91.34XA ",.02)
+372 ;;V91.34XA
+373 ;;9002226.02101,"821,V91.34XA ",.03)
+374 ;;30
+375 ;;9002226.02101,"821,V91.35XA ",.01)
+376 ;;V91.35XA
+377 ;;9002226.02101,"821,V91.35XA ",.02)
+378 ;;V91.35XA
+379 ;;9002226.02101,"821,V91.35XA ",.03)
+380 ;;30
+381 ;;9002226.02101,"821,V91.36XA ",.01)
+382 ;;V91.36XA
+383 ;;9002226.02101,"821,V91.36XA ",.02)
+384 ;;V91.36XA
+385 ;;9002226.02101,"821,V91.36XA ",.03)
+386 ;;30
+387 ;;9002226.02101,"821,V91.37XA ",.01)
+388 ;;V91.37XA
+389 ;;9002226.02101,"821,V91.37XA ",.02)
+390 ;;V91.37XA
+391 ;;9002226.02101,"821,V91.37XA ",.03)
+392 ;;30
+393 ;;9002226.02101,"821,V91.38XA ",.01)
+394 ;;V91.38XA
+395 ;;9002226.02101,"821,V91.38XA ",.02)
+396 ;;V91.38XA
+397 ;;9002226.02101,"821,V91.38XA ",.03)
+398 ;;30
+399 ;;9002226.02101,"821,V91.39XA ",.01)
+400 ;;V91.39XA
+401 ;;9002226.02101,"821,V91.39XA ",.02)
+402 ;;V91.39XA
+403 ;;9002226.02101,"821,V91.39XA ",.03)
+404 ;;30
+405 ;;9002226.02101,"821,V91.80XA ",.01)
+406 ;;V91.80XA
+407 ;;9002226.02101,"821,V91.80XA ",.02)
+408 ;;V91.80XA
+409 ;;9002226.02101,"821,V91.80XA ",.03)
+410 ;;30
+411 ;;9002226.02101,"821,V91.81XA ",.01)
+412 ;;V91.81XA
+413 ;;9002226.02101,"821,V91.81XA ",.02)
+414 ;;V91.81XA
+415 ;;9002226.02101,"821,V91.81XA ",.03)
+416 ;;30
+417 ;;9002226.02101,"821,V91.82XA ",.01)
+418 ;;V91.82XA
+419 ;;9002226.02101,"821,V91.82XA ",.02)
+420 ;;V91.82XA
+421 ;;9002226.02101,"821,V91.82XA ",.03)
+422 ;;30
+423 ;;9002226.02101,"821,V91.83XA ",.01)
+424 ;;V91.83XA
+425 ;;9002226.02101,"821,V91.83XA ",.02)
+426 ;;V91.83XA
+427 ;;9002226.02101,"821,V91.83XA ",.03)
+428 ;;30
+429 ;;9002226.02101,"821,V91.84XA ",.01)
+430 ;;V91.84XA
+431 ;;9002226.02101,"821,V91.84XA ",.02)
+432 ;;V91.84XA
+433 ;;9002226.02101,"821,V91.84XA ",.03)
+434 ;;30
+435 ;;9002226.02101,"821,V91.85XA ",.01)
+436 ;;V91.85XA
+437 ;;9002226.02101,"821,V91.85XA ",.02)
+438 ;;V91.85XA
+439 ;;9002226.02101,"821,V91.85XA ",.03)
+440 ;;30
+441 ;;9002226.02101,"821,V91.86XA ",.01)
+442 ;;V91.86XA
+443 ;;9002226.02101,"821,V91.86XA ",.02)
+444 ;;V91.86XA
+445 ;;9002226.02101,"821,V91.86XA ",.03)
+446 ;;30
+447 ;;9002226.02101,"821,V91.87XA ",.01)
+448 ;;V91.87XA
+449 ;;9002226.02101,"821,V91.87XA ",.02)
+450 ;;V91.87XA
+451 ;;9002226.02101,"821,V91.87XA ",.03)
+452 ;;30
+453 ;;9002226.02101,"821,V91.88XA ",.01)
+454 ;;V91.88XA
+455 ;;9002226.02101,"821,V91.88XA ",.02)
+456 ;;V91.88XA
+457 ;;9002226.02101,"821,V91.88XA ",.03)
+458 ;;30
+459 ;;9002226.02101,"821,V91.89XA ",.01)
+460 ;;V91.89XA
+461 ;;9002226.02101,"821,V91.89XA ",.02)
+462 ;;V91.89XA
+463 ;;9002226.02101,"821,V91.89XA ",.03)
+464 ;;30
+465 ;;9002226.02101,"821,V92.00XA ",.01)
+466 ;;V92.00XA
+467 ;;9002226.02101,"821,V92.00XA ",.02)
+468 ;;V92.00XA
+469 ;;9002226.02101,"821,V92.00XA ",.03)
+470 ;;30
+471 ;;9002226.02101,"821,V92.01XA ",.01)
+472 ;;V92.01XA
+473 ;;9002226.02101,"821,V92.01XA ",.02)
+474 ;;V92.01XA
+475 ;;9002226.02101,"821,V92.01XA ",.03)
+476 ;;30
+477 ;;9002226.02101,"821,V92.02XA ",.01)
+478 ;;V92.02XA
+479 ;;9002226.02101,"821,V92.02XA ",.02)
+480 ;;V92.02XA
+481 ;;9002226.02101,"821,V92.02XA ",.03)
+482 ;;30
+483 ;;9002226.02101,"821,V92.03XA ",.01)
+484 ;;V92.03XA
+485 ;;9002226.02101,"821,V92.03XA ",.02)
+486 ;;V92.03XA
+487 ;;9002226.02101,"821,V92.03XA ",.03)
+488 ;;30
+489 ;;9002226.02101,"821,V92.04XA ",.01)
+490 ;;V92.04XA
+491 ;;9002226.02101,"821,V92.04XA ",.02)
+492 ;;V92.04XA
+493 ;;9002226.02101,"821,V92.04XA ",.03)
+494 ;;30
+495 ;;9002226.02101,"821,V92.05XA ",.01)
+496 ;;V92.05XA
+497 ;;9002226.02101,"821,V92.05XA ",.02)
+498 ;;V92.05XA
+499 ;;9002226.02101,"821,V92.05XA ",.03)
+500 ;;30
+501 ;;9002226.02101,"821,V92.06XA ",.01)
+502 ;;V92.06XA
+503 ;;9002226.02101,"821,V92.06XA ",.02)
+504 ;;V92.06XA
+505 ;;9002226.02101,"821,V92.06XA ",.03)
+506 ;;30
+507 ;;9002226.02101,"821,V92.07XA ",.01)
+508 ;;V92.07XA
+509 ;;9002226.02101,"821,V92.07XA ",.02)
+510 ;;V92.07XA
+511 ;;9002226.02101,"821,V92.07XA ",.03)
+512 ;;30
+513 ;;9002226.02101,"821,V92.08XA ",.01)
+514 ;;V92.08XA
+515 ;;9002226.02101,"821,V92.08XA ",.02)
+516 ;;V92.08XA
+517 ;;9002226.02101,"821,V92.08XA ",.03)
+518 ;;30
+519 ;;9002226.02101,"821,V92.09XA ",.01)
+520 ;;V92.09XA
+521 ;;9002226.02101,"821,V92.09XA ",.02)
+522 ;;V92.09XA
+523 ;;9002226.02101,"821,V92.09XA ",.03)
+524 ;;30
+525 ;;9002226.02101,"821,V92.10XA ",.01)
+526 ;;V92.10XA
+527 ;;9002226.02101,"821,V92.10XA ",.02)
+528 ;;V92.10XA
+529 ;;9002226.02101,"821,V92.10XA ",.03)
+530 ;;30
+531 ;;9002226.02101,"821,V92.11XA ",.01)
+532 ;;V92.11XA
+533 ;;9002226.02101,"821,V92.11XA ",.02)
+534 ;;V92.11XA
+535 ;;9002226.02101,"821,V92.11XA ",.03)
+536 ;;30
+537 ;;9002226.02101,"821,V92.12XA ",.01)
+538 ;;V92.12XA
+539 ;;9002226.02101,"821,V92.12XA ",.02)
+540 ;;V92.12XA
+541 ;;9002226.02101,"821,V92.12XA ",.03)
+542 ;;30
+543 ;;9002226.02101,"821,V92.13XA ",.01)
+544 ;;V92.13XA