- BGP2VN3 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 08, 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,"50428-4770-66 ")
- +2 ;;687
- +3 ;;21,"50428-4770-68 ")
- +4 ;;688
- +5 ;;21,"50428-4770-69 ")
- +6 ;;689
- +7 ;;21,"50428-4770-70 ")
- +8 ;;516
- +9 ;;21,"50428-4770-71 ")
- +10 ;;517
- +11 ;;21,"50428-4770-72 ")
- +12 ;;390
- +13 ;;21,"50428-4770-73 ")
- +14 ;;391
- +15 ;;21,"50428-4770-84 ")
- +16 ;;918
- +17 ;;21,"50486-0616-16 ")
- +18 ;;776
- +19 ;;21,"50486-0616-32 ")
- +20 ;;777
- +21 ;;21,"50486-0621-16 ")
- +22 ;;778
- +23 ;;21,"50580-0176-04 ")
- +24 ;;73
- +25 ;;21,"50580-0176-08 ")
- +26 ;;74
- +27 ;;21,"50580-0176-10 ")
- +28 ;;75
- +29 ;;21,"50580-0176-14 ")
- +30 ;;76
- +31 ;;21,"50580-0176-15 ")
- +32 ;;77
- +33 ;;21,"50580-0176-24 ")
- +34 ;;78
- +35 ;;21,"50580-0176-50 ")
- +36 ;;79
- +37 ;;21,"50580-0176-70 ")
- +38 ;;80
- +39 ;;21,"50580-0176-74 ")
- +40 ;;81
- +41 ;;21,"50580-0182-20 ")
- +42 ;;82
- +43 ;;21,"50580-0182-40 ")
- +44 ;;83
- +45 ;;21,"50580-0182-52 ")
- +46 ;;84
- +47 ;;21,"50580-0233-24 ")
- +48 ;;33
- +49 ;;21,"50580-0233-48 ")
- +50 ;;34
- +51 ;;21,"50580-0234-24 ")
- +52 ;;85
- +53 ;;21,"50580-0244-20 ")
- +54 ;;86
- +55 ;;21,"50580-0252-08 ")
- +56 ;;23
- +57 ;;21,"50580-0347-18 ")
- +58 ;;325
- +59 ;;21,"50580-0348-18 ")
- +60 ;;326
- +61 ;;21,"50580-0426-10 ")
- +62 ;;87
- +63 ;;21,"50580-0426-23 ")
- +64 ;;88
- +65 ;;21,"50580-0426-24 ")
- +66 ;;89
- +67 ;;21,"50580-0427-08 ")
- +68 ;;24
- +69 ;;21,"50580-0482-10 ")
- +70 ;;90
- +71 ;;21,"50580-0482-15 ")
- +72 ;;91
- +73 ;;21,"50580-0482-24 ")
- +74 ;;92
- +75 ;;21,"50580-0482-26 ")
- +76 ;;93
- +77 ;;21,"50580-0482-35 ")
- +78 ;;94
- +79 ;;21,"50580-0482-45 ")
- +80 ;;95
- +81 ;;21,"50580-0482-50 ")
- +82 ;;96
- +83 ;;21,"50580-0482-70 ")
- +84 ;;97
- +85 ;;21,"50580-0534-04 ")
- +86 ;;392
- +87 ;;21,"50580-0552-04 ")
- +88 ;;898
- +89 ;;21,"50580-0664-12 ")
- +90 ;;10
- +91 ;;21,"50580-0664-24 ")
- +92 ;;11
- +93 ;;21,"50580-0777-04 ")
- +94 ;;393
- +95 ;;21,"50580-0781-04 ")
- +96 ;;899
- +97 ;;21,"50580-0814-08 ")
- +98 ;;25
- +99 ;;21,"50580-0843-10 ")
- +100 ;;690
- +101 ;;21,"50580-0843-13 ")
- +102 ;;691
- +103 ;;21,"50580-0843-24 ")
- +104 ;;692
- +105 ;;21,"50580-0843-25 ")
- +106 ;;693
- +107 ;;21,"50580-0843-48 ")
- +108 ;;694
- +109 ;;21,"50580-0843-72 ")
- +110 ;;695
- +111 ;;21,"50991-0607-16 ")
- +112 ;;907
- +113 ;;21,"51079-0066-01 ")
- +114 ;;779
- +115 ;;21,"51079-0066-19 ")
- +116 ;;780
- +117 ;;21,"51079-0066-20 ")
- +118 ;;781
- +119 ;;21,"51079-0077-20 ")
- +120 ;;1339
- +121 ;;21,"51079-0078-01 ")
- +122 ;;1434
- +123 ;;21,"51079-0078-20 ")
- +124 ;;1435
- +125 ;;21,"51079-0413-01 ")
- +126 ;;963
- +127 ;;21,"51079-0413-20 ")
- +128 ;;964
- +129 ;;21,"51079-0530-01 ")
- +130 ;;965
- +131 ;;21,"51079-0530-20 ")
- +132 ;;966
- +133 ;;21,"51079-0531-01 ")
- +134 ;;1112
- +135 ;;21,"51079-0531-20 ")
- +136 ;;1113
- +137 ;;21,"51079-0532-01 ")
- +138 ;;1254
- +139 ;;21,"51079-0532-20 ")
- +140 ;;1255
- +141 ;;21,"51079-0796-01 ")
- +142 ;;967
- +143 ;;21,"51079-0796-20 ")
- +144 ;;968
- +145 ;;21,"51079-0806-01 ")
- +146 ;;1114
- +147 ;;21,"51079-0806-20 ")
- +148 ;;1115
- +149 ;;21,"51079-0816-01 ")
- +150 ;;1256
- +151 ;;21,"51079-0816-20 ")
- +152 ;;1257
- +153 ;;21,"51079-0895-01 ")
- +154 ;;1594
- +155 ;;21,"51079-0895-20 ")
- +156 ;;1595
- +157 ;;21,"51079-0967-01 ")
- +158 ;;696
- +159 ;;21,"51079-0967-19 ")
- +160 ;;697
- +161 ;;21,"51079-0967-20 ")
- +162 ;;698
- +163 ;;21,"51641-0030-46 ")
- +164 ;;394
- +165 ;;21,"51641-0030-64 ")
- +166 ;;395
- +167 ;;21,"51641-0030-76 ")
- +168 ;;396
- +169 ;;21,"51641-0030-94 ")
- +170 ;;397
- +171 ;;21,"51645-0709-05 ")
- +172 ;;98
- +173 ;;21,"51655-0078-54 ")
- +174 ;;969
- +175 ;;21,"51655-0079-80 ")
- +176 ;;1116
- +177 ;;21,"51655-0084-53 ")
- +178 ;;1596
- +179 ;;21,"51655-0113-24 ")
- +180 ;;699
- +181 ;;21,"51655-0113-54 ")
- +182 ;;518
- +183 ;;21,"51655-0113-80 ")
- +184 ;;700
- +185 ;;21,"51655-0276-52 ")
- +186 ;;229
- +187 ;;21,"51655-0533-52 ")
- +188 ;;1340
- +189 ;;21,"51991-0189-04 ")
- +190 ;;283
- +191 ;;21,"51991-0189-16 ")
- +192 ;;284
- +193 ;;21,"51991-0298-16 ")
- +194 ;;887
- +195 ;;21,"51991-0583-01 ")
- +196 ;;279
- +197 ;;21,"52152-0014-02 ")
- +198 ;;255
- +199 ;;21,"52152-0015-02 ")
- +200 ;;257
- +201 ;;21,"52152-0311-02 ")
- +202 ;;970
- +203 ;;21,"52152-0311-05 ")
- +204 ;;971
- +205 ;;21,"52152-0312-02 ")
- +206 ;;1117
- +207 ;;21,"52152-0312-05 ")
- +208 ;;1118
- +209 ;;21,"52152-0313-02 ")
- +210 ;;1258
- +211 ;;21,"52152-0313-05 ")
- +212 ;;1259
- +213 ;;21,"52183-0389-04 ")
- +214 ;;900
- +215 ;;21,"52183-0399-04 ")
- +216 ;;398
- +217 ;;21,"52389-0610-60 ")
- +218 ;;701
- +219 ;;21,"52959-0043-00 ")
- +220 ;;519
- +221 ;;21,"52959-0043-04 ")
- +222 ;;520
- +223 ;;21,"52959-0043-10 ")
- +224 ;;521
- +225 ;;21,"52959-0043-15 ")
- +226 ;;522
- +227 ;;21,"52959-0043-20 ")
- +228 ;;523
- +229 ;;21,"52959-0043-24 ")
- +230 ;;524
- +231 ;;21,"52959-0043-30 ")
- +232 ;;525
- +233 ;;21,"52959-0043-50 ")
- +234 ;;526
- +235 ;;21,"52959-0043-60 ")
- +236 ;;527
- +237 ;;21,"52959-0053-06 ")
- +238 ;;782
- +239 ;;21,"52959-0053-10 ")
- +240 ;;783
- +241 ;;21,"52959-0053-12 ")
- +242 ;;784
- +243 ;;21,"52959-0053-15 ")
- +244 ;;785
- +245 ;;21,"52959-0053-20 ")
- +246 ;;786
- +247 ;;21,"52959-0053-30 ")
- +248 ;;787
- +249 ;;21,"52959-0053-52 ")
- +250 ;;788
- +251 ;;21,"52959-0074-12 ")
- +252 ;;1119
- +253 ;;21,"52959-0074-13 ")
- +254 ;;1120
- +255 ;;21,"52959-0074-15 ")
- +256 ;;1121
- +257 ;;21,"52959-0074-16 ")
- +258 ;;1122
- +259 ;;21,"52959-0074-20 ")
- +260 ;;1123
- +261 ;;21,"52959-0074-21 ")
- +262 ;;1124
- +263 ;;21,"52959-0074-24 ")
- +264 ;;1125
- +265 ;;21,"52959-0074-30 ")
- +266 ;;1126
- +267 ;;21,"52959-0074-40 ")
- +268 ;;1127
- +269 ;;21,"52959-0074-50 ")
- +270 ;;1128
- +271 ;;21,"52959-0074-60 ")
- +272 ;;1129
- +273 ;;21,"52959-0074-90 ")
- +274 ;;1130
- +275 ;;21,"52959-0118-03 ")
- +276 ;;178
- +277 ;;21,"52959-0118-05 ")
- +278 ;;179
- +279 ;;21,"52959-0118-06 ")
- +280 ;;180
- +281 ;;21,"52959-0118-08 ")
- +282 ;;181
- +283 ;;21,"52959-0123-03 ")
- +284 ;;399
- +285 ;;21,"52959-0123-06 ")
- +286 ;;400
- +287 ;;21,"52959-0134-04 ")
- +288 ;;1741
- +289 ;;21,"52959-0134-08 ")
- +290 ;;1742
- +291 ;;21,"52959-0229-04 ")
- +292 ;;149
- +293 ;;21,"52959-0433-10 ")
- +294 ;;1341
- +295 ;;21,"52959-0433-15 ")
- +296 ;;1342
- +297 ;;21,"52959-0433-20 ")
- +298 ;;1343
- +299 ;;21,"52959-0433-30 ")
- +300 ;;1344
- +301 ;;21,"52959-0433-40 ")
- +302 ;;1345
- +303 ;;21,"52959-0433-50 ")
- +304 ;;1346
- +305 ;;21,"52959-0433-60 ")
- +306 ;;1347
- +307 ;;21,"52959-0481-10 ")
- +308 ;;972
- +309 ;;21,"52959-0481-12 ")
- +310 ;;973
- +311 ;;21,"52959-0481-20 ")
- +312 ;;974
- +313 ;;21,"52959-0481-30 ")
- +314 ;;975
- +315 ;;21,"52959-0534-01 ")
- +316 ;;1597
- +317 ;;21,"52959-0534-02 ")
- +318 ;;1598
- +319 ;;21,"52959-0534-10 ")
- +320 ;;1599
- +321 ;;21,"52959-0534-12 ")
- +322 ;;1600
- +323 ;;21,"52959-0534-15 ")
- +324 ;;1601
- +325 ;;21,"52959-0534-20 ")
- +326 ;;1602
- +327 ;;21,"52959-0534-28 ")
- +328 ;;1603
- +329 ;;21,"52959-0534-30 ")
- +330 ;;1604
- +331 ;;21,"52959-0534-45 ")
- +332 ;;1605
- +333 ;;21,"52959-0534-60 ")
- +334 ;;1606
- +335 ;;21,"52959-0534-90 ")
- +336 ;;1607
- +337 ;;21,"52959-0568-04 ")
- +338 ;;1484
- +339 ;;21,"52959-0582-03 ")
- +340 ;;1036
- +341 ;;21,"52959-0700-04 ")
- +342 ;;303
- +343 ;;21,"52959-0700-06 ")
- +344 ;;304
- +345 ;;21,"52959-0700-08 ")
- +346 ;;305
- +347 ;;21,"52959-0804-04 ")
- +348 ;;1743
- +349 ;;21,"52959-0804-08 ")
- +350 ;;1744
- +351 ;;21,"52959-0833-06 ")
- +352 ;;1436
- +353 ;;21,"52959-0833-20 ")
- +354 ;;1437
- +355 ;;21,"52959-0882-30 ")
- +356 ;;1260
- +357 ;;21,"52959-0914-30 ")
- +358 ;;1505
- +359 ;;21,"53100-0128-22 ")
- +360 ;;702
- +361 ;;21,"53100-0128-32 ")
- +362 ;;703
- +363 ;;21,"53100-0128-75 ")
- +364 ;;883
- +365 ;;21,"53489-0127-01 ")
- +366 ;;1131
- +367 ;;21,"53489-0127-05 ")
- +368 ;;1132
- +369 ;;21,"53489-0127-10 ")
- +370 ;;1133
- +371 ;;21,"53489-0128-01 ")
- +372 ;;1261
- +373 ;;21,"53489-0128-05 ")
- +374 ;;1262
- +375 ;;21,"53489-0128-10 ")
- +376 ;;1263
- +377 ;;21,"53746-0064-10 ")
- +378 ;;704
- +379 ;;21,"54569-0239-00 ")
- +380 ;;528
- +381 ;;21,"54569-0239-01 ")
- +382 ;;529
- +383 ;;21,"54569-0239-02 ")
- +384 ;;530
- +385 ;;21,"54569-0239-03 ")
- +386 ;;531
- +387 ;;21,"54569-0239-08 ")
- +388 ;;532
- +389 ;;21,"54569-0241-00 ")
- +390 ;;789
- +391 ;;21,"54569-0241-02 ")
- +392 ;;790
- +393 ;;21,"54569-0241-03 ")
- +394 ;;791
- +395 ;;21,"54569-0241-04 ")
- +396 ;;792
- +397 ;;21,"54569-0241-05 ")
- +398 ;;793
- +399 ;;21,"54569-0406-00 ")
- +400 ;;976
- +401 ;;21,"54569-0406-01 ")
- +402 ;;977
- +403 ;;21,"54569-0406-03 ")
- +404 ;;978
- +405 ;;21,"54569-0406-05 ")
- +406 ;;979
- +407 ;;21,"54569-0409-01 ")
- +408 ;;1264
- +409 ;;21,"54569-0409-03 ")
- +410 ;;1265
- +411 ;;21,"54569-0409-04 ")
- +412 ;;1266
- +413 ;;21,"54569-0411-01 ")
- +414 ;;230
- +415 ;;21,"54569-0413-00 ")
- +416 ;;1134
- +417 ;;21,"54569-0413-01 ")
- +418 ;;1135
- +419 ;;21,"54569-0413-04 ")
- +420 ;;1136
- +421 ;;21,"54569-0413-05 ")
- +422 ;;1137
- +423 ;;21,"54569-0413-06 ")
- +424 ;;1138
- +425 ;;21,"54569-0413-08 ")
- +426 ;;1139
- +427 ;;21,"54569-0413-09 ")
- +428 ;;1140
- +429 ;;21,"54569-1046-00 ")
- +430 ;;1745
- +431 ;;21,"54569-1055-00 ")
- +432 ;;306
- +433 ;;21,"54569-1056-00 ")
- +434 ;;182
- +435 ;;21,"54569-1640-01 ")
- +436 ;;1037
- +437 ;;21,"54569-1754-00 ")
- +438 ;;1608
- +439 ;;21,"54569-1754-01 ")
- +440 ;;1609
- +441 ;;21,"54569-1754-09 ")
- +442 ;;1610
- +443 ;;21,"54569-2353-02 ")
- +444 ;;1348
- +445 ;;21,"54569-2353-03 ")
- +446 ;;1349
- +447 ;;21,"54569-2353-05 ")
- +448 ;;1350
- +449 ;;21,"54569-2571-01 ")
- +450 ;;1438
- +451 ;;21,"54569-2984-00 ")
- +452 ;;207
- +453 ;;21,"54569-2984-01 ")
- +454 ;;208
- +455 ;;21,"54569-3044-02 ")
- +456 ;;150
- +457 ;;21,"54569-3200-00 ")
- +458 ;;401
- +459 ;;21,"54569-3504-00 ")
- +460 ;;533
- +461 ;;21,"54569-3504-01 ")
- +462 ;;534
- +463 ;;21,"54569-3540-02 ")
- +464 ;;183
- +465 ;;21,"54569-4168-00 ")
- +466 ;;1611
- +467 ;;21,"54569-4197-00 ")
- +468 ;;402
- +469 ;;21,"54569-4825-00 ")
- +470 ;;1141
- +471 ;;21,"54569-4825-01 ")
- +472 ;;1142
- +473 ;;21,"54569-5736-00 ")
- +474 ;;1485
- +475 ;;21,"54738-0115-01 ")
- +476 ;;535
- +477 ;;21,"54738-0115-03 ")
- +478 ;;536
- +479 ;;21,"54738-0115-13 ")
- +480 ;;537
- +481 ;;21,"54738-0116-01 ")
- +482 ;;794
- +483 ;;21,"54738-0116-03 ")
- +484 ;;795
- +485 ;;21,"54738-0116-13 ")
- +486 ;;796
- +487 ;;21,"54738-0308-03 ")
- +488 ;;1143
- +489 ;;21,"54738-0309-01 ")
- +490 ;;1267
- +491 ;;21,"54838-0103-00 ")
- +492 ;;403
- +493 ;;21,"54838-0103-40 ")
- +494 ;;404
- +495 ;;21,"54838-0103-80 ")
- +496 ;;405
- +497 ;;21,"54838-0135-40 ")
- +498 ;;406
- +499 ;;21,"54838-0135-70 ")
- +500 ;;407
- +501 ;;21,"54838-0135-80 ")
- +502 ;;408
- +503 ;;21,"54838-0154-40 ")
- +504 ;;409
- +505 ;;21,"54838-0154-70 ")
- +506 ;;410
- +507 ;;21,"54838-0154-80 ")
- +508 ;;411
- +509 ;;21,"54868-0026-00 ")
- +510 ;;538
- +511 ;;21,"54868-0026-01 ")
- +512 ;;539
- +513 ;;21,"54868-0026-04 ")
- +514 ;;540
- +515 ;;21,"54868-0026-05 ")
- +516 ;;541
- +517 ;;21,"54868-0026-06 ")
- +518 ;;542
- +519 ;;21,"54868-0026-07 ")
- +520 ;;543
- +521 ;;21,"54868-0063-00 ")
- +522 ;;1144
- +523 ;;21,"54868-0063-01 ")
- +524 ;;1145
- +525 ;;21,"54868-0063-02 ")
- +526 ;;1146
- +527 ;;21,"54868-0063-03 ")
- +528 ;;1147
- +529 ;;21,"54868-0063-05 ")
- +530 ;;1148
- +531 ;;21,"54868-0063-06 ")
- +532 ;;1149
- +533 ;;21,"54868-0063-07 ")
- +534 ;;1150
- +535 ;;21,"54868-0063-09 ")
- +536 ;;1151
- +537 ;;21,"54868-0169-01 ")
- +538 ;;1351
- +539 ;;21,"54868-0229-01 ")
- +540 ;;980
- +541 ;;21,"54868-0229-02 ")
- +542 ;;981
- +543 ;;21,"54868-0229-03 ")
- +544 ;;982
- +545 ;;21,"54868-0229-04 ")
- +546 ;;983
- +547 ;;21,"54868-0263-00 ")
- +548 ;;151
- +549 ;;21,"54868-0263-01 ")
- +550 ;;152
- +551 ;;21,"54868-1029-00 ")
- +552 ;;184
- +553 ;;21,"54868-1029-01 ")
- +554 ;;185
- +555 ;;21,"54868-1029-02 ")
- +556 ;;186
- +557 ;;21,"54868-1050-00 ")
- +558 ;;797
- +559 ;;21,"54868-1050-01 ")
- +560 ;;798
- +561 ;;21,"54868-1050-03 ")
- +562 ;;799
- +563 ;;21,"54868-1050-04 ")
- +564 ;;800
- +565 ;;21,"54868-1050-05 ")
- +566 ;;801
- +567 ;;21,"54868-1227-00 ")
- +568 ;;412
- +569 ;;21,"54868-1227-02 ")
- +570 ;;413
- +571 ;;21,"54868-1323-00 ")
- +572 ;;1612
- +573 ;;21,"54868-1323-01 ")
- +574 ;;1613
- +575 ;;21,"54868-1323-02 ")
- +576 ;;1614
- +577 ;;21,"54868-1323-04 ")
- +578 ;;1615
- +579 ;;21,"54868-1323-05 ")
- +580 ;;1616
- +581 ;;21,"54868-1323-06 ")
- +582 ;;1617
- +583 ;;21,"54868-1332-01 ")
- +584 ;;231
- +585 ;;21,"54868-1332-02 ")
- +586 ;;232
- +587 ;;21,"54868-1332-03 ")
- +588 ;;233
- +589 ;;21,"54868-1332-04 ")
- +590 ;;234
- +591 ;;21,"54868-1332-05 ")
- +592 ;;235
- +593 ;;21,"54868-1332-06 ")
- +594 ;;236
- +595 ;;21,"54868-1332-07 ")
- +596 ;;237
- +597 ;;21,"54868-1804-00 ")
+598 ;;1268
+599 ;;21,"54868-1804-02 ")
+600 ;;1269
+601 ;;21,"54868-1804-04 ")
+602 ;;1270
+603 ;;21,"54868-1854-00 ")
+604 ;;1439
+605 ;;21,"54868-1854-01 ")
+606 ;;1440
+607 ;;21,"54868-1854-03 ")
+608 ;;1441
+609 ;;21,"54868-1854-04 ")
+610 ;;1442
+611 ;;21,"54868-1867-00 ")
+612 ;;1746
+613 ;;21,"54868-1990-00 ")
+614 ;;307
+615 ;;21,"54868-1990-01 ")
+616 ;;308
+617 ;;21,"54868-2032-00 ")
+618 ;;1038
+619 ;;21,"54868-2844-00 ")
+620 ;;1716
+621 ;;21,"54868-2892-00 ")
+622 ;;1352
+623 ;;21,"54868-2892-02 ")
+624 ;;1353
+625 ;;21,"54868-2892-03 ")
+626 ;;1354
+627 ;;21,"54868-2892-04 ")
+628 ;;1355
+629 ;;21,"54868-3935-00 ")
+630 ;;1486
+631 ;;21,"54868-3935-01 ")
+632 ;;1487
+633 ;;21,"54868-4108-00 ")
+634 ;;1307
+635 ;;21,"54868-4109-00 ")
+636 ;;1308
+637 ;;21,"54868-4336-00 ")
+638 ;;1039
+639 ;;21,"54868-4338-00 ")
+640 ;;209
+641 ;;21,"54868-5121-00 ")
+642 ;;1506
+643 ;;21,"55045-1124-00 ")
+644 ;;802
+645 ;;21,"55045-1124-01 ")
+646 ;;803
+647 ;;21,"55045-1124-02 ")
+648 ;;804
+649 ;;21,"55045-1124-03 ")
+650 ;;805
+651 ;;21,"55045-1124-04 ")
+652 ;;806
+653 ;;21,"55045-1124-05 ")
+654 ;;807
+655 ;;21,"55045-1124-06 ")
+656 ;;808
+657 ;;21,"55045-1124-07 ")
+658 ;;809
+659 ;;21,"55045-1124-08 ")
+660 ;;810
+661 ;;21,"55045-1124-09 ")
+662 ;;811
+663 ;;21,"55045-1125-00 ")
+664 ;;544
+665 ;;21,"55045-1125-01 ")
+666 ;;545
+667 ;;21,"55045-1125-02 ")
+668 ;;546
+669 ;;21,"55045-1125-03 ")
+670 ;;547
+671 ;;21,"55045-1125-04 ")
+672 ;;548
+673 ;;21,"55045-1125-05 ")
+674 ;;549
+675 ;;21,"55045-1125-06 ")
+676 ;;550
+677 ;;21,"55045-1125-08 ")
+678 ;;551
+679 ;;21,"55045-1125-09 ")
+680 ;;552
+681 ;;21,"55045-1252-02 ")
+682 ;;414
+683 ;;21,"55045-1266-08 ")
+684 ;;153
+685 ;;21,"55045-1446-05 ")
+686 ;;1152
+687 ;;21,"55045-1446-07 ")
+688 ;;1153
+689 ;;21,"55045-1446-08 ")
+690 ;;1154
+691 ;;21,"55045-1596-00 ")
+692 ;;1618
+693 ;;21,"55045-1596-01 ")
+694 ;;1619
+695 ;;21,"55045-1596-02 ")
+696 ;;1620
+697 ;;21,"55045-1596-03 ")
+698 ;;1621
+699 ;;21,"55045-1596-04 ")
+700 ;;1622
+701 ;;21,"55045-1596-05 ")
+702 ;;1623
+703 ;;21,"55045-1596-06 ")
+704 ;;1624
+705 ;;21,"55045-1596-08 ")
+706 ;;1625
+707 ;;21,"55045-1596-09 ")
+708 ;;1626
+709 ;;21,"55045-1643-09 ")
+710 ;;1747
+711 ;;21,"55045-1661-00 ")
+712 ;;1443
+713 ;;21,"55045-1661-01 ")
+714 ;;1444
+715 ;;21,"55045-1661-02 ")
+716 ;;1445
+717 ;;21,"55045-1661-03 ")
+718 ;;1446
+719 ;;21,"55045-1661-06 ")
+720 ;;1447
+721 ;;21,"55045-1661-08 ")
+722 ;;1448
+723 ;;21,"55045-1687-02 ")
+724 ;;187
+725 ;;21,"55045-1699-02 ")
+726 ;;1488
+727 ;;21,"55045-1805-08 ")
+728 ;;984
+729 ;;21,"55045-2195-02 ")
+730 ;;1356
+731 ;;21,"55045-2195-04 ")
+732 ;;1357
+733 ;;21,"55045-2195-05 ")
+734 ;;1358
+735 ;;21,"55045-2195-06 ")
+736 ;;1359
+737 ;;21,"55045-2195-07 ")
+738 ;;1360
+739 ;;21,"55045-2195-08 ")
+740 ;;1361
+741 ;;21,"55045-2195-09 ")
+742 ;;1362
+743 ;;21,"55289-0089-20 ")
+744 ;;238
+745 ;;21,"55289-0089-30 ")
+746 ;;239
+747 ;;21,"55289-0100-01 ")
+748 ;;812
+749 ;;21,"55289-0100-10 ")
+750 ;;813
+751 ;;21,"55289-0100-15 ")
+752 ;;814
+753 ;;21,"55289-0100-20 ")
+754 ;;815
+755 ;;21,"55289-0100-30 ")
+756 ;;816
+757 ;;21,"55289-0100-40 ")
+758 ;;817
+759 ;;21,"55289-0138-01 ")
+760 ;;1271
+761 ;;21,"55289-0138-12 ")
+762 ;;1272
+763 ;;21,"55289-0138-17 ")
+764 ;;1273
+765 ;;21,"55289-0138-20 ")
+766 ;;1274
+767 ;;21,"55289-0138-25 ")
+768 ;;1275
+769 ;;21,"55289-0138-30 ")
+770 ;;1276
+771 ;;21,"55289-0139-01 ")
+772 ;;1155
+773 ;;21,"55289-0139-06 ")
+774 ;;1156
+775 ;;21,"55289-0139-10 ")
+776 ;;1157
+777 ;;21,"55289-0139-12 ")
+778 ;;1158
+779 ;;21,"55289-0139-20 ")
+780 ;;1159
+781 ;;21,"55289-0139-30 ")
+782 ;;1160
+783 ;;21,"55289-0139-40 ")
+784 ;;1161
+785 ;;21,"55289-0139-60 ")
+786 ;;1162