BGP03G9 ;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,78.38 ",.02)
;;78.38
;;9002226.02101,"847,78.39 ",.01)
;;78.39
;;9002226.02101,"847,78.39 ",.02)
;;78.39
;;9002226.02101,"847,78.40 ",.01)
;;78.40
;;9002226.02101,"847,78.40 ",.02)
;;78.40
;;9002226.02101,"847,78.41 ",.01)
;;78.41
;;9002226.02101,"847,78.41 ",.02)
;;78.41
;;9002226.02101,"847,78.42 ",.01)
;;78.42
;;9002226.02101,"847,78.42 ",.02)
;;78.42
;;9002226.02101,"847,78.43 ",.01)
;;78.43
;;9002226.02101,"847,78.43 ",.02)
;;78.43
;;9002226.02101,"847,78.44 ",.01)
;;78.44
;;9002226.02101,"847,78.44 ",.02)
;;78.44
;;9002226.02101,"847,78.45 ",.01)
;;78.45
;;9002226.02101,"847,78.45 ",.02)
;;78.45
;;9002226.02101,"847,78.46 ",.01)
;;78.46
;;9002226.02101,"847,78.46 ",.02)
;;78.46
;;9002226.02101,"847,78.47 ",.01)
;;78.47
;;9002226.02101,"847,78.47 ",.02)
;;78.47
;;9002226.02101,"847,78.48 ",.01)
;;78.48
;;9002226.02101,"847,78.48 ",.02)
;;78.48
;;9002226.02101,"847,78.49 ",.01)
;;78.49
;;9002226.02101,"847,78.49 ",.02)
;;78.49
;;9002226.02101,"847,78.60 ",.01)
;;78.60
;;9002226.02101,"847,78.60 ",.02)
;;78.60
;;9002226.02101,"847,78.61 ",.01)
;;78.61
;;9002226.02101,"847,78.61 ",.02)
;;78.61
;;9002226.02101,"847,78.62 ",.01)
;;78.62
;;9002226.02101,"847,78.62 ",.02)
;;78.62
;;9002226.02101,"847,78.63 ",.01)
;;78.63
;;9002226.02101,"847,78.63 ",.02)
;;78.63
;;9002226.02101,"847,78.65 ",.01)
;;78.65
;;9002226.02101,"847,78.65 ",.02)
;;78.65
;;9002226.02101,"847,78.67 ",.01)
;;78.67
;;9002226.02101,"847,78.67 ",.02)
;;78.67
;;9002226.02101,"847,78.69 ",.01)
;;78.69
;;9002226.02101,"847,78.69 ",.02)
;;78.69
;;9002226.02101,"847,78.70 ",.01)
;;78.70
;;9002226.02101,"847,78.70 ",.02)
;;78.70
;;9002226.02101,"847,78.71 ",.01)
;;78.71
;;9002226.02101,"847,78.71 ",.02)
;;78.71
;;9002226.02101,"847,78.72 ",.01)
;;78.72
;;9002226.02101,"847,78.72 ",.02)
;;78.72
;;9002226.02101,"847,78.73 ",.01)
;;78.73
;;9002226.02101,"847,78.73 ",.02)
;;78.73
;;9002226.02101,"847,78.74 ",.01)
;;78.74
;;9002226.02101,"847,78.74 ",.02)
;;78.74
;;9002226.02101,"847,78.75 ",.01)
;;78.75
;;9002226.02101,"847,78.75 ",.02)
;;78.75
;;9002226.02101,"847,78.76 ",.01)
;;78.76
;;9002226.02101,"847,78.76 ",.02)
;;78.76
;;9002226.02101,"847,78.77 ",.01)
;;78.77
;;9002226.02101,"847,78.77 ",.02)
;;78.77
;;9002226.02101,"847,78.78 ",.01)
;;78.78
;;9002226.02101,"847,78.78 ",.02)
;;78.78
;;9002226.02101,"847,78.79 ",.01)
;;78.79
;;9002226.02101,"847,78.79 ",.02)
;;78.79
;;9002226.02101,"847,79.20 ",.01)
;;79.20
;;9002226.02101,"847,79.20 ",.02)
;;79.20
;;9002226.02101,"847,79.21 ",.01)
;;79.21
;;9002226.02101,"847,79.21 ",.02)
;;79.21
;;9002226.02101,"847,79.22 ",.01)
;;79.22
;;9002226.02101,"847,79.22 ",.02)
;;79.22
;;9002226.02101,"847,79.23 ",.01)
;;79.23
;;9002226.02101,"847,79.23 ",.02)
;;79.23
;;9002226.02101,"847,79.25 ",.01)
;;79.25
;;9002226.02101,"847,79.25 ",.02)
;;79.25
;;9002226.02101,"847,79.26 ",.01)
;;79.26
;;9002226.02101,"847,79.26 ",.02)
;;79.26
;;9002226.02101,"847,79.27 ",.01)
;;79.27
;;9002226.02101,"847,79.27 ",.02)
;;79.27
;;9002226.02101,"847,79.29 ",.01)
;;79.29
;;9002226.02101,"847,79.29 ",.02)
;;79.29
;;9002226.02101,"847,79.30 ",.01)
;;79.30
;;9002226.02101,"847,79.30 ",.02)
;;79.30
;;9002226.02101,"847,79.31 ",.01)
;;79.31
;;9002226.02101,"847,79.31 ",.02)
;;79.31
;;9002226.02101,"847,79.32 ",.01)
;;79.32
;;9002226.02101,"847,79.32 ",.02)
;;79.32
;;9002226.02101,"847,79.33 ",.01)
;;79.33
;;9002226.02101,"847,79.33 ",.02)
;;79.33
;;9002226.02101,"847,79.35 ",.01)
;;79.35
;;9002226.02101,"847,79.35 ",.02)
;;79.35
;;9002226.02101,"847,79.36 ",.01)
;;79.36
;;9002226.02101,"847,79.36 ",.02)
;;79.36
;;9002226.02101,"847,79.37 ",.01)
;;79.37
;;9002226.02101,"847,79.37 ",.02)
;;79.37
;;9002226.02101,"847,79.39 ",.01)
;;79.39
;;9002226.02101,"847,79.39 ",.02)
;;79.39
;;9002226.02101,"847,79.50 ",.01)
;;79.50
;;9002226.02101,"847,79.50 ",.02)
;;79.50
;;9002226.02101,"847,79.51 ",.01)
;;79.51
;;9002226.02101,"847,79.51 ",.02)
;;79.51
;;9002226.02101,"847,79.52 ",.01)
;;79.52
;;9002226.02101,"847,79.52 ",.02)
;;79.52
;;9002226.02101,"847,79.55 ",.01)
;;79.55
;;9002226.02101,"847,79.55 ",.02)
;;79.55
;;9002226.02101,"847,79.56 ",.01)
;;79.56
;;9002226.02101,"847,79.56 ",.02)
;;79.56
;;9002226.02101,"847,79.59 ",.01)
;;79.59
;;9002226.02101,"847,79.59 ",.02)
;;79.59
;;9002226.02101,"847,79.60 ",.01)
;;79.60
;;9002226.02101,"847,79.60 ",.02)
;;79.60
;;9002226.02101,"847,79.61 ",.01)
;;79.61
;;9002226.02101,"847,79.61 ",.02)
;;79.61
;;9002226.02101,"847,79.62 ",.01)
;;79.62
;;9002226.02101,"847,79.62 ",.02)
;;79.62
;;9002226.02101,"847,79.63 ",.01)
;;79.63
;;9002226.02101,"847,79.63 ",.02)
;;79.63
;;9002226.02101,"847,79.65 ",.01)
;;79.65
;;9002226.02101,"847,79.65 ",.02)
;;79.65
;;9002226.02101,"847,79.66 ",.01)
;;79.66
;;9002226.02101,"847,79.66 ",.02)
;;79.66
;;9002226.02101,"847,79.67 ",.01)
;;79.67
;;9002226.02101,"847,79.67 ",.02)
;;79.67
;;9002226.02101,"847,79.69 ",.01)
;;79.69
;;9002226.02101,"847,79.69 ",.02)
;;79.69
;;9002226.02101,"847,79.80 ",.01)
;;79.80
;;9002226.02101,"847,79.80 ",.02)
;;79.80
;;9002226.02101,"847,79.81 ",.01)
;;79.81
;;9002226.02101,"847,79.81 ",.02)
;;79.81
;;9002226.02101,"847,79.82 ",.01)
;;79.82
;;9002226.02101,"847,79.82 ",.02)
;;79.82
;;9002226.02101,"847,79.83 ",.01)
;;79.83
;;9002226.02101,"847,79.83 ",.02)
;;79.83
;;9002226.02101,"847,79.85 ",.01)
;;79.85
;;9002226.02101,"847,79.85 ",.02)
;;79.85
;;9002226.02101,"847,79.86 ",.01)
;;79.86
;;9002226.02101,"847,79.86 ",.02)
;;79.86
;;9002226.02101,"847,79.87 ",.01)
;;79.87
;;9002226.02101,"847,79.87 ",.02)
;;79.87
;;9002226.02101,"847,79.88 ",.01)
;;79.88
;;9002226.02101,"847,79.88 ",.02)
;;79.88
;;9002226.02101,"847,79.89 ",.01)
;;79.89
;;9002226.02101,"847,79.89 ",.02)
;;79.89
;;9002226.02101,"847,80.00 ",.01)
;;80.00
;;9002226.02101,"847,80.00 ",.02)
;;80.00
;;9002226.02101,"847,80.01 ",.01)
;;80.01
;;9002226.02101,"847,80.01 ",.02)
;;80.01
;;9002226.02101,"847,80.02 ",.01)
;;80.02
;;9002226.02101,"847,80.02 ",.02)
;;80.02
;;9002226.02101,"847,80.03 ",.01)
;;80.03
;;9002226.02101,"847,80.03 ",.02)
;;80.03
;;9002226.02101,"847,80.04 ",.01)
;;80.04
;;9002226.02101,"847,80.04 ",.02)
;;80.04
;;9002226.02101,"847,80.05 ",.01)
;;80.05
;;9002226.02101,"847,80.05 ",.02)
;;80.05
;;9002226.02101,"847,80.06 ",.01)
;;80.06
;;9002226.02101,"847,80.06 ",.02)
;;80.06
;;9002226.02101,"847,80.07 ",.01)
;;80.07
;;9002226.02101,"847,80.07 ",.02)
;;80.07
;;9002226.02101,"847,80.09 ",.01)
;;80.09
;;9002226.02101,"847,80.09 ",.02)
;;80.09
;;9002226.02101,"847,80.10 ",.01)
;;80.10
;;9002226.02101,"847,80.10 ",.02)
;;80.10
;;9002226.02101,"847,80.11 ",.01)
;;80.11
;;9002226.02101,"847,80.11 ",.02)
;;80.11
;;9002226.02101,"847,80.12 ",.01)
;;80.12
;;9002226.02101,"847,80.12 ",.02)
;;80.12
;;9002226.02101,"847,80.13 ",.01)
;;80.13
;;9002226.02101,"847,80.13 ",.02)
;;80.13
;;9002226.02101,"847,80.15 ",.01)
;;80.15
;;9002226.02101,"847,80.15 ",.02)
;;80.15
;;9002226.02101,"847,80.16 ",.01)
;;80.16
;;9002226.02101,"847,80.16 ",.02)
;;80.16
;;9002226.02101,"847,80.17 ",.01)
;;80.17
;;9002226.02101,"847,80.17 ",.02)
;;80.17
;;9002226.02101,"847,80.19 ",.01)
;;80.19
;;9002226.02101,"847,80.19 ",.02)
;;80.19
;;9002226.02101,"847,80.6 ",.01)
;;80.6
;;9002226.02101,"847,80.6 ",.02)
;;80.6
;;9002226.02101,"847,80.80 ",.01)
;;80.80
;;9002226.02101,"847,80.80 ",.02)
;;80.80
;;9002226.02101,"847,80.81 ",.01)
;;80.81
;;9002226.02101,"847,80.81 ",.02)
;;80.81
;;9002226.02101,"847,80.82 ",.01)
;;80.82
;;9002226.02101,"847,80.82 ",.02)
;;80.82
;;9002226.02101,"847,80.83 ",.01)
;;80.83
;;9002226.02101,"847,80.83 ",.02)
;;80.83
;;9002226.02101,"847,80.84 ",.01)
;;80.84
;;9002226.02101,"847,80.84 ",.02)
;;80.84
;;9002226.02101,"847,80.85 ",.01)
;;80.85
;;9002226.02101,"847,80.85 ",.02)
;;80.85
;;9002226.02101,"847,80.86 ",.01)
;;80.86
;;9002226.02101,"847,80.86 ",.02)
;;80.86
;;9002226.02101,"847,80.87 ",.01)
;;80.87
;;9002226.02101,"847,80.87 ",.02)
;;80.87
;;9002226.02101,"847,80.88 ",.01)
;;80.88
;;9002226.02101,"847,80.88 ",.02)
;;80.88
;;9002226.02101,"847,80.89 ",.01)
;;80.89
;;9002226.02101,"847,80.89 ",.02)
;;80.89
;;9002226.02101,"847,80.90 ",.01)
;;80.90
;;9002226.02101,"847,80.90 ",.02)
;;80.90
;;9002226.02101,"847,80.91 ",.01)
;;80.91
;;9002226.02101,"847,80.91 ",.02)
;;80.91
;;9002226.02101,"847,80.92 ",.01)
;;80.92
;;9002226.02101,"847,80.92 ",.02)
;;80.92
;;9002226.02101,"847,80.93 ",.01)
;;80.93
;;9002226.02101,"847,80.93 ",.02)
;;80.93
;;9002226.02101,"847,80.94 ",.01)
;;80.94
;;9002226.02101,"847,80.94 ",.02)
;;80.94
;;9002226.02101,"847,80.95 ",.01)
;;80.95
;;9002226.02101,"847,80.95 ",.02)
;;80.95
;;9002226.02101,"847,80.96 ",.01)
;;80.96
;;9002226.02101,"847,80.96 ",.02)
;;80.96
;;9002226.02101,"847,80.97 ",.01)
;;80.97
;;9002226.02101,"847,80.97 ",.02)
;;80.97
;;9002226.02101,"847,80.98 ",.01)
;;80.98
;;9002226.02101,"847,80.98 ",.02)
;;80.98
;;9002226.02101,"847,80.99 ",.01)
;;80.99
;;9002226.02101,"847,80.99 ",.02)
;;80.99
;;9002226.02101,"847,81.00 ",.01)
;;81.00
;;9002226.02101,"847,81.00 ",.02)
;;81.00
;;9002226.02101,"847,81.01 ",.01)
;;81.01
;;9002226.02101,"847,81.01 ",.02)
;;81.01
;;9002226.02101,"847,81.02 ",.01)
;;81.02
;;9002226.02101,"847,81.02 ",.02)
;;81.02
;;9002226.02101,"847,81.03 ",.01)
;;81.03
;;9002226.02101,"847,81.03 ",.02)
;;81.03
;;9002226.02101,"847,81.04 ",.01)
;;81.04
;;9002226.02101,"847,81.04 ",.02)
;;81.04
;;9002226.02101,"847,81.05 ",.01)
;;81.05
;;9002226.02101,"847,81.05 ",.02)
;;81.05
;;9002226.02101,"847,81.06 ",.01)
;;81.06
;;9002226.02101,"847,81.06 ",.02)
;;81.06
;;9002226.02101,"847,81.07 ",.01)
;;81.07
;;9002226.02101,"847,81.07 ",.02)
;;81.07
;;9002226.02101,"847,81.08 ",.01)
;;81.08
;;9002226.02101,"847,81.08 ",.02)
;;81.08
;;9002226.02101,"847,81.11 ",.01)
;;81.11
;;9002226.02101,"847,81.11 ",.02)
;;81.11
;;9002226.02101,"847,81.12 ",.01)
;;81.12
;;9002226.02101,"847,81.12 ",.02)
;;81.12
;;9002226.02101,"847,81.13 ",.01)
;;81.13
;;9002226.02101,"847,81.13 ",.02)
;;81.13
;;9002226.02101,"847,81.14 ",.01)
;;81.14
;;9002226.02101,"847,81.14 ",.02)
;;81.14
;;9002226.02101,"847,81.15 ",.01)
;;81.15
;;9002226.02101,"847,81.15 ",.02)
;;81.15
;;9002226.02101,"847,81.16 ",.01)
;;81.16
;;9002226.02101,"847,81.16 ",.02)
;;81.16
;;9002226.02101,"847,81.17 ",.01)
;;81.17
;;9002226.02101,"847,81.17 ",.02)
;;81.17
;;9002226.02101,"847,81.20 ",.01)
;;81.20
;;9002226.02101,"847,81.20 ",.02)
;;81.20
;;9002226.02101,"847,81.21 ",.01)
;;81.21
;;9002226.02101,"847,81.21 ",.02)
;;81.21
;;9002226.02101,"847,81.22 ",.01)
;;81.22
;;9002226.02101,"847,81.22 ",.02)
;;81.22
;;9002226.02101,"847,81.23 ",.01)
;;81.23
;;9002226.02101,"847,81.23 ",.02)
;;81.23
;;9002226.02101,"847,81.24 ",.01)
;;81.24
;;9002226.02101,"847,81.24 ",.02)
;;81.24
;;9002226.02101,"847,81.25 ",.01)
;;81.25
;;9002226.02101,"847,81.25 ",.02)
;;81.25
;;9002226.02101,"847,81.26 ",.01)
;;81.26
;;9002226.02101,"847,81.26 ",.02)
;;81.26
;;9002226.02101,"847,81.27 ",.01)
;;81.27
;;9002226.02101,"847,81.27 ",.02)
;;81.27
;;9002226.02101,"847,81.28 ",.01)
;;81.28
;;9002226.02101,"847,81.28 ",.02)
;;81.28
;;9002226.02101,"847,81.29 ",.01)
;;81.29
;;9002226.02101,"847,81.29 ",.02)
;;81.29
;;9002226.02101,"847,81.30 ",.01)
;;81.30
;;9002226.02101,"847,81.30 ",.02)
;;81.30
;;9002226.02101,"847,81.31 ",.01)
;;81.31
;;9002226.02101,"847,81.31 ",.02)
;;81.31
;;9002226.02101,"847,81.32 ",.01)
;;81.32
;;9002226.02101,"847,81.32 ",.02)
;;81.32
;;9002226.02101,"847,81.33 ",.01)
;;81.33
;;9002226.02101,"847,81.33 ",.02)
;;81.33
;;9002226.02101,"847,81.34 ",.01)
;;81.34
;;9002226.02101,"847,81.34 ",.02)
;;81.34
;;9002226.02101,"847,81.35 ",.01)
;;81.35
;;9002226.02101,"847,81.35 ",.02)
;;81.35
;;9002226.02101,"847,81.36 ",.01)
;;81.36
;;9002226.02101,"847,81.36 ",.02)
;;81.36
;;9002226.02101,"847,81.37 ",.01)
;;81.37
;;9002226.02101,"847,81.37 ",.02)
;;81.37
;;9002226.02101,"847,81.38 ",.01)
;;81.38
;;9002226.02101,"847,81.38 ",.02)
;;81.38
;;9002226.02101,"847,81.39 ",.01)
;;81.39
;;9002226.02101,"847,81.39 ",.02)
;;81.39
;;9002226.02101,"847,81.40 ",.01)
;;81.40
;;9002226.02101,"847,81.40 ",.02)
;;81.40
;;9002226.02101,"847,81.42 ",.01)
;;81.42
;;9002226.02101,"847,81.42 ",.02)
;;81.42
;;9002226.02101,"847,81.43 ",.01)
;;81.43
BGP03G9 ;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,78.38 ",.02)
+2 ;;78.38
+3 ;;9002226.02101,"847,78.39 ",.01)
+4 ;;78.39
+5 ;;9002226.02101,"847,78.39 ",.02)
+6 ;;78.39
+7 ;;9002226.02101,"847,78.40 ",.01)
+8 ;;78.40
+9 ;;9002226.02101,"847,78.40 ",.02)
+10 ;;78.40
+11 ;;9002226.02101,"847,78.41 ",.01)
+12 ;;78.41
+13 ;;9002226.02101,"847,78.41 ",.02)
+14 ;;78.41
+15 ;;9002226.02101,"847,78.42 ",.01)
+16 ;;78.42
+17 ;;9002226.02101,"847,78.42 ",.02)
+18 ;;78.42
+19 ;;9002226.02101,"847,78.43 ",.01)
+20 ;;78.43
+21 ;;9002226.02101,"847,78.43 ",.02)
+22 ;;78.43
+23 ;;9002226.02101,"847,78.44 ",.01)
+24 ;;78.44
+25 ;;9002226.02101,"847,78.44 ",.02)
+26 ;;78.44
+27 ;;9002226.02101,"847,78.45 ",.01)
+28 ;;78.45
+29 ;;9002226.02101,"847,78.45 ",.02)
+30 ;;78.45
+31 ;;9002226.02101,"847,78.46 ",.01)
+32 ;;78.46
+33 ;;9002226.02101,"847,78.46 ",.02)
+34 ;;78.46
+35 ;;9002226.02101,"847,78.47 ",.01)
+36 ;;78.47
+37 ;;9002226.02101,"847,78.47 ",.02)
+38 ;;78.47
+39 ;;9002226.02101,"847,78.48 ",.01)
+40 ;;78.48
+41 ;;9002226.02101,"847,78.48 ",.02)
+42 ;;78.48
+43 ;;9002226.02101,"847,78.49 ",.01)
+44 ;;78.49
+45 ;;9002226.02101,"847,78.49 ",.02)
+46 ;;78.49
+47 ;;9002226.02101,"847,78.60 ",.01)
+48 ;;78.60
+49 ;;9002226.02101,"847,78.60 ",.02)
+50 ;;78.60
+51 ;;9002226.02101,"847,78.61 ",.01)
+52 ;;78.61
+53 ;;9002226.02101,"847,78.61 ",.02)
+54 ;;78.61
+55 ;;9002226.02101,"847,78.62 ",.01)
+56 ;;78.62
+57 ;;9002226.02101,"847,78.62 ",.02)
+58 ;;78.62
+59 ;;9002226.02101,"847,78.63 ",.01)
+60 ;;78.63
+61 ;;9002226.02101,"847,78.63 ",.02)
+62 ;;78.63
+63 ;;9002226.02101,"847,78.65 ",.01)
+64 ;;78.65
+65 ;;9002226.02101,"847,78.65 ",.02)
+66 ;;78.65
+67 ;;9002226.02101,"847,78.67 ",.01)
+68 ;;78.67
+69 ;;9002226.02101,"847,78.67 ",.02)
+70 ;;78.67
+71 ;;9002226.02101,"847,78.69 ",.01)
+72 ;;78.69
+73 ;;9002226.02101,"847,78.69 ",.02)
+74 ;;78.69
+75 ;;9002226.02101,"847,78.70 ",.01)
+76 ;;78.70
+77 ;;9002226.02101,"847,78.70 ",.02)
+78 ;;78.70
+79 ;;9002226.02101,"847,78.71 ",.01)
+80 ;;78.71
+81 ;;9002226.02101,"847,78.71 ",.02)
+82 ;;78.71
+83 ;;9002226.02101,"847,78.72 ",.01)
+84 ;;78.72
+85 ;;9002226.02101,"847,78.72 ",.02)
+86 ;;78.72
+87 ;;9002226.02101,"847,78.73 ",.01)
+88 ;;78.73
+89 ;;9002226.02101,"847,78.73 ",.02)
+90 ;;78.73
+91 ;;9002226.02101,"847,78.74 ",.01)
+92 ;;78.74
+93 ;;9002226.02101,"847,78.74 ",.02)
+94 ;;78.74
+95 ;;9002226.02101,"847,78.75 ",.01)
+96 ;;78.75
+97 ;;9002226.02101,"847,78.75 ",.02)
+98 ;;78.75
+99 ;;9002226.02101,"847,78.76 ",.01)
+100 ;;78.76
+101 ;;9002226.02101,"847,78.76 ",.02)
+102 ;;78.76
+103 ;;9002226.02101,"847,78.77 ",.01)
+104 ;;78.77
+105 ;;9002226.02101,"847,78.77 ",.02)
+106 ;;78.77
+107 ;;9002226.02101,"847,78.78 ",.01)
+108 ;;78.78
+109 ;;9002226.02101,"847,78.78 ",.02)
+110 ;;78.78
+111 ;;9002226.02101,"847,78.79 ",.01)
+112 ;;78.79
+113 ;;9002226.02101,"847,78.79 ",.02)
+114 ;;78.79
+115 ;;9002226.02101,"847,79.20 ",.01)
+116 ;;79.20
+117 ;;9002226.02101,"847,79.20 ",.02)
+118 ;;79.20
+119 ;;9002226.02101,"847,79.21 ",.01)
+120 ;;79.21
+121 ;;9002226.02101,"847,79.21 ",.02)
+122 ;;79.21
+123 ;;9002226.02101,"847,79.22 ",.01)
+124 ;;79.22
+125 ;;9002226.02101,"847,79.22 ",.02)
+126 ;;79.22
+127 ;;9002226.02101,"847,79.23 ",.01)
+128 ;;79.23
+129 ;;9002226.02101,"847,79.23 ",.02)
+130 ;;79.23
+131 ;;9002226.02101,"847,79.25 ",.01)
+132 ;;79.25
+133 ;;9002226.02101,"847,79.25 ",.02)
+134 ;;79.25
+135 ;;9002226.02101,"847,79.26 ",.01)
+136 ;;79.26
+137 ;;9002226.02101,"847,79.26 ",.02)
+138 ;;79.26
+139 ;;9002226.02101,"847,79.27 ",.01)
+140 ;;79.27
+141 ;;9002226.02101,"847,79.27 ",.02)
+142 ;;79.27
+143 ;;9002226.02101,"847,79.29 ",.01)
+144 ;;79.29
+145 ;;9002226.02101,"847,79.29 ",.02)
+146 ;;79.29
+147 ;;9002226.02101,"847,79.30 ",.01)
+148 ;;79.30
+149 ;;9002226.02101,"847,79.30 ",.02)
+150 ;;79.30
+151 ;;9002226.02101,"847,79.31 ",.01)
+152 ;;79.31
+153 ;;9002226.02101,"847,79.31 ",.02)
+154 ;;79.31
+155 ;;9002226.02101,"847,79.32 ",.01)
+156 ;;79.32
+157 ;;9002226.02101,"847,79.32 ",.02)
+158 ;;79.32
+159 ;;9002226.02101,"847,79.33 ",.01)
+160 ;;79.33
+161 ;;9002226.02101,"847,79.33 ",.02)
+162 ;;79.33
+163 ;;9002226.02101,"847,79.35 ",.01)
+164 ;;79.35
+165 ;;9002226.02101,"847,79.35 ",.02)
+166 ;;79.35
+167 ;;9002226.02101,"847,79.36 ",.01)
+168 ;;79.36
+169 ;;9002226.02101,"847,79.36 ",.02)
+170 ;;79.36
+171 ;;9002226.02101,"847,79.37 ",.01)
+172 ;;79.37
+173 ;;9002226.02101,"847,79.37 ",.02)
+174 ;;79.37
+175 ;;9002226.02101,"847,79.39 ",.01)
+176 ;;79.39
+177 ;;9002226.02101,"847,79.39 ",.02)
+178 ;;79.39
+179 ;;9002226.02101,"847,79.50 ",.01)
+180 ;;79.50
+181 ;;9002226.02101,"847,79.50 ",.02)
+182 ;;79.50
+183 ;;9002226.02101,"847,79.51 ",.01)
+184 ;;79.51
+185 ;;9002226.02101,"847,79.51 ",.02)
+186 ;;79.51
+187 ;;9002226.02101,"847,79.52 ",.01)
+188 ;;79.52
+189 ;;9002226.02101,"847,79.52 ",.02)
+190 ;;79.52
+191 ;;9002226.02101,"847,79.55 ",.01)
+192 ;;79.55
+193 ;;9002226.02101,"847,79.55 ",.02)
+194 ;;79.55
+195 ;;9002226.02101,"847,79.56 ",.01)
+196 ;;79.56
+197 ;;9002226.02101,"847,79.56 ",.02)
+198 ;;79.56
+199 ;;9002226.02101,"847,79.59 ",.01)
+200 ;;79.59
+201 ;;9002226.02101,"847,79.59 ",.02)
+202 ;;79.59
+203 ;;9002226.02101,"847,79.60 ",.01)
+204 ;;79.60
+205 ;;9002226.02101,"847,79.60 ",.02)
+206 ;;79.60
+207 ;;9002226.02101,"847,79.61 ",.01)
+208 ;;79.61
+209 ;;9002226.02101,"847,79.61 ",.02)
+210 ;;79.61
+211 ;;9002226.02101,"847,79.62 ",.01)
+212 ;;79.62
+213 ;;9002226.02101,"847,79.62 ",.02)
+214 ;;79.62
+215 ;;9002226.02101,"847,79.63 ",.01)
+216 ;;79.63
+217 ;;9002226.02101,"847,79.63 ",.02)
+218 ;;79.63
+219 ;;9002226.02101,"847,79.65 ",.01)
+220 ;;79.65
+221 ;;9002226.02101,"847,79.65 ",.02)
+222 ;;79.65
+223 ;;9002226.02101,"847,79.66 ",.01)
+224 ;;79.66
+225 ;;9002226.02101,"847,79.66 ",.02)
+226 ;;79.66
+227 ;;9002226.02101,"847,79.67 ",.01)
+228 ;;79.67
+229 ;;9002226.02101,"847,79.67 ",.02)
+230 ;;79.67
+231 ;;9002226.02101,"847,79.69 ",.01)
+232 ;;79.69
+233 ;;9002226.02101,"847,79.69 ",.02)
+234 ;;79.69
+235 ;;9002226.02101,"847,79.80 ",.01)
+236 ;;79.80
+237 ;;9002226.02101,"847,79.80 ",.02)
+238 ;;79.80
+239 ;;9002226.02101,"847,79.81 ",.01)
+240 ;;79.81
+241 ;;9002226.02101,"847,79.81 ",.02)
+242 ;;79.81
+243 ;;9002226.02101,"847,79.82 ",.01)
+244 ;;79.82
+245 ;;9002226.02101,"847,79.82 ",.02)
+246 ;;79.82
+247 ;;9002226.02101,"847,79.83 ",.01)
+248 ;;79.83
+249 ;;9002226.02101,"847,79.83 ",.02)
+250 ;;79.83
+251 ;;9002226.02101,"847,79.85 ",.01)
+252 ;;79.85
+253 ;;9002226.02101,"847,79.85 ",.02)
+254 ;;79.85
+255 ;;9002226.02101,"847,79.86 ",.01)
+256 ;;79.86
+257 ;;9002226.02101,"847,79.86 ",.02)
+258 ;;79.86
+259 ;;9002226.02101,"847,79.87 ",.01)
+260 ;;79.87
+261 ;;9002226.02101,"847,79.87 ",.02)
+262 ;;79.87
+263 ;;9002226.02101,"847,79.88 ",.01)
+264 ;;79.88
+265 ;;9002226.02101,"847,79.88 ",.02)
+266 ;;79.88
+267 ;;9002226.02101,"847,79.89 ",.01)
+268 ;;79.89
+269 ;;9002226.02101,"847,79.89 ",.02)
+270 ;;79.89
+271 ;;9002226.02101,"847,80.00 ",.01)
+272 ;;80.00
+273 ;;9002226.02101,"847,80.00 ",.02)
+274 ;;80.00
+275 ;;9002226.02101,"847,80.01 ",.01)
+276 ;;80.01
+277 ;;9002226.02101,"847,80.01 ",.02)
+278 ;;80.01
+279 ;;9002226.02101,"847,80.02 ",.01)
+280 ;;80.02
+281 ;;9002226.02101,"847,80.02 ",.02)
+282 ;;80.02
+283 ;;9002226.02101,"847,80.03 ",.01)
+284 ;;80.03
+285 ;;9002226.02101,"847,80.03 ",.02)
+286 ;;80.03
+287 ;;9002226.02101,"847,80.04 ",.01)
+288 ;;80.04
+289 ;;9002226.02101,"847,80.04 ",.02)
+290 ;;80.04
+291 ;;9002226.02101,"847,80.05 ",.01)
+292 ;;80.05
+293 ;;9002226.02101,"847,80.05 ",.02)
+294 ;;80.05
+295 ;;9002226.02101,"847,80.06 ",.01)
+296 ;;80.06
+297 ;;9002226.02101,"847,80.06 ",.02)
+298 ;;80.06
+299 ;;9002226.02101,"847,80.07 ",.01)
+300 ;;80.07
+301 ;;9002226.02101,"847,80.07 ",.02)
+302 ;;80.07
+303 ;;9002226.02101,"847,80.09 ",.01)
+304 ;;80.09
+305 ;;9002226.02101,"847,80.09 ",.02)
+306 ;;80.09
+307 ;;9002226.02101,"847,80.10 ",.01)
+308 ;;80.10
+309 ;;9002226.02101,"847,80.10 ",.02)
+310 ;;80.10
+311 ;;9002226.02101,"847,80.11 ",.01)
+312 ;;80.11
+313 ;;9002226.02101,"847,80.11 ",.02)
+314 ;;80.11
+315 ;;9002226.02101,"847,80.12 ",.01)
+316 ;;80.12
+317 ;;9002226.02101,"847,80.12 ",.02)
+318 ;;80.12
+319 ;;9002226.02101,"847,80.13 ",.01)
+320 ;;80.13
+321 ;;9002226.02101,"847,80.13 ",.02)
+322 ;;80.13
+323 ;;9002226.02101,"847,80.15 ",.01)
+324 ;;80.15
+325 ;;9002226.02101,"847,80.15 ",.02)
+326 ;;80.15
+327 ;;9002226.02101,"847,80.16 ",.01)
+328 ;;80.16
+329 ;;9002226.02101,"847,80.16 ",.02)
+330 ;;80.16
+331 ;;9002226.02101,"847,80.17 ",.01)
+332 ;;80.17
+333 ;;9002226.02101,"847,80.17 ",.02)
+334 ;;80.17
+335 ;;9002226.02101,"847,80.19 ",.01)
+336 ;;80.19
+337 ;;9002226.02101,"847,80.19 ",.02)
+338 ;;80.19
+339 ;;9002226.02101,"847,80.6 ",.01)
+340 ;;80.6
+341 ;;9002226.02101,"847,80.6 ",.02)
+342 ;;80.6
+343 ;;9002226.02101,"847,80.80 ",.01)
+344 ;;80.80
+345 ;;9002226.02101,"847,80.80 ",.02)
+346 ;;80.80
+347 ;;9002226.02101,"847,80.81 ",.01)
+348 ;;80.81
+349 ;;9002226.02101,"847,80.81 ",.02)
+350 ;;80.81
+351 ;;9002226.02101,"847,80.82 ",.01)
+352 ;;80.82
+353 ;;9002226.02101,"847,80.82 ",.02)
+354 ;;80.82
+355 ;;9002226.02101,"847,80.83 ",.01)
+356 ;;80.83
+357 ;;9002226.02101,"847,80.83 ",.02)
+358 ;;80.83
+359 ;;9002226.02101,"847,80.84 ",.01)
+360 ;;80.84
+361 ;;9002226.02101,"847,80.84 ",.02)
+362 ;;80.84
+363 ;;9002226.02101,"847,80.85 ",.01)
+364 ;;80.85
+365 ;;9002226.02101,"847,80.85 ",.02)
+366 ;;80.85
+367 ;;9002226.02101,"847,80.86 ",.01)
+368 ;;80.86
+369 ;;9002226.02101,"847,80.86 ",.02)
+370 ;;80.86
+371 ;;9002226.02101,"847,80.87 ",.01)
+372 ;;80.87
+373 ;;9002226.02101,"847,80.87 ",.02)
+374 ;;80.87
+375 ;;9002226.02101,"847,80.88 ",.01)
+376 ;;80.88
+377 ;;9002226.02101,"847,80.88 ",.02)
+378 ;;80.88
+379 ;;9002226.02101,"847,80.89 ",.01)
+380 ;;80.89
+381 ;;9002226.02101,"847,80.89 ",.02)
+382 ;;80.89
+383 ;;9002226.02101,"847,80.90 ",.01)
+384 ;;80.90
+385 ;;9002226.02101,"847,80.90 ",.02)
+386 ;;80.90
+387 ;;9002226.02101,"847,80.91 ",.01)
+388 ;;80.91
+389 ;;9002226.02101,"847,80.91 ",.02)
+390 ;;80.91
+391 ;;9002226.02101,"847,80.92 ",.01)
+392 ;;80.92
+393 ;;9002226.02101,"847,80.92 ",.02)
+394 ;;80.92
+395 ;;9002226.02101,"847,80.93 ",.01)
+396 ;;80.93
+397 ;;9002226.02101,"847,80.93 ",.02)
+398 ;;80.93
+399 ;;9002226.02101,"847,80.94 ",.01)
+400 ;;80.94
+401 ;;9002226.02101,"847,80.94 ",.02)
+402 ;;80.94
+403 ;;9002226.02101,"847,80.95 ",.01)
+404 ;;80.95
+405 ;;9002226.02101,"847,80.95 ",.02)
+406 ;;80.95
+407 ;;9002226.02101,"847,80.96 ",.01)
+408 ;;80.96
+409 ;;9002226.02101,"847,80.96 ",.02)
+410 ;;80.96
+411 ;;9002226.02101,"847,80.97 ",.01)
+412 ;;80.97
+413 ;;9002226.02101,"847,80.97 ",.02)
+414 ;;80.97
+415 ;;9002226.02101,"847,80.98 ",.01)
+416 ;;80.98
+417 ;;9002226.02101,"847,80.98 ",.02)
+418 ;;80.98
+419 ;;9002226.02101,"847,80.99 ",.01)
+420 ;;80.99
+421 ;;9002226.02101,"847,80.99 ",.02)
+422 ;;80.99
+423 ;;9002226.02101,"847,81.00 ",.01)
+424 ;;81.00
+425 ;;9002226.02101,"847,81.00 ",.02)
+426 ;;81.00
+427 ;;9002226.02101,"847,81.01 ",.01)
+428 ;;81.01
+429 ;;9002226.02101,"847,81.01 ",.02)
+430 ;;81.01
+431 ;;9002226.02101,"847,81.02 ",.01)
+432 ;;81.02
+433 ;;9002226.02101,"847,81.02 ",.02)
+434 ;;81.02
+435 ;;9002226.02101,"847,81.03 ",.01)
+436 ;;81.03
+437 ;;9002226.02101,"847,81.03 ",.02)
+438 ;;81.03
+439 ;;9002226.02101,"847,81.04 ",.01)
+440 ;;81.04
+441 ;;9002226.02101,"847,81.04 ",.02)
+442 ;;81.04
+443 ;;9002226.02101,"847,81.05 ",.01)
+444 ;;81.05
+445 ;;9002226.02101,"847,81.05 ",.02)
+446 ;;81.05
+447 ;;9002226.02101,"847,81.06 ",.01)
+448 ;;81.06
+449 ;;9002226.02101,"847,81.06 ",.02)
+450 ;;81.06
+451 ;;9002226.02101,"847,81.07 ",.01)
+452 ;;81.07
+453 ;;9002226.02101,"847,81.07 ",.02)
+454 ;;81.07
+455 ;;9002226.02101,"847,81.08 ",.01)
+456 ;;81.08
+457 ;;9002226.02101,"847,81.08 ",.02)
+458 ;;81.08
+459 ;;9002226.02101,"847,81.11 ",.01)
+460 ;;81.11
+461 ;;9002226.02101,"847,81.11 ",.02)
+462 ;;81.11
+463 ;;9002226.02101,"847,81.12 ",.01)
+464 ;;81.12
+465 ;;9002226.02101,"847,81.12 ",.02)
+466 ;;81.12
+467 ;;9002226.02101,"847,81.13 ",.01)
+468 ;;81.13
+469 ;;9002226.02101,"847,81.13 ",.02)
+470 ;;81.13
+471 ;;9002226.02101,"847,81.14 ",.01)
+472 ;;81.14
+473 ;;9002226.02101,"847,81.14 ",.02)
+474 ;;81.14
+475 ;;9002226.02101,"847,81.15 ",.01)
+476 ;;81.15
+477 ;;9002226.02101,"847,81.15 ",.02)
+478 ;;81.15
+479 ;;9002226.02101,"847,81.16 ",.01)
+480 ;;81.16
+481 ;;9002226.02101,"847,81.16 ",.02)
+482 ;;81.16
+483 ;;9002226.02101,"847,81.17 ",.01)
+484 ;;81.17
+485 ;;9002226.02101,"847,81.17 ",.02)
+486 ;;81.17
+487 ;;9002226.02101,"847,81.20 ",.01)
+488 ;;81.20
+489 ;;9002226.02101,"847,81.20 ",.02)
+490 ;;81.20
+491 ;;9002226.02101,"847,81.21 ",.01)
+492 ;;81.21
+493 ;;9002226.02101,"847,81.21 ",.02)
+494 ;;81.21
+495 ;;9002226.02101,"847,81.22 ",.01)
+496 ;;81.22
+497 ;;9002226.02101,"847,81.22 ",.02)
+498 ;;81.22
+499 ;;9002226.02101,"847,81.23 ",.01)
+500 ;;81.23
+501 ;;9002226.02101,"847,81.23 ",.02)
+502 ;;81.23
+503 ;;9002226.02101,"847,81.24 ",.01)
+504 ;;81.24
+505 ;;9002226.02101,"847,81.24 ",.02)
+506 ;;81.24
+507 ;;9002226.02101,"847,81.25 ",.01)
+508 ;;81.25
+509 ;;9002226.02101,"847,81.25 ",.02)
+510 ;;81.25
+511 ;;9002226.02101,"847,81.26 ",.01)
+512 ;;81.26
+513 ;;9002226.02101,"847,81.26 ",.02)
+514 ;;81.26
+515 ;;9002226.02101,"847,81.27 ",.01)
+516 ;;81.27
+517 ;;9002226.02101,"847,81.27 ",.02)
+518 ;;81.27
+519 ;;9002226.02101,"847,81.28 ",.01)
+520 ;;81.28
+521 ;;9002226.02101,"847,81.28 ",.02)
+522 ;;81.28
+523 ;;9002226.02101,"847,81.29 ",.01)
+524 ;;81.29
+525 ;;9002226.02101,"847,81.29 ",.02)
+526 ;;81.29
+527 ;;9002226.02101,"847,81.30 ",.01)
+528 ;;81.30
+529 ;;9002226.02101,"847,81.30 ",.02)
+530 ;;81.30
+531 ;;9002226.02101,"847,81.31 ",.01)
+532 ;;81.31
+533 ;;9002226.02101,"847,81.31 ",.02)
+534 ;;81.31
+535 ;;9002226.02101,"847,81.32 ",.01)
+536 ;;81.32
+537 ;;9002226.02101,"847,81.32 ",.02)
+538 ;;81.32
+539 ;;9002226.02101,"847,81.33 ",.01)
+540 ;;81.33
+541 ;;9002226.02101,"847,81.33 ",.02)
+542 ;;81.33
+543 ;;9002226.02101,"847,81.34 ",.01)
+544 ;;81.34
+545 ;;9002226.02101,"847,81.34 ",.02)
+546 ;;81.34
+547 ;;9002226.02101,"847,81.35 ",.01)
+548 ;;81.35
+549 ;;9002226.02101,"847,81.35 ",.02)
+550 ;;81.35
+551 ;;9002226.02101,"847,81.36 ",.01)
+552 ;;81.36
+553 ;;9002226.02101,"847,81.36 ",.02)
+554 ;;81.36
+555 ;;9002226.02101,"847,81.37 ",.01)
+556 ;;81.37
+557 ;;9002226.02101,"847,81.37 ",.02)
+558 ;;81.37
+559 ;;9002226.02101,"847,81.38 ",.01)
+560 ;;81.38
+561 ;;9002226.02101,"847,81.38 ",.02)
+562 ;;81.38
+563 ;;9002226.02101,"847,81.39 ",.01)
+564 ;;81.39
+565 ;;9002226.02101,"847,81.39 ",.02)
+566 ;;81.39
+567 ;;9002226.02101,"847,81.40 ",.01)
+568 ;;81.40
+569 ;;9002226.02101,"847,81.40 ",.02)
+570 ;;81.40
+571 ;;9002226.02101,"847,81.42 ",.01)
+572 ;;81.42
+573 ;;9002226.02101,"847,81.42 ",.02)
+574 ;;81.42
+575 ;;9002226.02101,"847,81.43 ",.01)
+576 ;;81.43
