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