BGP03G5 ;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,35.63 ",.01)
;;35.63
;;9002226.02101,"847,35.63 ",.02)
;;35.63
;;9002226.02101,"847,35.70 ",.01)
;;35.70
;;9002226.02101,"847,35.70 ",.02)
;;35.70
;;9002226.02101,"847,35.71 ",.01)
;;35.71
;;9002226.02101,"847,35.71 ",.02)
;;35.71
;;9002226.02101,"847,35.72 ",.01)
;;35.72
;;9002226.02101,"847,35.72 ",.02)
;;35.72
;;9002226.02101,"847,35.73 ",.01)
;;35.73
;;9002226.02101,"847,35.73 ",.02)
;;35.73
;;9002226.02101,"847,35.81 ",.01)
;;35.81
;;9002226.02101,"847,35.81 ",.02)
;;35.81
;;9002226.02101,"847,35.82 ",.01)
;;35.82
;;9002226.02101,"847,35.82 ",.02)
;;35.82
;;9002226.02101,"847,35.83 ",.01)
;;35.83
;;9002226.02101,"847,35.83 ",.02)
;;35.83
;;9002226.02101,"847,35.84 ",.01)
;;35.84
;;9002226.02101,"847,35.84 ",.02)
;;35.84
;;9002226.02101,"847,35.91 ",.01)
;;35.91
;;9002226.02101,"847,35.91 ",.02)
;;35.91
;;9002226.02101,"847,35.92 ",.01)
;;35.92
;;9002226.02101,"847,35.92 ",.02)
;;35.92
;;9002226.02101,"847,35.93 ",.01)
;;35.93
;;9002226.02101,"847,35.93 ",.02)
;;35.93
;;9002226.02101,"847,35.94 ",.01)
;;35.94
;;9002226.02101,"847,35.94 ",.02)
;;35.94
;;9002226.02101,"847,35.95 ",.01)
;;35.95
;;9002226.02101,"847,35.95 ",.02)
;;35.95
;;9002226.02101,"847,35.98 ",.01)
;;35.98
;;9002226.02101,"847,35.98 ",.02)
;;35.98
;;9002226.02101,"847,35.99 ",.01)
;;35.99
;;9002226.02101,"847,35.99 ",.02)
;;35.99
;;9002226.02101,"847,36.03 ",.01)
;;36.03
;;9002226.02101,"847,36.03 ",.02)
;;36.03
;;9002226.02101,"847,36.10 ",.01)
;;36.10
;;9002226.02101,"847,36.10 ",.02)
;;36.10
;;9002226.02101,"847,36.11 ",.01)
;;36.11
;;9002226.02101,"847,36.11 ",.02)
;;36.11
;;9002226.02101,"847,36.12 ",.01)
;;36.12
;;9002226.02101,"847,36.12 ",.02)
;;36.12
;;9002226.02101,"847,36.13 ",.01)
;;36.13
;;9002226.02101,"847,36.13 ",.02)
;;36.13
;;9002226.02101,"847,36.14 ",.01)
;;36.14
;;9002226.02101,"847,36.14 ",.02)
;;36.14
;;9002226.02101,"847,36.15 ",.01)
;;36.15
;;9002226.02101,"847,36.15 ",.02)
;;36.15
;;9002226.02101,"847,36.16 ",.01)
;;36.16
;;9002226.02101,"847,36.16 ",.02)
;;36.16
;;9002226.02101,"847,36.17 ",.01)
;;36.17
;;9002226.02101,"847,36.17 ",.02)
;;36.17
;;9002226.02101,"847,36.19 ",.01)
;;36.19
;;9002226.02101,"847,36.19 ",.02)
;;36.19
;;9002226.02101,"847,36.31 ",.01)
;;36.31
;;9002226.02101,"847,36.31 ",.02)
;;36.31
;;9002226.02101,"847,36.32 ",.01)
;;36.32
;;9002226.02101,"847,36.32 ",.02)
;;36.32
;;9002226.02101,"847,36.39 ",.01)
;;36.39
;;9002226.02101,"847,36.39 ",.02)
;;36.39
;;9002226.02101,"847,36.91 ",.01)
;;36.91
;;9002226.02101,"847,36.91 ",.02)
;;36.91
;;9002226.02101,"847,36.99 ",.01)
;;36.99
;;9002226.02101,"847,36.99 ",.02)
;;36.99
;;9002226.02101,"847,37.10 ",.01)
;;37.10
;;9002226.02101,"847,37.10 ",.02)
;;37.10
;;9002226.02101,"847,37.11 ",.01)
;;37.11
;;9002226.02101,"847,37.11 ",.02)
;;37.11
;;9002226.02101,"847,37.12 ",.01)
;;37.12
;;9002226.02101,"847,37.12 ",.02)
;;37.12
;;9002226.02101,"847,37.31 ",.01)
;;37.31
;;9002226.02101,"847,37.31 ",.02)
;;37.31
;;9002226.02101,"847,37.32 ",.01)
;;37.32
;;9002226.02101,"847,37.32 ",.02)
;;37.32
;;9002226.02101,"847,37.33 ",.01)
;;37.33
;;9002226.02101,"847,37.33 ",.02)
;;37.33
;;9002226.02101,"847,37.34 ",.01)
;;37.34
;;9002226.02101,"847,37.34 ",.02)
;;37.34
;;9002226.02101,"847,37.35 ",.01)
;;37.35
;;9002226.02101,"847,37.35 ",.02)
;;37.35
;;9002226.02101,"847,37.41 ",.01)
;;37.41
;;9002226.02101,"847,37.41 ",.02)
;;37.41
;;9002226.02101,"847,37.49 ",.01)
;;37.49
;;9002226.02101,"847,37.49 ",.02)
;;37.49
;;9002226.02101,"847,37.51 ",.01)
;;37.51
;;9002226.02101,"847,37.51 ",.02)
;;37.51
;;9002226.02101,"847,37.52 ",.01)
;;37.52
;;9002226.02101,"847,37.52 ",.02)
;;37.52
;;9002226.02101,"847,37.53 ",.01)
;;37.53
;;9002226.02101,"847,37.53 ",.02)
;;37.53
;;9002226.02101,"847,37.54 ",.01)
;;37.54
;;9002226.02101,"847,37.54 ",.02)
;;37.54
;;9002226.02101,"847,37.62 ",.01)
;;37.62
;;9002226.02101,"847,37.62 ",.02)
;;37.62
;;9002226.02101,"847,37.63 ",.01)
;;37.63
;;9002226.02101,"847,37.63 ",.02)
;;37.63
;;9002226.02101,"847,37.64 ",.01)
;;37.64
;;9002226.02101,"847,37.64 ",.02)
;;37.64
;;9002226.02101,"847,37.66 ",.01)
;;37.66
;;9002226.02101,"847,37.66 ",.02)
;;37.66
;;9002226.02101,"847,37.67 ",.01)
;;37.67
;;9002226.02101,"847,37.67 ",.02)
;;37.67
;;9002226.02101,"847,37.91 ",.01)
;;37.91
;;9002226.02101,"847,37.91 ",.02)
;;37.91
;;9002226.02101,"847,38.10 ",.01)
;;38.10
;;9002226.02101,"847,38.10 ",.02)
;;38.10
;;9002226.02101,"847,38.11 ",.01)
;;38.11
;;9002226.02101,"847,38.11 ",.02)
;;38.11
;;9002226.02101,"847,38.12 ",.01)
;;38.12
;;9002226.02101,"847,38.12 ",.02)
;;38.12
;;9002226.02101,"847,38.13 ",.01)
;;38.13
;;9002226.02101,"847,38.13 ",.02)
;;38.13
;;9002226.02101,"847,38.14 ",.01)
;;38.14
;;9002226.02101,"847,38.14 ",.02)
;;38.14
;;9002226.02101,"847,38.15 ",.01)
;;38.15
;;9002226.02101,"847,38.15 ",.02)
;;38.15
;;9002226.02101,"847,38.16 ",.01)
;;38.16
;;9002226.02101,"847,38.16 ",.02)
;;38.16
;;9002226.02101,"847,38.18 ",.01)
;;38.18
;;9002226.02101,"847,38.18 ",.02)
;;38.18
;;9002226.02101,"847,38.30 ",.01)
;;38.30
;;9002226.02101,"847,38.30 ",.02)
;;38.30
;;9002226.02101,"847,38.31 ",.01)
;;38.31
;;9002226.02101,"847,38.31 ",.02)
;;38.31
;;9002226.02101,"847,38.32 ",.01)
;;38.32
;;9002226.02101,"847,38.32 ",.02)
;;38.32
;;9002226.02101,"847,38.33 ",.01)
;;38.33
;;9002226.02101,"847,38.33 ",.02)
;;38.33
;;9002226.02101,"847,38.34 ",.01)
;;38.34
;;9002226.02101,"847,38.34 ",.02)
;;38.34
;;9002226.02101,"847,38.35 ",.01)
;;38.35
;;9002226.02101,"847,38.35 ",.02)
;;38.35
;;9002226.02101,"847,38.36 ",.01)
;;38.36
;;9002226.02101,"847,38.36 ",.02)
;;38.36
;;9002226.02101,"847,38.37 ",.01)
;;38.37
;;9002226.02101,"847,38.37 ",.02)
;;38.37
;;9002226.02101,"847,38.38 ",.01)
;;38.38
;;9002226.02101,"847,38.38 ",.02)
;;38.38
;;9002226.02101,"847,38.39 ",.01)
;;38.39
;;9002226.02101,"847,38.39 ",.02)
;;38.39
;;9002226.02101,"847,38.40 ",.01)
;;38.40
;;9002226.02101,"847,38.40 ",.02)
;;38.40
;;9002226.02101,"847,38.41 ",.01)
;;38.41
;;9002226.02101,"847,38.41 ",.02)
;;38.41
;;9002226.02101,"847,38.42 ",.01)
;;38.42
;;9002226.02101,"847,38.42 ",.02)
;;38.42
;;9002226.02101,"847,38.43 ",.01)
;;38.43
;;9002226.02101,"847,38.43 ",.02)
;;38.43
;;9002226.02101,"847,38.44 ",.01)
;;38.44
;;9002226.02101,"847,38.44 ",.02)
;;38.44
;;9002226.02101,"847,38.45 ",.01)
;;38.45
;;9002226.02101,"847,38.45 ",.02)
;;38.45
;;9002226.02101,"847,38.46 ",.01)
;;38.46
;;9002226.02101,"847,38.46 ",.02)
;;38.46
;;9002226.02101,"847,38.47 ",.01)
;;38.47
;;9002226.02101,"847,38.47 ",.02)
;;38.47
;;9002226.02101,"847,38.48 ",.01)
;;38.48
;;9002226.02101,"847,38.48 ",.02)
;;38.48
;;9002226.02101,"847,38.49 ",.01)
;;38.49
;;9002226.02101,"847,38.49 ",.02)
;;38.49
;;9002226.02101,"847,38.64 ",.01)
;;38.64
;;9002226.02101,"847,38.64 ",.02)
;;38.64
;;9002226.02101,"847,38.7 ",.01)
;;38.7
;;9002226.02101,"847,38.7 ",.02)
;;38.7
;;9002226.02101,"847,38.80 ",.01)
;;38.80
;;9002226.02101,"847,38.80 ",.02)
;;38.80
;;9002226.02101,"847,38.81 ",.01)
;;38.81
;;9002226.02101,"847,38.81 ",.02)
;;38.81
;;9002226.02101,"847,38.82 ",.01)
;;38.82
;;9002226.02101,"847,38.82 ",.02)
;;38.82
;;9002226.02101,"847,38.84 ",.01)
;;38.84
;;9002226.02101,"847,38.84 ",.02)
;;38.84
;;9002226.02101,"847,38.85 ",.01)
;;38.85
;;9002226.02101,"847,38.85 ",.02)
;;38.85
;;9002226.02101,"847,38.86 ",.01)
;;38.86
;;9002226.02101,"847,38.86 ",.02)
;;38.86
;;9002226.02101,"847,38.87 ",.01)
;;38.87
;;9002226.02101,"847,38.87 ",.02)
;;38.87
;;9002226.02101,"847,38.88 ",.01)
;;38.88
;;9002226.02101,"847,38.88 ",.02)
;;38.88
;;9002226.02101,"847,39.0 ",.01)
;;39.0
;;9002226.02101,"847,39.0 ",.02)
;;39.0
;;9002226.02101,"847,39.1 ",.01)
;;39.1
;;9002226.02101,"847,39.1 ",.02)
;;39.1
;;9002226.02101,"847,39.21 ",.01)
;;39.21
;;9002226.02101,"847,39.21 ",.02)
;;39.21
;;9002226.02101,"847,39.22 ",.01)
;;39.22
;;9002226.02101,"847,39.22 ",.02)
;;39.22
;;9002226.02101,"847,39.23 ",.01)
;;39.23
;;9002226.02101,"847,39.23 ",.02)
;;39.23
;;9002226.02101,"847,39.24 ",.01)
;;39.24
;;9002226.02101,"847,39.24 ",.02)
;;39.24
;;9002226.02101,"847,39.25 ",.01)
;;39.25
;;9002226.02101,"847,39.25 ",.02)
;;39.25
;;9002226.02101,"847,39.26 ",.01)
;;39.26
;;9002226.02101,"847,39.26 ",.02)
;;39.26
;;9002226.02101,"847,39.27 ",.01)
;;39.27
;;9002226.02101,"847,39.27 ",.02)
;;39.27
;;9002226.02101,"847,39.28 ",.01)
;;39.28
;;9002226.02101,"847,39.28 ",.02)
;;39.28
;;9002226.02101,"847,39.29 ",.01)
;;39.29
;;9002226.02101,"847,39.29 ",.02)
;;39.29
;;9002226.02101,"847,39.30 ",.01)
;;39.30
;;9002226.02101,"847,39.30 ",.02)
;;39.30
;;9002226.02101,"847,39.31 ",.01)
;;39.31
;;9002226.02101,"847,39.31 ",.02)
;;39.31
;;9002226.02101,"847,39.32 ",.01)
;;39.32
;;9002226.02101,"847,39.32 ",.02)
;;39.32
;;9002226.02101,"847,39.41 ",.01)
;;39.41
;;9002226.02101,"847,39.41 ",.02)
;;39.41
;;9002226.02101,"847,39.42 ",.01)
;;39.42
;;9002226.02101,"847,39.42 ",.02)
;;39.42
;;9002226.02101,"847,39.43 ",.01)
;;39.43
;;9002226.02101,"847,39.43 ",.02)
;;39.43
;;9002226.02101,"847,39.49 ",.01)
;;39.49
;;9002226.02101,"847,39.49 ",.02)
;;39.49
;;9002226.02101,"847,39.51 ",.01)
;;39.51
;;9002226.02101,"847,39.51 ",.02)
;;39.51
;;9002226.02101,"847,39.52 ",.01)
;;39.52
;;9002226.02101,"847,39.52 ",.02)
;;39.52
;;9002226.02101,"847,39.53 ",.01)
;;39.53
;;9002226.02101,"847,39.53 ",.02)
;;39.53
;;9002226.02101,"847,39.54 ",.01)
;;39.54
;;9002226.02101,"847,39.54 ",.02)
;;39.54
;;9002226.02101,"847,39.55 ",.01)
;;39.55
;;9002226.02101,"847,39.55 ",.02)
;;39.55
;;9002226.02101,"847,39.56 ",.01)
;;39.56
;;9002226.02101,"847,39.56 ",.02)
;;39.56
;;9002226.02101,"847,39.57 ",.01)
;;39.57
;;9002226.02101,"847,39.57 ",.02)
;;39.57
;;9002226.02101,"847,39.58 ",.01)
;;39.58
;;9002226.02101,"847,39.58 ",.02)
;;39.58
;;9002226.02101,"847,39.59 ",.01)
;;39.59
;;9002226.02101,"847,39.59 ",.02)
;;39.59
;;9002226.02101,"847,39.71 ",.01)
;;39.71
;;9002226.02101,"847,39.71 ",.02)
;;39.71
;;9002226.02101,"847,39.72 ",.01)
;;39.72
;;9002226.02101,"847,39.72 ",.02)
;;39.72
;;9002226.02101,"847,39.73 ",.01)
;;39.73
;;9002226.02101,"847,39.73 ",.02)
;;39.73
;;9002226.02101,"847,39.79 ",.01)
;;39.79
;;9002226.02101,"847,39.79 ",.02)
;;39.79
;;9002226.02101,"847,39.8 ",.01)
;;39.8
;;9002226.02101,"847,39.8 ",.02)
;;39.8
;;9002226.02101,"847,39.91 ",.01)
;;39.91
;;9002226.02101,"847,39.91 ",.02)
;;39.91
;;9002226.02101,"847,39.98 ",.01)
;;39.98
;;9002226.02101,"847,39.98 ",.02)
;;39.98
;;9002226.02101,"847,39.99 ",.01)
;;39.99
;;9002226.02101,"847,39.99 ",.02)
;;39.99
;;9002226.02101,"847,40.22 ",.01)
;;40.22
;;9002226.02101,"847,40.22 ",.02)
;;40.22
;;9002226.02101,"847,40.40 ",.01)
;;40.40
;;9002226.02101,"847,40.40 ",.02)
;;40.40
;;9002226.02101,"847,40.41 ",.01)
;;40.41
;;9002226.02101,"847,40.41 ",.02)
;;40.41
;;9002226.02101,"847,40.42 ",.01)
;;40.42
;;9002226.02101,"847,40.42 ",.02)
;;40.42
;;9002226.02101,"847,40.50 ",.01)
;;40.50
;;9002226.02101,"847,40.50 ",.02)
;;40.50
;;9002226.02101,"847,40.51 ",.01)
;;40.51
;;9002226.02101,"847,40.51 ",.02)
;;40.51
;;9002226.02101,"847,40.52 ",.01)
;;40.52
;;9002226.02101,"847,40.52 ",.02)
;;40.52
;;9002226.02101,"847,40.53 ",.01)
;;40.53
;;9002226.02101,"847,40.53 ",.02)
;;40.53
;;9002226.02101,"847,40.54 ",.01)
;;40.54
;;9002226.02101,"847,40.54 ",.02)
;;40.54
;;9002226.02101,"847,40.59 ",.01)
;;40.59
;;9002226.02101,"847,40.59 ",.02)
;;40.59
;;9002226.02101,"847,40.62 ",.01)
;;40.62
;;9002226.02101,"847,40.62 ",.02)
;;40.62
;;9002226.02101,"847,40.63 ",.01)
;;40.63
;;9002226.02101,"847,40.63 ",.02)
;;40.63
;;9002226.02101,"847,41.2 ",.01)
;;41.2
;;9002226.02101,"847,41.2 ",.02)
;;41.2
;;9002226.02101,"847,41.5 ",.01)
;;41.5
;;9002226.02101,"847,41.5 ",.02)
;;41.5
;;9002226.02101,"847,42.01 ",.01)
;;42.01
;;9002226.02101,"847,42.01 ",.02)
;;42.01
;;9002226.02101,"847,42.09 ",.01)
;;42.09
;;9002226.02101,"847,42.09 ",.02)
;;42.09
;;9002226.02101,"847,42.10 ",.01)
;;42.10
;;9002226.02101,"847,42.10 ",.02)
;;42.10
;;9002226.02101,"847,42.11 ",.01)
;;42.11
;;9002226.02101,"847,42.11 ",.02)
;;42.11
;;9002226.02101,"847,42.12 ",.01)
;;42.12
;;9002226.02101,"847,42.12 ",.02)
;;42.12
;;9002226.02101,"847,42.19 ",.01)
;;42.19
;;9002226.02101,"847,42.19 ",.02)
;;42.19
BGP03G5 ;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,35.63 ",.01)
+2 ;;35.63
+3 ;;9002226.02101,"847,35.63 ",.02)
+4 ;;35.63
+5 ;;9002226.02101,"847,35.70 ",.01)
+6 ;;35.70
+7 ;;9002226.02101,"847,35.70 ",.02)
+8 ;;35.70
+9 ;;9002226.02101,"847,35.71 ",.01)
+10 ;;35.71
+11 ;;9002226.02101,"847,35.71 ",.02)
+12 ;;35.71
+13 ;;9002226.02101,"847,35.72 ",.01)
+14 ;;35.72
+15 ;;9002226.02101,"847,35.72 ",.02)
+16 ;;35.72
+17 ;;9002226.02101,"847,35.73 ",.01)
+18 ;;35.73
+19 ;;9002226.02101,"847,35.73 ",.02)
+20 ;;35.73
+21 ;;9002226.02101,"847,35.81 ",.01)
+22 ;;35.81
+23 ;;9002226.02101,"847,35.81 ",.02)
+24 ;;35.81
+25 ;;9002226.02101,"847,35.82 ",.01)
+26 ;;35.82
+27 ;;9002226.02101,"847,35.82 ",.02)
+28 ;;35.82
+29 ;;9002226.02101,"847,35.83 ",.01)
+30 ;;35.83
+31 ;;9002226.02101,"847,35.83 ",.02)
+32 ;;35.83
+33 ;;9002226.02101,"847,35.84 ",.01)
+34 ;;35.84
+35 ;;9002226.02101,"847,35.84 ",.02)
+36 ;;35.84
+37 ;;9002226.02101,"847,35.91 ",.01)
+38 ;;35.91
+39 ;;9002226.02101,"847,35.91 ",.02)
+40 ;;35.91
+41 ;;9002226.02101,"847,35.92 ",.01)
+42 ;;35.92
+43 ;;9002226.02101,"847,35.92 ",.02)
+44 ;;35.92
+45 ;;9002226.02101,"847,35.93 ",.01)
+46 ;;35.93
+47 ;;9002226.02101,"847,35.93 ",.02)
+48 ;;35.93
+49 ;;9002226.02101,"847,35.94 ",.01)
+50 ;;35.94
+51 ;;9002226.02101,"847,35.94 ",.02)
+52 ;;35.94
+53 ;;9002226.02101,"847,35.95 ",.01)
+54 ;;35.95
+55 ;;9002226.02101,"847,35.95 ",.02)
+56 ;;35.95
+57 ;;9002226.02101,"847,35.98 ",.01)
+58 ;;35.98
+59 ;;9002226.02101,"847,35.98 ",.02)
+60 ;;35.98
+61 ;;9002226.02101,"847,35.99 ",.01)
+62 ;;35.99
+63 ;;9002226.02101,"847,35.99 ",.02)
+64 ;;35.99
+65 ;;9002226.02101,"847,36.03 ",.01)
+66 ;;36.03
+67 ;;9002226.02101,"847,36.03 ",.02)
+68 ;;36.03
+69 ;;9002226.02101,"847,36.10 ",.01)
+70 ;;36.10
+71 ;;9002226.02101,"847,36.10 ",.02)
+72 ;;36.10
+73 ;;9002226.02101,"847,36.11 ",.01)
+74 ;;36.11
+75 ;;9002226.02101,"847,36.11 ",.02)
+76 ;;36.11
+77 ;;9002226.02101,"847,36.12 ",.01)
+78 ;;36.12
+79 ;;9002226.02101,"847,36.12 ",.02)
+80 ;;36.12
+81 ;;9002226.02101,"847,36.13 ",.01)
+82 ;;36.13
+83 ;;9002226.02101,"847,36.13 ",.02)
+84 ;;36.13
+85 ;;9002226.02101,"847,36.14 ",.01)
+86 ;;36.14
+87 ;;9002226.02101,"847,36.14 ",.02)
+88 ;;36.14
+89 ;;9002226.02101,"847,36.15 ",.01)
+90 ;;36.15
+91 ;;9002226.02101,"847,36.15 ",.02)
+92 ;;36.15
+93 ;;9002226.02101,"847,36.16 ",.01)
+94 ;;36.16
+95 ;;9002226.02101,"847,36.16 ",.02)
+96 ;;36.16
+97 ;;9002226.02101,"847,36.17 ",.01)
+98 ;;36.17
+99 ;;9002226.02101,"847,36.17 ",.02)
+100 ;;36.17
+101 ;;9002226.02101,"847,36.19 ",.01)
+102 ;;36.19
+103 ;;9002226.02101,"847,36.19 ",.02)
+104 ;;36.19
+105 ;;9002226.02101,"847,36.31 ",.01)
+106 ;;36.31
+107 ;;9002226.02101,"847,36.31 ",.02)
+108 ;;36.31
+109 ;;9002226.02101,"847,36.32 ",.01)
+110 ;;36.32
+111 ;;9002226.02101,"847,36.32 ",.02)
+112 ;;36.32
+113 ;;9002226.02101,"847,36.39 ",.01)
+114 ;;36.39
+115 ;;9002226.02101,"847,36.39 ",.02)
+116 ;;36.39
+117 ;;9002226.02101,"847,36.91 ",.01)
+118 ;;36.91
+119 ;;9002226.02101,"847,36.91 ",.02)
+120 ;;36.91
+121 ;;9002226.02101,"847,36.99 ",.01)
+122 ;;36.99
+123 ;;9002226.02101,"847,36.99 ",.02)
+124 ;;36.99
+125 ;;9002226.02101,"847,37.10 ",.01)
+126 ;;37.10
+127 ;;9002226.02101,"847,37.10 ",.02)
+128 ;;37.10
+129 ;;9002226.02101,"847,37.11 ",.01)
+130 ;;37.11
+131 ;;9002226.02101,"847,37.11 ",.02)
+132 ;;37.11
+133 ;;9002226.02101,"847,37.12 ",.01)
+134 ;;37.12
+135 ;;9002226.02101,"847,37.12 ",.02)
+136 ;;37.12
+137 ;;9002226.02101,"847,37.31 ",.01)
+138 ;;37.31
+139 ;;9002226.02101,"847,37.31 ",.02)
+140 ;;37.31
+141 ;;9002226.02101,"847,37.32 ",.01)
+142 ;;37.32
+143 ;;9002226.02101,"847,37.32 ",.02)
+144 ;;37.32
+145 ;;9002226.02101,"847,37.33 ",.01)
+146 ;;37.33
+147 ;;9002226.02101,"847,37.33 ",.02)
+148 ;;37.33
+149 ;;9002226.02101,"847,37.34 ",.01)
+150 ;;37.34
+151 ;;9002226.02101,"847,37.34 ",.02)
+152 ;;37.34
+153 ;;9002226.02101,"847,37.35 ",.01)
+154 ;;37.35
+155 ;;9002226.02101,"847,37.35 ",.02)
+156 ;;37.35
+157 ;;9002226.02101,"847,37.41 ",.01)
+158 ;;37.41
+159 ;;9002226.02101,"847,37.41 ",.02)
+160 ;;37.41
+161 ;;9002226.02101,"847,37.49 ",.01)
+162 ;;37.49
+163 ;;9002226.02101,"847,37.49 ",.02)
+164 ;;37.49
+165 ;;9002226.02101,"847,37.51 ",.01)
+166 ;;37.51
+167 ;;9002226.02101,"847,37.51 ",.02)
+168 ;;37.51
+169 ;;9002226.02101,"847,37.52 ",.01)
+170 ;;37.52
+171 ;;9002226.02101,"847,37.52 ",.02)
+172 ;;37.52
+173 ;;9002226.02101,"847,37.53 ",.01)
+174 ;;37.53
+175 ;;9002226.02101,"847,37.53 ",.02)
+176 ;;37.53
+177 ;;9002226.02101,"847,37.54 ",.01)
+178 ;;37.54
+179 ;;9002226.02101,"847,37.54 ",.02)
+180 ;;37.54
+181 ;;9002226.02101,"847,37.62 ",.01)
+182 ;;37.62
+183 ;;9002226.02101,"847,37.62 ",.02)
+184 ;;37.62
+185 ;;9002226.02101,"847,37.63 ",.01)
+186 ;;37.63
+187 ;;9002226.02101,"847,37.63 ",.02)
+188 ;;37.63
+189 ;;9002226.02101,"847,37.64 ",.01)
+190 ;;37.64
+191 ;;9002226.02101,"847,37.64 ",.02)
+192 ;;37.64
+193 ;;9002226.02101,"847,37.66 ",.01)
+194 ;;37.66
+195 ;;9002226.02101,"847,37.66 ",.02)
+196 ;;37.66
+197 ;;9002226.02101,"847,37.67 ",.01)
+198 ;;37.67
+199 ;;9002226.02101,"847,37.67 ",.02)
+200 ;;37.67
+201 ;;9002226.02101,"847,37.91 ",.01)
+202 ;;37.91
+203 ;;9002226.02101,"847,37.91 ",.02)
+204 ;;37.91
+205 ;;9002226.02101,"847,38.10 ",.01)
+206 ;;38.10
+207 ;;9002226.02101,"847,38.10 ",.02)
+208 ;;38.10
+209 ;;9002226.02101,"847,38.11 ",.01)
+210 ;;38.11
+211 ;;9002226.02101,"847,38.11 ",.02)
+212 ;;38.11
+213 ;;9002226.02101,"847,38.12 ",.01)
+214 ;;38.12
+215 ;;9002226.02101,"847,38.12 ",.02)
+216 ;;38.12
+217 ;;9002226.02101,"847,38.13 ",.01)
+218 ;;38.13
+219 ;;9002226.02101,"847,38.13 ",.02)
+220 ;;38.13
+221 ;;9002226.02101,"847,38.14 ",.01)
+222 ;;38.14
+223 ;;9002226.02101,"847,38.14 ",.02)
+224 ;;38.14
+225 ;;9002226.02101,"847,38.15 ",.01)
+226 ;;38.15
+227 ;;9002226.02101,"847,38.15 ",.02)
+228 ;;38.15
+229 ;;9002226.02101,"847,38.16 ",.01)
+230 ;;38.16
+231 ;;9002226.02101,"847,38.16 ",.02)
+232 ;;38.16
+233 ;;9002226.02101,"847,38.18 ",.01)
+234 ;;38.18
+235 ;;9002226.02101,"847,38.18 ",.02)
+236 ;;38.18
+237 ;;9002226.02101,"847,38.30 ",.01)
+238 ;;38.30
+239 ;;9002226.02101,"847,38.30 ",.02)
+240 ;;38.30
+241 ;;9002226.02101,"847,38.31 ",.01)
+242 ;;38.31
+243 ;;9002226.02101,"847,38.31 ",.02)
+244 ;;38.31
+245 ;;9002226.02101,"847,38.32 ",.01)
+246 ;;38.32
+247 ;;9002226.02101,"847,38.32 ",.02)
+248 ;;38.32
+249 ;;9002226.02101,"847,38.33 ",.01)
+250 ;;38.33
+251 ;;9002226.02101,"847,38.33 ",.02)
+252 ;;38.33
+253 ;;9002226.02101,"847,38.34 ",.01)
+254 ;;38.34
+255 ;;9002226.02101,"847,38.34 ",.02)
+256 ;;38.34
+257 ;;9002226.02101,"847,38.35 ",.01)
+258 ;;38.35
+259 ;;9002226.02101,"847,38.35 ",.02)
+260 ;;38.35
+261 ;;9002226.02101,"847,38.36 ",.01)
+262 ;;38.36
+263 ;;9002226.02101,"847,38.36 ",.02)
+264 ;;38.36
+265 ;;9002226.02101,"847,38.37 ",.01)
+266 ;;38.37
+267 ;;9002226.02101,"847,38.37 ",.02)
+268 ;;38.37
+269 ;;9002226.02101,"847,38.38 ",.01)
+270 ;;38.38
+271 ;;9002226.02101,"847,38.38 ",.02)
+272 ;;38.38
+273 ;;9002226.02101,"847,38.39 ",.01)
+274 ;;38.39
+275 ;;9002226.02101,"847,38.39 ",.02)
+276 ;;38.39
+277 ;;9002226.02101,"847,38.40 ",.01)
+278 ;;38.40
+279 ;;9002226.02101,"847,38.40 ",.02)
+280 ;;38.40
+281 ;;9002226.02101,"847,38.41 ",.01)
+282 ;;38.41
+283 ;;9002226.02101,"847,38.41 ",.02)
+284 ;;38.41
+285 ;;9002226.02101,"847,38.42 ",.01)
+286 ;;38.42
+287 ;;9002226.02101,"847,38.42 ",.02)
+288 ;;38.42
+289 ;;9002226.02101,"847,38.43 ",.01)
+290 ;;38.43
+291 ;;9002226.02101,"847,38.43 ",.02)
+292 ;;38.43
+293 ;;9002226.02101,"847,38.44 ",.01)
+294 ;;38.44
+295 ;;9002226.02101,"847,38.44 ",.02)
+296 ;;38.44
+297 ;;9002226.02101,"847,38.45 ",.01)
+298 ;;38.45
+299 ;;9002226.02101,"847,38.45 ",.02)
+300 ;;38.45
+301 ;;9002226.02101,"847,38.46 ",.01)
+302 ;;38.46
+303 ;;9002226.02101,"847,38.46 ",.02)
+304 ;;38.46
+305 ;;9002226.02101,"847,38.47 ",.01)
+306 ;;38.47
+307 ;;9002226.02101,"847,38.47 ",.02)
+308 ;;38.47
+309 ;;9002226.02101,"847,38.48 ",.01)
+310 ;;38.48
+311 ;;9002226.02101,"847,38.48 ",.02)
+312 ;;38.48
+313 ;;9002226.02101,"847,38.49 ",.01)
+314 ;;38.49
+315 ;;9002226.02101,"847,38.49 ",.02)
+316 ;;38.49
+317 ;;9002226.02101,"847,38.64 ",.01)
+318 ;;38.64
+319 ;;9002226.02101,"847,38.64 ",.02)
+320 ;;38.64
+321 ;;9002226.02101,"847,38.7 ",.01)
+322 ;;38.7
+323 ;;9002226.02101,"847,38.7 ",.02)
+324 ;;38.7
+325 ;;9002226.02101,"847,38.80 ",.01)
+326 ;;38.80
+327 ;;9002226.02101,"847,38.80 ",.02)
+328 ;;38.80
+329 ;;9002226.02101,"847,38.81 ",.01)
+330 ;;38.81
+331 ;;9002226.02101,"847,38.81 ",.02)
+332 ;;38.81
+333 ;;9002226.02101,"847,38.82 ",.01)
+334 ;;38.82
+335 ;;9002226.02101,"847,38.82 ",.02)
+336 ;;38.82
+337 ;;9002226.02101,"847,38.84 ",.01)
+338 ;;38.84
+339 ;;9002226.02101,"847,38.84 ",.02)
+340 ;;38.84
+341 ;;9002226.02101,"847,38.85 ",.01)
+342 ;;38.85
+343 ;;9002226.02101,"847,38.85 ",.02)
+344 ;;38.85
+345 ;;9002226.02101,"847,38.86 ",.01)
+346 ;;38.86
+347 ;;9002226.02101,"847,38.86 ",.02)
+348 ;;38.86
+349 ;;9002226.02101,"847,38.87 ",.01)
+350 ;;38.87
+351 ;;9002226.02101,"847,38.87 ",.02)
+352 ;;38.87
+353 ;;9002226.02101,"847,38.88 ",.01)
+354 ;;38.88
+355 ;;9002226.02101,"847,38.88 ",.02)
+356 ;;38.88
+357 ;;9002226.02101,"847,39.0 ",.01)
+358 ;;39.0
+359 ;;9002226.02101,"847,39.0 ",.02)
+360 ;;39.0
+361 ;;9002226.02101,"847,39.1 ",.01)
+362 ;;39.1
+363 ;;9002226.02101,"847,39.1 ",.02)
+364 ;;39.1
+365 ;;9002226.02101,"847,39.21 ",.01)
+366 ;;39.21
+367 ;;9002226.02101,"847,39.21 ",.02)
+368 ;;39.21
+369 ;;9002226.02101,"847,39.22 ",.01)
+370 ;;39.22
+371 ;;9002226.02101,"847,39.22 ",.02)
+372 ;;39.22
+373 ;;9002226.02101,"847,39.23 ",.01)
+374 ;;39.23
+375 ;;9002226.02101,"847,39.23 ",.02)
+376 ;;39.23
+377 ;;9002226.02101,"847,39.24 ",.01)
+378 ;;39.24
+379 ;;9002226.02101,"847,39.24 ",.02)
+380 ;;39.24
+381 ;;9002226.02101,"847,39.25 ",.01)
+382 ;;39.25
+383 ;;9002226.02101,"847,39.25 ",.02)
+384 ;;39.25
+385 ;;9002226.02101,"847,39.26 ",.01)
+386 ;;39.26
+387 ;;9002226.02101,"847,39.26 ",.02)
+388 ;;39.26
+389 ;;9002226.02101,"847,39.27 ",.01)
+390 ;;39.27
+391 ;;9002226.02101,"847,39.27 ",.02)
+392 ;;39.27
+393 ;;9002226.02101,"847,39.28 ",.01)
+394 ;;39.28
+395 ;;9002226.02101,"847,39.28 ",.02)
+396 ;;39.28
+397 ;;9002226.02101,"847,39.29 ",.01)
+398 ;;39.29
+399 ;;9002226.02101,"847,39.29 ",.02)
+400 ;;39.29
+401 ;;9002226.02101,"847,39.30 ",.01)
+402 ;;39.30
+403 ;;9002226.02101,"847,39.30 ",.02)
+404 ;;39.30
+405 ;;9002226.02101,"847,39.31 ",.01)
+406 ;;39.31
+407 ;;9002226.02101,"847,39.31 ",.02)
+408 ;;39.31
+409 ;;9002226.02101,"847,39.32 ",.01)
+410 ;;39.32
+411 ;;9002226.02101,"847,39.32 ",.02)
+412 ;;39.32
+413 ;;9002226.02101,"847,39.41 ",.01)
+414 ;;39.41
+415 ;;9002226.02101,"847,39.41 ",.02)
+416 ;;39.41
+417 ;;9002226.02101,"847,39.42 ",.01)
+418 ;;39.42
+419 ;;9002226.02101,"847,39.42 ",.02)
+420 ;;39.42
+421 ;;9002226.02101,"847,39.43 ",.01)
+422 ;;39.43
+423 ;;9002226.02101,"847,39.43 ",.02)
+424 ;;39.43
+425 ;;9002226.02101,"847,39.49 ",.01)
+426 ;;39.49
+427 ;;9002226.02101,"847,39.49 ",.02)
+428 ;;39.49
+429 ;;9002226.02101,"847,39.51 ",.01)
+430 ;;39.51
+431 ;;9002226.02101,"847,39.51 ",.02)
+432 ;;39.51
+433 ;;9002226.02101,"847,39.52 ",.01)
+434 ;;39.52
+435 ;;9002226.02101,"847,39.52 ",.02)
+436 ;;39.52
+437 ;;9002226.02101,"847,39.53 ",.01)
+438 ;;39.53
+439 ;;9002226.02101,"847,39.53 ",.02)
+440 ;;39.53
+441 ;;9002226.02101,"847,39.54 ",.01)
+442 ;;39.54
+443 ;;9002226.02101,"847,39.54 ",.02)
+444 ;;39.54
+445 ;;9002226.02101,"847,39.55 ",.01)
+446 ;;39.55
+447 ;;9002226.02101,"847,39.55 ",.02)
+448 ;;39.55
+449 ;;9002226.02101,"847,39.56 ",.01)
+450 ;;39.56
+451 ;;9002226.02101,"847,39.56 ",.02)
+452 ;;39.56
+453 ;;9002226.02101,"847,39.57 ",.01)
+454 ;;39.57
+455 ;;9002226.02101,"847,39.57 ",.02)
+456 ;;39.57
+457 ;;9002226.02101,"847,39.58 ",.01)
+458 ;;39.58
+459 ;;9002226.02101,"847,39.58 ",.02)
+460 ;;39.58
+461 ;;9002226.02101,"847,39.59 ",.01)
+462 ;;39.59
+463 ;;9002226.02101,"847,39.59 ",.02)
+464 ;;39.59
+465 ;;9002226.02101,"847,39.71 ",.01)
+466 ;;39.71
+467 ;;9002226.02101,"847,39.71 ",.02)
+468 ;;39.71
+469 ;;9002226.02101,"847,39.72 ",.01)
+470 ;;39.72
+471 ;;9002226.02101,"847,39.72 ",.02)
+472 ;;39.72
+473 ;;9002226.02101,"847,39.73 ",.01)
+474 ;;39.73
+475 ;;9002226.02101,"847,39.73 ",.02)
+476 ;;39.73
+477 ;;9002226.02101,"847,39.79 ",.01)
+478 ;;39.79
+479 ;;9002226.02101,"847,39.79 ",.02)
+480 ;;39.79
+481 ;;9002226.02101,"847,39.8 ",.01)
+482 ;;39.8
+483 ;;9002226.02101,"847,39.8 ",.02)
+484 ;;39.8
+485 ;;9002226.02101,"847,39.91 ",.01)
+486 ;;39.91
+487 ;;9002226.02101,"847,39.91 ",.02)
+488 ;;39.91
+489 ;;9002226.02101,"847,39.98 ",.01)
+490 ;;39.98
+491 ;;9002226.02101,"847,39.98 ",.02)
+492 ;;39.98
+493 ;;9002226.02101,"847,39.99 ",.01)
+494 ;;39.99
+495 ;;9002226.02101,"847,39.99 ",.02)
+496 ;;39.99
+497 ;;9002226.02101,"847,40.22 ",.01)
+498 ;;40.22
+499 ;;9002226.02101,"847,40.22 ",.02)
+500 ;;40.22
+501 ;;9002226.02101,"847,40.40 ",.01)
+502 ;;40.40
+503 ;;9002226.02101,"847,40.40 ",.02)
+504 ;;40.40
+505 ;;9002226.02101,"847,40.41 ",.01)
+506 ;;40.41
+507 ;;9002226.02101,"847,40.41 ",.02)
+508 ;;40.41
+509 ;;9002226.02101,"847,40.42 ",.01)
+510 ;;40.42
+511 ;;9002226.02101,"847,40.42 ",.02)
+512 ;;40.42
+513 ;;9002226.02101,"847,40.50 ",.01)
+514 ;;40.50
+515 ;;9002226.02101,"847,40.50 ",.02)
+516 ;;40.50
+517 ;;9002226.02101,"847,40.51 ",.01)
+518 ;;40.51
+519 ;;9002226.02101,"847,40.51 ",.02)
+520 ;;40.51
+521 ;;9002226.02101,"847,40.52 ",.01)
+522 ;;40.52
+523 ;;9002226.02101,"847,40.52 ",.02)
+524 ;;40.52
+525 ;;9002226.02101,"847,40.53 ",.01)
+526 ;;40.53
+527 ;;9002226.02101,"847,40.53 ",.02)
+528 ;;40.53
+529 ;;9002226.02101,"847,40.54 ",.01)
+530 ;;40.54
+531 ;;9002226.02101,"847,40.54 ",.02)
+532 ;;40.54
+533 ;;9002226.02101,"847,40.59 ",.01)
+534 ;;40.59
+535 ;;9002226.02101,"847,40.59 ",.02)
+536 ;;40.59
+537 ;;9002226.02101,"847,40.62 ",.01)
+538 ;;40.62
+539 ;;9002226.02101,"847,40.62 ",.02)
+540 ;;40.62
+541 ;;9002226.02101,"847,40.63 ",.01)
+542 ;;40.63
+543 ;;9002226.02101,"847,40.63 ",.02)
+544 ;;40.63
+545 ;;9002226.02101,"847,41.2 ",.01)
+546 ;;41.2
+547 ;;9002226.02101,"847,41.2 ",.02)
+548 ;;41.2
+549 ;;9002226.02101,"847,41.5 ",.01)
+550 ;;41.5
+551 ;;9002226.02101,"847,41.5 ",.02)
+552 ;;41.5
+553 ;;9002226.02101,"847,42.01 ",.01)
+554 ;;42.01
+555 ;;9002226.02101,"847,42.01 ",.02)
+556 ;;42.01
+557 ;;9002226.02101,"847,42.09 ",.01)
+558 ;;42.09
+559 ;;9002226.02101,"847,42.09 ",.02)
+560 ;;42.09
+561 ;;9002226.02101,"847,42.10 ",.01)
+562 ;;42.10
+563 ;;9002226.02101,"847,42.10 ",.02)
+564 ;;42.10
+565 ;;9002226.02101,"847,42.11 ",.01)
+566 ;;42.11
+567 ;;9002226.02101,"847,42.11 ",.02)
+568 ;;42.11
+569 ;;9002226.02101,"847,42.12 ",.01)
+570 ;;42.12
+571 ;;9002226.02101,"847,42.12 ",.02)
+572 ;;42.12
+573 ;;9002226.02101,"847,42.19 ",.01)
+574 ;;42.19
+575 ;;9002226.02101,"847,42.19 ",.02)
+576 ;;42.19