BGP03G4 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 23, 2010;
;;10.0;IHS CLINICAL REPORTING;;JUN 18, 2010
;
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,"847,07.51 ",.02)
;;07.51
;;9002226.02101,"847,07.52 ",.01)
;;07.52
;;9002226.02101,"847,07.52 ",.02)
;;07.52
;;9002226.02101,"847,07.53 ",.01)
;;07.53
;;9002226.02101,"847,07.53 ",.02)
;;07.53
;;9002226.02101,"847,07.54 ",.01)
;;07.54
;;9002226.02101,"847,07.54 ",.02)
;;07.54
;;9002226.02101,"847,07.59 ",.01)
;;07.59
;;9002226.02101,"847,07.59 ",.02)
;;07.59
;;9002226.02101,"847,07.61 ",.01)
;;07.61
;;9002226.02101,"847,07.61 ",.02)
;;07.61
;;9002226.02101,"847,07.62 ",.01)
;;07.62
;;9002226.02101,"847,07.62 ",.02)
;;07.62
;;9002226.02101,"847,07.63 ",.01)
;;07.63
;;9002226.02101,"847,07.63 ",.02)
;;07.63
;;9002226.02101,"847,07.64 ",.01)
;;07.64
;;9002226.02101,"847,07.64 ",.02)
;;07.64
;;9002226.02101,"847,07.65 ",.01)
;;07.65
;;9002226.02101,"847,07.65 ",.02)
;;07.65
;;9002226.02101,"847,07.68 ",.01)
;;07.68
;;9002226.02101,"847,07.68 ",.02)
;;07.68
;;9002226.02101,"847,07.69 ",.01)
;;07.69
;;9002226.02101,"847,07.69 ",.02)
;;07.69
;;9002226.02101,"847,07.71 ",.01)
;;07.71
;;9002226.02101,"847,07.71 ",.02)
;;07.71
;;9002226.02101,"847,07.72 ",.01)
;;07.72
;;9002226.02101,"847,07.72 ",.02)
;;07.72
;;9002226.02101,"847,07.79 ",.01)
;;07.79
;;9002226.02101,"847,07.79 ",.02)
;;07.79
;;9002226.02101,"847,07.80 ",.01)
;;07.80
;;9002226.02101,"847,07.80 ",.02)
;;07.80
;;9002226.02101,"847,07.81 ",.01)
;;07.81
;;9002226.02101,"847,07.81 ",.02)
;;07.81
;;9002226.02101,"847,07.82 ",.01)
;;07.82
;;9002226.02101,"847,07.82 ",.02)
;;07.82
;;9002226.02101,"847,07.91 ",.01)
;;07.91
;;9002226.02101,"847,07.91 ",.02)
;;07.91
;;9002226.02101,"847,07.92 ",.01)
;;07.92
;;9002226.02101,"847,07.92 ",.02)
;;07.92
;;9002226.02101,"847,07.93 ",.01)
;;07.93
;;9002226.02101,"847,07.93 ",.02)
;;07.93
;;9002226.02101,"847,07.94 ",.01)
;;07.94
;;9002226.02101,"847,07.94 ",.02)
;;07.94
;;9002226.02101,"847,07.99 ",.01)
;;07.99
;;9002226.02101,"847,07.99 ",.02)
;;07.99
;;9002226.02101,"847,16.31 ",.01)
;;16.31
;;9002226.02101,"847,16.31 ",.02)
;;16.31
;;9002226.02101,"847,16.39 ",.01)
;;16.39
;;9002226.02101,"847,16.39 ",.02)
;;16.39
;;9002226.02101,"847,16.41 ",.01)
;;16.41
;;9002226.02101,"847,16.41 ",.02)
;;16.41
;;9002226.02101,"847,16.42 ",.01)
;;16.42
;;9002226.02101,"847,16.42 ",.02)
;;16.42
;;9002226.02101,"847,16.49 ",.01)
;;16.49
;;9002226.02101,"847,16.49 ",.02)
;;16.49
;;9002226.02101,"847,16.51 ",.01)
;;16.51
;;9002226.02101,"847,16.51 ",.02)
;;16.51
;;9002226.02101,"847,16.52 ",.01)
;;16.52
;;9002226.02101,"847,16.52 ",.02)
;;16.52
;;9002226.02101,"847,16.59 ",.01)
;;16.59
;;9002226.02101,"847,16.59 ",.02)
;;16.59
;;9002226.02101,"847,16.63 ",.01)
;;16.63
;;9002226.02101,"847,16.63 ",.02)
;;16.63
;;9002226.02101,"847,16.64 ",.01)
;;16.64
;;9002226.02101,"847,16.64 ",.02)
;;16.64
;;9002226.02101,"847,16.65 ",.01)
;;16.65
;;9002226.02101,"847,16.65 ",.02)
;;16.65
;;9002226.02101,"847,16.66 ",.01)
;;16.66
;;9002226.02101,"847,16.66 ",.02)
;;16.66
;;9002226.02101,"847,16.69 ",.01)
;;16.69
;;9002226.02101,"847,16.69 ",.02)
;;16.69
;;9002226.02101,"847,20.41 ",.01)
;;20.41
;;9002226.02101,"847,20.41 ",.02)
;;20.41
;;9002226.02101,"847,20.42 ",.01)
;;20.42
;;9002226.02101,"847,20.42 ",.02)
;;20.42
;;9002226.02101,"847,20.49 ",.01)
;;20.49
;;9002226.02101,"847,20.49 ",.02)
;;20.49
;;9002226.02101,"847,25.4 ",.01)
;;25.4
;;9002226.02101,"847,25.4 ",.02)
;;25.4
;;9002226.02101,"847,27.62 ",.01)
;;27.62
;;9002226.02101,"847,27.62 ",.02)
;;27.62
;;9002226.02101,"847,27.63 ",.01)
;;27.63
;;9002226.02101,"847,27.63 ",.02)
;;27.63
;;9002226.02101,"847,27.69 ",.01)
;;27.69
;;9002226.02101,"847,27.69 ",.02)
;;27.69
;;9002226.02101,"847,28.7 ",.01)
;;28.7
;;9002226.02101,"847,28.7 ",.02)
;;28.7
;;9002226.02101,"847,29.0 ",.01)
;;29.0
;;9002226.02101,"847,29.0 ",.02)
;;29.0
;;9002226.02101,"847,29.2 ",.01)
;;29.2
;;9002226.02101,"847,29.2 ",.02)
;;29.2
;;9002226.02101,"847,29.31 ",.01)
;;29.31
;;9002226.02101,"847,29.31 ",.02)
;;29.31
;;9002226.02101,"847,29.32 ",.01)
;;29.32
;;9002226.02101,"847,29.32 ",.02)
;;29.32
;;9002226.02101,"847,29.33 ",.01)
;;29.33
;;9002226.02101,"847,29.33 ",.02)
;;29.33
;;9002226.02101,"847,29.39 ",.01)
;;29.39
;;9002226.02101,"847,29.39 ",.02)
;;29.39
;;9002226.02101,"847,29.4 ",.01)
;;29.4
;;9002226.02101,"847,29.4 ",.02)
;;29.4
;;9002226.02101,"847,30.1 ",.01)
;;30.1
;;9002226.02101,"847,30.1 ",.02)
;;30.1
;;9002226.02101,"847,30.21 ",.01)
;;30.21
;;9002226.02101,"847,30.21 ",.02)
;;30.21
;;9002226.02101,"847,30.22 ",.01)
;;30.22
;;9002226.02101,"847,30.22 ",.02)
;;30.22
;;9002226.02101,"847,30.29 ",.01)
;;30.29
;;9002226.02101,"847,30.29 ",.02)
;;30.29
;;9002226.02101,"847,30.3 ",.01)
;;30.3
;;9002226.02101,"847,30.3 ",.02)
;;30.3
;;9002226.02101,"847,30.4 ",.01)
;;30.4
;;9002226.02101,"847,30.4 ",.02)
;;30.4
;;9002226.02101,"847,31.21 ",.01)
;;31.21
;;9002226.02101,"847,31.21 ",.02)
;;31.21
;;9002226.02101,"847,31.29 ",.01)
;;31.29
;;9002226.02101,"847,31.29 ",.02)
;;31.29
;;9002226.02101,"847,31.61 ",.01)
;;31.61
;;9002226.02101,"847,31.61 ",.02)
;;31.61
;;9002226.02101,"847,31.62 ",.01)
;;31.62
;;9002226.02101,"847,31.62 ",.02)
;;31.62
;;9002226.02101,"847,31.63 ",.01)
;;31.63
;;9002226.02101,"847,31.63 ",.02)
;;31.63
;;9002226.02101,"847,31.64 ",.01)
;;31.64
;;9002226.02101,"847,31.64 ",.02)
;;31.64
;;9002226.02101,"847,31.69 ",.01)
;;31.69
;;9002226.02101,"847,31.69 ",.02)
;;31.69
;;9002226.02101,"847,31.73 ",.01)
;;31.73
;;9002226.02101,"847,31.73 ",.02)
;;31.73
;;9002226.02101,"847,31.74 ",.01)
;;31.74
;;9002226.02101,"847,31.74 ",.02)
;;31.74
;;9002226.02101,"847,31.75 ",.01)
;;31.75
;;9002226.02101,"847,31.75 ",.02)
;;31.75
;;9002226.02101,"847,31.79 ",.01)
;;31.79
;;9002226.02101,"847,31.79 ",.02)
;;31.79
;;9002226.02101,"847,31.92 ",.01)
;;31.92
;;9002226.02101,"847,31.92 ",.02)
;;31.92
;;9002226.02101,"847,32.09 ",.01)
;;32.09
;;9002226.02101,"847,32.09 ",.02)
;;32.09
;;9002226.02101,"847,32.1 ",.01)
;;32.1
;;9002226.02101,"847,32.1 ",.02)
;;32.1
;;9002226.02101,"847,32.21 ",.01)
;;32.21
;;9002226.02101,"847,32.21 ",.02)
;;32.21
;;9002226.02101,"847,32.22 ",.01)
;;32.22
;;9002226.02101,"847,32.22 ",.02)
;;32.22
;;9002226.02101,"847,32.23 ",.01)
;;32.23
;;9002226.02101,"847,32.23 ",.02)
;;32.23
;;9002226.02101,"847,32.25 ",.01)
;;32.25
;;9002226.02101,"847,32.25 ",.02)
;;32.25
;;9002226.02101,"847,32.26 ",.01)
;;32.26
;;9002226.02101,"847,32.26 ",.02)
;;32.26
;;9002226.02101,"847,32.29 ",.01)
;;32.29
;;9002226.02101,"847,32.29 ",.02)
;;32.29
;;9002226.02101,"847,32.3 ",.01)
;;32.3
;;9002226.02101,"847,32.3 ",.02)
;;32.3
;;9002226.02101,"847,32.4 ",.01)
;;32.4
;;9002226.02101,"847,32.4 ",.02)
;;32.4
;;9002226.02101,"847,32.5 ",.01)
;;32.5
;;9002226.02101,"847,32.5 ",.02)
;;32.5
;;9002226.02101,"847,32.6 ",.01)
;;32.6
;;9002226.02101,"847,32.6 ",.02)
;;32.6
;;9002226.02101,"847,32.9 ",.01)
;;32.9
;;9002226.02101,"847,32.9 ",.02)
;;32.9
;;9002226.02101,"847,33.0 ",.01)
;;33.0
;;9002226.02101,"847,33.0 ",.02)
;;33.0
;;9002226.02101,"847,33.1 ",.01)
;;33.1
;;9002226.02101,"847,33.1 ",.02)
;;33.1
;;9002226.02101,"847,33.34 ",.01)
;;33.34
;;9002226.02101,"847,33.34 ",.02)
;;33.34
;;9002226.02101,"847,33.39 ",.01)
;;33.39
;;9002226.02101,"847,33.39 ",.02)
;;33.39
;;9002226.02101,"847,33.41 ",.01)
;;33.41
;;9002226.02101,"847,33.41 ",.02)
;;33.41
;;9002226.02101,"847,33.42 ",.01)
;;33.42
;;9002226.02101,"847,33.42 ",.02)
;;33.42
;;9002226.02101,"847,33.43 ",.01)
;;33.43
;;9002226.02101,"847,33.43 ",.02)
;;33.43
;;9002226.02101,"847,33.48 ",.01)
;;33.48
;;9002226.02101,"847,33.48 ",.02)
;;33.48
;;9002226.02101,"847,33.49 ",.01)
;;33.49
;;9002226.02101,"847,33.49 ",.02)
;;33.49
;;9002226.02101,"847,33.50 ",.01)
;;33.50
;;9002226.02101,"847,33.50 ",.02)
;;33.50
;;9002226.02101,"847,33.51 ",.01)
;;33.51
;;9002226.02101,"847,33.51 ",.02)
;;33.51
;;9002226.02101,"847,33.52 ",.01)
;;33.52
;;9002226.02101,"847,33.52 ",.02)
;;33.52
;;9002226.02101,"847,33.6 ",.01)
;;33.6
;;9002226.02101,"847,33.6 ",.02)
;;33.6
;;9002226.02101,"847,33.92 ",.01)
;;33.92
;;9002226.02101,"847,33.92 ",.02)
;;33.92
;;9002226.02101,"847,34.02 ",.01)
;;34.02
;;9002226.02101,"847,34.02 ",.02)
;;34.02
;;9002226.02101,"847,34.03 ",.01)
;;34.03
;;9002226.02101,"847,34.03 ",.02)
;;34.03
;;9002226.02101,"847,34.1 ",.01)
;;34.1
;;9002226.02101,"847,34.1 ",.02)
;;34.1
;;9002226.02101,"847,34.3 ",.01)
;;34.3
;;9002226.02101,"847,34.3 ",.02)
;;34.3
;;9002226.02101,"847,34.4 ",.01)
;;34.4
;;9002226.02101,"847,34.4 ",.02)
;;34.4
;;9002226.02101,"847,34.51 ",.01)
;;34.51
;;9002226.02101,"847,34.51 ",.02)
;;34.51
;;9002226.02101,"847,34.59 ",.01)
;;34.59
;;9002226.02101,"847,34.59 ",.02)
;;34.59
;;9002226.02101,"847,34.73 ",.01)
;;34.73
;;9002226.02101,"847,34.73 ",.02)
;;34.73
;;9002226.02101,"847,34.74 ",.01)
;;34.74
;;9002226.02101,"847,34.74 ",.02)
;;34.74
;;9002226.02101,"847,34.79 ",.01)
;;34.79
;;9002226.02101,"847,34.79 ",.02)
;;34.79
;;9002226.02101,"847,34.81 ",.01)
;;34.81
;;9002226.02101,"847,34.81 ",.02)
;;34.81
;;9002226.02101,"847,34.82 ",.01)
;;34.82
;;9002226.02101,"847,34.82 ",.02)
;;34.82
;;9002226.02101,"847,34.83 ",.01)
;;34.83
;;9002226.02101,"847,34.83 ",.02)
;;34.83
;;9002226.02101,"847,34.84 ",.01)
;;34.84
;;9002226.02101,"847,34.84 ",.02)
;;34.84
;;9002226.02101,"847,34.89 ",.01)
;;34.89
;;9002226.02101,"847,34.89 ",.02)
;;34.89
;;9002226.02101,"847,34.93 ",.01)
;;34.93
;;9002226.02101,"847,34.93 ",.02)
;;34.93
;;9002226.02101,"847,35.00 ",.01)
;;35.00
;;9002226.02101,"847,35.00 ",.02)
;;35.00
;;9002226.02101,"847,35.01 ",.01)
;;35.01
;;9002226.02101,"847,35.01 ",.02)
;;35.01
;;9002226.02101,"847,35.02 ",.01)
;;35.02
;;9002226.02101,"847,35.02 ",.02)
;;35.02
;;9002226.02101,"847,35.03 ",.01)
;;35.03
;;9002226.02101,"847,35.03 ",.02)
;;35.03
;;9002226.02101,"847,35.04 ",.01)
;;35.04
;;9002226.02101,"847,35.04 ",.02)
;;35.04
;;9002226.02101,"847,35.10 ",.01)
;;35.10
;;9002226.02101,"847,35.10 ",.02)
;;35.10
;;9002226.02101,"847,35.11 ",.01)
;;35.11
;;9002226.02101,"847,35.11 ",.02)
;;35.11
;;9002226.02101,"847,35.12 ",.01)
;;35.12
;;9002226.02101,"847,35.12 ",.02)
;;35.12
;;9002226.02101,"847,35.13 ",.01)
;;35.13
;;9002226.02101,"847,35.13 ",.02)
;;35.13
;;9002226.02101,"847,35.14 ",.01)
;;35.14
;;9002226.02101,"847,35.14 ",.02)
;;35.14
;;9002226.02101,"847,35.20 ",.01)
;;35.20
;;9002226.02101,"847,35.20 ",.02)
;;35.20
;;9002226.02101,"847,35.21 ",.01)
;;35.21
;;9002226.02101,"847,35.21 ",.02)
;;35.21
;;9002226.02101,"847,35.22 ",.01)
;;35.22
;;9002226.02101,"847,35.22 ",.02)
;;35.22
;;9002226.02101,"847,35.23 ",.01)
;;35.23
;;9002226.02101,"847,35.23 ",.02)
;;35.23
;;9002226.02101,"847,35.24 ",.01)
;;35.24
;;9002226.02101,"847,35.24 ",.02)
;;35.24
;;9002226.02101,"847,35.25 ",.01)
;;35.25
;;9002226.02101,"847,35.25 ",.02)
;;35.25
;;9002226.02101,"847,35.26 ",.01)
;;35.26
;;9002226.02101,"847,35.26 ",.02)
;;35.26
;;9002226.02101,"847,35.27 ",.01)
;;35.27
;;9002226.02101,"847,35.27 ",.02)
;;35.27
;;9002226.02101,"847,35.28 ",.01)
;;35.28
;;9002226.02101,"847,35.28 ",.02)
;;35.28
;;9002226.02101,"847,35.31 ",.01)
;;35.31
;;9002226.02101,"847,35.31 ",.02)
;;35.31
;;9002226.02101,"847,35.32 ",.01)
;;35.32
;;9002226.02101,"847,35.32 ",.02)
;;35.32
;;9002226.02101,"847,35.33 ",.01)
;;35.33
;;9002226.02101,"847,35.33 ",.02)
;;35.33
;;9002226.02101,"847,35.34 ",.01)
;;35.34
;;9002226.02101,"847,35.34 ",.02)
;;35.34
;;9002226.02101,"847,35.35 ",.01)
;;35.35
;;9002226.02101,"847,35.35 ",.02)
;;35.35
;;9002226.02101,"847,35.39 ",.01)
;;35.39
;;9002226.02101,"847,35.39 ",.02)
;;35.39
;;9002226.02101,"847,35.42 ",.01)
;;35.42
;;9002226.02101,"847,35.42 ",.02)
;;35.42
;;9002226.02101,"847,35.50 ",.01)
;;35.50
;;9002226.02101,"847,35.50 ",.02)
;;35.50
;;9002226.02101,"847,35.51 ",.01)
;;35.51
;;9002226.02101,"847,35.51 ",.02)
;;35.51
;;9002226.02101,"847,35.53 ",.01)
;;35.53
;;9002226.02101,"847,35.53 ",.02)
;;35.53
;;9002226.02101,"847,35.54 ",.01)
;;35.54
;;9002226.02101,"847,35.54 ",.02)
;;35.54
;;9002226.02101,"847,35.60 ",.01)
;;35.60
;;9002226.02101,"847,35.60 ",.02)
;;35.60
;;9002226.02101,"847,35.61 ",.01)
;;35.61
;;9002226.02101,"847,35.61 ",.02)
;;35.61
;;9002226.02101,"847,35.62 ",.01)
;;35.62
;;9002226.02101,"847,35.62 ",.02)
;;35.62
BGP03G4 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 23, 2010;
+1 ;;10.0;IHS CLINICAL REPORTING;;JUN 18, 2010
+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,"847,07.51 ",.02)
+2 ;;07.51
+3 ;;9002226.02101,"847,07.52 ",.01)
+4 ;;07.52
+5 ;;9002226.02101,"847,07.52 ",.02)
+6 ;;07.52
+7 ;;9002226.02101,"847,07.53 ",.01)
+8 ;;07.53
+9 ;;9002226.02101,"847,07.53 ",.02)
+10 ;;07.53
+11 ;;9002226.02101,"847,07.54 ",.01)
+12 ;;07.54
+13 ;;9002226.02101,"847,07.54 ",.02)
+14 ;;07.54
+15 ;;9002226.02101,"847,07.59 ",.01)
+16 ;;07.59
+17 ;;9002226.02101,"847,07.59 ",.02)
+18 ;;07.59
+19 ;;9002226.02101,"847,07.61 ",.01)
+20 ;;07.61
+21 ;;9002226.02101,"847,07.61 ",.02)
+22 ;;07.61
+23 ;;9002226.02101,"847,07.62 ",.01)
+24 ;;07.62
+25 ;;9002226.02101,"847,07.62 ",.02)
+26 ;;07.62
+27 ;;9002226.02101,"847,07.63 ",.01)
+28 ;;07.63
+29 ;;9002226.02101,"847,07.63 ",.02)
+30 ;;07.63
+31 ;;9002226.02101,"847,07.64 ",.01)
+32 ;;07.64
+33 ;;9002226.02101,"847,07.64 ",.02)
+34 ;;07.64
+35 ;;9002226.02101,"847,07.65 ",.01)
+36 ;;07.65
+37 ;;9002226.02101,"847,07.65 ",.02)
+38 ;;07.65
+39 ;;9002226.02101,"847,07.68 ",.01)
+40 ;;07.68
+41 ;;9002226.02101,"847,07.68 ",.02)
+42 ;;07.68
+43 ;;9002226.02101,"847,07.69 ",.01)
+44 ;;07.69
+45 ;;9002226.02101,"847,07.69 ",.02)
+46 ;;07.69
+47 ;;9002226.02101,"847,07.71 ",.01)
+48 ;;07.71
+49 ;;9002226.02101,"847,07.71 ",.02)
+50 ;;07.71
+51 ;;9002226.02101,"847,07.72 ",.01)
+52 ;;07.72
+53 ;;9002226.02101,"847,07.72 ",.02)
+54 ;;07.72
+55 ;;9002226.02101,"847,07.79 ",.01)
+56 ;;07.79
+57 ;;9002226.02101,"847,07.79 ",.02)
+58 ;;07.79
+59 ;;9002226.02101,"847,07.80 ",.01)
+60 ;;07.80
+61 ;;9002226.02101,"847,07.80 ",.02)
+62 ;;07.80
+63 ;;9002226.02101,"847,07.81 ",.01)
+64 ;;07.81
+65 ;;9002226.02101,"847,07.81 ",.02)
+66 ;;07.81
+67 ;;9002226.02101,"847,07.82 ",.01)
+68 ;;07.82
+69 ;;9002226.02101,"847,07.82 ",.02)
+70 ;;07.82
+71 ;;9002226.02101,"847,07.91 ",.01)
+72 ;;07.91
+73 ;;9002226.02101,"847,07.91 ",.02)
+74 ;;07.91
+75 ;;9002226.02101,"847,07.92 ",.01)
+76 ;;07.92
+77 ;;9002226.02101,"847,07.92 ",.02)
+78 ;;07.92
+79 ;;9002226.02101,"847,07.93 ",.01)
+80 ;;07.93
+81 ;;9002226.02101,"847,07.93 ",.02)
+82 ;;07.93
+83 ;;9002226.02101,"847,07.94 ",.01)
+84 ;;07.94
+85 ;;9002226.02101,"847,07.94 ",.02)
+86 ;;07.94
+87 ;;9002226.02101,"847,07.99 ",.01)
+88 ;;07.99
+89 ;;9002226.02101,"847,07.99 ",.02)
+90 ;;07.99
+91 ;;9002226.02101,"847,16.31 ",.01)
+92 ;;16.31
+93 ;;9002226.02101,"847,16.31 ",.02)
+94 ;;16.31
+95 ;;9002226.02101,"847,16.39 ",.01)
+96 ;;16.39
+97 ;;9002226.02101,"847,16.39 ",.02)
+98 ;;16.39
+99 ;;9002226.02101,"847,16.41 ",.01)
+100 ;;16.41
+101 ;;9002226.02101,"847,16.41 ",.02)
+102 ;;16.41
+103 ;;9002226.02101,"847,16.42 ",.01)
+104 ;;16.42
+105 ;;9002226.02101,"847,16.42 ",.02)
+106 ;;16.42
+107 ;;9002226.02101,"847,16.49 ",.01)
+108 ;;16.49
+109 ;;9002226.02101,"847,16.49 ",.02)
+110 ;;16.49
+111 ;;9002226.02101,"847,16.51 ",.01)
+112 ;;16.51
+113 ;;9002226.02101,"847,16.51 ",.02)
+114 ;;16.51
+115 ;;9002226.02101,"847,16.52 ",.01)
+116 ;;16.52
+117 ;;9002226.02101,"847,16.52 ",.02)
+118 ;;16.52
+119 ;;9002226.02101,"847,16.59 ",.01)
+120 ;;16.59
+121 ;;9002226.02101,"847,16.59 ",.02)
+122 ;;16.59
+123 ;;9002226.02101,"847,16.63 ",.01)
+124 ;;16.63
+125 ;;9002226.02101,"847,16.63 ",.02)
+126 ;;16.63
+127 ;;9002226.02101,"847,16.64 ",.01)
+128 ;;16.64
+129 ;;9002226.02101,"847,16.64 ",.02)
+130 ;;16.64
+131 ;;9002226.02101,"847,16.65 ",.01)
+132 ;;16.65
+133 ;;9002226.02101,"847,16.65 ",.02)
+134 ;;16.65
+135 ;;9002226.02101,"847,16.66 ",.01)
+136 ;;16.66
+137 ;;9002226.02101,"847,16.66 ",.02)
+138 ;;16.66
+139 ;;9002226.02101,"847,16.69 ",.01)
+140 ;;16.69
+141 ;;9002226.02101,"847,16.69 ",.02)
+142 ;;16.69
+143 ;;9002226.02101,"847,20.41 ",.01)
+144 ;;20.41
+145 ;;9002226.02101,"847,20.41 ",.02)
+146 ;;20.41
+147 ;;9002226.02101,"847,20.42 ",.01)
+148 ;;20.42
+149 ;;9002226.02101,"847,20.42 ",.02)
+150 ;;20.42
+151 ;;9002226.02101,"847,20.49 ",.01)
+152 ;;20.49
+153 ;;9002226.02101,"847,20.49 ",.02)
+154 ;;20.49
+155 ;;9002226.02101,"847,25.4 ",.01)
+156 ;;25.4
+157 ;;9002226.02101,"847,25.4 ",.02)
+158 ;;25.4
+159 ;;9002226.02101,"847,27.62 ",.01)
+160 ;;27.62
+161 ;;9002226.02101,"847,27.62 ",.02)
+162 ;;27.62
+163 ;;9002226.02101,"847,27.63 ",.01)
+164 ;;27.63
+165 ;;9002226.02101,"847,27.63 ",.02)
+166 ;;27.63
+167 ;;9002226.02101,"847,27.69 ",.01)
+168 ;;27.69
+169 ;;9002226.02101,"847,27.69 ",.02)
+170 ;;27.69
+171 ;;9002226.02101,"847,28.7 ",.01)
+172 ;;28.7
+173 ;;9002226.02101,"847,28.7 ",.02)
+174 ;;28.7
+175 ;;9002226.02101,"847,29.0 ",.01)
+176 ;;29.0
+177 ;;9002226.02101,"847,29.0 ",.02)
+178 ;;29.0
+179 ;;9002226.02101,"847,29.2 ",.01)
+180 ;;29.2
+181 ;;9002226.02101,"847,29.2 ",.02)
+182 ;;29.2
+183 ;;9002226.02101,"847,29.31 ",.01)
+184 ;;29.31
+185 ;;9002226.02101,"847,29.31 ",.02)
+186 ;;29.31
+187 ;;9002226.02101,"847,29.32 ",.01)
+188 ;;29.32
+189 ;;9002226.02101,"847,29.32 ",.02)
+190 ;;29.32
+191 ;;9002226.02101,"847,29.33 ",.01)
+192 ;;29.33
+193 ;;9002226.02101,"847,29.33 ",.02)
+194 ;;29.33
+195 ;;9002226.02101,"847,29.39 ",.01)
+196 ;;29.39
+197 ;;9002226.02101,"847,29.39 ",.02)
+198 ;;29.39
+199 ;;9002226.02101,"847,29.4 ",.01)
+200 ;;29.4
+201 ;;9002226.02101,"847,29.4 ",.02)
+202 ;;29.4
+203 ;;9002226.02101,"847,30.1 ",.01)
+204 ;;30.1
+205 ;;9002226.02101,"847,30.1 ",.02)
+206 ;;30.1
+207 ;;9002226.02101,"847,30.21 ",.01)
+208 ;;30.21
+209 ;;9002226.02101,"847,30.21 ",.02)
+210 ;;30.21
+211 ;;9002226.02101,"847,30.22 ",.01)
+212 ;;30.22
+213 ;;9002226.02101,"847,30.22 ",.02)
+214 ;;30.22
+215 ;;9002226.02101,"847,30.29 ",.01)
+216 ;;30.29
+217 ;;9002226.02101,"847,30.29 ",.02)
+218 ;;30.29
+219 ;;9002226.02101,"847,30.3 ",.01)
+220 ;;30.3
+221 ;;9002226.02101,"847,30.3 ",.02)
+222 ;;30.3
+223 ;;9002226.02101,"847,30.4 ",.01)
+224 ;;30.4
+225 ;;9002226.02101,"847,30.4 ",.02)
+226 ;;30.4
+227 ;;9002226.02101,"847,31.21 ",.01)
+228 ;;31.21
+229 ;;9002226.02101,"847,31.21 ",.02)
+230 ;;31.21
+231 ;;9002226.02101,"847,31.29 ",.01)
+232 ;;31.29
+233 ;;9002226.02101,"847,31.29 ",.02)
+234 ;;31.29
+235 ;;9002226.02101,"847,31.61 ",.01)
+236 ;;31.61
+237 ;;9002226.02101,"847,31.61 ",.02)
+238 ;;31.61
+239 ;;9002226.02101,"847,31.62 ",.01)
+240 ;;31.62
+241 ;;9002226.02101,"847,31.62 ",.02)
+242 ;;31.62
+243 ;;9002226.02101,"847,31.63 ",.01)
+244 ;;31.63
+245 ;;9002226.02101,"847,31.63 ",.02)
+246 ;;31.63
+247 ;;9002226.02101,"847,31.64 ",.01)
+248 ;;31.64
+249 ;;9002226.02101,"847,31.64 ",.02)
+250 ;;31.64
+251 ;;9002226.02101,"847,31.69 ",.01)
+252 ;;31.69
+253 ;;9002226.02101,"847,31.69 ",.02)
+254 ;;31.69
+255 ;;9002226.02101,"847,31.73 ",.01)
+256 ;;31.73
+257 ;;9002226.02101,"847,31.73 ",.02)
+258 ;;31.73
+259 ;;9002226.02101,"847,31.74 ",.01)
+260 ;;31.74
+261 ;;9002226.02101,"847,31.74 ",.02)
+262 ;;31.74
+263 ;;9002226.02101,"847,31.75 ",.01)
+264 ;;31.75
+265 ;;9002226.02101,"847,31.75 ",.02)
+266 ;;31.75
+267 ;;9002226.02101,"847,31.79 ",.01)
+268 ;;31.79
+269 ;;9002226.02101,"847,31.79 ",.02)
+270 ;;31.79
+271 ;;9002226.02101,"847,31.92 ",.01)
+272 ;;31.92
+273 ;;9002226.02101,"847,31.92 ",.02)
+274 ;;31.92
+275 ;;9002226.02101,"847,32.09 ",.01)
+276 ;;32.09
+277 ;;9002226.02101,"847,32.09 ",.02)
+278 ;;32.09
+279 ;;9002226.02101,"847,32.1 ",.01)
+280 ;;32.1
+281 ;;9002226.02101,"847,32.1 ",.02)
+282 ;;32.1
+283 ;;9002226.02101,"847,32.21 ",.01)
+284 ;;32.21
+285 ;;9002226.02101,"847,32.21 ",.02)
+286 ;;32.21
+287 ;;9002226.02101,"847,32.22 ",.01)
+288 ;;32.22
+289 ;;9002226.02101,"847,32.22 ",.02)
+290 ;;32.22
+291 ;;9002226.02101,"847,32.23 ",.01)
+292 ;;32.23
+293 ;;9002226.02101,"847,32.23 ",.02)
+294 ;;32.23
+295 ;;9002226.02101,"847,32.25 ",.01)
+296 ;;32.25
+297 ;;9002226.02101,"847,32.25 ",.02)
+298 ;;32.25
+299 ;;9002226.02101,"847,32.26 ",.01)
+300 ;;32.26
+301 ;;9002226.02101,"847,32.26 ",.02)
+302 ;;32.26
+303 ;;9002226.02101,"847,32.29 ",.01)
+304 ;;32.29
+305 ;;9002226.02101,"847,32.29 ",.02)
+306 ;;32.29
+307 ;;9002226.02101,"847,32.3 ",.01)
+308 ;;32.3
+309 ;;9002226.02101,"847,32.3 ",.02)
+310 ;;32.3
+311 ;;9002226.02101,"847,32.4 ",.01)
+312 ;;32.4
+313 ;;9002226.02101,"847,32.4 ",.02)
+314 ;;32.4
+315 ;;9002226.02101,"847,32.5 ",.01)
+316 ;;32.5
+317 ;;9002226.02101,"847,32.5 ",.02)
+318 ;;32.5
+319 ;;9002226.02101,"847,32.6 ",.01)
+320 ;;32.6
+321 ;;9002226.02101,"847,32.6 ",.02)
+322 ;;32.6
+323 ;;9002226.02101,"847,32.9 ",.01)
+324 ;;32.9
+325 ;;9002226.02101,"847,32.9 ",.02)
+326 ;;32.9
+327 ;;9002226.02101,"847,33.0 ",.01)
+328 ;;33.0
+329 ;;9002226.02101,"847,33.0 ",.02)
+330 ;;33.0
+331 ;;9002226.02101,"847,33.1 ",.01)
+332 ;;33.1
+333 ;;9002226.02101,"847,33.1 ",.02)
+334 ;;33.1
+335 ;;9002226.02101,"847,33.34 ",.01)
+336 ;;33.34
+337 ;;9002226.02101,"847,33.34 ",.02)
+338 ;;33.34
+339 ;;9002226.02101,"847,33.39 ",.01)
+340 ;;33.39
+341 ;;9002226.02101,"847,33.39 ",.02)
+342 ;;33.39
+343 ;;9002226.02101,"847,33.41 ",.01)
+344 ;;33.41
+345 ;;9002226.02101,"847,33.41 ",.02)
+346 ;;33.41
+347 ;;9002226.02101,"847,33.42 ",.01)
+348 ;;33.42
+349 ;;9002226.02101,"847,33.42 ",.02)
+350 ;;33.42
+351 ;;9002226.02101,"847,33.43 ",.01)
+352 ;;33.43
+353 ;;9002226.02101,"847,33.43 ",.02)
+354 ;;33.43
+355 ;;9002226.02101,"847,33.48 ",.01)
+356 ;;33.48
+357 ;;9002226.02101,"847,33.48 ",.02)
+358 ;;33.48
+359 ;;9002226.02101,"847,33.49 ",.01)
+360 ;;33.49
+361 ;;9002226.02101,"847,33.49 ",.02)
+362 ;;33.49
+363 ;;9002226.02101,"847,33.50 ",.01)
+364 ;;33.50
+365 ;;9002226.02101,"847,33.50 ",.02)
+366 ;;33.50
+367 ;;9002226.02101,"847,33.51 ",.01)
+368 ;;33.51
+369 ;;9002226.02101,"847,33.51 ",.02)
+370 ;;33.51
+371 ;;9002226.02101,"847,33.52 ",.01)
+372 ;;33.52
+373 ;;9002226.02101,"847,33.52 ",.02)
+374 ;;33.52
+375 ;;9002226.02101,"847,33.6 ",.01)
+376 ;;33.6
+377 ;;9002226.02101,"847,33.6 ",.02)
+378 ;;33.6
+379 ;;9002226.02101,"847,33.92 ",.01)
+380 ;;33.92
+381 ;;9002226.02101,"847,33.92 ",.02)
+382 ;;33.92
+383 ;;9002226.02101,"847,34.02 ",.01)
+384 ;;34.02
+385 ;;9002226.02101,"847,34.02 ",.02)
+386 ;;34.02
+387 ;;9002226.02101,"847,34.03 ",.01)
+388 ;;34.03
+389 ;;9002226.02101,"847,34.03 ",.02)
+390 ;;34.03
+391 ;;9002226.02101,"847,34.1 ",.01)
+392 ;;34.1
+393 ;;9002226.02101,"847,34.1 ",.02)
+394 ;;34.1
+395 ;;9002226.02101,"847,34.3 ",.01)
+396 ;;34.3
+397 ;;9002226.02101,"847,34.3 ",.02)
+398 ;;34.3
+399 ;;9002226.02101,"847,34.4 ",.01)
+400 ;;34.4
+401 ;;9002226.02101,"847,34.4 ",.02)
+402 ;;34.4
+403 ;;9002226.02101,"847,34.51 ",.01)
+404 ;;34.51
+405 ;;9002226.02101,"847,34.51 ",.02)
+406 ;;34.51
+407 ;;9002226.02101,"847,34.59 ",.01)
+408 ;;34.59
+409 ;;9002226.02101,"847,34.59 ",.02)
+410 ;;34.59
+411 ;;9002226.02101,"847,34.73 ",.01)
+412 ;;34.73
+413 ;;9002226.02101,"847,34.73 ",.02)
+414 ;;34.73
+415 ;;9002226.02101,"847,34.74 ",.01)
+416 ;;34.74
+417 ;;9002226.02101,"847,34.74 ",.02)
+418 ;;34.74
+419 ;;9002226.02101,"847,34.79 ",.01)
+420 ;;34.79
+421 ;;9002226.02101,"847,34.79 ",.02)
+422 ;;34.79
+423 ;;9002226.02101,"847,34.81 ",.01)
+424 ;;34.81
+425 ;;9002226.02101,"847,34.81 ",.02)
+426 ;;34.81
+427 ;;9002226.02101,"847,34.82 ",.01)
+428 ;;34.82
+429 ;;9002226.02101,"847,34.82 ",.02)
+430 ;;34.82
+431 ;;9002226.02101,"847,34.83 ",.01)
+432 ;;34.83
+433 ;;9002226.02101,"847,34.83 ",.02)
+434 ;;34.83
+435 ;;9002226.02101,"847,34.84 ",.01)
+436 ;;34.84
+437 ;;9002226.02101,"847,34.84 ",.02)
+438 ;;34.84
+439 ;;9002226.02101,"847,34.89 ",.01)
+440 ;;34.89
+441 ;;9002226.02101,"847,34.89 ",.02)
+442 ;;34.89
+443 ;;9002226.02101,"847,34.93 ",.01)
+444 ;;34.93
+445 ;;9002226.02101,"847,34.93 ",.02)
+446 ;;34.93
+447 ;;9002226.02101,"847,35.00 ",.01)
+448 ;;35.00
+449 ;;9002226.02101,"847,35.00 ",.02)
+450 ;;35.00
+451 ;;9002226.02101,"847,35.01 ",.01)
+452 ;;35.01
+453 ;;9002226.02101,"847,35.01 ",.02)
+454 ;;35.01
+455 ;;9002226.02101,"847,35.02 ",.01)
+456 ;;35.02
+457 ;;9002226.02101,"847,35.02 ",.02)
+458 ;;35.02
+459 ;;9002226.02101,"847,35.03 ",.01)
+460 ;;35.03
+461 ;;9002226.02101,"847,35.03 ",.02)
+462 ;;35.03
+463 ;;9002226.02101,"847,35.04 ",.01)
+464 ;;35.04
+465 ;;9002226.02101,"847,35.04 ",.02)
+466 ;;35.04
+467 ;;9002226.02101,"847,35.10 ",.01)
+468 ;;35.10
+469 ;;9002226.02101,"847,35.10 ",.02)
+470 ;;35.10
+471 ;;9002226.02101,"847,35.11 ",.01)
+472 ;;35.11
+473 ;;9002226.02101,"847,35.11 ",.02)
+474 ;;35.11
+475 ;;9002226.02101,"847,35.12 ",.01)
+476 ;;35.12
+477 ;;9002226.02101,"847,35.12 ",.02)
+478 ;;35.12
+479 ;;9002226.02101,"847,35.13 ",.01)
+480 ;;35.13
+481 ;;9002226.02101,"847,35.13 ",.02)
+482 ;;35.13
+483 ;;9002226.02101,"847,35.14 ",.01)
+484 ;;35.14
+485 ;;9002226.02101,"847,35.14 ",.02)
+486 ;;35.14
+487 ;;9002226.02101,"847,35.20 ",.01)
+488 ;;35.20
+489 ;;9002226.02101,"847,35.20 ",.02)
+490 ;;35.20
+491 ;;9002226.02101,"847,35.21 ",.01)
+492 ;;35.21
+493 ;;9002226.02101,"847,35.21 ",.02)
+494 ;;35.21
+495 ;;9002226.02101,"847,35.22 ",.01)
+496 ;;35.22
+497 ;;9002226.02101,"847,35.22 ",.02)
+498 ;;35.22
+499 ;;9002226.02101,"847,35.23 ",.01)
+500 ;;35.23
+501 ;;9002226.02101,"847,35.23 ",.02)
+502 ;;35.23
+503 ;;9002226.02101,"847,35.24 ",.01)
+504 ;;35.24
+505 ;;9002226.02101,"847,35.24 ",.02)
+506 ;;35.24
+507 ;;9002226.02101,"847,35.25 ",.01)
+508 ;;35.25
+509 ;;9002226.02101,"847,35.25 ",.02)
+510 ;;35.25
+511 ;;9002226.02101,"847,35.26 ",.01)
+512 ;;35.26
+513 ;;9002226.02101,"847,35.26 ",.02)
+514 ;;35.26
+515 ;;9002226.02101,"847,35.27 ",.01)
+516 ;;35.27
+517 ;;9002226.02101,"847,35.27 ",.02)
+518 ;;35.27
+519 ;;9002226.02101,"847,35.28 ",.01)
+520 ;;35.28
+521 ;;9002226.02101,"847,35.28 ",.02)
+522 ;;35.28
+523 ;;9002226.02101,"847,35.31 ",.01)
+524 ;;35.31
+525 ;;9002226.02101,"847,35.31 ",.02)
+526 ;;35.31
+527 ;;9002226.02101,"847,35.32 ",.01)
+528 ;;35.32
+529 ;;9002226.02101,"847,35.32 ",.02)
+530 ;;35.32
+531 ;;9002226.02101,"847,35.33 ",.01)
+532 ;;35.33
+533 ;;9002226.02101,"847,35.33 ",.02)
+534 ;;35.33
+535 ;;9002226.02101,"847,35.34 ",.01)
+536 ;;35.34
+537 ;;9002226.02101,"847,35.34 ",.02)
+538 ;;35.34
+539 ;;9002226.02101,"847,35.35 ",.01)
+540 ;;35.35
+541 ;;9002226.02101,"847,35.35 ",.02)
+542 ;;35.35
+543 ;;9002226.02101,"847,35.39 ",.01)
+544 ;;35.39
+545 ;;9002226.02101,"847,35.39 ",.02)
+546 ;;35.39
+547 ;;9002226.02101,"847,35.42 ",.01)
+548 ;;35.42
+549 ;;9002226.02101,"847,35.42 ",.02)
+550 ;;35.42
+551 ;;9002226.02101,"847,35.50 ",.01)
+552 ;;35.50
+553 ;;9002226.02101,"847,35.50 ",.02)
+554 ;;35.50
+555 ;;9002226.02101,"847,35.51 ",.01)
+556 ;;35.51
+557 ;;9002226.02101,"847,35.51 ",.02)
+558 ;;35.51
+559 ;;9002226.02101,"847,35.53 ",.01)
+560 ;;35.53
+561 ;;9002226.02101,"847,35.53 ",.02)
+562 ;;35.53
+563 ;;9002226.02101,"847,35.54 ",.01)
+564 ;;35.54
+565 ;;9002226.02101,"847,35.54 ",.02)
+566 ;;35.54
+567 ;;9002226.02101,"847,35.60 ",.01)
+568 ;;35.60
+569 ;;9002226.02101,"847,35.60 ",.02)
+570 ;;35.60
+571 ;;9002226.02101,"847,35.61 ",.01)
+572 ;;35.61
+573 ;;9002226.02101,"847,35.61 ",.02)
+574 ;;35.61
+575 ;;9002226.02101,"847,35.62 ",.01)
+576 ;;35.62
+577 ;;9002226.02101,"847,35.62 ",.02)
+578 ;;35.62
