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

ATXD1S8.m

Go to the documentation of this file.
ATXD1S8 ;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,V24.5XXA ",.02)
 ;;V24.5XXA
 ;;9002226.02101,"821,V24.5XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V24.9XXA ",.01)
 ;;V24.9XXA
 ;;9002226.02101,"821,V24.9XXA ",.02)
 ;;V24.9XXA
 ;;9002226.02101,"821,V24.9XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V25.0XXA ",.01)
 ;;V25.0XXA
 ;;9002226.02101,"821,V25.0XXA ",.02)
 ;;V25.0XXA
 ;;9002226.02101,"821,V25.0XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V25.1XXA ",.01)
 ;;V25.1XXA
 ;;9002226.02101,"821,V25.1XXA ",.02)
 ;;V25.1XXA
 ;;9002226.02101,"821,V25.1XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V25.2XXA ",.01)
 ;;V25.2XXA
 ;;9002226.02101,"821,V25.2XXA ",.02)
 ;;V25.2XXA
 ;;9002226.02101,"821,V25.2XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V25.3XXA ",.01)
 ;;V25.3XXA
 ;;9002226.02101,"821,V25.3XXA ",.02)
 ;;V25.3XXA
 ;;9002226.02101,"821,V25.3XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V25.4XXA ",.01)
 ;;V25.4XXA
 ;;9002226.02101,"821,V25.4XXA ",.02)
 ;;V25.4XXA
 ;;9002226.02101,"821,V25.4XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V25.5XXA ",.01)
 ;;V25.5XXA
 ;;9002226.02101,"821,V25.5XXA ",.02)
 ;;V25.5XXA
 ;;9002226.02101,"821,V25.5XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V25.9XXA ",.01)
 ;;V25.9XXA
 ;;9002226.02101,"821,V25.9XXA ",.02)
 ;;V25.9XXA
 ;;9002226.02101,"821,V25.9XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V26.0XXA ",.01)
 ;;V26.0XXA
 ;;9002226.02101,"821,V26.0XXA ",.02)
 ;;V26.0XXA
 ;;9002226.02101,"821,V26.0XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V26.1XXA ",.01)
 ;;V26.1XXA
 ;;9002226.02101,"821,V26.1XXA ",.02)
 ;;V26.1XXA
 ;;9002226.02101,"821,V26.1XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V26.2XXA ",.01)
 ;;V26.2XXA
 ;;9002226.02101,"821,V26.2XXA ",.02)
 ;;V26.2XXA
 ;;9002226.02101,"821,V26.2XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V26.3XXA ",.01)
 ;;V26.3XXA
 ;;9002226.02101,"821,V26.3XXA ",.02)
 ;;V26.3XXA
 ;;9002226.02101,"821,V26.3XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V26.4XXA ",.01)
 ;;V26.4XXA
 ;;9002226.02101,"821,V26.4XXA ",.02)
 ;;V26.4XXA
 ;;9002226.02101,"821,V26.4XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V26.5XXA ",.01)
 ;;V26.5XXA
 ;;9002226.02101,"821,V26.5XXA ",.02)
 ;;V26.5XXA
 ;;9002226.02101,"821,V26.5XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V26.9XXA ",.01)
 ;;V26.9XXA
 ;;9002226.02101,"821,V26.9XXA ",.02)
 ;;V26.9XXA
 ;;9002226.02101,"821,V26.9XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V27.0XXA ",.01)
 ;;V27.0XXA
 ;;9002226.02101,"821,V27.0XXA ",.02)
 ;;V27.0XXA
 ;;9002226.02101,"821,V27.0XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V27.1XXA ",.01)
 ;;V27.1XXA
 ;;9002226.02101,"821,V27.1XXA ",.02)
 ;;V27.1XXA
 ;;9002226.02101,"821,V27.1XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V27.2XXA ",.01)
 ;;V27.2XXA
 ;;9002226.02101,"821,V27.2XXA ",.02)
 ;;V27.2XXA
 ;;9002226.02101,"821,V27.2XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V27.3XXA ",.01)
 ;;V27.3XXA
 ;;9002226.02101,"821,V27.3XXA ",.02)
 ;;V27.3XXA
 ;;9002226.02101,"821,V27.3XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V27.4XXA ",.01)
 ;;V27.4XXA
 ;;9002226.02101,"821,V27.4XXA ",.02)
 ;;V27.4XXA
 ;;9002226.02101,"821,V27.4XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V27.5XXA ",.01)
 ;;V27.5XXA
 ;;9002226.02101,"821,V27.5XXA ",.02)
 ;;V27.5XXA
 ;;9002226.02101,"821,V27.5XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V27.9XXA ",.01)
 ;;V27.9XXA
 ;;9002226.02101,"821,V27.9XXA ",.02)
 ;;V27.9XXA
 ;;9002226.02101,"821,V27.9XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V28.0XXA ",.01)
 ;;V28.0XXA
 ;;9002226.02101,"821,V28.0XXA ",.02)
 ;;V28.0XXA
 ;;9002226.02101,"821,V28.0XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V28.1XXA ",.01)
 ;;V28.1XXA
 ;;9002226.02101,"821,V28.1XXA ",.02)
 ;;V28.1XXA
 ;;9002226.02101,"821,V28.1XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V28.2XXA ",.01)
 ;;V28.2XXA
 ;;9002226.02101,"821,V28.2XXA ",.02)
 ;;V28.2XXA
 ;;9002226.02101,"821,V28.2XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V28.3XXA ",.01)
 ;;V28.3XXA
 ;;9002226.02101,"821,V28.3XXA ",.02)
 ;;V28.3XXA
 ;;9002226.02101,"821,V28.3XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V28.4XXA ",.01)
 ;;V28.4XXA
 ;;9002226.02101,"821,V28.4XXA ",.02)
 ;;V28.4XXA
 ;;9002226.02101,"821,V28.4XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V28.5XXA ",.01)
 ;;V28.5XXA
 ;;9002226.02101,"821,V28.5XXA ",.02)
 ;;V28.5XXA
 ;;9002226.02101,"821,V28.5XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V28.9XXA ",.01)
 ;;V28.9XXA
 ;;9002226.02101,"821,V28.9XXA ",.02)
 ;;V28.9XXA
 ;;9002226.02101,"821,V28.9XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.00XA ",.01)
 ;;V29.00XA
 ;;9002226.02101,"821,V29.00XA ",.02)
 ;;V29.00XA
 ;;9002226.02101,"821,V29.00XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.09XA ",.01)
 ;;V29.09XA
 ;;9002226.02101,"821,V29.09XA ",.02)
 ;;V29.09XA
 ;;9002226.02101,"821,V29.09XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.10XA ",.01)
 ;;V29.10XA
 ;;9002226.02101,"821,V29.10XA ",.02)
 ;;V29.10XA
 ;;9002226.02101,"821,V29.10XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.19XA ",.01)
 ;;V29.19XA
 ;;9002226.02101,"821,V29.19XA ",.02)
 ;;V29.19XA
 ;;9002226.02101,"821,V29.19XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.20XA ",.01)
 ;;V29.20XA
 ;;9002226.02101,"821,V29.20XA ",.02)
 ;;V29.20XA
 ;;9002226.02101,"821,V29.20XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.29XA ",.01)
 ;;V29.29XA
 ;;9002226.02101,"821,V29.29XA ",.02)
 ;;V29.29XA
 ;;9002226.02101,"821,V29.29XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.3XXA ",.01)
 ;;V29.3XXA
 ;;9002226.02101,"821,V29.3XXA ",.02)
 ;;V29.3XXA
 ;;9002226.02101,"821,V29.3XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.40XA ",.01)
 ;;V29.40XA
 ;;9002226.02101,"821,V29.40XA ",.02)
 ;;V29.40XA
 ;;9002226.02101,"821,V29.40XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.49XA ",.01)
 ;;V29.49XA
 ;;9002226.02101,"821,V29.49XA ",.02)
 ;;V29.49XA
 ;;9002226.02101,"821,V29.49XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.50XA ",.01)
 ;;V29.50XA
 ;;9002226.02101,"821,V29.50XA ",.02)
 ;;V29.50XA
 ;;9002226.02101,"821,V29.50XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.59XA ",.01)
 ;;V29.59XA
 ;;9002226.02101,"821,V29.59XA ",.02)
 ;;V29.59XA
 ;;9002226.02101,"821,V29.59XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.60XA ",.01)
 ;;V29.60XA
 ;;9002226.02101,"821,V29.60XA ",.02)
 ;;V29.60XA
 ;;9002226.02101,"821,V29.60XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.69XA ",.01)
 ;;V29.69XA
 ;;9002226.02101,"821,V29.69XA ",.02)
 ;;V29.69XA
 ;;9002226.02101,"821,V29.69XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.81XA ",.01)
 ;;V29.81XA
 ;;9002226.02101,"821,V29.81XA ",.02)
 ;;V29.81XA
 ;;9002226.02101,"821,V29.81XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.88XA ",.01)
 ;;V29.88XA
 ;;9002226.02101,"821,V29.88XA ",.02)
 ;;V29.88XA
 ;;9002226.02101,"821,V29.88XA ",.03)
 ;;30
 ;;9002226.02101,"821,V29.9XXA ",.01)
 ;;V29.9XXA
 ;;9002226.02101,"821,V29.9XXA ",.02)
 ;;V29.9XXA
 ;;9002226.02101,"821,V29.9XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V30.0XXA ",.01)
 ;;V30.0XXA
 ;;9002226.02101,"821,V30.0XXA ",.02)
 ;;V30.0XXA
 ;;9002226.02101,"821,V30.0XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V30.1XXA ",.01)
 ;;V30.1XXA
 ;;9002226.02101,"821,V30.1XXA ",.02)
 ;;V30.1XXA
 ;;9002226.02101,"821,V30.1XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V30.2XXA ",.01)
 ;;V30.2XXA
 ;;9002226.02101,"821,V30.2XXA ",.02)
 ;;V30.2XXA
 ;;9002226.02101,"821,V30.2XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V30.4XXA ",.01)
 ;;V30.4XXA
 ;;9002226.02101,"821,V30.4XXA ",.02)
 ;;V30.4XXA
 ;;9002226.02101,"821,V30.4XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V30.5XXA ",.01)
 ;;V30.5XXA
 ;;9002226.02101,"821,V30.5XXA ",.02)
 ;;V30.5XXA
 ;;9002226.02101,"821,V30.5XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V30.6XXA ",.01)
 ;;V30.6XXA
 ;;9002226.02101,"821,V30.6XXA ",.02)
 ;;V30.6XXA
 ;;9002226.02101,"821,V30.6XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V30.7XXA ",.01)
 ;;V30.7XXA
 ;;9002226.02101,"821,V30.7XXA ",.02)
 ;;V30.7XXA
 ;;9002226.02101,"821,V30.7XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V30.9XXA ",.01)
 ;;V30.9XXA
 ;;9002226.02101,"821,V30.9XXA ",.02)
 ;;V30.9XXA
 ;;9002226.02101,"821,V30.9XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V31.0XXA ",.01)
 ;;V31.0XXA
 ;;9002226.02101,"821,V31.0XXA ",.02)
 ;;V31.0XXA
 ;;9002226.02101,"821,V31.0XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V31.1XXA ",.01)
 ;;V31.1XXA
 ;;9002226.02101,"821,V31.1XXA ",.02)
 ;;V31.1XXA
 ;;9002226.02101,"821,V31.1XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V31.2XXA ",.01)
 ;;V31.2XXA
 ;;9002226.02101,"821,V31.2XXA ",.02)
 ;;V31.2XXA
 ;;9002226.02101,"821,V31.2XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V31.4XXA ",.01)
 ;;V31.4XXA
 ;;9002226.02101,"821,V31.4XXA ",.02)
 ;;V31.4XXA
 ;;9002226.02101,"821,V31.4XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V31.5XXA ",.01)
 ;;V31.5XXA
 ;;9002226.02101,"821,V31.5XXA ",.02)
 ;;V31.5XXA
 ;;9002226.02101,"821,V31.5XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V31.6XXA ",.01)
 ;;V31.6XXA
 ;;9002226.02101,"821,V31.6XXA ",.02)
 ;;V31.6XXA
 ;;9002226.02101,"821,V31.6XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V31.7XXA ",.01)
 ;;V31.7XXA
 ;;9002226.02101,"821,V31.7XXA ",.02)
 ;;V31.7XXA
 ;;9002226.02101,"821,V31.7XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V31.9XXA ",.01)
 ;;V31.9XXA
 ;;9002226.02101,"821,V31.9XXA ",.02)
 ;;V31.9XXA
 ;;9002226.02101,"821,V31.9XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V32.0XXA ",.01)
 ;;V32.0XXA
 ;;9002226.02101,"821,V32.0XXA ",.02)
 ;;V32.0XXA
 ;;9002226.02101,"821,V32.0XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V32.1XXA ",.01)
 ;;V32.1XXA
 ;;9002226.02101,"821,V32.1XXA ",.02)
 ;;V32.1XXA
 ;;9002226.02101,"821,V32.1XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V32.2XXA ",.01)
 ;;V32.2XXA
 ;;9002226.02101,"821,V32.2XXA ",.02)
 ;;V32.2XXA
 ;;9002226.02101,"821,V32.2XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V32.4XXA ",.01)
 ;;V32.4XXA
 ;;9002226.02101,"821,V32.4XXA ",.02)
 ;;V32.4XXA
 ;;9002226.02101,"821,V32.4XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V32.5XXA ",.01)
 ;;V32.5XXA
 ;;9002226.02101,"821,V32.5XXA ",.02)
 ;;V32.5XXA
 ;;9002226.02101,"821,V32.5XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V32.6XXA ",.01)
 ;;V32.6XXA
 ;;9002226.02101,"821,V32.6XXA ",.02)
 ;;V32.6XXA
 ;;9002226.02101,"821,V32.6XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V32.7XXA ",.01)
 ;;V32.7XXA
 ;;9002226.02101,"821,V32.7XXA ",.02)
 ;;V32.7XXA
 ;;9002226.02101,"821,V32.7XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V32.9XXA ",.01)
 ;;V32.9XXA
 ;;9002226.02101,"821,V32.9XXA ",.02)
 ;;V32.9XXA
 ;;9002226.02101,"821,V32.9XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V33.0XXA ",.01)
 ;;V33.0XXA
 ;;9002226.02101,"821,V33.0XXA ",.02)
 ;;V33.0XXA
 ;;9002226.02101,"821,V33.0XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V33.1XXA ",.01)
 ;;V33.1XXA
 ;;9002226.02101,"821,V33.1XXA ",.02)
 ;;V33.1XXA
 ;;9002226.02101,"821,V33.1XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V33.2XXA ",.01)
 ;;V33.2XXA
 ;;9002226.02101,"821,V33.2XXA ",.02)
 ;;V33.2XXA
 ;;9002226.02101,"821,V33.2XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V33.4XXA ",.01)
 ;;V33.4XXA
 ;;9002226.02101,"821,V33.4XXA ",.02)
 ;;V33.4XXA
 ;;9002226.02101,"821,V33.4XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V33.5XXA ",.01)
 ;;V33.5XXA
 ;;9002226.02101,"821,V33.5XXA ",.02)
 ;;V33.5XXA
 ;;9002226.02101,"821,V33.5XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V33.6XXA ",.01)
 ;;V33.6XXA
 ;;9002226.02101,"821,V33.6XXA ",.02)
 ;;V33.6XXA
 ;;9002226.02101,"821,V33.6XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V33.7XXA ",.01)
 ;;V33.7XXA
 ;;9002226.02101,"821,V33.7XXA ",.02)
 ;;V33.7XXA
 ;;9002226.02101,"821,V33.7XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V33.9XXA ",.01)
 ;;V33.9XXA
 ;;9002226.02101,"821,V33.9XXA ",.02)
 ;;V33.9XXA
 ;;9002226.02101,"821,V33.9XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V34.0XXA ",.01)
 ;;V34.0XXA
 ;;9002226.02101,"821,V34.0XXA ",.02)
 ;;V34.0XXA
 ;;9002226.02101,"821,V34.0XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V34.1XXA ",.01)
 ;;V34.1XXA
 ;;9002226.02101,"821,V34.1XXA ",.02)
 ;;V34.1XXA
 ;;9002226.02101,"821,V34.1XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V34.2XXA ",.01)
 ;;V34.2XXA
 ;;9002226.02101,"821,V34.2XXA ",.02)
 ;;V34.2XXA
 ;;9002226.02101,"821,V34.2XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V34.4XXA ",.01)
 ;;V34.4XXA
 ;;9002226.02101,"821,V34.4XXA ",.02)
 ;;V34.4XXA
 ;;9002226.02101,"821,V34.4XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V34.5XXA ",.01)
 ;;V34.5XXA
 ;;9002226.02101,"821,V34.5XXA ",.02)
 ;;V34.5XXA
 ;;9002226.02101,"821,V34.5XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V34.6XXA ",.01)
 ;;V34.6XXA
 ;;9002226.02101,"821,V34.6XXA ",.02)
 ;;V34.6XXA
 ;;9002226.02101,"821,V34.6XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V34.7XXA ",.01)
 ;;V34.7XXA
 ;;9002226.02101,"821,V34.7XXA ",.02)
 ;;V34.7XXA
 ;;9002226.02101,"821,V34.7XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V34.9XXA ",.01)
 ;;V34.9XXA
 ;;9002226.02101,"821,V34.9XXA ",.02)
 ;;V34.9XXA
 ;;9002226.02101,"821,V34.9XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V35.0XXA ",.01)
 ;;V35.0XXA
 ;;9002226.02101,"821,V35.0XXA ",.02)
 ;;V35.0XXA
 ;;9002226.02101,"821,V35.0XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V35.1XXA ",.01)
 ;;V35.1XXA
 ;;9002226.02101,"821,V35.1XXA ",.02)
 ;;V35.1XXA
 ;;9002226.02101,"821,V35.1XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V35.2XXA ",.01)
 ;;V35.2XXA
 ;;9002226.02101,"821,V35.2XXA ",.02)
 ;;V35.2XXA
 ;;9002226.02101,"821,V35.2XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V35.4XXA ",.01)
 ;;V35.4XXA
 ;;9002226.02101,"821,V35.4XXA ",.02)
 ;;V35.4XXA
 ;;9002226.02101,"821,V35.4XXA ",.03)
 ;;30
 ;;9002226.02101,"821,V35.5XXA ",.01)
 ;;V35.5XXA
 ;;9002226.02101,"821,V35.5XXA ",.02)
 ;;V35.5XXA
 ;;9002226.02101,"821,V35.5XXA ",.03)
 ;;30