- BGP47Z6 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 17, 2014;
- +1 ;;14.1;IHS CLINICAL REPORTING;;MAY 29, 2014;Build 114
- +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,"58177-0061-26 ")
- +2 ;;779
- +3 ;;21,"58177-0062-09 ")
- +4 ;;813
- +5 ;;21,"58177-0062-11 ")
- +6 ;;814
- +7 ;;21,"58177-0062-19 ")
- +8 ;;815
- +9 ;;21,"58177-0062-26 ")
- +10 ;;816
- +11 ;;21,"58177-0063-09 ")
- +12 ;;840
- +13 ;;21,"58177-0063-11 ")
- +14 ;;841
- +15 ;;21,"58177-0063-19 ")
- +16 ;;842
- +17 ;;21,"58177-0063-26 ")
- +18 ;;843
- +19 ;;21,"58177-0064-09 ")
- +20 ;;868
- +21 ;;21,"58177-0064-11 ")
- +22 ;;869
- +23 ;;21,"58177-0064-19 ")
- +24 ;;870
- +25 ;;21,"58177-0064-26 ")
- +26 ;;871
- +27 ;;21,"58177-0065-09 ")
- +28 ;;891
- +29 ;;21,"58177-0065-11 ")
- +30 ;;892
- +31 ;;21,"58177-0065-19 ")
- +32 ;;893
- +33 ;;21,"58177-0065-26 ")
- +34 ;;894
- +35 ;;21,"58177-0066-19 ")
- +36 ;;924
- +37 ;;21,"58177-0066-26 ")
- +38 ;;925
- +39 ;;21,"58177-0536-26 ")
- +40 ;;95
- +41 ;;21,"58177-0537-07 ")
- +42 ;;255
- +43 ;;21,"58177-0537-11 ")
- +44 ;;256
- +45 ;;21,"58177-0537-26 ")
- +46 ;;257
- +47 ;;21,"58177-0538-11 ")
- +48 ;;417
- +49 ;;21,"58177-0538-26 ")
- +50 ;;418
- +51 ;;21,"58517-0120-30 ")
- +52 ;;419
- +53 ;;21,"58864-0101-20 ")
- +54 ;;571
- +55 ;;21,"58864-0101-30 ")
- +56 ;;572
- +57 ;;21,"58864-0102-20 ")
- +58 ;;1331
- +59 ;;21,"58864-0102-30 ")
- +60 ;;1332
- +61 ;;21,"58864-0530-30 ")
- +62 ;;1931
- +63 ;;21,"58864-0530-60 ")
- +64 ;;1932
- +65 ;;21,"58864-0606-30 ")
- +66 ;;721
- +67 ;;21,"58864-0619-30 ")
- +68 ;;765
- +69 ;;21,"58864-0620-14 ")
- +70 ;;301
- +71 ;;21,"58864-0620-30 ")
- +72 ;;302
- +73 ;;21,"58864-0635-14 ")
- +74 ;;827
- +75 ;;21,"58864-0649-14 ")
- +76 ;;2159
- +77 ;;21,"58864-0649-30 ")
- +78 ;;2160
- +79 ;;21,"58864-0649-60 ")
- +80 ;;2161
- +81 ;;21,"58864-0657-30 ")
- +82 ;;513
- +83 ;;21,"58864-0669-14 ")
- +84 ;;1479
- +85 ;;21,"58864-0677-30 ")
- +86 ;;2214
- +87 ;;21,"58864-0706-14 ")
- +88 ;;2048
- +89 ;;21,"58864-0706-60 ")
- +90 ;;2049
- +91 ;;21,"58864-0713-30 ")
- +92 ;;1395
- +93 ;;21,"58864-0714-30 ")
- +94 ;;858
- +95 ;;21,"58864-0720-30 ")
- +96 ;;1880
- +97 ;;21,"58864-0720-60 ")
- +98 ;;1881
- +99 ;;21,"58864-0723-30 ")
- +100 ;;1281
- +101 ;;21,"58864-0724-30 ")
- +102 ;;803
- +103 ;;21,"58864-0810-30 ")
- +104 ;;1339
- +105 ;;21,"58864-0810-90 ")
- +106 ;;1340
- +107 ;;21,"58864-0824-01 ")
- +108 ;;1535
- +109 ;;21,"58864-0824-14 ")
- +110 ;;1536
- +111 ;;21,"58864-0873-14 ")
- +112 ;;741
- +113 ;;21,"58864-0873-30 ")
- +114 ;;742
- +115 ;;21,"58864-0966-01 ")
- +116 ;;1498
- +117 ;;21,"59762-1520-01 ")
- +118 ;;10
- +119 ;;21,"59762-1520-02 ")
- +120 ;;11
- +121 ;;21,"59762-1530-01 ")
- +122 ;;117
- +123 ;;21,"59762-1530-02 ")
- +124 ;;118
- +125 ;;21,"59762-1530-03 ")
- +126 ;;119
- +127 ;;21,"59762-1530-04 ")
- +128 ;;120
- +129 ;;21,"59762-1530-05 ")
- +130 ;;121
- +131 ;;21,"59762-1530-06 ")
- +132 ;;122
- +133 ;;21,"59762-1540-01 ")
- +134 ;;430
- +135 ;;21,"59762-1540-02 ")
- +136 ;;431
- +137 ;;21,"59762-1540-03 ")
- +138 ;;432
- +139 ;;21,"59762-1540-04 ")
- +140 ;;433
- +141 ;;21,"59762-1540-05 ")
- +142 ;;434
- +143 ;;21,"59762-6690-03 ")
- +144 ;;1646
- +145 ;;21,"59762-6690-05 ")
- +146 ;;1647
- +147 ;;21,"59762-6690-08 ")
- +148 ;;1648
- +149 ;;21,"59762-6691-03 ")
- +150 ;;1716
- +151 ;;21,"59762-6691-05 ")
- +152 ;;1717
- +153 ;;21,"59762-6691-08 ")
- +154 ;;1718
- +155 ;;21,"59762-6692-03 ")
- +156 ;;1766
- +157 ;;21,"59762-6692-08 ")
- +158 ;;1767
- +159 ;;21,"60346-0186-20 ")
- +160 ;;1808
- +161 ;;21,"60346-0186-30 ")
- +162 ;;1809
- +163 ;;21,"60346-0296-60 ")
- +164 ;;1918
- +165 ;;21,"60346-0296-90 ")
- +166 ;;1919
- +167 ;;21,"60346-0298-30 ")
- +168 ;;1971
- +169 ;;21,"60346-0781-30 ")
- +170 ;;2081
- +171 ;;21,"60346-0813-08 ")
- +172 ;;1848
- +173 ;;21,"60346-0813-25 ")
- +174 ;;1849
- +175 ;;21,"60346-0813-30 ")
- +176 ;;1850
- +177 ;;21,"60346-0813-60 ")
- +178 ;;1851
- +179 ;;21,"60346-0813-90 ")
- +180 ;;1852
- +181 ;;21,"60346-0916-30 ")
- +182 ;;1747
- +183 ;;21,"60346-0917-30 ")
- +184 ;;1689
- +185 ;;21,"60346-0959-30 ")
- +186 ;;2200
- +187 ;;21,"60346-0960-10 ")
- +188 ;;565
- +189 ;;21,"60346-0960-13 ")
- +190 ;;566
- +191 ;;21,"60346-0960-25 ")
- +192 ;;567
- +193 ;;21,"60346-0960-30 ")
- +194 ;;568
- +195 ;;21,"60346-0960-62 ")
- +196 ;;569
- +197 ;;21,"60346-0960-90 ")
- +198 ;;570
- +199 ;;21,"60346-0962-25 ")
- +200 ;;664
- +201 ;;21,"60346-0995-30 ")
- +202 ;;312
- +203 ;;21,"60346-0995-60 ")
- +204 ;;313
- +205 ;;21,"60429-0143-05 ")
- +206 ;;53
- +207 ;;21,"60429-0143-30 ")
- +208 ;;54
- +209 ;;21,"60429-0143-90 ")
- +210 ;;55
- +211 ;;21,"60429-0144-05 ")
- +212 ;;204
- +213 ;;21,"60429-0144-30 ")
- +214 ;;205
- +215 ;;21,"60429-0144-90 ")
- +216 ;;206
- +217 ;;21,"60429-0145-05 ")
- +218 ;;344
- +219 ;;21,"60429-0145-30 ")
- +220 ;;345
- +221 ;;21,"60429-0145-90 ")
- +222 ;;346
- +223 ;;21,"60429-0197-60 ")
- +224 ;;1920
- +225 ;;21,"60429-0198-30 ")
- +226 ;;2191
- +227 ;;21,"60429-0198-60 ")
- +228 ;;2192
- +229 ;;21,"60429-0198-90 ")
- +230 ;;2193
- +231 ;;21,"60429-0237-90 ")
- +232 ;;2095
- +233 ;;21,"60505-0007-04 ")
- +234 ;;945
- +235 ;;21,"60505-0007-08 ")
- +236 ;;946
- +237 ;;21,"60505-0008-04 ")
- +238 ;;1016
- +239 ;;21,"60505-0008-08 ")
- +240 ;;1017
- +241 ;;21,"60505-0009-04 ")
- +242 ;;1079
- +243 ;;21,"60505-0009-08 ")
- +244 ;;1080
- +245 ;;21,"60505-0010-04 ")
- +246 ;;1150
- +247 ;;21,"60505-0010-08 ")
- +248 ;;1151
- +249 ;;21,"60505-0014-06 ")
- +250 ;;711
- +251 ;;21,"60505-0014-08 ")
- +252 ;;712
- +253 ;;21,"60505-0015-06 ")
- +254 ;;734
- +255 ;;21,"60505-0015-08 ")
- +256 ;;735
- +257 ;;21,"60505-0016-06 ")
- +258 ;;758
- +259 ;;21,"60505-0016-08 ")
- +260 ;;759
- +261 ;;21,"60505-0193-02 ")
- +262 ;;29
- +263 ;;21,"60505-0193-03 ")
- +264 ;;56
- +265 ;;21,"60505-0194-02 ")
- +266 ;;202
- +267 ;;21,"60505-0194-03 ")
- +268 ;;203
- +269 ;;21,"60505-0195-02 ")
- +270 ;;347
- +271 ;;21,"60505-0195-03 ")
- +272 ;;348
- +273 ;;21,"60505-0210-03 ")
- +274 ;;791
- +275 ;;21,"60505-0210-09 ")
- +276 ;;792
- +277 ;;21,"60505-0211-03 ")
- +278 ;;818
- +279 ;;21,"60505-0211-09 ")
- +280 ;;819
- +281 ;;21,"60505-0212-03 ")
- +282 ;;846
- +283 ;;21,"60505-0212-09 ")
- +284 ;;847
- +285 ;;21,"60505-0213-03 ")
- +286 ;;873
- +287 ;;21,"60505-0213-09 ")
- +288 ;;874
- +289 ;;21,"60505-0214-03 ")
- +290 ;;905
- +291 ;;21,"60505-0214-09 ")
- +292 ;;906
- +293 ;;21,"60505-2740-01 ")
- +294 ;;2008
- +295 ;;21,"60505-2741-01 ")
- +296 ;;2050
- +297 ;;21,"60505-2741-05 ")
- +298 ;;2051
- +299 ;;21,"60505-2742-01 ")
- +300 ;;2182
- +301 ;;21,"60505-2742-05 ")
- +302 ;;2183
- +303 ;;21,"60598-0120-30 ")
- +304 ;;1190
- +305 ;;21,"60598-0120-90 ")
- +306 ;;1191
- +307 ;;21,"60598-0121-30 ")
- +308 ;;1192
- +309 ;;21,"60598-0121-60 ")
- +310 ;;1193
- +311 ;;21,"60598-0121-90 ")
- +312 ;;1194
- +313 ;;21,"60598-0122-30 ")
- +314 ;;1206
- +315 ;;21,"60598-0122-90 ")
- +316 ;;1207
- +317 ;;21,"60598-0123-30 ")
- +318 ;;1217
- +319 ;;21,"60598-0123-90 ")
- +320 ;;1218
- +321 ;;21,"60598-0124-30 ")
- +322 ;;1230
- +323 ;;21,"60598-0124-90 ")
- +324 ;;1225
- +325 ;;21,"60598-0125-30 ")
- +326 ;;1238
- +327 ;;21,"60598-0125-90 ")
- +328 ;;1239
- +329 ;;21,"60760-0072-30 ")
- +330 ;;1121
- +331 ;;21,"60760-0072-90 ")
- +332 ;;1122
- +333 ;;21,"60760-0182-30 ")
- +334 ;;1677
- +335 ;;21,"60760-0182-90 ")
- +336 ;;1678
- +337 ;;21,"60760-0183-30 ")
- +338 ;;1741
- +339 ;;21,"60760-0183-90 ")
- +340 ;;1742
- +341 ;;21,"60760-0238-30 ")
- +342 ;;163
- +343 ;;21,"60760-0238-90 ")
- +344 ;;164
- +345 ;;21,"60760-0239-30 ")
- +346 ;;435
- +347 ;;21,"60760-0239-90 ")
- +348 ;;436
- +349 ;;21,"60760-0984-30 ")
- +350 ;;2157
- +351 ;;21,"60760-0984-90 ")
- +352 ;;2158
- +353 ;;21,"62037-0548-01 ")
- +354 ;;709
- +355 ;;21,"62037-0548-10 ")
- +356 ;;710
- +357 ;;21,"62037-0549-01 ")
- +358 ;;732
- +359 ;;21,"62037-0549-10 ")
- +360 ;;733
- +361 ;;21,"62037-0550-01 ")
- +362 ;;756
- +363 ;;21,"62037-0550-10 ")
- +364 ;;757
- +365 ;;21,"62037-0597-05 ")
- +366 ;;943
- +367 ;;21,"62037-0597-90 ")
- +368 ;;944
- +369 ;;21,"62037-0598-05 ")
- +370 ;;1014
- +371 ;;21,"62037-0598-90 ")
- +372 ;;1015
- +373 ;;21,"62037-0599-05 ")
- +374 ;;1077
- +375 ;;21,"62037-0599-90 ")
- +376 ;;1078
- +377 ;;21,"62037-0600-05 ")
- +378 ;;1148
- +379 ;;21,"62037-0600-90 ")
- +380 ;;1149
- +381 ;;21,"62037-0691-30 ")
- +382 ;;1200
- +383 ;;21,"62037-0691-90 ")
- +384 ;;1201
- +385 ;;21,"62037-0692-30 ")
- +386 ;;1211
- +387 ;;21,"62037-0692-90 ")
- +388 ;;1212
- +389 ;;21,"62037-0693-30 ")
- +390 ;;1221
- +391 ;;21,"62037-0693-90 ")
- +392 ;;1222
- +393 ;;21,"62037-0694-30 ")
- +394 ;;1234
- +395 ;;21,"62037-0694-90 ")
- +396 ;;1235
- +397 ;;21,"62037-0695-30 ")
- +398 ;;1245
- +399 ;;21,"62037-0695-90 ")
- +400 ;;1246
- +401 ;;21,"62037-0696-05 ")
- +402 ;;793
- +403 ;;21,"62037-0696-30 ")
- +404 ;;794
- +405 ;;21,"62037-0696-90 ")
- +406 ;;795
- +407 ;;21,"62037-0697-05 ")
- +408 ;;820
- +409 ;;21,"62037-0697-30 ")
- +410 ;;821
- +411 ;;21,"62037-0697-90 ")
- +412 ;;822
- +413 ;;21,"62037-0698-05 ")
- +414 ;;849
- +415 ;;21,"62037-0698-30 ")
- +416 ;;850
- +417 ;;21,"62037-0698-90 ")
- +418 ;;848
- +419 ;;21,"62037-0699-05 ")
- +420 ;;875
- +421 ;;21,"62037-0699-30 ")
- +422 ;;876
- +423 ;;21,"62037-0699-90 ")
- +424 ;;877
- +425 ;;21,"62037-0700-05 ")
- +426 ;;907
- +427 ;;21,"62037-0700-30 ")
- +428 ;;908
- +429 ;;21,"62037-0700-90 ")
- +430 ;;909
- +431 ;;21,"62037-0787-01 ")
- +432 ;;1788
- +433 ;;21,"62175-0260-37 ")
- +434 ;;1665
- +435 ;;21,"62175-0260-43 ")
- +436 ;;1666
- +437 ;;21,"62175-0260-46 ")
- +438 ;;1667
- +439 ;;21,"62175-0260-55 ")
- +440 ;;1668
- +441 ;;21,"62175-0261-37 ")
- +442 ;;1732
- +443 ;;21,"62175-0261-43 ")
- +444 ;;1733
- +445 ;;21,"62175-0261-46 ")
- +446 ;;1734
- +447 ;;21,"62175-0261-55 ")
- +448 ;;1735
- +449 ;;21,"62175-0262-32 ")
- +450 ;;1781
- +451 ;;21,"62175-0262-37 ")
- +452 ;;1782
- +453 ;;21,"62175-0262-46 ")
- +454 ;;1783
- +455 ;;21,"62175-0485-37 ")
- +456 ;;2209
- +457 ;;21,"62175-0486-37 ")
- +458 ;;2235
- +459 ;;21,"62175-0487-37 ")
- +460 ;;2259
- +461 ;;21,"62175-0570-37 ")
- +462 ;;2213
- +463 ;;21,"62175-0571-37 ")
- +464 ;;2241
- +465 ;;21,"62175-0572-37 ")
- +466 ;;2261
- +467 ;;21,"62175-0580-37 ")
- +468 ;;2225
- +469 ;;21,"62175-0581-37 ")
- +470 ;;2234
- +471 ;;21,"62175-0582-37 ")
- +472 ;;2251
- +473 ;;21,"62175-0583-37 ")
- +474 ;;2268
- +475 ;;21,"62451-0733-19 ")
- +476 ;;740
- +477 ;;21,"62451-0734-19 ")
- +478 ;;764
- +479 ;;21,"62451-8841-54 ")
- +480 ;;1496
- +481 ;;21,"62451-8841-72 ")
- +482 ;;1497
- +483 ;;21,"62451-8851-54 ")
- +484 ;;1565
- +485 ;;21,"62451-8851-72 ")
- +486 ;;1566
- +487 ;;21,"62451-8861-51 ")
- +488 ;;1630
- +489 ;;21,"62584-0366-33 ")
- +490 ;;533
- +491 ;;21,"62584-0367-01 ")
- +492 ;;606
- +493 ;;21,"62584-0367-33 ")
- +494 ;;607
- +495 ;;21,"62584-0974-01 ")
- +496 ;;953
- +497 ;;21,"62584-0974-11 ")
- +498 ;;954
- +499 ;;21,"62584-0974-30 ")
- +500 ;;955
- +501 ;;21,"62584-0974-80 ")
- +502 ;;956
- +503 ;;21,"62584-0974-85 ")
- +504 ;;957
- +505 ;;21,"62584-0974-90 ")
- +506 ;;958
- +507 ;;21,"62584-0975-01 ")
- +508 ;;1037
- +509 ;;21,"62584-0975-11 ")
- +510 ;;1038
- +511 ;;21,"62584-0975-30 ")
- +512 ;;1039
- +513 ;;21,"62584-0975-80 ")
- +514 ;;1040
- +515 ;;21,"62584-0975-85 ")
- +516 ;;1041
- +517 ;;21,"62584-0975-90 ")
- +518 ;;1042
- +519 ;;21,"62584-0976-01 ")
- +520 ;;1105
- +521 ;;21,"62584-0976-11 ")
- +522 ;;1106
- +523 ;;21,"62584-0976-30 ")
- +524 ;;1107
- +525 ;;21,"62584-0976-80 ")
- +526 ;;1108
- +527 ;;21,"62584-0976-85 ")
- +528 ;;1109
- +529 ;;21,"62584-0976-90 ")
- +530 ;;1110
- +531 ;;21,"62584-0977-01 ")
- +532 ;;1166
- +533 ;;21,"62584-0977-11 ")
- +534 ;;1167
- +535 ;;21,"62584-0977-30 ")
- +536 ;;1168
- +537 ;;21,"62584-0977-90 ")
- +538 ;;1169
- +539 ;;21,"62682-6034-06 ")
- +540 ;;685
- +541 ;;21,"62682-6035-06 ")
- +542 ;;695
- +543 ;;21,"63304-0435-01 ")
- +544 ;;1250
- +545 ;;21,"63304-0436-01 ")
- +546 ;;1287
- +547 ;;21,"63304-0437-01 ")
- +548 ;;1345
- +549 ;;21,"63304-0488-01 ")
- +550 ;;2018
- +551 ;;21,"63304-0489-01 ")
- +552 ;;2099
- +553 ;;21,"63304-0490-01 ")
- +554 ;;2203
- +555 ;;21,"63304-0490-05 ")
- +556 ;;2204
- +557 ;;21,"63304-0499-30 ")
- +558 ;;2654
- +559 ;;21,"63304-0500-30 ")
- +560 ;;2677
- +561 ;;21,"63304-0501-30 ")
- +562 ;;2617
- +563 ;;21,"63304-0502-30 ")
- +564 ;;2621
- +565 ;;21,"63304-0503-30 ")
- +566 ;;2626
- +567 ;;21,"63304-0587-30 ")
- +568 ;;2632
- +569 ;;21,"63304-0588-30 ")
- +570 ;;2642
- +571 ;;21,"63304-0589-30 ")
- +572 ;;2649
- +573 ;;21,"63304-0590-30 ")
- +574 ;;2660
- +575 ;;21,"63304-0591-30 ")
- +576 ;;2668
- +577 ;;21,"63304-0603-30 ")
- +578 ;;2682
- +579 ;;21,"63629-1454-01 ")
- +580 ;;2395
- +581 ;;21,"63629-1559-01 ")
+582 ;;1669
+583 ;;21,"63629-1559-02 ")
+584 ;;1670
+585 ;;21,"63629-1560-01 ")
+586 ;;1731
+587 ;;21,"63629-1561-01 ")
+588 ;;1784
+589 ;;21,"63629-1561-02 ")
+590 ;;1785
+591 ;;21,"63629-1561-03 ")
+592 ;;1786
+593 ;;21,"63629-1561-04 ")
+594 ;;1787
+595 ;;21,"63629-1565-01 ")
+596 ;;332
+597 ;;21,"63629-1565-02 ")
+598 ;;333
+599 ;;21,"63629-1565-03 ")
+600 ;;334
+601 ;;21,"63629-1566-01 ")
+602 ;;197
+603 ;;21,"63629-1566-02 ")
+604 ;;198
+605 ;;21,"63629-1566-03 ")
+606 ;;199
+607 ;;21,"63629-1566-04 ")
+608 ;;200
+609 ;;21,"63629-1566-05 ")
+610 ;;201
+611 ;;21,"63629-1597-01 ")
+612 ;;1319
+613 ;;21,"63629-3052-01 ")
+614 ;;2178
+615 ;;21,"63629-3052-02 ")
+616 ;;2179
+617 ;;21,"63629-3564-01 ")
+618 ;;1117
+619 ;;21,"63629-3649-01 ")
+620 ;;635
+621 ;;21,"63629-3678-01 ")
+622 ;;30
+623 ;;21,"63629-3750-01 ")
+624 ;;1558
+625 ;;21,"63629-4073-01 ")
+626 ;;2082
+627 ;;21,"63629-4089-01 ")
+628 ;;1484
+629 ;;21,"63629-4337-01 ")
+630 ;;1917
+631 ;;21,"63629-4717-01 ")
+632 ;;1890
+633 ;;21,"63672-0044-03 ")
+634 ;;67
+635 ;;21,"63672-0045-03 ")
+636 ;;226
+637 ;;21,"63672-0046-03 ")
+638 ;;368
+639 ;;21,"63739-0079-01 ")
+640 ;;534
+641 ;;21,"63739-0079-02 ")
+642 ;;535
+643 ;;21,"63739-0079-03 ")
+644 ;;536
+645 ;;21,"63739-0079-10 ")
+646 ;;537
+647 ;;21,"63739-0079-15 ")
+648 ;;538
+649 ;;21,"63739-0080-01 ")
+650 ;;609
+651 ;;21,"63739-0080-02 ")
+652 ;;610
+653 ;;21,"63739-0080-03 ")
+654 ;;611
+655 ;;21,"63739-0080-10 ")
+656 ;;612
+657 ;;21,"63739-0080-15 ")
+658 ;;613
+659 ;;21,"63739-0283-10 ")
+660 ;;988
+661 ;;21,"63739-0283-15 ")
+662 ;;989
+663 ;;21,"63739-0283-31 ")
+664 ;;948
+665 ;;21,"63739-0284-10 ")
+666 ;;1046
+667 ;;21,"63739-0284-15 ")
+668 ;;1047
+669 ;;21,"63739-0284-31 ")
+670 ;;1045
+671 ;;21,"63739-0285-04 ")
+672 ;;1111
+673 ;;21,"63739-0285-10 ")
+674 ;;1119
+675 ;;21,"63739-0285-15 ")
+676 ;;1120
+677 ;;21,"63739-0285-31 ")
+678 ;;1112
+679 ;;21,"63739-0286-15 ")
+680 ;;1173
+681 ;;21,"63739-0451-10 ")
+682 ;;1537
+683 ;;21,"63739-0452-10 ")
+684 ;;1603
+685 ;;21,"64455-0100-10 ")
+686 ;;1185
+687 ;;21,"64455-0100-30 ")
+688 ;;1186
+689 ;;21,"64455-0100-90 ")
+690 ;;1187
+691 ;;21,"64455-0101-10 ")
+692 ;;1197
+693 ;;21,"64455-0101-30 ")
+694 ;;1198
+695 ;;21,"64455-0101-90 ")
+696 ;;1199
+697 ;;21,"64455-0102-10 ")
+698 ;;1208
+699 ;;21,"64455-0102-30 ")
+700 ;;1209
+701 ;;21,"64455-0102-90 ")
+702 ;;1210
+703 ;;21,"64455-0103-30 ")
+704 ;;1219
+705 ;;21,"64455-0103-90 ")
+706 ;;1220
+707 ;;21,"64455-0104-10 ")
+708 ;;1231
+709 ;;21,"64455-0104-30 ")
+710 ;;1232
+711 ;;21,"64455-0104-90 ")
+712 ;;1233
+713 ;;21,"64455-0105-10 ")
+714 ;;1242
+715 ;;21,"64455-0105-30 ")
+716 ;;1243
+717 ;;21,"64455-0105-90 ")
+718 ;;1244
+719 ;;21,"64455-0771-47 ")
+720 ;;516
+721 ;;21,"64455-0771-55 ")
+722 ;;517
+723 ;;21,"64455-0772-47 ")
+724 ;;582
+725 ;;21,"64455-0772-55 ")
+726 ;;583
+727 ;;21,"64455-0791-47 ")
+728 ;;644
+729 ;;21,"64455-0792-47 ")
+730 ;;669
+731 ;;21,"64455-0795-30 ")
+732 ;;939
+733 ;;21,"64455-0795-42 ")
+734 ;;940
+735 ;;21,"64455-0795-49 ")
+736 ;;941
+737 ;;21,"64455-0796-30 ")
+738 ;;1009
+739 ;;21,"64455-0796-42 ")
+740 ;;1010
+741 ;;21,"64455-0796-49 ")
+742 ;;1011
+743 ;;21,"64455-0796-50 ")
+744 ;;1012
+745 ;;21,"64455-0797-30 ")
+746 ;;1069
+747 ;;21,"64455-0797-42 ")
+748 ;;1070
+749 ;;21,"64455-0797-49 ")
+750 ;;1071
+751 ;;21,"64455-0798-30 ")
+752 ;;1144
+753 ;;21,"64455-0798-42 ")
+754 ;;1145
+755 ;;21,"64455-0798-49 ")
+756 ;;1146
+757 ;;21,"64455-0799-42 ")
+758 ;;1181
+759 ;;21,"64679-0421-01 ")
+760 ;;7
+761 ;;21,"64679-0422-01 ")
+762 ;;147
+763 ;;21,"64679-0422-02 ")
+764 ;;148
+765 ;;21,"64679-0423-01 ")
+766 ;;458
+767 ;;21,"64679-0423-02 ")
+768 ;;459
+769 ;;21,"65084-0412-18 ")
+770 ;;1516
+771 ;;21,"65162-0006-09 ")
+772 ;;41
+773 ;;21,"65162-0006-50 ")
+774 ;;42
+775 ;;21,"65162-0007-09 ")
+776 ;;208
+777 ;;21,"65162-0007-50 ")
+778 ;;209
+779 ;;21,"65162-0008-09 ")
+780 ;;350
+781 ;;21,"65162-0008-50 ")
+782 ;;351