- BGP2TG3 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 12, 2012;
- +1 ;;12.1;IHS CLINICAL REPORTING;;MAY 17, 2012;Build 66
- +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 ;;21,"55289-0806-90 ")
- +2 ;;613
- +3 ;;21,"55289-0892-01 ")
- +4 ;;1205
- +5 ;;21,"55289-0892-14 ")
- +6 ;;1206
- +7 ;;21,"55289-0892-15 ")
- +8 ;;1207
- +9 ;;21,"55289-0892-30 ")
- +10 ;;1208
- +11 ;;21,"55289-0892-60 ")
- +12 ;;1209
- +13 ;;21,"55289-0892-86 ")
- +14 ;;1210
- +15 ;;21,"55289-0892-90 ")
- +16 ;;1211
- +17 ;;21,"55289-0892-93 ")
- +18 ;;1212
- +19 ;;21,"55289-0892-97 ")
- +20 ;;1213
- +21 ;;21,"55289-0892-98 ")
- +22 ;;1214
- +23 ;;21,"55289-0976-01 ")
- +24 ;;414
- +25 ;;21,"55289-0976-14 ")
- +26 ;;415
- +27 ;;21,"55289-0976-30 ")
- +28 ;;416
- +29 ;;21,"55289-0976-60 ")
- +30 ;;417
- +31 ;;21,"55289-0976-93 ")
- +32 ;;418
- +33 ;;21,"55370-0146-07 ")
- +34 ;;864
- +35 ;;21,"55370-0146-08 ")
- +36 ;;865
- +37 ;;21,"55370-0146-09 ")
- +38 ;;866
- +39 ;;21,"55370-0147-07 ")
- +40 ;;896
- +41 ;;21,"55370-0147-08 ")
- +42 ;;897
- +43 ;;21,"55370-0147-09 ")
- +44 ;;898
- +45 ;;21,"55370-0506-07 ")
- +46 ;;922
- +47 ;;21,"55370-0506-08 ")
- +48 ;;923
- +49 ;;21,"55370-0506-09 ")
- +50 ;;924
- +51 ;;21,"55887-0179-30 ")
- +52 ;;744
- +53 ;;21,"55887-0212-30 ")
- +54 ;;835
- +55 ;;21,"55887-0212-60 ")
- +56 ;;836
- +57 ;;21,"55887-0222-30 ")
- +58 ;;335
- +59 ;;21,"55887-0222-60 ")
- +60 ;;336
- +61 ;;21,"55887-0222-90 ")
- +62 ;;337
- +63 ;;21,"55887-0339-30 ")
- +64 ;;899
- +65 ;;21,"55887-0339-60 ")
- +66 ;;900
- +67 ;;21,"55887-0339-90 ")
- +68 ;;901
- +69 ;;21,"55887-0368-30 ")
- +70 ;;215
- +71 ;;21,"55887-0368-60 ")
- +72 ;;216
- +73 ;;21,"55887-0368-90 ")
- +74 ;;217
- +75 ;;21,"55887-0535-30 ")
- +76 ;;997
- +77 ;;21,"55887-0535-60 ")
- +78 ;;998
- +79 ;;21,"55887-0535-90 ")
- +80 ;;999
- +81 ;;21,"55887-0536-30 ")
- +82 ;;1196
- +83 ;;21,"55887-0536-60 ")
- +84 ;;1197
- +85 ;;21,"55887-0536-90 ")
- +86 ;;1198
- +87 ;;21,"55887-0693-30 ")
- +88 ;;419
- +89 ;;21,"55887-0693-60 ")
- +90 ;;420
- +91 ;;21,"55887-0693-90 ")
- +92 ;;421
- +93 ;;21,"55887-0727-30 ")
- +94 ;;614
- +95 ;;21,"55887-0727-60 ")
- +96 ;;615
- +97 ;;21,"55887-0727-90 ")
- +98 ;;616
- +99 ;;21,"55887-0965-30 ")
- +100 ;;959
- +101 ;;21,"55887-0968-30 ")
- +102 ;;784
- +103 ;;21,"55887-0969-30 ")
- +104 ;;855
- +105 ;;21,"57664-0398-13 ")
- +106 ;;605
- +107 ;;21,"57664-0398-18 ")
- +108 ;;606
- +109 ;;21,"57664-0398-88 ")
- +110 ;;607
- +111 ;;21,"57664-0399-13 ")
- +112 ;;422
- +113 ;;21,"57664-0399-18 ")
- +114 ;;423
- +115 ;;21,"57664-0399-88 ")
- +116 ;;424
- +117 ;;21,"57664-0724-88 ")
- +118 ;;39
- +119 ;;21,"57664-0725-88 ")
- +120 ;;22
- +121 ;;21,"57664-0727-88 ")
- +122 ;;9
- +123 ;;21,"57866-0236-01 ")
- +124 ;;608
- +125 ;;21,"57866-0237-01 ")
- +126 ;;996
- +127 ;;21,"57866-6302-01 ")
- +128 ;;841
- +129 ;;21,"57866-6409-01 ")
- +130 ;;1199
- +131 ;;21,"57866-6409-02 ")
- +132 ;;1200
- +133 ;;21,"57866-6409-03 ")
- +134 ;;1201
- +135 ;;21,"57866-6409-04 ")
- +136 ;;1202
- +137 ;;21,"57866-6409-05 ")
- +138 ;;1203
- +139 ;;21,"57866-6409-06 ")
- +140 ;;1204
- +141 ;;21,"57866-6462-01 ")
- +142 ;;425
- +143 ;;21,"57866-6462-02 ")
- +144 ;;426
- +145 ;;21,"57866-6463-01 ")
- +146 ;;603
- +147 ;;21,"57866-6463-02 ")
- +148 ;;604
- +149 ;;21,"57866-7073-01 ")
- +150 ;;338
- +151 ;;21,"57866-7073-02 ")
- +152 ;;339
- +153 ;;21,"57866-7074-01 ")
- +154 ;;397
- +155 ;;21,"57866-7074-02 ")
- +156 ;;398
- +157 ;;21,"57866-7991-01 ")
- +158 ;;148
- +159 ;;21,"58016-0005-00 ")
- +160 ;;340
- +161 ;;21,"58016-0005-30 ")
- +162 ;;341
- +163 ;;21,"58016-0005-60 ")
- +164 ;;342
- +165 ;;21,"58016-0005-90 ")
- +166 ;;343
- +167 ;;21,"58016-0058-00 ")
- +168 ;;76
- +169 ;;21,"58016-0058-30 ")
- +170 ;;77
- +171 ;;21,"58016-0058-60 ")
- +172 ;;78
- +173 ;;21,"58016-0058-90 ")
- +174 ;;79
- +175 ;;21,"58016-0334-00 ")
- +176 ;;823
- +177 ;;21,"58016-0334-02 ")
- +178 ;;824
- +179 ;;21,"58016-0334-30 ")
- +180 ;;825
- +181 ;;21,"58016-0334-60 ")
- +182 ;;826
- +183 ;;21,"58016-0334-90 ")
- +184 ;;827
- +185 ;;21,"58016-0370-30 ")
- +186 ;;1308
- +187 ;;21,"58016-0376-00 ")
- +188 ;;447
- +189 ;;21,"58016-0376-02 ")
- +190 ;;448
- +191 ;;21,"58016-0376-30 ")
- +192 ;;449
- +193 ;;21,"58016-0376-60 ")
- +194 ;;450
- +195 ;;21,"58016-0376-90 ")
- +196 ;;451
- +197 ;;21,"58016-0376-99 ")
- +198 ;;452
- +199 ;;21,"58016-0378-00 ")
- +200 ;;1190
- +201 ;;21,"58016-0378-02 ")
- +202 ;;1191
- +203 ;;21,"58016-0378-30 ")
- +204 ;;1192
- +205 ;;21,"58016-0378-60 ")
- +206 ;;1193
- +207 ;;21,"58016-0378-90 ")
- +208 ;;1194
- +209 ;;21,"58016-0378-99 ")
- +210 ;;1195
- +211 ;;21,"58016-0411-00 ")
- +212 ;;204
- +213 ;;21,"58016-0411-02 ")
- +214 ;;205
- +215 ;;21,"58016-0411-30 ")
- +216 ;;206
- +217 ;;21,"58016-0411-60 ")
- +218 ;;207
- +219 ;;21,"58016-0411-90 ")
- +220 ;;208
- +221 ;;21,"58016-0467-00 ")
- +222 ;;405
- +223 ;;21,"58016-0467-30 ")
- +224 ;;406
- +225 ;;21,"58016-0467-60 ")
- +226 ;;407
- +227 ;;21,"58016-0467-90 ")
- +228 ;;408
- +229 ;;21,"58016-0691-00 ")
- +230 ;;753
- +231 ;;21,"58016-0691-30 ")
- +232 ;;754
- +233 ;;21,"58016-0691-60 ")
- +234 ;;755
- +235 ;;21,"58016-0691-90 ")
- +236 ;;756
- +237 ;;21,"58016-0844-00 ")
- +238 ;;409
- +239 ;;21,"58016-0844-30 ")
- +240 ;;410
- +241 ;;21,"58016-0844-60 ")
- +242 ;;411
- +243 ;;21,"58016-0844-90 ")
- +244 ;;412
- +245 ;;21,"58016-0876-00 ")
- +246 ;;572
- +247 ;;21,"58016-0876-10 ")
- +248 ;;573
- +249 ;;21,"58016-0876-12 ")
- +250 ;;574
- +251 ;;21,"58016-0876-14 ")
- +252 ;;575
- +253 ;;21,"58016-0876-15 ")
- +254 ;;576
- +255 ;;21,"58016-0876-20 ")
- +256 ;;577
- +257 ;;21,"58016-0876-21 ")
- +258 ;;578
- +259 ;;21,"58016-0876-24 ")
- +260 ;;579
- +261 ;;21,"58016-0876-28 ")
- +262 ;;580
- +263 ;;21,"58016-0876-30 ")
- +264 ;;581
- +265 ;;21,"58016-0876-40 ")
- +266 ;;582
- +267 ;;21,"58016-0876-50 ")
- +268 ;;583
- +269 ;;21,"58016-0876-60 ")
- +270 ;;584
- +271 ;;21,"58864-0027-14 ")
- +272 ;;585
- +273 ;;21,"58864-0027-30 ")
- +274 ;;586
- +275 ;;21,"58864-0027-60 ")
- +276 ;;587
- +277 ;;21,"58864-0027-90 ")
- +278 ;;588
- +279 ;;21,"58864-0100-30 ")
- +280 ;;231
- +281 ;;21,"58864-0161-30 ")
- +282 ;;445
- +283 ;;21,"58864-0161-60 ")
- +284 ;;446
- +285 ;;21,"58864-0214-30 ")
- +286 ;;1291
- +287 ;;21,"58864-0214-60 ")
- +288 ;;1292
- +289 ;;21,"58864-0224-30 ")
- +290 ;;1187
- +291 ;;21,"58864-0224-60 ")
- +292 ;;1188
- +293 ;;21,"58864-0224-93 ")
+294 ;;1189
+295 ;;21,"58864-0689-30 ")
+296 ;;782
+297 ;;21,"58864-0689-60 ")
+298 ;;783
+299 ;;21,"58864-0705-30 ")
+300 ;;854
+301 ;;21,"58864-0711-30 ")
+302 ;;81
+303 ;;21,"58864-0858-30 ")
+304 ;;806
+305 ;;21,"58864-0952-30 ")
+306 ;;113
+307 ;;21,"58864-0953-30 ")
+308 ;;203
+309 ;;21,"58864-0956-30 ")
+310 ;;752
+311 ;;21,"58864-0957-30 ")
+312 ;;822
+313 ;;21,"59762-2330-07 ")
+314 ;;47
+315 ;;21,"59762-2331-06 ")
+316 ;;101
+317 ;;21,"59762-2331-08 ")
+318 ;;102
+319 ;;21,"59762-2332-06 ")
+320 ;;154
+321 ;;21,"59762-2332-08 ")
+322 ;;155
+323 ;;21,"59762-3725-01 ")
+324 ;;960
+325 ;;21,"59762-3726-03 ")
+326 ;;995
+327 ;;21,"59762-3727-04 ")
+328 ;;1184
+329 ;;21,"59762-3727-06 ")
+330 ;;1185
+331 ;;21,"59762-3727-07 ")
+332 ;;1186
+333 ;;21,"59762-3781-01 ")
+334 ;;862
+335 ;;21,"59762-3782-01 ")
+336 ;;902
+337 ;;21,"59762-3782-03 ")
+338 ;;903
+339 ;;21,"59762-3783-01 ")
+340 ;;919
+341 ;;21,"59762-3783-02 ")
+342 ;;920
+343 ;;21,"59762-3783-03 ")
+344 ;;921
+345 ;;21,"59762-5031-01 ")
+346 ;;805
+347 ;;21,"59762-5032-01 ")
+348 ;;842
+349 ;;21,"59762-5032-02 ")
+350 ;;843
+351 ;;21,"59762-5033-01 ")
+352 ;;776
+353 ;;21,"59762-5033-02 ")
+354 ;;777
+355 ;;21,"59762-7020-09 ")
+356 ;;961
+357 ;;21,"59762-7021-05 ")
+358 ;;987
+359 ;;21,"59762-7021-09 ")
+360 ;;988
+361 ;;21,"59762-7022-05 ")
+362 ;;1164
+363 ;;21,"59762-7022-09 ")
+364 ;;1165
+365 ;;21,"60346-0457-30 ")
+366 ;;781
+367 ;;21,"60346-0513-60 ")
+368 ;;906
+369 ;;21,"60346-0613-30 ")
+370 ;;570
+371 ;;21,"60346-0633-30 ")
+372 ;;249
+373 ;;21,"60346-0633-60 ")
+374 ;;250
+375 ;;21,"60346-0633-90 ")
+376 ;;251
+377 ;;21,"60346-0662-30 ")
+378 ;;1293
+379 ;;21,"60346-0662-60 ")
+380 ;;1294
+381 ;;21,"60346-0730-30 ")
+382 ;;1078
+383 ;;21,"60346-0730-60 ")
+384 ;;1079
+385 ;;21,"60346-0784-30 ")
+386 ;;232
+387 ;;21,"60346-0890-30 ")
+388 ;;986
+389 ;;21,"60346-0938-07 ")
+390 ;;1173
+391 ;;21,"60346-0938-30 ")
+392 ;;1174
+393 ;;21,"60429-0082-30 ")
+394 ;;599
+395 ;;21,"60429-0082-60 ")
+396 ;;600
+397 ;;21,"60429-0083-12 ")
+398 ;;427
+399 ;;21,"60429-0083-30 ")
+400 ;;428
+401 ;;21,"60429-0083-60 ")
+402 ;;429
+403 ;;21,"60429-0085-12 ")
+404 ;;1166
+405 ;;21,"60429-0085-18 ")
+406 ;;1167
+407 ;;21,"60429-0085-27 ")
+408 ;;1168
+409 ;;21,"60429-0085-30 ")
+410 ;;1169
+411 ;;21,"60429-0085-36 ")
+412 ;;1170
+413 ;;21,"60429-0085-60 ")
+414 ;;1171
+415 ;;21,"60429-0085-90 ")
+416 ;;1172
+417 ;;21,"60505-0141-00 ")
+418 ;;595
+419 ;;21,"60505-0141-01 ")
+420 ;;596
+421 ;;21,"60505-0141-02 ")
+422 ;;597
+423 ;;21,"60505-0141-08 ")
+424 ;;598
+425 ;;21,"60505-0142-00 ")
+426 ;;430
+427 ;;21,"60505-0142-01 ")
+428 ;;431
+429 ;;21,"60505-0142-02 ")
+430 ;;432
+431 ;;21,"60505-0142-04 ")
+432 ;;433
+433 ;;21,"60951-0714-70 ")
+434 ;;434
+435 ;;21,"60951-0714-85 ")
+436 ;;435
+437 ;;21,"61442-0115-01 ")
+438 ;;296
+439 ;;21,"61442-0116-01 ")
+440 ;;329
+441 ;;21,"61442-0117-01 ")
+442 ;;401
+443 ;;21,"62037-0871-30 ")
+444 ;;797
+445 ;;21,"62037-0872-01 ")
+446 ;;828
+447 ;;21,"62037-0872-05 ")
+448 ;;829
+449 ;;21,"62037-0873-01 ")
+450 ;;757
+451 ;;21,"62037-0873-05 ")
+452 ;;758
+453 ;;21,"62682-5002-01 ")
+454 ;;594
+455 ;;21,"62682-5004-03 ")
+456 ;;436
+457 ;;21,"62682-5006-03 ")
+458 ;;989
+459 ;;21,"63304-0425-01 ")
+460 ;;297
+461 ;;21,"63304-0426-01 ")
+462 ;;328
+463 ;;21,"63304-0427-01 ")
+464 ;;402
+465 ;;21,"63629-1255-01 ")
+466 ;;403
+467 ;;21,"63629-1255-02 ")
+468 ;;404
+469 ;;21,"63629-1392-01 ")
+470 ;;103
+471 ;;21,"63629-1392-02 ")
+472 ;;104
+473 ;;21,"63629-1392-03 ")
+474 ;;105
+475 ;;21,"63629-1393-01 ")
+476 ;;1180
+477 ;;21,"63629-1393-02 ")
+478 ;;1181
+479 ;;21,"63629-1393-03 ")
+480 ;;1182
+481 ;;21,"63629-1393-04 ")
+482 ;;1183
+483 ;;21,"63629-1394-01 ")
+484 ;;442
+485 ;;21,"63629-1394-02 ")
+486 ;;443
+487 ;;21,"63629-1394-03 ")
+488 ;;444
+489 ;;21,"63629-1398-01 ")
+490 ;;628
+491 ;;21,"63629-1398-02 ")
+492 ;;629
+493 ;;21,"63629-1398-03 ")
+494 ;;630
+495 ;;21,"63629-2793-01 ")
+496 ;;160
+497 ;;21,"63629-2793-03 ")
+498 ;;161
+499 ;;21,"63629-2793-04 ")
+500 ;;162
+501 ;;21,"63629-2793-05 ")
+502 ;;163
+503 ;;21,"63629-2907-01 ")
+504 ;;1019
+505 ;;21,"63629-2907-02 ")
+506 ;;1020
+507 ;;21,"63629-3043-01 ")
+508 ;;349
+509 ;;21,"63629-3043-02 ")
+510 ;;350
+511 ;;21,"63629-3158-01 ")
+512 ;;741
+513 ;;21,"63629-3158-02 ")
+514 ;;742
+515 ;;21,"63629-3158-03 ")
+516 ;;743
+517 ;;21,"63629-3397-03 ")
+518 ;;870
+519 ;;21,"63629-3998-01 ")
+520 ;;50
+521 ;;21,"63629-4071-01 ")
+522 ;;840
+523 ;;21,"63739-0116-01 ")
+524 ;;589
+525 ;;21,"63739-0116-02 ")
+526 ;;590
+527 ;;21,"63739-0116-03 ")
+528 ;;591
+529 ;;21,"63739-0116-10 ")
+530 ;;592
+531 ;;21,"63739-0116-15 ")
+532 ;;593
+533 ;;21,"63739-0117-01 ")
+534 ;;437
+535 ;;21,"63739-0117-02 ")
+536 ;;438
+537 ;;21,"63739-0117-03 ")
+538 ;;439
+539 ;;21,"63739-0117-10 ")
+540 ;;440
+541 ;;21,"63739-0117-15 ")
+542 ;;441
+543 ;;21,"63739-0118-01 ")
+544 ;;990
+545 ;;21,"63739-0118-02 ")
+546 ;;991
+547 ;;21,"63739-0118-03 ")
+548 ;;992
+549 ;;21,"63739-0118-10 ")
+550 ;;993
+551 ;;21,"63739-0118-15 ")
+552 ;;994
+553 ;;21,"63739-0119-01 ")
+554 ;;1175
+555 ;;21,"63739-0119-02 ")
+556 ;;1176
+557 ;;21,"63739-0119-03 ")
+558 ;;1177
+559 ;;21,"63739-0119-10 ")
+560 ;;1178
+561 ;;21,"63739-0119-15 ")
+562 ;;1179
+563 ;;21,"63874-0316-01 ")
+564 ;;631
+565 ;;21,"63874-0316-02 ")
+566 ;;632
+567 ;;21,"63874-0316-04 ")
+568 ;;633
+569 ;;21,"63874-0316-05 ")
+570 ;;634
+571 ;;21,"63874-0316-10 ")
+572 ;;635
+573 ;;21,"63874-0316-12 ")
+574 ;;636
+575 ;;21,"63874-0316-14 ")
+576 ;;637
+577 ;;21,"63874-0316-15 ")
+578 ;;638
+579 ;;21,"63874-0316-20 ")
+580 ;;639
+581 ;;21,"63874-0316-21 ")
+582 ;;640
+583 ;;21,"63874-0316-24 ")
+584 ;;641
+585 ;;21,"63874-0316-28 ")
+586 ;;642
+587 ;;21,"63874-0316-30 ")
+588 ;;643
+589 ;;21,"63874-0316-50 ")
+590 ;;644
+591 ;;21,"63874-0316-60 ")
+592 ;;645
+593 ;;21,"63874-0316-81 ")
+594 ;;646
+595 ;;21,"63874-0316-90 ")
+596 ;;647
+597 ;;21,"63874-0317-01 ")
+598 ;;1268
+599 ;;21,"63874-0317-02 ")
+600 ;;1269
+601 ;;21,"63874-0317-04 ")
+602 ;;1270
+603 ;;21,"63874-0317-10 ")
+604 ;;1271
+605 ;;21,"63874-0317-12 ")
+606 ;;1272
+607 ;;21,"63874-0317-14 ")
+608 ;;1273
+609 ;;21,"63874-0317-15 ")
+610 ;;1274
+611 ;;21,"63874-0317-20 ")
+612 ;;1275
+613 ;;21,"63874-0317-24 ")
+614 ;;1276
+615 ;;21,"63874-0317-28 ")
+616 ;;1277
+617 ;;21,"63874-0317-30 ")
+618 ;;1278
+619 ;;21,"63874-0317-40 ")
+620 ;;1279
+621 ;;21,"63874-0317-50 ")
+622 ;;1280
+623 ;;21,"63874-0317-60 ")
+624 ;;1281
+625 ;;21,"63874-0317-90 ")
+626 ;;1282
+627 ;;21,"63874-0357-01 ")
+628 ;;255
+629 ;;21,"63874-0357-02 ")
+630 ;;256
+631 ;;21,"63874-0357-10 ")
+632 ;;257
+633 ;;21,"63874-0357-12 ")
+634 ;;258
+635 ;;21,"63874-0357-14 ")
+636 ;;259
+637 ;;21,"63874-0357-15 ")
+638 ;;260
+639 ;;21,"63874-0357-20 ")
+640 ;;261
+641 ;;21,"63874-0357-21 ")
+642 ;;262
+643 ;;21,"63874-0357-24 ")
+644 ;;263
+645 ;;21,"63874-0357-30 ")
+646 ;;264
+647 ;;21,"63874-0357-40 ")
+648 ;;265
+649 ;;21,"63874-0357-60 ")
+650 ;;266
+651 ;;21,"63874-0432-01 ")
+652 ;;468
+653 ;;21,"63874-0432-02 ")
+654 ;;469
+655 ;;21,"63874-0432-04 ")
+656 ;;470
+657 ;;21,"63874-0432-10 ")
+658 ;;471
+659 ;;21,"63874-0432-14 ")
+660 ;;472
+661 ;;21,"63874-0432-20 ")
+662 ;;473
+663 ;;21,"63874-0432-21 ")
+664 ;;474
+665 ;;21,"63874-0432-24 ")
+666 ;;475
+667 ;;21,"63874-0432-28 ")
+668 ;;476
+669 ;;21,"63874-0432-30 ")
+670 ;;477
+671 ;;21,"63874-0432-50 ")
+672 ;;478
+673 ;;21,"63874-0432-60 ")
+674 ;;479
+675 ;;21,"63874-0432-81 ")
+676 ;;480
+677 ;;21,"63874-0432-90 ")
+678 ;;481
+679 ;;21,"63874-0588-01 ")
+680 ;;1007
+681 ;;21,"63874-0588-04 ")
+682 ;;1008
+683 ;;21,"63874-0588-10 ")
+684 ;;1009
+685 ;;21,"63874-0588-14 ")
+686 ;;1010
+687 ;;21,"63874-0588-20 ")
+688 ;;1011
+689 ;;21,"63874-0588-30 ")
+690 ;;1012
+691 ;;21,"63874-0588-60 ")
+692 ;;1013
+693 ;;21,"63874-0588-80 ")
+694 ;;1014
+695 ;;21,"63874-0588-90 ")
+696 ;;1015
+697 ;;21,"63874-0665-01 ")
+698 ;;971
+699 ;;21,"63874-0665-04 ")
+700 ;;972
+701 ;;21,"63874-0665-10 ")
+702 ;;973
+703 ;;21,"63874-0665-14 ")
+704 ;;974
+705 ;;21,"63874-0665-30 ")
+706 ;;975
+707 ;;21,"63874-0665-60 ")
+708 ;;976
+709 ;;21,"63874-0665-90 ")
+710 ;;977
+711 ;;21,"64720-0123-10 ")
+712 ;;970
+713 ;;21,"64720-0124-10 ")
+714 ;;1016
+715 ;;21,"64720-0125-10 ")
+716 ;;1266
+717 ;;21,"64720-0125-11 ")
+718 ;;1267
+719 ;;21,"64764-0302-30 ")
+720 ;;1327
+721 ;;21,"64764-0304-30 ")
+722 ;;1328
+723 ;;21,"64909-0101-07 ")
+724 ;;871
+725 ;;21,"64909-0102-07 ")
+726 ;;904
+727 ;;21,"64909-0102-08 ")
+728 ;;905
+729 ;;21,"64909-0104-07 ")
+730 ;;914
+731 ;;21,"64909-0105-07 ")
+732 ;;939
+733 ;;21,"64909-0105-08 ")
+734 ;;940
+735 ;;21,"65243-0176-09 ")
+736 ;;1259
+737 ;;21,"65243-0176-12 ")
+738 ;;1260
+739 ;;21,"65243-0176-18 ")
+740 ;;1261
+741 ;;21,"65243-0176-27 ")
+742 ;;1262
+743 ;;21,"65243-0176-36 ")
+744 ;;1263
+745 ;;21,"65243-0183-18 ")
+746 ;;482
+747 ;;21,"65243-0185-36 ")
+748 ;;1258
+749 ;;21,"65243-0325-09 ")
+750 ;;1021
+751 ;;21,"65243-0325-18 ")
+752 ;;1022
+753 ;;21,"65243-0343-09 ")
+754 ;;1256
+755 ;;21,"65243-0343-36 ")
+756 ;;1257
+757 ;;21,"65243-0346-09 ")
+758 ;;626
+759 ;;21,"65243-0375-09 ")
+760 ;;1028
+761 ;;21,"65243-0378-09 ")
+762 ;;627
+763 ;;21,"65862-0028-01 ")
+764 ;;969
+765 ;;21,"65862-0029-01 ")
+766 ;;1017
+767 ;;21,"65862-0029-05 ")
+768 ;;1018
+769 ;;21,"65862-0030-01 ")
+770 ;;1264
+771 ;;21,"65862-0030-99 ")
+772 ;;1265
+773 ;;21,"65862-0080-01 ")
+774 ;;48
+775 ;;21,"65862-0080-05 ")
+776 ;;49
+777 ;;21,"65862-0081-01 ")
+778 ;;99
+779 ;;21,"65862-0081-05 ")
+780 ;;100
+781 ;;21,"65862-0082-01 ")
+782 ;;158
+783 ;;21,"65862-0082-05 ")
+784 ;;159
+785 ;;21,"66105-0984-03 ")
+786 ;;964
+787 ;;21,"66105-0984-06 ")
+788 ;;965