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