BGPM5AYP ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON AUG 31, 2011;
;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106
;
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,"1027,70150 ",.01)
;;70150
;;9002226.02101,"1027,70150 ",.02)
;;70150
;;9002226.02101,"1027,70160 ",.01)
;;70160
;;9002226.02101,"1027,70160 ",.02)
;;70160
;;9002226.02101,"1027,70170 ",.01)
;;70170
;;9002226.02101,"1027,70170 ",.02)
;;70170
;;9002226.02101,"1027,70190 ",.01)
;;70190
;;9002226.02101,"1027,70190 ",.02)
;;70190
;;9002226.02101,"1027,70200 ",.01)
;;70200
;;9002226.02101,"1027,70200 ",.02)
;;70200
;;9002226.02101,"1027,70210 ",.01)
;;70210
;;9002226.02101,"1027,70210 ",.02)
;;70210
;;9002226.02101,"1027,70220 ",.01)
;;70220
;;9002226.02101,"1027,70220 ",.02)
;;70220
;;9002226.02101,"1027,70240 ",.01)
;;70240
;;9002226.02101,"1027,70240 ",.02)
;;70240
;;9002226.02101,"1027,70250 ",.01)
;;70250
;;9002226.02101,"1027,70250 ",.02)
;;70250
;;9002226.02101,"1027,70260 ",.01)
;;70260
;;9002226.02101,"1027,70260 ",.02)
;;70260
;;9002226.02101,"1027,70300 ",.01)
;;70300
;;9002226.02101,"1027,70300 ",.02)
;;70300
;;9002226.02101,"1027,70310 ",.01)
;;70310
;;9002226.02101,"1027,70310 ",.02)
;;70310
;;9002226.02101,"1027,70320 ",.01)
;;70320
;;9002226.02101,"1027,70320 ",.02)
;;70320
;;9002226.02101,"1027,70328 ",.01)
;;70328
;;9002226.02101,"1027,70328 ",.02)
;;70328
;;9002226.02101,"1027,70330 ",.01)
;;70330
;;9002226.02101,"1027,70330 ",.02)
;;70330
;;9002226.02101,"1027,70332 ",.01)
;;70332
;;9002226.02101,"1027,70332 ",.02)
;;70332
;;9002226.02101,"1027,70336 ",.01)
;;70336
;;9002226.02101,"1027,70336 ",.02)
;;70336
;;9002226.02101,"1027,70350 ",.01)
;;70350
;;9002226.02101,"1027,70350 ",.02)
;;70350
;;9002226.02101,"1027,70355 ",.01)
;;70355
;;9002226.02101,"1027,70355 ",.02)
;;70355
;;9002226.02101,"1027,70360 ",.01)
;;70360
;;9002226.02101,"1027,70360 ",.02)
;;70360
;;9002226.02101,"1027,70370 ",.01)
;;70370
;;9002226.02101,"1027,70370 ",.02)
;;70370
;;9002226.02101,"1027,70371 ",.01)
;;70371
;;9002226.02101,"1027,70371 ",.02)
;;70371
;;9002226.02101,"1027,70373 ",.01)
;;70373
;;9002226.02101,"1027,70373 ",.02)
;;70373
;;9002226.02101,"1027,70380 ",.01)
;;70380
;;9002226.02101,"1027,70380 ",.02)
;;70380
;;9002226.02101,"1027,70390 ",.01)
;;70390
;;9002226.02101,"1027,70390 ",.02)
;;70390
;;9002226.02101,"1027,70450 ",.01)
;;70450
;;9002226.02101,"1027,70450 ",.02)
;;70450
;;9002226.02101,"1027,70460 ",.01)
;;70460
;;9002226.02101,"1027,70460 ",.02)
;;70460
;;9002226.02101,"1027,70470 ",.01)
;;70470
;;9002226.02101,"1027,70470 ",.02)
;;70470
;;9002226.02101,"1027,70480 ",.01)
;;70480
;;9002226.02101,"1027,70480 ",.02)
;;70480
;;9002226.02101,"1027,70481 ",.01)
;;70481
;;9002226.02101,"1027,70481 ",.02)
;;70481
;;9002226.02101,"1027,70482 ",.01)
;;70482
;;9002226.02101,"1027,70482 ",.02)
;;70482
;;9002226.02101,"1027,70486 ",.01)
;;70486
;;9002226.02101,"1027,70486 ",.02)
;;70486
;;9002226.02101,"1027,70487 ",.01)
;;70487
;;9002226.02101,"1027,70487 ",.02)
;;70487
;;9002226.02101,"1027,70488 ",.01)
;;70488
;;9002226.02101,"1027,70488 ",.02)
;;70488
;;9002226.02101,"1027,70490 ",.01)
;;70490
;;9002226.02101,"1027,70490 ",.02)
;;70490
;;9002226.02101,"1027,70491 ",.01)
;;70491
;;9002226.02101,"1027,70491 ",.02)
;;70491
;;9002226.02101,"1027,70492 ",.01)
;;70492
;;9002226.02101,"1027,70492 ",.02)
;;70492
;;9002226.02101,"1027,70496 ",.01)
;;70496
;;9002226.02101,"1027,70496 ",.02)
;;70496
;;9002226.02101,"1027,70498 ",.01)
;;70498
;;9002226.02101,"1027,70498 ",.02)
;;70498
;;9002226.02101,"1027,70540 ",.01)
;;70540
;;9002226.02101,"1027,70540 ",.02)
;;70540
;;9002226.02101,"1027,70542 ",.01)
;;70542
;;9002226.02101,"1027,70542 ",.02)
;;70542
;;9002226.02101,"1027,70543 ",.01)
;;70543
;;9002226.02101,"1027,70543 ",.02)
;;70543
;;9002226.02101,"1027,70544 ",.01)
;;70544
;;9002226.02101,"1027,70544 ",.02)
;;70544
;;9002226.02101,"1027,70545 ",.01)
;;70545
;;9002226.02101,"1027,70545 ",.02)
;;70545
;;9002226.02101,"1027,70546 ",.01)
;;70546
;;9002226.02101,"1027,70546 ",.02)
;;70546
;;9002226.02101,"1027,70547 ",.01)
;;70547
;;9002226.02101,"1027,70547 ",.02)
;;70547
;;9002226.02101,"1027,70548 ",.01)
;;70548
;;9002226.02101,"1027,70548 ",.02)
;;70548
;;9002226.02101,"1027,70549 ",.01)
;;70549
;;9002226.02101,"1027,70549 ",.02)
;;70549
;;9002226.02101,"1027,70551 ",.01)
;;70551
;;9002226.02101,"1027,70551 ",.02)
;;70551
;;9002226.02101,"1027,70552 ",.01)
;;70552
;;9002226.02101,"1027,70552 ",.02)
;;70552
;;9002226.02101,"1027,70553 ",.01)
;;70553
;;9002226.02101,"1027,70553 ",.02)
;;70553
;;9002226.02101,"1027,70554 ",.01)
;;70554
;;9002226.02101,"1027,70554 ",.02)
;;70554
;;9002226.02101,"1027,70555 ",.01)
;;70555
;;9002226.02101,"1027,70555 ",.02)
;;70555
;;9002226.02101,"1027,70557 ",.01)
;;70557
;;9002226.02101,"1027,70557 ",.02)
;;70557
;;9002226.02101,"1027,70558 ",.01)
;;70558
;;9002226.02101,"1027,70558 ",.02)
;;70558
;;9002226.02101,"1027,70559 ",.01)
;;70559
;;9002226.02101,"1027,70559 ",.02)
;;70559
;;9002226.02101,"1027,71010 ",.01)
;;71010
;;9002226.02101,"1027,71010 ",.02)
;;71010
;;9002226.02101,"1027,71015 ",.01)
;;71015
;;9002226.02101,"1027,71015 ",.02)
;;71015
;;9002226.02101,"1027,71020 ",.01)
;;71020
;;9002226.02101,"1027,71020 ",.02)
;;71020
;;9002226.02101,"1027,71021 ",.01)
;;71021
;;9002226.02101,"1027,71021 ",.02)
;;71021
;;9002226.02101,"1027,71022 ",.01)
;;71022
;;9002226.02101,"1027,71022 ",.02)
;;71022
;;9002226.02101,"1027,71023 ",.01)
;;71023
;;9002226.02101,"1027,71023 ",.02)
;;71023
;;9002226.02101,"1027,71030 ",.01)
;;71030
;;9002226.02101,"1027,71030 ",.02)
;;71030
;;9002226.02101,"1027,71034 ",.01)
;;71034
;;9002226.02101,"1027,71034 ",.02)
;;71034
;;9002226.02101,"1027,71035 ",.01)
;;71035
;;9002226.02101,"1027,71035 ",.02)
;;71035
;;9002226.02101,"1027,71040 ",.01)
;;71040
;;9002226.02101,"1027,71040 ",.02)
;;71040
;;9002226.02101,"1027,71060 ",.01)
;;71060
;;9002226.02101,"1027,71060 ",.02)
;;71060
;;9002226.02101,"1027,71090 ",.01)
;;71090
;;9002226.02101,"1027,71090 ",.02)
;;71090
;;9002226.02101,"1027,71100 ",.01)
;;71100
;;9002226.02101,"1027,71100 ",.02)
;;71100
;;9002226.02101,"1027,71101 ",.01)
;;71101
;;9002226.02101,"1027,71101 ",.02)
;;71101
;;9002226.02101,"1027,71110 ",.01)
;;71110
;;9002226.02101,"1027,71110 ",.02)
;;71110
;;9002226.02101,"1027,71111 ",.01)
;;71111
;;9002226.02101,"1027,71111 ",.02)
;;71111
;;9002226.02101,"1027,71120 ",.01)
;;71120
;;9002226.02101,"1027,71120 ",.02)
;;71120
;;9002226.02101,"1027,71130 ",.01)
;;71130
;;9002226.02101,"1027,71130 ",.02)
;;71130
;;9002226.02101,"1027,71250 ",.01)
;;71250
;;9002226.02101,"1027,71250 ",.02)
;;71250
;;9002226.02101,"1027,71260 ",.01)
;;71260
;;9002226.02101,"1027,71260 ",.02)
;;71260
;;9002226.02101,"1027,71270 ",.01)
;;71270
;;9002226.02101,"1027,71270 ",.02)
;;71270
;;9002226.02101,"1027,71275 ",.01)
;;71275
;;9002226.02101,"1027,71275 ",.02)
;;71275
;;9002226.02101,"1027,71550 ",.01)
;;71550
;;9002226.02101,"1027,71550 ",.02)
;;71550
;;9002226.02101,"1027,71551 ",.01)
;;71551
;;9002226.02101,"1027,71551 ",.02)
;;71551
;;9002226.02101,"1027,71552 ",.01)
;;71552
;;9002226.02101,"1027,71552 ",.02)
;;71552
;;9002226.02101,"1027,71555 ",.01)
;;71555
;;9002226.02101,"1027,71555 ",.02)
;;71555
;;9002226.02101,"1027,72010 ",.01)
;;72010
;;9002226.02101,"1027,72010 ",.02)
;;72010
;;9002226.02101,"1027,72020 ",.01)
;;72020
;;9002226.02101,"1027,72020 ",.02)
;;72020
;;9002226.02101,"1027,72040 ",.01)
;;72040
;;9002226.02101,"1027,72040 ",.02)
;;72040
;;9002226.02101,"1027,72050 ",.01)
;;72050
;;9002226.02101,"1027,72050 ",.02)
;;72050
;;9002226.02101,"1027,72052 ",.01)
;;72052
;;9002226.02101,"1027,72052 ",.02)
;;72052
;;9002226.02101,"1027,72069 ",.01)
;;72069
;;9002226.02101,"1027,72069 ",.02)
;;72069
;;9002226.02101,"1027,72070 ",.01)
;;72070
;;9002226.02101,"1027,72070 ",.02)
;;72070
;;9002226.02101,"1027,72072 ",.01)
;;72072
;;9002226.02101,"1027,72072 ",.02)
;;72072
;;9002226.02101,"1027,72074 ",.01)
;;72074
;;9002226.02101,"1027,72074 ",.02)
;;72074
;;9002226.02101,"1027,72080 ",.01)
;;72080
;;9002226.02101,"1027,72080 ",.02)
;;72080
;;9002226.02101,"1027,72090 ",.01)
;;72090
;;9002226.02101,"1027,72090 ",.02)
;;72090
;;9002226.02101,"1027,72100 ",.01)
;;72100
;;9002226.02101,"1027,72100 ",.02)
;;72100
;;9002226.02101,"1027,72110 ",.01)
;;72110
;;9002226.02101,"1027,72110 ",.02)
;;72110
;;9002226.02101,"1027,72114 ",.01)
;;72114
;;9002226.02101,"1027,72114 ",.02)
;;72114
;;9002226.02101,"1027,72120 ",.01)
;;72120
;;9002226.02101,"1027,72120 ",.02)
;;72120
;;9002226.02101,"1027,72125 ",.01)
;;72125
;;9002226.02101,"1027,72125 ",.02)
;;72125
;;9002226.02101,"1027,72126 ",.01)
;;72126
;;9002226.02101,"1027,72126 ",.02)
;;72126
;;9002226.02101,"1027,72127 ",.01)
;;72127
;;9002226.02101,"1027,72127 ",.02)
;;72127
;;9002226.02101,"1027,72128 ",.01)
;;72128
;;9002226.02101,"1027,72128 ",.02)
;;72128
;;9002226.02101,"1027,72129 ",.01)
;;72129
;;9002226.02101,"1027,72129 ",.02)
;;72129
;;9002226.02101,"1027,72130 ",.01)
;;72130
;;9002226.02101,"1027,72130 ",.02)
;;72130
;;9002226.02101,"1027,72131 ",.01)
;;72131
;;9002226.02101,"1027,72131 ",.02)
;;72131
;;9002226.02101,"1027,72132 ",.01)
;;72132
;;9002226.02101,"1027,72132 ",.02)
;;72132
;;9002226.02101,"1027,72133 ",.01)
;;72133
;;9002226.02101,"1027,72133 ",.02)
;;72133
;;9002226.02101,"1027,72141 ",.01)
;;72141
;;9002226.02101,"1027,72141 ",.02)
;;72141
;;9002226.02101,"1027,72142 ",.01)
;;72142
;;9002226.02101,"1027,72142 ",.02)
;;72142
;;9002226.02101,"1027,72146 ",.01)
;;72146
;;9002226.02101,"1027,72146 ",.02)
;;72146
;;9002226.02101,"1027,72147 ",.01)
;;72147
;;9002226.02101,"1027,72147 ",.02)
;;72147
;;9002226.02101,"1027,72148 ",.01)
;;72148
;;9002226.02101,"1027,72148 ",.02)
;;72148
;;9002226.02101,"1027,72149 ",.01)
;;72149
;;9002226.02101,"1027,72149 ",.02)
;;72149
;;9002226.02101,"1027,72156 ",.01)
;;72156
;;9002226.02101,"1027,72156 ",.02)
;;72156
;;9002226.02101,"1027,72157 ",.01)
;;72157
;;9002226.02101,"1027,72157 ",.02)
;;72157
;;9002226.02101,"1027,72158 ",.01)
;;72158
;;9002226.02101,"1027,72158 ",.02)
;;72158
;;9002226.02101,"1027,72159 ",.01)
;;72159
;;9002226.02101,"1027,72159 ",.02)
;;72159
;;9002226.02101,"1027,72170 ",.01)
;;72170
;;9002226.02101,"1027,72170 ",.02)
;;72170
;;9002226.02101,"1027,72190 ",.01)
;;72190
;;9002226.02101,"1027,72190 ",.02)
;;72190
;;9002226.02101,"1027,72191 ",.01)
;;72191
;;9002226.02101,"1027,72191 ",.02)
;;72191
;;9002226.02101,"1027,72192 ",.01)
;;72192
;;9002226.02101,"1027,72192 ",.02)
;;72192
;;9002226.02101,"1027,72193 ",.01)
;;72193
;;9002226.02101,"1027,72193 ",.02)
;;72193
;;9002226.02101,"1027,72194 ",.01)
;;72194
;;9002226.02101,"1027,72194 ",.02)
;;72194
;;9002226.02101,"1027,72195 ",.01)
;;72195
;;9002226.02101,"1027,72195 ",.02)
;;72195
;;9002226.02101,"1027,72196 ",.01)
;;72196
;;9002226.02101,"1027,72196 ",.02)
;;72196
BGPM5AYP ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON AUG 31, 2011;
+1 ;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106
+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,"1027,70150 ",.01)
+2 ;;70150
+3 ;;9002226.02101,"1027,70150 ",.02)
+4 ;;70150
+5 ;;9002226.02101,"1027,70160 ",.01)
+6 ;;70160
+7 ;;9002226.02101,"1027,70160 ",.02)
+8 ;;70160
+9 ;;9002226.02101,"1027,70170 ",.01)
+10 ;;70170
+11 ;;9002226.02101,"1027,70170 ",.02)
+12 ;;70170
+13 ;;9002226.02101,"1027,70190 ",.01)
+14 ;;70190
+15 ;;9002226.02101,"1027,70190 ",.02)
+16 ;;70190
+17 ;;9002226.02101,"1027,70200 ",.01)
+18 ;;70200
+19 ;;9002226.02101,"1027,70200 ",.02)
+20 ;;70200
+21 ;;9002226.02101,"1027,70210 ",.01)
+22 ;;70210
+23 ;;9002226.02101,"1027,70210 ",.02)
+24 ;;70210
+25 ;;9002226.02101,"1027,70220 ",.01)
+26 ;;70220
+27 ;;9002226.02101,"1027,70220 ",.02)
+28 ;;70220
+29 ;;9002226.02101,"1027,70240 ",.01)
+30 ;;70240
+31 ;;9002226.02101,"1027,70240 ",.02)
+32 ;;70240
+33 ;;9002226.02101,"1027,70250 ",.01)
+34 ;;70250
+35 ;;9002226.02101,"1027,70250 ",.02)
+36 ;;70250
+37 ;;9002226.02101,"1027,70260 ",.01)
+38 ;;70260
+39 ;;9002226.02101,"1027,70260 ",.02)
+40 ;;70260
+41 ;;9002226.02101,"1027,70300 ",.01)
+42 ;;70300
+43 ;;9002226.02101,"1027,70300 ",.02)
+44 ;;70300
+45 ;;9002226.02101,"1027,70310 ",.01)
+46 ;;70310
+47 ;;9002226.02101,"1027,70310 ",.02)
+48 ;;70310
+49 ;;9002226.02101,"1027,70320 ",.01)
+50 ;;70320
+51 ;;9002226.02101,"1027,70320 ",.02)
+52 ;;70320
+53 ;;9002226.02101,"1027,70328 ",.01)
+54 ;;70328
+55 ;;9002226.02101,"1027,70328 ",.02)
+56 ;;70328
+57 ;;9002226.02101,"1027,70330 ",.01)
+58 ;;70330
+59 ;;9002226.02101,"1027,70330 ",.02)
+60 ;;70330
+61 ;;9002226.02101,"1027,70332 ",.01)
+62 ;;70332
+63 ;;9002226.02101,"1027,70332 ",.02)
+64 ;;70332
+65 ;;9002226.02101,"1027,70336 ",.01)
+66 ;;70336
+67 ;;9002226.02101,"1027,70336 ",.02)
+68 ;;70336
+69 ;;9002226.02101,"1027,70350 ",.01)
+70 ;;70350
+71 ;;9002226.02101,"1027,70350 ",.02)
+72 ;;70350
+73 ;;9002226.02101,"1027,70355 ",.01)
+74 ;;70355
+75 ;;9002226.02101,"1027,70355 ",.02)
+76 ;;70355
+77 ;;9002226.02101,"1027,70360 ",.01)
+78 ;;70360
+79 ;;9002226.02101,"1027,70360 ",.02)
+80 ;;70360
+81 ;;9002226.02101,"1027,70370 ",.01)
+82 ;;70370
+83 ;;9002226.02101,"1027,70370 ",.02)
+84 ;;70370
+85 ;;9002226.02101,"1027,70371 ",.01)
+86 ;;70371
+87 ;;9002226.02101,"1027,70371 ",.02)
+88 ;;70371
+89 ;;9002226.02101,"1027,70373 ",.01)
+90 ;;70373
+91 ;;9002226.02101,"1027,70373 ",.02)
+92 ;;70373
+93 ;;9002226.02101,"1027,70380 ",.01)
+94 ;;70380
+95 ;;9002226.02101,"1027,70380 ",.02)
+96 ;;70380
+97 ;;9002226.02101,"1027,70390 ",.01)
+98 ;;70390
+99 ;;9002226.02101,"1027,70390 ",.02)
+100 ;;70390
+101 ;;9002226.02101,"1027,70450 ",.01)
+102 ;;70450
+103 ;;9002226.02101,"1027,70450 ",.02)
+104 ;;70450
+105 ;;9002226.02101,"1027,70460 ",.01)
+106 ;;70460
+107 ;;9002226.02101,"1027,70460 ",.02)
+108 ;;70460
+109 ;;9002226.02101,"1027,70470 ",.01)
+110 ;;70470
+111 ;;9002226.02101,"1027,70470 ",.02)
+112 ;;70470
+113 ;;9002226.02101,"1027,70480 ",.01)
+114 ;;70480
+115 ;;9002226.02101,"1027,70480 ",.02)
+116 ;;70480
+117 ;;9002226.02101,"1027,70481 ",.01)
+118 ;;70481
+119 ;;9002226.02101,"1027,70481 ",.02)
+120 ;;70481
+121 ;;9002226.02101,"1027,70482 ",.01)
+122 ;;70482
+123 ;;9002226.02101,"1027,70482 ",.02)
+124 ;;70482
+125 ;;9002226.02101,"1027,70486 ",.01)
+126 ;;70486
+127 ;;9002226.02101,"1027,70486 ",.02)
+128 ;;70486
+129 ;;9002226.02101,"1027,70487 ",.01)
+130 ;;70487
+131 ;;9002226.02101,"1027,70487 ",.02)
+132 ;;70487
+133 ;;9002226.02101,"1027,70488 ",.01)
+134 ;;70488
+135 ;;9002226.02101,"1027,70488 ",.02)
+136 ;;70488
+137 ;;9002226.02101,"1027,70490 ",.01)
+138 ;;70490
+139 ;;9002226.02101,"1027,70490 ",.02)
+140 ;;70490
+141 ;;9002226.02101,"1027,70491 ",.01)
+142 ;;70491
+143 ;;9002226.02101,"1027,70491 ",.02)
+144 ;;70491
+145 ;;9002226.02101,"1027,70492 ",.01)
+146 ;;70492
+147 ;;9002226.02101,"1027,70492 ",.02)
+148 ;;70492
+149 ;;9002226.02101,"1027,70496 ",.01)
+150 ;;70496
+151 ;;9002226.02101,"1027,70496 ",.02)
+152 ;;70496
+153 ;;9002226.02101,"1027,70498 ",.01)
+154 ;;70498
+155 ;;9002226.02101,"1027,70498 ",.02)
+156 ;;70498
+157 ;;9002226.02101,"1027,70540 ",.01)
+158 ;;70540
+159 ;;9002226.02101,"1027,70540 ",.02)
+160 ;;70540
+161 ;;9002226.02101,"1027,70542 ",.01)
+162 ;;70542
+163 ;;9002226.02101,"1027,70542 ",.02)
+164 ;;70542
+165 ;;9002226.02101,"1027,70543 ",.01)
+166 ;;70543
+167 ;;9002226.02101,"1027,70543 ",.02)
+168 ;;70543
+169 ;;9002226.02101,"1027,70544 ",.01)
+170 ;;70544
+171 ;;9002226.02101,"1027,70544 ",.02)
+172 ;;70544
+173 ;;9002226.02101,"1027,70545 ",.01)
+174 ;;70545
+175 ;;9002226.02101,"1027,70545 ",.02)
+176 ;;70545
+177 ;;9002226.02101,"1027,70546 ",.01)
+178 ;;70546
+179 ;;9002226.02101,"1027,70546 ",.02)
+180 ;;70546
+181 ;;9002226.02101,"1027,70547 ",.01)
+182 ;;70547
+183 ;;9002226.02101,"1027,70547 ",.02)
+184 ;;70547
+185 ;;9002226.02101,"1027,70548 ",.01)
+186 ;;70548
+187 ;;9002226.02101,"1027,70548 ",.02)
+188 ;;70548
+189 ;;9002226.02101,"1027,70549 ",.01)
+190 ;;70549
+191 ;;9002226.02101,"1027,70549 ",.02)
+192 ;;70549
+193 ;;9002226.02101,"1027,70551 ",.01)
+194 ;;70551
+195 ;;9002226.02101,"1027,70551 ",.02)
+196 ;;70551
+197 ;;9002226.02101,"1027,70552 ",.01)
+198 ;;70552
+199 ;;9002226.02101,"1027,70552 ",.02)
+200 ;;70552
+201 ;;9002226.02101,"1027,70553 ",.01)
+202 ;;70553
+203 ;;9002226.02101,"1027,70553 ",.02)
+204 ;;70553
+205 ;;9002226.02101,"1027,70554 ",.01)
+206 ;;70554
+207 ;;9002226.02101,"1027,70554 ",.02)
+208 ;;70554
+209 ;;9002226.02101,"1027,70555 ",.01)
+210 ;;70555
+211 ;;9002226.02101,"1027,70555 ",.02)
+212 ;;70555
+213 ;;9002226.02101,"1027,70557 ",.01)
+214 ;;70557
+215 ;;9002226.02101,"1027,70557 ",.02)
+216 ;;70557
+217 ;;9002226.02101,"1027,70558 ",.01)
+218 ;;70558
+219 ;;9002226.02101,"1027,70558 ",.02)
+220 ;;70558
+221 ;;9002226.02101,"1027,70559 ",.01)
+222 ;;70559
+223 ;;9002226.02101,"1027,70559 ",.02)
+224 ;;70559
+225 ;;9002226.02101,"1027,71010 ",.01)
+226 ;;71010
+227 ;;9002226.02101,"1027,71010 ",.02)
+228 ;;71010
+229 ;;9002226.02101,"1027,71015 ",.01)
+230 ;;71015
+231 ;;9002226.02101,"1027,71015 ",.02)
+232 ;;71015
+233 ;;9002226.02101,"1027,71020 ",.01)
+234 ;;71020
+235 ;;9002226.02101,"1027,71020 ",.02)
+236 ;;71020
+237 ;;9002226.02101,"1027,71021 ",.01)
+238 ;;71021
+239 ;;9002226.02101,"1027,71021 ",.02)
+240 ;;71021
+241 ;;9002226.02101,"1027,71022 ",.01)
+242 ;;71022
+243 ;;9002226.02101,"1027,71022 ",.02)
+244 ;;71022
+245 ;;9002226.02101,"1027,71023 ",.01)
+246 ;;71023
+247 ;;9002226.02101,"1027,71023 ",.02)
+248 ;;71023
+249 ;;9002226.02101,"1027,71030 ",.01)
+250 ;;71030
+251 ;;9002226.02101,"1027,71030 ",.02)
+252 ;;71030
+253 ;;9002226.02101,"1027,71034 ",.01)
+254 ;;71034
+255 ;;9002226.02101,"1027,71034 ",.02)
+256 ;;71034
+257 ;;9002226.02101,"1027,71035 ",.01)
+258 ;;71035
+259 ;;9002226.02101,"1027,71035 ",.02)
+260 ;;71035
+261 ;;9002226.02101,"1027,71040 ",.01)
+262 ;;71040
+263 ;;9002226.02101,"1027,71040 ",.02)
+264 ;;71040
+265 ;;9002226.02101,"1027,71060 ",.01)
+266 ;;71060
+267 ;;9002226.02101,"1027,71060 ",.02)
+268 ;;71060
+269 ;;9002226.02101,"1027,71090 ",.01)
+270 ;;71090
+271 ;;9002226.02101,"1027,71090 ",.02)
+272 ;;71090
+273 ;;9002226.02101,"1027,71100 ",.01)
+274 ;;71100
+275 ;;9002226.02101,"1027,71100 ",.02)
+276 ;;71100
+277 ;;9002226.02101,"1027,71101 ",.01)
+278 ;;71101
+279 ;;9002226.02101,"1027,71101 ",.02)
+280 ;;71101
+281 ;;9002226.02101,"1027,71110 ",.01)
+282 ;;71110
+283 ;;9002226.02101,"1027,71110 ",.02)
+284 ;;71110
+285 ;;9002226.02101,"1027,71111 ",.01)
+286 ;;71111
+287 ;;9002226.02101,"1027,71111 ",.02)
+288 ;;71111
+289 ;;9002226.02101,"1027,71120 ",.01)
+290 ;;71120
+291 ;;9002226.02101,"1027,71120 ",.02)
+292 ;;71120
+293 ;;9002226.02101,"1027,71130 ",.01)
+294 ;;71130
+295 ;;9002226.02101,"1027,71130 ",.02)
+296 ;;71130
+297 ;;9002226.02101,"1027,71250 ",.01)
+298 ;;71250
+299 ;;9002226.02101,"1027,71250 ",.02)
+300 ;;71250
+301 ;;9002226.02101,"1027,71260 ",.01)
+302 ;;71260
+303 ;;9002226.02101,"1027,71260 ",.02)
+304 ;;71260
+305 ;;9002226.02101,"1027,71270 ",.01)
+306 ;;71270
+307 ;;9002226.02101,"1027,71270 ",.02)
+308 ;;71270
+309 ;;9002226.02101,"1027,71275 ",.01)
+310 ;;71275
+311 ;;9002226.02101,"1027,71275 ",.02)
+312 ;;71275
+313 ;;9002226.02101,"1027,71550 ",.01)
+314 ;;71550
+315 ;;9002226.02101,"1027,71550 ",.02)
+316 ;;71550
+317 ;;9002226.02101,"1027,71551 ",.01)
+318 ;;71551
+319 ;;9002226.02101,"1027,71551 ",.02)
+320 ;;71551
+321 ;;9002226.02101,"1027,71552 ",.01)
+322 ;;71552
+323 ;;9002226.02101,"1027,71552 ",.02)
+324 ;;71552
+325 ;;9002226.02101,"1027,71555 ",.01)
+326 ;;71555
+327 ;;9002226.02101,"1027,71555 ",.02)
+328 ;;71555
+329 ;;9002226.02101,"1027,72010 ",.01)
+330 ;;72010
+331 ;;9002226.02101,"1027,72010 ",.02)
+332 ;;72010
+333 ;;9002226.02101,"1027,72020 ",.01)
+334 ;;72020
+335 ;;9002226.02101,"1027,72020 ",.02)
+336 ;;72020
+337 ;;9002226.02101,"1027,72040 ",.01)
+338 ;;72040
+339 ;;9002226.02101,"1027,72040 ",.02)
+340 ;;72040
+341 ;;9002226.02101,"1027,72050 ",.01)
+342 ;;72050
+343 ;;9002226.02101,"1027,72050 ",.02)
+344 ;;72050
+345 ;;9002226.02101,"1027,72052 ",.01)
+346 ;;72052
+347 ;;9002226.02101,"1027,72052 ",.02)
+348 ;;72052
+349 ;;9002226.02101,"1027,72069 ",.01)
+350 ;;72069
+351 ;;9002226.02101,"1027,72069 ",.02)
+352 ;;72069
+353 ;;9002226.02101,"1027,72070 ",.01)
+354 ;;72070
+355 ;;9002226.02101,"1027,72070 ",.02)
+356 ;;72070
+357 ;;9002226.02101,"1027,72072 ",.01)
+358 ;;72072
+359 ;;9002226.02101,"1027,72072 ",.02)
+360 ;;72072
+361 ;;9002226.02101,"1027,72074 ",.01)
+362 ;;72074
+363 ;;9002226.02101,"1027,72074 ",.02)
+364 ;;72074
+365 ;;9002226.02101,"1027,72080 ",.01)
+366 ;;72080
+367 ;;9002226.02101,"1027,72080 ",.02)
+368 ;;72080
+369 ;;9002226.02101,"1027,72090 ",.01)
+370 ;;72090
+371 ;;9002226.02101,"1027,72090 ",.02)
+372 ;;72090
+373 ;;9002226.02101,"1027,72100 ",.01)
+374 ;;72100
+375 ;;9002226.02101,"1027,72100 ",.02)
+376 ;;72100
+377 ;;9002226.02101,"1027,72110 ",.01)
+378 ;;72110
+379 ;;9002226.02101,"1027,72110 ",.02)
+380 ;;72110
+381 ;;9002226.02101,"1027,72114 ",.01)
+382 ;;72114
+383 ;;9002226.02101,"1027,72114 ",.02)
+384 ;;72114
+385 ;;9002226.02101,"1027,72120 ",.01)
+386 ;;72120
+387 ;;9002226.02101,"1027,72120 ",.02)
+388 ;;72120
+389 ;;9002226.02101,"1027,72125 ",.01)
+390 ;;72125
+391 ;;9002226.02101,"1027,72125 ",.02)
+392 ;;72125
+393 ;;9002226.02101,"1027,72126 ",.01)
+394 ;;72126
+395 ;;9002226.02101,"1027,72126 ",.02)
+396 ;;72126
+397 ;;9002226.02101,"1027,72127 ",.01)
+398 ;;72127
+399 ;;9002226.02101,"1027,72127 ",.02)
+400 ;;72127
+401 ;;9002226.02101,"1027,72128 ",.01)
+402 ;;72128
+403 ;;9002226.02101,"1027,72128 ",.02)
+404 ;;72128
+405 ;;9002226.02101,"1027,72129 ",.01)
+406 ;;72129
+407 ;;9002226.02101,"1027,72129 ",.02)
+408 ;;72129
+409 ;;9002226.02101,"1027,72130 ",.01)
+410 ;;72130
+411 ;;9002226.02101,"1027,72130 ",.02)
+412 ;;72130
+413 ;;9002226.02101,"1027,72131 ",.01)
+414 ;;72131
+415 ;;9002226.02101,"1027,72131 ",.02)
+416 ;;72131
+417 ;;9002226.02101,"1027,72132 ",.01)
+418 ;;72132
+419 ;;9002226.02101,"1027,72132 ",.02)
+420 ;;72132
+421 ;;9002226.02101,"1027,72133 ",.01)
+422 ;;72133
+423 ;;9002226.02101,"1027,72133 ",.02)
+424 ;;72133
+425 ;;9002226.02101,"1027,72141 ",.01)
+426 ;;72141
+427 ;;9002226.02101,"1027,72141 ",.02)
+428 ;;72141
+429 ;;9002226.02101,"1027,72142 ",.01)
+430 ;;72142
+431 ;;9002226.02101,"1027,72142 ",.02)
+432 ;;72142
+433 ;;9002226.02101,"1027,72146 ",.01)
+434 ;;72146
+435 ;;9002226.02101,"1027,72146 ",.02)
+436 ;;72146
+437 ;;9002226.02101,"1027,72147 ",.01)
+438 ;;72147
+439 ;;9002226.02101,"1027,72147 ",.02)
+440 ;;72147
+441 ;;9002226.02101,"1027,72148 ",.01)
+442 ;;72148
+443 ;;9002226.02101,"1027,72148 ",.02)
+444 ;;72148
+445 ;;9002226.02101,"1027,72149 ",.01)
+446 ;;72149
+447 ;;9002226.02101,"1027,72149 ",.02)
+448 ;;72149
+449 ;;9002226.02101,"1027,72156 ",.01)
+450 ;;72156
+451 ;;9002226.02101,"1027,72156 ",.02)
+452 ;;72156
+453 ;;9002226.02101,"1027,72157 ",.01)
+454 ;;72157
+455 ;;9002226.02101,"1027,72157 ",.02)
+456 ;;72157
+457 ;;9002226.02101,"1027,72158 ",.01)
+458 ;;72158
+459 ;;9002226.02101,"1027,72158 ",.02)
+460 ;;72158
+461 ;;9002226.02101,"1027,72159 ",.01)
+462 ;;72159
+463 ;;9002226.02101,"1027,72159 ",.02)
+464 ;;72159
+465 ;;9002226.02101,"1027,72170 ",.01)
+466 ;;72170
+467 ;;9002226.02101,"1027,72170 ",.02)
+468 ;;72170
+469 ;;9002226.02101,"1027,72190 ",.01)
+470 ;;72190
+471 ;;9002226.02101,"1027,72190 ",.02)
+472 ;;72190
+473 ;;9002226.02101,"1027,72191 ",.01)
+474 ;;72191
+475 ;;9002226.02101,"1027,72191 ",.02)
+476 ;;72191
+477 ;;9002226.02101,"1027,72192 ",.01)
+478 ;;72192
+479 ;;9002226.02101,"1027,72192 ",.02)
+480 ;;72192
+481 ;;9002226.02101,"1027,72193 ",.01)
+482 ;;72193
+483 ;;9002226.02101,"1027,72193 ",.02)
+484 ;;72193
+485 ;;9002226.02101,"1027,72194 ",.01)
+486 ;;72194
+487 ;;9002226.02101,"1027,72194 ",.02)
+488 ;;72194
+489 ;;9002226.02101,"1027,72195 ",.01)
+490 ;;72195
+491 ;;9002226.02101,"1027,72195 ",.02)
+492 ;;72195
+493 ;;9002226.02101,"1027,72196 ",.01)
+494 ;;72196
+495 ;;9002226.02101,"1027,72196 ",.02)
+496 ;;72196