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

ATXD5P15.m

Go to the documentation of this file.
ATXD5P15 ;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,W34.011A ",.03)
 ;;30
 ;;9002226.02101,"169,W34.011D ",.01)
 ;;W34.011D 
 ;;9002226.02101,"169,W34.011D ",.02)
 ;;W34.011D 
 ;;9002226.02101,"169,W34.011D ",.03)
 ;;30
 ;;9002226.02101,"169,W34.011S ",.01)
 ;;W34.011S 
 ;;9002226.02101,"169,W34.011S ",.02)
 ;;W34.011S 
 ;;9002226.02101,"169,W34.011S ",.03)
 ;;30
 ;;9002226.02101,"169,W34.018A ",.01)
 ;;W34.018A 
 ;;9002226.02101,"169,W34.018A ",.02)
 ;;W34.018A 
 ;;9002226.02101,"169,W34.018A ",.03)
 ;;30
 ;;9002226.02101,"169,W34.018D ",.01)
 ;;W34.018D 
 ;;9002226.02101,"169,W34.018D ",.02)
 ;;W34.018D 
 ;;9002226.02101,"169,W34.018D ",.03)
 ;;30
 ;;9002226.02101,"169,W34.018S ",.01)
 ;;W34.018S 
 ;;9002226.02101,"169,W34.018S ",.02)
 ;;W34.018S 
 ;;9002226.02101,"169,W34.018S ",.03)
 ;;30
 ;;9002226.02101,"169,W34.09XA ",.01)
 ;;W34.09XA 
 ;;9002226.02101,"169,W34.09XA ",.02)
 ;;W34.09XA 
 ;;9002226.02101,"169,W34.09XA ",.03)
 ;;30
 ;;9002226.02101,"169,W34.09XD ",.01)
 ;;W34.09XD 
 ;;9002226.02101,"169,W34.09XD ",.02)
 ;;W34.09XD 
 ;;9002226.02101,"169,W34.09XD ",.03)
 ;;30
 ;;9002226.02101,"169,W34.09XS ",.01)
 ;;W34.09XS 
 ;;9002226.02101,"169,W34.09XS ",.02)
 ;;W34.09XS 
 ;;9002226.02101,"169,W34.09XS ",.03)
 ;;30
 ;;9002226.02101,"169,W34.10XA ",.01)
 ;;W34.10XA 
 ;;9002226.02101,"169,W34.10XA ",.02)
 ;;W34.10XA 
 ;;9002226.02101,"169,W34.10XA ",.03)
 ;;30
 ;;9002226.02101,"169,W34.10XD ",.01)
 ;;W34.10XD 
 ;;9002226.02101,"169,W34.10XD ",.02)
 ;;W34.10XD 
 ;;9002226.02101,"169,W34.10XD ",.03)
 ;;30
 ;;9002226.02101,"169,W34.10XS ",.01)
 ;;W34.10XS 
 ;;9002226.02101,"169,W34.10XS ",.02)
 ;;W34.10XS 
 ;;9002226.02101,"169,W34.10XS ",.03)
 ;;30
 ;;9002226.02101,"169,W34.110A ",.01)
 ;;W34.110A 
 ;;9002226.02101,"169,W34.110A ",.02)
 ;;W34.110A 
 ;;9002226.02101,"169,W34.110A ",.03)
 ;;30
 ;;9002226.02101,"169,W34.110D ",.01)
 ;;W34.110D 
 ;;9002226.02101,"169,W34.110D ",.02)
 ;;W34.110D 
 ;;9002226.02101,"169,W34.110D ",.03)
 ;;30
 ;;9002226.02101,"169,W34.110S ",.01)
 ;;W34.110S 
 ;;9002226.02101,"169,W34.110S ",.02)
 ;;W34.110S 
 ;;9002226.02101,"169,W34.110S ",.03)
 ;;30
 ;;9002226.02101,"169,W34.111A ",.01)
 ;;W34.111A 
 ;;9002226.02101,"169,W34.111A ",.02)
 ;;W34.111A 
 ;;9002226.02101,"169,W34.111A ",.03)
 ;;30
 ;;9002226.02101,"169,W34.111D ",.01)
 ;;W34.111D 
 ;;9002226.02101,"169,W34.111D ",.02)
 ;;W34.111D 
 ;;9002226.02101,"169,W34.111D ",.03)
 ;;30
 ;;9002226.02101,"169,W34.111S ",.01)
 ;;W34.111S 
 ;;9002226.02101,"169,W34.111S ",.02)
 ;;W34.111S 
 ;;9002226.02101,"169,W34.111S ",.03)
 ;;30
 ;;9002226.02101,"169,W34.118A ",.01)
 ;;W34.118A 
 ;;9002226.02101,"169,W34.118A ",.02)
 ;;W34.118A 
 ;;9002226.02101,"169,W34.118A ",.03)
 ;;30
 ;;9002226.02101,"169,W34.118D ",.01)
 ;;W34.118D 
 ;;9002226.02101,"169,W34.118D ",.02)
 ;;W34.118D 
 ;;9002226.02101,"169,W34.118D ",.03)
 ;;30
 ;;9002226.02101,"169,W34.118S ",.01)
 ;;W34.118S 
 ;;9002226.02101,"169,W34.118S ",.02)
 ;;W34.118S 
 ;;9002226.02101,"169,W34.118S ",.03)
 ;;30
 ;;9002226.02101,"169,W34.19XA ",.01)
 ;;W34.19XA 
 ;;9002226.02101,"169,W34.19XA ",.02)
 ;;W34.19XA 
 ;;9002226.02101,"169,W34.19XA ",.03)
 ;;30
 ;;9002226.02101,"169,W34.19XD ",.01)
 ;;W34.19XD 
 ;;9002226.02101,"169,W34.19XD ",.02)
 ;;W34.19XD 
 ;;9002226.02101,"169,W34.19XD ",.03)
 ;;30
 ;;9002226.02101,"169,W34.19XS ",.01)
 ;;W34.19XS 
 ;;9002226.02101,"169,W34.19XS ",.02)
 ;;W34.19XS 
 ;;9002226.02101,"169,W34.19XS ",.03)
 ;;30
 ;;9002226.02101,"169,W35.XXXA ",.01)
 ;;W35.XXXA 
 ;;9002226.02101,"169,W35.XXXA ",.02)
 ;;W35.XXXA 
 ;;9002226.02101,"169,W35.XXXA ",.03)
 ;;30
 ;;9002226.02101,"169,W35.XXXD ",.01)
 ;;W35.XXXD 
 ;;9002226.02101,"169,W35.XXXD ",.02)
 ;;W35.XXXD 
 ;;9002226.02101,"169,W35.XXXD ",.03)
 ;;30
 ;;9002226.02101,"169,W35.XXXS ",.01)
 ;;W35.XXXS 
 ;;9002226.02101,"169,W35.XXXS ",.02)
 ;;W35.XXXS 
 ;;9002226.02101,"169,W35.XXXS ",.03)
 ;;30
 ;;9002226.02101,"169,W36.1XXA ",.01)
 ;;W36.1XXA 
 ;;9002226.02101,"169,W36.1XXA ",.02)
 ;;W36.1XXA 
 ;;9002226.02101,"169,W36.1XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W36.1XXD ",.01)
 ;;W36.1XXD 
 ;;9002226.02101,"169,W36.1XXD ",.02)
 ;;W36.1XXD 
 ;;9002226.02101,"169,W36.1XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W36.1XXS ",.01)
 ;;W36.1XXS 
 ;;9002226.02101,"169,W36.1XXS ",.02)
 ;;W36.1XXS 
 ;;9002226.02101,"169,W36.1XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W36.2XXA ",.01)
 ;;W36.2XXA 
 ;;9002226.02101,"169,W36.2XXA ",.02)
 ;;W36.2XXA 
 ;;9002226.02101,"169,W36.2XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W36.2XXD ",.01)
 ;;W36.2XXD 
 ;;9002226.02101,"169,W36.2XXD ",.02)
 ;;W36.2XXD 
 ;;9002226.02101,"169,W36.2XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W36.2XXS ",.01)
 ;;W36.2XXS 
 ;;9002226.02101,"169,W36.2XXS ",.02)
 ;;W36.2XXS 
 ;;9002226.02101,"169,W36.2XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W36.3XXA ",.01)
 ;;W36.3XXA 
 ;;9002226.02101,"169,W36.3XXA ",.02)
 ;;W36.3XXA 
 ;;9002226.02101,"169,W36.3XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W36.3XXD ",.01)
 ;;W36.3XXD 
 ;;9002226.02101,"169,W36.3XXD ",.02)
 ;;W36.3XXD 
 ;;9002226.02101,"169,W36.3XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W36.3XXS ",.01)
 ;;W36.3XXS 
 ;;9002226.02101,"169,W36.3XXS ",.02)
 ;;W36.3XXS 
 ;;9002226.02101,"169,W36.3XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W36.8XXA ",.01)
 ;;W36.8XXA 
 ;;9002226.02101,"169,W36.8XXA ",.02)
 ;;W36.8XXA 
 ;;9002226.02101,"169,W36.8XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W36.8XXD ",.01)
 ;;W36.8XXD 
 ;;9002226.02101,"169,W36.8XXD ",.02)
 ;;W36.8XXD 
 ;;9002226.02101,"169,W36.8XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W36.8XXS ",.01)
 ;;W36.8XXS 
 ;;9002226.02101,"169,W36.8XXS ",.02)
 ;;W36.8XXS 
 ;;9002226.02101,"169,W36.8XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W36.9XXA ",.01)
 ;;W36.9XXA 
 ;;9002226.02101,"169,W36.9XXA ",.02)
 ;;W36.9XXA 
 ;;9002226.02101,"169,W36.9XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W36.9XXD ",.01)
 ;;W36.9XXD 
 ;;9002226.02101,"169,W36.9XXD ",.02)
 ;;W36.9XXD 
 ;;9002226.02101,"169,W36.9XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W36.9XXS ",.01)
 ;;W36.9XXS 
 ;;9002226.02101,"169,W36.9XXS ",.02)
 ;;W36.9XXS 
 ;;9002226.02101,"169,W36.9XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W37.0XXA ",.01)
 ;;W37.0XXA 
 ;;9002226.02101,"169,W37.0XXA ",.02)
 ;;W37.0XXA 
 ;;9002226.02101,"169,W37.0XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W37.0XXD ",.01)
 ;;W37.0XXD 
 ;;9002226.02101,"169,W37.0XXD ",.02)
 ;;W37.0XXD 
 ;;9002226.02101,"169,W37.0XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W37.0XXS ",.01)
 ;;W37.0XXS 
 ;;9002226.02101,"169,W37.0XXS ",.02)
 ;;W37.0XXS 
 ;;9002226.02101,"169,W37.0XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W37.8XXA ",.01)
 ;;W37.8XXA 
 ;;9002226.02101,"169,W37.8XXA ",.02)
 ;;W37.8XXA 
 ;;9002226.02101,"169,W37.8XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W37.8XXD ",.01)
 ;;W37.8XXD 
 ;;9002226.02101,"169,W37.8XXD ",.02)
 ;;W37.8XXD 
 ;;9002226.02101,"169,W37.8XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W37.8XXS ",.01)
 ;;W37.8XXS 
 ;;9002226.02101,"169,W37.8XXS ",.02)
 ;;W37.8XXS 
 ;;9002226.02101,"169,W37.8XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W38.XXXA ",.01)
 ;;W38.XXXA 
 ;;9002226.02101,"169,W38.XXXA ",.02)
 ;;W38.XXXA 
 ;;9002226.02101,"169,W38.XXXA ",.03)
 ;;30
 ;;9002226.02101,"169,W38.XXXD ",.01)
 ;;W38.XXXD 
 ;;9002226.02101,"169,W38.XXXD ",.02)
 ;;W38.XXXD 
 ;;9002226.02101,"169,W38.XXXD ",.03)
 ;;30
 ;;9002226.02101,"169,W38.XXXS ",.01)
 ;;W38.XXXS 
 ;;9002226.02101,"169,W38.XXXS ",.02)
 ;;W38.XXXS 
 ;;9002226.02101,"169,W38.XXXS ",.03)
 ;;30
 ;;9002226.02101,"169,W39.XXXA ",.01)
 ;;W39.XXXA 
 ;;9002226.02101,"169,W39.XXXA ",.02)
 ;;W39.XXXA 
 ;;9002226.02101,"169,W39.XXXA ",.03)
 ;;30
 ;;9002226.02101,"169,W39.XXXD ",.01)
 ;;W39.XXXD 
 ;;9002226.02101,"169,W39.XXXD ",.02)
 ;;W39.XXXD 
 ;;9002226.02101,"169,W39.XXXD ",.03)
 ;;30
 ;;9002226.02101,"169,W39.XXXS ",.01)
 ;;W39.XXXS 
 ;;9002226.02101,"169,W39.XXXS ",.02)
 ;;W39.XXXS 
 ;;9002226.02101,"169,W39.XXXS ",.03)
 ;;30
 ;;9002226.02101,"169,W40.0XXA ",.01)
 ;;W40.0XXA 
 ;;9002226.02101,"169,W40.0XXA ",.02)
 ;;W40.0XXA 
 ;;9002226.02101,"169,W40.0XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W40.0XXD ",.01)
 ;;W40.0XXD 
 ;;9002226.02101,"169,W40.0XXD ",.02)
 ;;W40.0XXD 
 ;;9002226.02101,"169,W40.0XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W40.0XXS ",.01)
 ;;W40.0XXS 
 ;;9002226.02101,"169,W40.0XXS ",.02)
 ;;W40.0XXS 
 ;;9002226.02101,"169,W40.0XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W40.1XXA ",.01)
 ;;W40.1XXA 
 ;;9002226.02101,"169,W40.1XXA ",.02)
 ;;W40.1XXA 
 ;;9002226.02101,"169,W40.1XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W40.1XXD ",.01)
 ;;W40.1XXD 
 ;;9002226.02101,"169,W40.1XXD ",.02)
 ;;W40.1XXD 
 ;;9002226.02101,"169,W40.1XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W40.1XXS ",.01)
 ;;W40.1XXS 
 ;;9002226.02101,"169,W40.1XXS ",.02)
 ;;W40.1XXS 
 ;;9002226.02101,"169,W40.1XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W40.8XXA ",.01)
 ;;W40.8XXA 
 ;;9002226.02101,"169,W40.8XXA ",.02)
 ;;W40.8XXA 
 ;;9002226.02101,"169,W40.8XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W40.8XXD ",.01)
 ;;W40.8XXD 
 ;;9002226.02101,"169,W40.8XXD ",.02)
 ;;W40.8XXD 
 ;;9002226.02101,"169,W40.8XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W40.8XXS ",.01)
 ;;W40.8XXS 
 ;;9002226.02101,"169,W40.8XXS ",.02)
 ;;W40.8XXS 
 ;;9002226.02101,"169,W40.8XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W40.9XXA ",.01)
 ;;W40.9XXA 
 ;;9002226.02101,"169,W40.9XXA ",.02)
 ;;W40.9XXA 
 ;;9002226.02101,"169,W40.9XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W40.9XXD ",.01)
 ;;W40.9XXD 
 ;;9002226.02101,"169,W40.9XXD ",.02)
 ;;W40.9XXD 
 ;;9002226.02101,"169,W40.9XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W40.9XXS ",.01)
 ;;W40.9XXS 
 ;;9002226.02101,"169,W40.9XXS ",.02)
 ;;W40.9XXS 
 ;;9002226.02101,"169,W40.9XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W42.0XXA ",.01)
 ;;W42.0XXA 
 ;;9002226.02101,"169,W42.0XXA ",.02)
 ;;W42.0XXA 
 ;;9002226.02101,"169,W42.0XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W42.0XXD ",.01)
 ;;W42.0XXD 
 ;;9002226.02101,"169,W42.0XXD ",.02)
 ;;W42.0XXD 
 ;;9002226.02101,"169,W42.0XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W42.0XXS ",.01)
 ;;W42.0XXS 
 ;;9002226.02101,"169,W42.0XXS ",.02)
 ;;W42.0XXS 
 ;;9002226.02101,"169,W42.0XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W42.9XXA ",.01)
 ;;W42.9XXA 
 ;;9002226.02101,"169,W42.9XXA ",.02)
 ;;W42.9XXA 
 ;;9002226.02101,"169,W42.9XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W42.9XXD ",.01)
 ;;W42.9XXD 
 ;;9002226.02101,"169,W42.9XXD ",.02)
 ;;W42.9XXD 
 ;;9002226.02101,"169,W42.9XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W42.9XXS ",.01)
 ;;W42.9XXS 
 ;;9002226.02101,"169,W42.9XXS ",.02)
 ;;W42.9XXS 
 ;;9002226.02101,"169,W42.9XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W49.01XA ",.01)
 ;;W49.01XA 
 ;;9002226.02101,"169,W49.01XA ",.02)
 ;;W49.01XA 
 ;;9002226.02101,"169,W49.01XA ",.03)
 ;;30
 ;;9002226.02101,"169,W49.01XD ",.01)
 ;;W49.01XD 
 ;;9002226.02101,"169,W49.01XD ",.02)
 ;;W49.01XD 
 ;;9002226.02101,"169,W49.01XD ",.03)
 ;;30
 ;;9002226.02101,"169,W49.01XS ",.01)
 ;;W49.01XS 
 ;;9002226.02101,"169,W49.01XS ",.02)
 ;;W49.01XS 
 ;;9002226.02101,"169,W49.01XS ",.03)
 ;;30
 ;;9002226.02101,"169,W49.02XA ",.01)
 ;;W49.02XA 
 ;;9002226.02101,"169,W49.02XA ",.02)
 ;;W49.02XA 
 ;;9002226.02101,"169,W49.02XA ",.03)
 ;;30
 ;;9002226.02101,"169,W49.02XD ",.01)
 ;;W49.02XD 
 ;;9002226.02101,"169,W49.02XD ",.02)
 ;;W49.02XD 
 ;;9002226.02101,"169,W49.02XD ",.03)
 ;;30
 ;;9002226.02101,"169,W49.02XS ",.01)
 ;;W49.02XS 
 ;;9002226.02101,"169,W49.02XS ",.02)
 ;;W49.02XS 
 ;;9002226.02101,"169,W49.02XS ",.03)
 ;;30
 ;;9002226.02101,"169,W49.03XA ",.01)
 ;;W49.03XA 
 ;;9002226.02101,"169,W49.03XA ",.02)
 ;;W49.03XA 
 ;;9002226.02101,"169,W49.03XA ",.03)
 ;;30
 ;;9002226.02101,"169,W49.03XD ",.01)
 ;;W49.03XD 
 ;;9002226.02101,"169,W49.03XD ",.02)
 ;;W49.03XD 
 ;;9002226.02101,"169,W49.03XD ",.03)
 ;;30
 ;;9002226.02101,"169,W49.03XS ",.01)
 ;;W49.03XS 
 ;;9002226.02101,"169,W49.03XS ",.02)
 ;;W49.03XS 
 ;;9002226.02101,"169,W49.03XS ",.03)
 ;;30
 ;;9002226.02101,"169,W49.04XA ",.01)
 ;;W49.04XA 
 ;;9002226.02101,"169,W49.04XA ",.02)
 ;;W49.04XA 
 ;;9002226.02101,"169,W49.04XA ",.03)
 ;;30
 ;;9002226.02101,"169,W49.04XD ",.01)
 ;;W49.04XD 
 ;;9002226.02101,"169,W49.04XD ",.02)
 ;;W49.04XD 
 ;;9002226.02101,"169,W49.04XD ",.03)
 ;;30
 ;;9002226.02101,"169,W49.04XS ",.01)
 ;;W49.04XS 
 ;;9002226.02101,"169,W49.04XS ",.02)
 ;;W49.04XS 
 ;;9002226.02101,"169,W49.04XS ",.03)
 ;;30
 ;;9002226.02101,"169,W49.09XA ",.01)
 ;;W49.09XA 
 ;;9002226.02101,"169,W49.09XA ",.02)
 ;;W49.09XA 
 ;;9002226.02101,"169,W49.09XA ",.03)
 ;;30
 ;;9002226.02101,"169,W49.09XD ",.01)
 ;;W49.09XD 
 ;;9002226.02101,"169,W49.09XD ",.02)
 ;;W49.09XD 
 ;;9002226.02101,"169,W49.09XD ",.03)
 ;;30
 ;;9002226.02101,"169,W49.09XS ",.01)
 ;;W49.09XS 
 ;;9002226.02101,"169,W49.09XS ",.02)
 ;;W49.09XS 
 ;;9002226.02101,"169,W49.09XS ",.03)
 ;;30
 ;;9002226.02101,"169,W49.9XXA ",.01)
 ;;W49.9XXA 
 ;;9002226.02101,"169,W49.9XXA ",.02)
 ;;W49.9XXA 
 ;;9002226.02101,"169,W49.9XXA ",.03)
 ;;30
 ;;9002226.02101,"169,W49.9XXD ",.01)
 ;;W49.9XXD 
 ;;9002226.02101,"169,W49.9XXD ",.02)
 ;;W49.9XXD 
 ;;9002226.02101,"169,W49.9XXD ",.03)
 ;;30
 ;;9002226.02101,"169,W49.9XXS ",.01)
 ;;W49.9XXS 
 ;;9002226.02101,"169,W49.9XXS ",.02)
 ;;W49.9XXS 
 ;;9002226.02101,"169,W49.9XXS ",.03)
 ;;30
 ;;9002226.02101,"169,W50.0XXA ",.01)
 ;;W50.0XXA