BGP47Y4.m

BGP47Y4 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 17, 2014;

 ;;14.1;IHS CLINICAL REPORTING;;MAY 29, 2014;Build 114

 ;

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)

 ;;21,"00781-5204-92 ")

 ;;4833

 ;;21,"00781-5206-10 ")

 ;;4772

 ;;21,"00781-5206-31 ")

 ;;4773

 ;;21,"00781-5206-92 ")

 ;;4774

 ;;21,"00781-5207-10 ")

 ;;4901

 ;;21,"00781-5207-31 ")

 ;;4902

 ;;21,"00781-5207-92 ")

 ;;4903

 ;;21,"00781-5320-01 ")

 ;;2961

 ;;21,"00781-5321-01 ")

 ;;2985

 ;;21,"00781-5322-01 ")

 ;;3004

 ;;21,"00781-5441-01 ")

 ;;726

 ;;21,"00781-5441-10 ")

 ;;727

 ;;21,"00781-5442-01 ")

 ;;826

 ;;21,"00781-5442-10 ")

 ;;827

 ;;21,"00781-5443-01 ")

 ;;981

 ;;21,"00781-5443-10 ")

 ;;982

 ;;21,"00781-5444-01 ")

 ;;1144

 ;;21,"00781-5444-10 ")

 ;;1145

 ;;21,"00781-5700-10 ")

 ;;3291

 ;;21,"00781-5700-92 ")

 ;;3292

 ;;21,"00781-5701-10 ")

 ;;3384

 ;;21,"00781-5701-31 ")

 ;;3385

 ;;21,"00781-5701-92 ")

 ;;3386

 ;;21,"00781-5702-10 ")

 ;;3487

 ;;21,"00781-5702-31 ")

 ;;3488

 ;;21,"00781-5702-92 ")

 ;;3489

 ;;21,"00781-5805-10 ")

 ;;3293

 ;;21,"00781-5805-92 ")

 ;;3294

 ;;21,"00781-5806-10 ")

 ;;3381

 ;;21,"00781-5806-31 ")

 ;;3382

 ;;21,"00781-5806-92 ")

 ;;3383

 ;;21,"00781-5807-10 ")

 ;;3490

 ;;21,"00781-5807-31 ")

 ;;3491

 ;;21,"00781-5807-92 ")

 ;;3492

 ;;21,"00781-5816-10 ")

 ;;4775

 ;;21,"00781-5816-31 ")

 ;;4776

 ;;21,"00781-5816-92 ")

 ;;4777

 ;;21,"00781-5817-10 ")

 ;;4825

 ;;21,"00781-5817-31 ")

 ;;4826

 ;;21,"00781-5817-92 ")

 ;;4827

 ;;21,"00781-5818-10 ")

 ;;4898

 ;;21,"00781-5818-31 ")

 ;;4899

 ;;21,"00781-5818-92 ")

 ;;4900

 ;;21,"00781-5936-31 ")

 ;;3025

 ;;21,"00781-5937-31 ")

 ;;3032

 ;;21,"00781-5938-31 ")

 ;;3047

 ;;21,"00781-5938-92 ")

 ;;3048

 ;;21,"00781-5939-31 ")

 ;;3058

 ;;21,"00781-5939-92 ")

 ;;3059

 ;;21,"00781-5948-10 ")

 ;;5027

 ;;21,"00781-5948-92 ")

 ;;5028

 ;;21,"00781-5949-10 ")

 ;;5086

 ;;21,"00781-5949-64 ")

 ;;5087

 ;;21,"00781-5949-92 ")

 ;;5088

 ;;21,"00781-5950-10 ")

 ;;5136

 ;;21,"00781-5950-64 ")

 ;;5137

 ;;21,"00781-5950-92 ")

 ;;5138

 ;;21,"00781-5951-10 ")

 ;;5166

 ;;21,"00781-5951-64 ")

 ;;5167

 ;;21,"00781-5951-92 ")

 ;;5168

 ;;21,"00781-5952-10 ")

 ;;5195

 ;;21,"00781-5952-64 ")

 ;;5196

 ;;21,"00781-5952-92 ")

 ;;5197

 ;;21,"00904-5045-60 ")

 ;;380

 ;;21,"00904-5045-61 ")

 ;;381

 ;;21,"00904-5045-80 ")

 ;;382

 ;;21,"00904-5046-60 ")

 ;;483

 ;;21,"00904-5046-61 ")

 ;;484

 ;;21,"00904-5046-80 ")

 ;;485

 ;;21,"00904-5047-60 ")

 ;;597

 ;;21,"00904-5047-61 ")

 ;;598

 ;;21,"00904-5047-80 ")

 ;;599

 ;;21,"00904-5048-60 ")

 ;;654

 ;;21,"00904-5501-60 ")

 ;;725

 ;;21,"00904-5502-60 ")

 ;;828

 ;;21,"00904-5502-61 ")

 ;;829

 ;;21,"00904-5502-80 ")

 ;;830

 ;;21,"00904-5503-60 ")

 ;;979

 ;;21,"00904-5503-80 ")

 ;;980

 ;;21,"00904-5504-60 ")

 ;;1146

 ;;21,"00904-5504-80 ")

 ;;1147

 ;;21,"00904-5609-60 ")

 ;;728

 ;;21,"00904-5609-61 ")

 ;;729

 ;;21,"00904-5610-60 ")

 ;;983

 ;;21,"00904-5610-61 ")

 ;;984

 ;;21,"00904-5610-80 ")

 ;;985

 ;;21,"00904-5611-60 ")

 ;;1141

 ;;21,"00904-5611-61 ")

 ;;1142

 ;;21,"00904-5611-80 ")

 ;;1143

 ;;21,"00904-5637-61 ")

 ;;1509

 ;;21,"00904-5638-43 ")

 ;;1620

 ;;21,"00904-5638-46 ")

 ;;1621

 ;;21,"00904-5638-61 ")

 ;;1622

 ;;21,"00904-5638-89 ")

 ;;1623

 ;;21,"00904-5639-43 ")

 ;;1788

 ;;21,"00904-5639-46 ")

 ;;1789

 ;;21,"00904-5639-48 ")

 ;;1790

 ;;21,"00904-5639-61 ")

 ;;1791

 ;;21,"00904-5639-89 ")

 ;;1792

 ;;21,"00904-5639-93 ")

 ;;1793

 ;;21,"00904-5640-43 ")

 ;;2132

 ;;21,"00904-5640-46 ")

 ;;2133

 ;;21,"00904-5640-48 ")

 ;;2134

 ;;21,"00904-5640-61 ")

 ;;2135

 ;;21,"00904-5640-89 ")

 ;;2136

 ;;21,"00904-5640-93 ")

 ;;2137

 ;;21,"00904-5641-61 ")

 ;;2299

 ;;21,"00904-5642-43 ")

 ;;2345

 ;;21,"00904-5642-46 ")

 ;;2346

 ;;21,"00904-5642-48 ")

 ;;2347

 ;;21,"00904-5642-52 ")

 ;;2348

 ;;21,"00904-5642-61 ")

 ;;2349

 ;;21,"00904-5642-89 ")

 ;;2350

 ;;21,"00904-5642-93 ")

 ;;2351

 ;;21,"00904-5701-61 ")

 ;;825

 ;;21,"00904-5757-89 ")

 ;;4359

 ;;21,"00904-5778-89 ")

 ;;1510

 ;;21,"00904-5808-43 ")

 ;;1794

 ;;21,"00904-5808-46 ")

 ;;1795

 ;;21,"00904-5808-48 ")

 ;;1796

 ;;21,"00904-5808-61 ")

 ;;1797

 ;;21,"00904-5808-80 ")

 ;;1798

 ;;21,"00904-5808-89 ")

 ;;1799

 ;;21,"00904-5808-93 ")

 ;;1800

 ;;21,"00904-5809-43 ")

 ;;2125

 ;;21,"00904-5809-46 ")

 ;;2126

 ;;21,"00904-5809-48 ")

 ;;2127

 ;;21,"00904-5809-61 ")

 ;;2128

 ;;21,"00904-5809-80 ")

 ;;2129

 ;;21,"00904-5809-89 ")

 ;;2130

 ;;21,"00904-5809-93 ")

 ;;2131

 ;;21,"00904-5810-43 ")

 ;;2352

 ;;21,"00904-5810-46 ")

 ;;2353

 ;;21,"00904-5810-48 ")

 ;;2354

 ;;21,"00904-5810-52 ")

 ;;2355

 ;;21,"00904-5810-61 ")

 ;;2356

 ;;21,"00904-5810-80 ")

 ;;2357

 ;;21,"00904-5810-89 ")

 ;;2358

 ;;21,"00904-5810-93 ")

 ;;2359

 ;;21,"00904-5811-43 ")

 ;;1648

 ;;21,"00904-5811-46 ")

 ;;1649

 ;;21,"00904-5811-61 ")

 ;;1650

 ;;21,"00904-5811-80 ")

 ;;1651

 ;;21,"00904-5811-89 ")

 ;;1652

 ;;21,"00904-5812-40 ")

 ;;1517

 ;;21,"00904-5812-89 ")

 ;;1518

 ;;21,"00904-6189-40 ")

 ;;13

 ;;21,"00904-6190-40 ")

 ;;82

 ;;21,"00904-6191-40 ")

 ;;191

 ;;21,"00904-6192-40 ")

 ;;252

 ;;21,"00955-1040-30 ")

 ;;3098

 ;;21,"00955-1040-90 ")

 ;;3099

 ;;21,"00955-1041-30 ")

 ;;3164

 ;;21,"00955-1041-90 ")

 ;;3165

 ;;21,"00955-1042-30 ")

 ;;3229

 ;;21,"00955-1042-90 ")

 ;;3230

 ;;21,"00955-1045-30 ")

 ;;4694

 ;;21,"00955-1045-90 ")

 ;;4695

 ;;21,"00955-1046-30 ")

 ;;4722

 ;;21,"00955-1046-90 ")

 ;;4723

 ;;21,"10544-0170-30 ")

 ;;1003

 ;;21,"10544-0237-30 ")

 ;;4442

 ;;21,"10544-0238-60 ")

 ;;1761

 ;;21,"10544-0239-60 ")

 ;;2179

 ;;21,"10544-0240-30 ")

 ;;2385

 ;;21,"10544-0564-30 ")

 ;;4373

 ;;21,"12280-0005-90 ")

 ;;3264

 ;;21,"12280-0008-00 ")

 ;;3660

 ;;21,"12280-0008-90 ")

 ;;3661

 ;;21,"12280-0009-90 ")

 ;;5106

 ;;21,"12280-0033-00 ")

 ;;326

 ;;21,"12280-0059-90 ")

 ;;2609

 ;;21,"12280-0061-00 ")

 ;;2884

 ;;21,"12280-0063-30 ")

 ;;3137

 ;;21,"12280-0063-90 ")

 ;;3138

 ;;21,"12280-0066-30 ")

 ;;3445

 ;;21,"12280-0067-15 ")

 ;;5065

 ;;21,"12280-0067-30 ")

 ;;5066

 ;;21,"12280-0067-90 ")

 ;;5067

 ;;21,"12280-0120-30 ")

 ;;4073

 ;;21,"12280-0121-30 ")

 ;;4045

 ;;21,"12280-0123-30 ")

 ;;4022

 ;;21,"12280-0124-30 ")

 ;;4443

 ;;21,"12280-0126-30 ")

 ;;4371

 ;;21,"12280-0126-60 ")

 ;;4372

 ;;21,"12280-0127-30 ")

 ;;4222

 ;;21,"12280-0129-60 ")

 ;;2293

 ;;21,"12280-0144-00 ")

 ;;2178

 ;;21,"12280-0168-30 ")

 ;;3577

 ;;21,"12280-0168-90 ")

 ;;3578

 ;;21,"12280-0183-30 ")

 ;;4223

 ;;21,"12280-0220-00 ")

 ;;4074

 ;;21,"12280-0228-90 ")

 ;;2669

 ;;21,"12280-0340-30 ")

 ;;3056

 ;;21,"12280-0369-30 ")

 ;;3202

 ;;21,"12280-0369-90 ")

 ;;3203

 ;;21,"12280-0370-30 ")

 ;;4670

 ;;21,"12280-0370-90 ")

 ;;4671

 ;;21,"12280-0371-30 ")

 ;;4708

 ;;21,"12280-0371-90 ")

 ;;4709

 ;;21,"12280-0375-30 ")

 ;;3555

 ;;21,"12280-0375-90 ")

 ;;3556

 ;;21,"12280-0378-90 ")

 ;;3710

 ;;21,"12280-0379-90 ")

 ;;5153

 ;;21,"12280-0380-30 ")

 ;;4756

 ;;21,"12280-0380-90 ")

 ;;4757

 ;;21,"12280-0382-30 ")

 ;;4979

 ;;21,"12280-0383-30 ")

 ;;4987

 ;;21,"12280-0400-30 ")

 ;;3711

 ;;21,"13411-0106-01 ")

 ;;3143

 ;;21,"13411-0106-03 ")

 ;;3144

 ;;21,"13411-0106-06 ")

 ;;3145

 ;;21,"13411-0106-09 ")

 ;;3146

 ;;21,"13411-0106-15 ")

 ;;3147

 ;;21,"13411-0107-01 ")

 ;;3207

 ;;21,"13411-0107-03 ")

 ;;3208

 ;;21,"13411-0107-06 ")

 ;;3209

 ;;21,"13411-0107-09 ")

 ;;3210

 ;;21,"13411-0107-15 ")

 ;;3211

 ;;21,"13411-0142-01 ")

 ;;3643

 ;;21,"13411-0142-02 ")

 ;;3644

 ;;21,"13411-0142-03 ")

 ;;3645

 ;;21,"13411-0142-06 ")

 ;;3646

 ;;21,"13411-0142-09 ")

 ;;3647

 ;;21,"13411-0143-01 ")

 ;;3669

 ;;21,"13411-0143-02 ")

 ;;3670

 ;;21,"13411-0143-03 ")

 ;;3671

 ;;21,"13411-0143-06 ")

 ;;3672

 ;;21,"13411-0143-09 ")

 ;;3673

 ;;21,"13411-0144-01 ")

 ;;5017

 ;;21,"13411-0144-02 ")

 ;;5018

 ;;21,"13411-0144-03 ")

 ;;5019

 ;;21,"13411-0144-06 ")

 ;;5020

 ;;21,"13411-0144-09 ")

 ;;5021

 ;;21,"13411-0145-01 ")

 ;;5073

 ;;21,"13411-0145-02 ")

 ;;5074

 ;;21,"13411-0145-03 ")

 ;;5075

 ;;21,"13411-0145-06 ")

 ;;5076

 ;;21,"13411-0145-09 ")

 ;;5077

 ;;21,"13411-0156-01 ")

 ;;5112

 ;;21,"13411-0156-02 ")

 ;;5113

 ;;21,"13411-0156-03 ")

 ;;5114

 ;;21,"13411-0156-06 ")

 ;;5115

 ;;21,"13411-0156-09 ")

 ;;5116

 ;;21,"13411-0184-02 ")

 ;;614

 ;;21,"13411-0184-03 ")

 ;;615

 ;;21,"13411-0184-06 ")

 ;;616

 ;;21,"13411-0184-09 ")

 ;;617

 ;;21,"13411-0184-10 ")

 ;;618

 ;;21,"13668-0113-10 ")

 ;;3276

 ;;21,"13668-0113-90 ")

 ;;3277

 ;;21,"13668-0114-10 ")

 ;;3367

 ;;21,"13668-0114-30 ")

 ;;3368

 ;;21,"13668-0114-90 ")

 ;;3369

 ;;21,"13668-0115-10 ")

 ;;3469

 ;;21,"13668-0115-30 ")

 ;;3470

 ;;21,"13668-0115-90 ")

 ;;3471

 ;;21,"13668-0116-10 ")

 ;;4785

 ;;21,"13668-0116-30 ")

 ;;4786

 ;;21,"13668-0116-90 ")

 ;;4787

 ;;21,"13668-0117-10 ")

 ;;4851

 ;;21,"13668-0117-30 ")

 ;;4852

 ;;21,"13668-0117-90 ")

 ;;4853

 ;;21,"13668-0118-10 ")

 ;;4909

 ;;21,"13668-0118-30 ")

 ;;4910

 ;;21,"13668-0118-90 ")

 ;;4911

 ;;21,"13668-0409-10 ")

 ;;3431

 ;;21,"13668-0409-30 ")

 ;;3432

 ;;21,"13668-0409-90 ")

 ;;3433

 ;;21,"13811-0627-10 ")

 ;;36

 ;;21,"13811-0628-10 ")

 ;;56

 ;;21,"13811-0628-50 ")

 ;;57

 ;;21,"13811-0629-10 ")

 ;;158

 ;;21,"13811-0629-50 ")

 ;;159

 ;;21,"13811-0630-10 ")

 ;;293

 ;;21,"13811-0630-50 ")

 ;;294

 ;;21,"15338-0200-30 ")

 ;;740

 ;;21,"15338-0211-30 ")

 ;;902

 ;;21,"15338-0220-30 ")

 ;;1041

 ;;21,"15338-0222-30 ")

 ;;1042

 ;;21,"15338-0233-30 ")

 ;;1199

 ;;21,"16252-0541-30 ")

 ;;2970

 ;;21,"16252-0542-90 ")

 ;;2989

 ;;21,"16252-0543-90 ")

 ;;3014

 ;;21,"16252-0570-30 ")

 ;;2727

 ;;21,"16252-0571-01 ")

 ;;2760

 ;;21,"16252-0571-50 ")

 ;;2761

 ;;21,"16252-0572-01 ")

 ;;2825

 ;;21,"16252-0572-50 ")

 ;;2826

 ;;21,"16252-0573-01 ")

 ;;2899

 ;;21,"16252-0573-50 ")

 ;;2900

 ;;21,"16252-0610-01 ")

 ;;2546

 ;;21,"16252-0611-01 ")

 ;;2554

 ;;21,"16252-0612-01 ")

 ;;4517

 ;;21,"16252-0613-01 ")

 ;;4523

 ;;21,"16252-0614-01 ")

 ;;4530

 ;;21,"16571-0500-50 ")

 ;;3302

 ;;21,"16571-0501-11 ")

 ;;3395

 ;;21,"16571-0502-11 ")

 ;;3504

 ;;21,"16590-0063-30 ")

 ;;3253

 ;;21,"16590-0259-30 ")

 ;;193

 ;;21,"16590-0277-30 ")

 ;;1004

 ;;21,"16590-0277-60 ")

 ;;1005

 ;;21,"16590-0277-90 ")

 ;;1006

 ;;21,"16590-0280-30 ")

 ;;90

 ;;21,"16590-0306-30 ")

 ;;1762

 ;;21,"16590-0306-60 ")

 ;;1763

 ;;21,"16590-0306-90 ")

 ;;1764

 ;;21,"16590-0307-30 ")

 ;;2175

 ;;21,"16590-0307-60 ")

 ;;2176

 ;;21,"16590-0307-90 ")

 ;;2177

 ;;21,"16590-0309-30 ")

 ;;4444

 ;;21,"16590-0309-60 ")

 ;;4445

 ;;21,"16590-0309-72 ")

 ;;4446

 ;;21,"16590-0309-90 ")

 ;;4447

 ;;21,"16590-0312-30 ")

 ;;5013

 ;;21,"16590-0332-30 ")

 ;;5119

 ;;21,"16590-0356-30 ")

 ;;2386

 ;;21,"16590-0356-60 ")

 ;;2387

 ;;21,"16590-0360-30 ")

 ;;2388

 ;;21,"16590-0360-60 ")

 ;;2389

 ;;21,"16590-0360-90 ")

 ;;2390

 ;;21,"16590-0392-30 ")

 ;;1208

 ;;21,"16590-0392-60 ")

 ;;1209

 ;;21,"16590-0392-90 ")

 ;;1210

 ;;21,"16590-0952-90 ")

 ;;3516

 ;;21,"16590-0954-60 ")

 ;;4929

 ;;21,"16714-0224-01 ")

 ;;4857

 ;;21,"16714-0224-02 ")

 ;;4858

 ;;21,"16714-0225-01 ")

 ;;4926

 ;;21,"16714-0225-02 ")

 ;;4927

 ;;21,"16714-0225-04 ")

 ;;4928

 ;;21,"16714-0226-01 ")

 ;;4803

 ;;21,"16714-0226-02 ")

 ;;4804

 ;;21,"16714-0226-04 ")

 ;;4805

 ;;21,"16714-0581-02 ")

 ;;3269

 ;;21,"16714-0581-03 ")

 ;;3270

 ;;21,"16714-0582-01 ")

 ;;3355

 ;;21,"16714-0582-02 ")

 ;;3356

 ;;21,"16714-0582-03 ")

 ;;3357

 ;;21,"16714-0583-01 ")

 ;;3456

 ;;21,"16714-0583-02 ")

 ;;3457

 ;;21,"16714-0583-03 ")

 ;;3458

 ;;21,"17236-0997-04 ")

 ;;784

 ;;21,"17236-0997-30 ")

 ;;785

 ;;21,"18837-0277-30 ")

 ;;1573

 ;;21,"21695-0326-30 ")

 ;;69

 ;;21,"21695-0326-60 ")

 ;;99

 ;;21,"21695-0326-90 ")

 ;;100

 ;;21,"21695-0327-30 ")

 ;;213

 ;;21,"21695-0327-60 ")

 ;;214

 ;;21,"21695-0327-90 ")

 ;;215

 ;;21,"21695-0328-30 ")

 ;;1689

 ;;21,"21695-0328-90 ")

 ;;1690

 ;;21,"21695-0329-15 ")

 ;;1878

 ;;21,"21695-0329-30 ")

 ;;1879

 ;;21,"21695-0329-78 ")

 ;;1880

 ;;21,"21695-0329-90 ")

 ;;1881

 ;;21,"21695-0330-20 ")

 ;;2200

 ;;21,"21695-0330-30 ")

 ;;2201

 ;;21,"21695-0330-60 ")

 ;;2202

 ;;21,"21695-0330-90 ")

 ;;2203

 ;;21,"21695-0331-30 ")

 ;;2428

 ;;21,"21695-0331-40 ")

 ;;2429

 ;;21,"21695-0331-60 ")

 ;;2430

 ;;21,"21695-0331-90 ")

 ;;2431

 ;;21,"21695-0345-30 ")

 ;;1480

 ;;21,"21695-0345-90 ")

 ;;1481

 ;;21,"21695-0393-30 ")

 ;;2601

 ;;21,"21695-0394-30 ")

 ;;2637

 ;;21,"21695-0477-30 ")

 ;;469

 ;;21,"21695-0477-78 ")

 ;;470

 ;;21,"21695-0478-30 ")

 ;;560

 ;;21,"21695-0487-30 ")

 ;;903

 ;;21,"21695-0487-90 ")

 ;;904

 ;;21,"21695-0488-30 ")

 ;;1038

 ;;21,"21695-0488-60 ")

 ;;1039

 ;;21,"21695-0488-90 ")

 ;;1040

 ;;21,"21695-0489-30 ")

 ;;1200

 ;;21,"21695-0489-90 ")

 ;;1201

 ;;21,"21695-0612-90 ")

 ;;20

 ;;21,"21695-0687-30 ")

 ;;4814

 ;;21,"21695-0714-30 ")

 ;;3409

 ;;21,"21695-0714-90 ")

 ;;3410

 ;;21,"21695-0717-30 ")

 ;;3506

 ;;21,"21695-0717-45 ")

 ;;3507

 ;;21,"21695-0717-90 ")

 ;;3508

 ;;21,"21695-0733-30 ")

 ;;4254

BGP47Y4   ;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,"00781-5204-92 ")

 +2       ;;4833

 +3       ;;21,"00781-5206-10 ")

 +4       ;;4772

 +5       ;;21,"00781-5206-31 ")

 +6       ;;4773

 +7       ;;21,"00781-5206-92 ")

 +8       ;;4774

 +9       ;;21,"00781-5207-10 ")

 +10      ;;4901

 +11      ;;21,"00781-5207-31 ")

 +12      ;;4902

 +13      ;;21,"00781-5207-92 ")

 +14      ;;4903

 +15      ;;21,"00781-5320-01 ")

 +16      ;;2961

 +17      ;;21,"00781-5321-01 ")

 +18      ;;2985

 +19      ;;21,"00781-5322-01 ")

 +20      ;;3004

 +21      ;;21,"00781-5441-01 ")

 +22      ;;726

 +23      ;;21,"00781-5441-10 ")

 +24      ;;727

 +25      ;;21,"00781-5442-01 ")

 +26      ;;826

 +27      ;;21,"00781-5442-10 ")

 +28      ;;827

 +29      ;;21,"00781-5443-01 ")

 +30      ;;981

 +31      ;;21,"00781-5443-10 ")

 +32      ;;982

 +33      ;;21,"00781-5444-01 ")

 +34      ;;1144

 +35      ;;21,"00781-5444-10 ")

 +36      ;;1145

 +37      ;;21,"00781-5700-10 ")

 +38      ;;3291

 +39      ;;21,"00781-5700-92 ")

 +40      ;;3292

 +41      ;;21,"00781-5701-10 ")

 +42      ;;3384

 +43      ;;21,"00781-5701-31 ")

 +44      ;;3385

 +45      ;;21,"00781-5701-92 ")

 +46      ;;3386

 +47      ;;21,"00781-5702-10 ")

 +48      ;;3487

 +49      ;;21,"00781-5702-31 ")

 +50      ;;3488

 +51      ;;21,"00781-5702-92 ")

 +52      ;;3489

 +53      ;;21,"00781-5805-10 ")

 +54      ;;3293

 +55      ;;21,"00781-5805-92 ")

 +56      ;;3294

 +57      ;;21,"00781-5806-10 ")

 +58      ;;3381

 +59      ;;21,"00781-5806-31 ")

 +60      ;;3382

 +61      ;;21,"00781-5806-92 ")

 +62      ;;3383

 +63      ;;21,"00781-5807-10 ")

 +64      ;;3490

 +65      ;;21,"00781-5807-31 ")

 +66      ;;3491

 +67      ;;21,"00781-5807-92 ")

 +68      ;;3492

 +69      ;;21,"00781-5816-10 ")

 +70      ;;4775

 +71      ;;21,"00781-5816-31 ")

 +72      ;;4776

 +73      ;;21,"00781-5816-92 ")

 +74      ;;4777

 +75      ;;21,"00781-5817-10 ")

 +76      ;;4825

 +77      ;;21,"00781-5817-31 ")

 +78      ;;4826

 +79      ;;21,"00781-5817-92 ")

 +80      ;;4827

 +81      ;;21,"00781-5818-10 ")

 +82      ;;4898

 +83      ;;21,"00781-5818-31 ")

 +84      ;;4899

 +85      ;;21,"00781-5818-92 ")

 +86      ;;4900

 +87      ;;21,"00781-5936-31 ")

 +88      ;;3025

 +89      ;;21,"00781-5937-31 ")

 +90      ;;3032

 +91      ;;21,"00781-5938-31 ")

 +92      ;;3047

 +93      ;;21,"00781-5938-92 ")

 +94      ;;3048

 +95      ;;21,"00781-5939-31 ")

 +96      ;;3058

 +97      ;;21,"00781-5939-92 ")

 +98      ;;3059

 +99      ;;21,"00781-5948-10 ")

 +100     ;;5027

 +101     ;;21,"00781-5948-92 ")

 +102     ;;5028

 +103     ;;21,"00781-5949-10 ")

 +104     ;;5086

 +105     ;;21,"00781-5949-64 ")

 +106     ;;5087

 +107     ;;21,"00781-5949-92 ")

 +108     ;;5088

 +109     ;;21,"00781-5950-10 ")

 +110     ;;5136

 +111     ;;21,"00781-5950-64 ")

 +112     ;;5137

 +113     ;;21,"00781-5950-92 ")

 +114     ;;5138

 +115     ;;21,"00781-5951-10 ")

 +116     ;;5166

 +117     ;;21,"00781-5951-64 ")

 +118     ;;5167

 +119     ;;21,"00781-5951-92 ")

 +120     ;;5168

 +121     ;;21,"00781-5952-10 ")

 +122     ;;5195

 +123     ;;21,"00781-5952-64 ")

 +124     ;;5196

 +125     ;;21,"00781-5952-92 ")

 +126     ;;5197

 +127     ;;21,"00904-5045-60 ")

 +128     ;;380

 +129     ;;21,"00904-5045-61 ")

 +130     ;;381

 +131     ;;21,"00904-5045-80 ")

 +132     ;;382

 +133     ;;21,"00904-5046-60 ")

 +134     ;;483

 +135     ;;21,"00904-5046-61 ")

 +136     ;;484

 +137     ;;21,"00904-5046-80 ")

 +138     ;;485

 +139     ;;21,"00904-5047-60 ")

 +140     ;;597

 +141     ;;21,"00904-5047-61 ")

 +142     ;;598

 +143     ;;21,"00904-5047-80 ")

 +144     ;;599

 +145     ;;21,"00904-5048-60 ")

 +146     ;;654

 +147     ;;21,"00904-5501-60 ")

 +148     ;;725

 +149     ;;21,"00904-5502-60 ")

 +150     ;;828

 +151     ;;21,"00904-5502-61 ")

 +152     ;;829

 +153     ;;21,"00904-5502-80 ")

 +154     ;;830

 +155     ;;21,"00904-5503-60 ")

 +156     ;;979

 +157     ;;21,"00904-5503-80 ")

 +158     ;;980

 +159     ;;21,"00904-5504-60 ")

 +160     ;;1146

 +161     ;;21,"00904-5504-80 ")

 +162     ;;1147

 +163     ;;21,"00904-5609-60 ")

 +164     ;;728

 +165     ;;21,"00904-5609-61 ")

 +166     ;;729

 +167     ;;21,"00904-5610-60 ")

 +168     ;;983

 +169     ;;21,"00904-5610-61 ")

 +170     ;;984

 +171     ;;21,"00904-5610-80 ")

 +172     ;;985

 +173     ;;21,"00904-5611-60 ")

 +174     ;;1141

 +175     ;;21,"00904-5611-61 ")

 +176     ;;1142

 +177     ;;21,"00904-5611-80 ")

 +178     ;;1143

 +179     ;;21,"00904-5637-61 ")

 +180     ;;1509

 +181     ;;21,"00904-5638-43 ")

 +182     ;;1620

 +183     ;;21,"00904-5638-46 ")

 +184     ;;1621

 +185     ;;21,"00904-5638-61 ")

 +186     ;;1622

 +187     ;;21,"00904-5638-89 ")

 +188     ;;1623

 +189     ;;21,"00904-5639-43 ")

 +190     ;;1788

 +191     ;;21,"00904-5639-46 ")

 +192     ;;1789

 +193     ;;21,"00904-5639-48 ")

 +194     ;;1790

 +195     ;;21,"00904-5639-61 ")

 +196     ;;1791

 +197     ;;21,"00904-5639-89 ")

 +198     ;;1792

 +199     ;;21,"00904-5639-93 ")

 +200     ;;1793

 +201     ;;21,"00904-5640-43 ")

 +202     ;;2132

 +203     ;;21,"00904-5640-46 ")

 +204     ;;2133

 +205     ;;21,"00904-5640-48 ")

 +206     ;;2134

 +207     ;;21,"00904-5640-61 ")

 +208     ;;2135

 +209     ;;21,"00904-5640-89 ")

 +210     ;;2136

 +211     ;;21,"00904-5640-93 ")

 +212     ;;2137

 +213     ;;21,"00904-5641-61 ")

 +214     ;;2299

 +215     ;;21,"00904-5642-43 ")

 +216     ;;2345

 +217     ;;21,"00904-5642-46 ")

 +218     ;;2346

 +219     ;;21,"00904-5642-48 ")

 +220     ;;2347

 +221     ;;21,"00904-5642-52 ")

 +222     ;;2348

 +223     ;;21,"00904-5642-61 ")

 +224     ;;2349

 +225     ;;21,"00904-5642-89 ")

 +226     ;;2350

 +227     ;;21,"00904-5642-93 ")

 +228     ;;2351

 +229     ;;21,"00904-5701-61 ")

 +230     ;;825

 +231     ;;21,"00904-5757-89 ")

 +232     ;;4359

 +233     ;;21,"00904-5778-89 ")

 +234     ;;1510

 +235     ;;21,"00904-5808-43 ")

 +236     ;;1794

 +237     ;;21,"00904-5808-46 ")

 +238     ;;1795

 +239     ;;21,"00904-5808-48 ")

 +240     ;;1796

 +241     ;;21,"00904-5808-61 ")

 +242     ;;1797

 +243     ;;21,"00904-5808-80 ")

 +244     ;;1798

 +245     ;;21,"00904-5808-89 ")

 +246     ;;1799

 +247     ;;21,"00904-5808-93 ")

 +248     ;;1800

 +249     ;;21,"00904-5809-43 ")

 +250     ;;2125

 +251     ;;21,"00904-5809-46 ")

 +252     ;;2126

 +253     ;;21,"00904-5809-48 ")

 +254     ;;2127

 +255     ;;21,"00904-5809-61 ")

 +256     ;;2128

 +257     ;;21,"00904-5809-80 ")

 +258     ;;2129

 +259     ;;21,"00904-5809-89 ")

 +260     ;;2130

 +261     ;;21,"00904-5809-93 ")

 +262     ;;2131

 +263     ;;21,"00904-5810-43 ")

 +264     ;;2352

 +265     ;;21,"00904-5810-46 ")

 +266     ;;2353

 +267     ;;21,"00904-5810-48 ")

 +268     ;;2354

 +269     ;;21,"00904-5810-52 ")

 +270     ;;2355

 +271     ;;21,"00904-5810-61 ")

 +272     ;;2356

 +273     ;;21,"00904-5810-80 ")

 +274     ;;2357

 +275     ;;21,"00904-5810-89 ")

 +276     ;;2358

 +277     ;;21,"00904-5810-93 ")

 +278     ;;2359

 +279     ;;21,"00904-5811-43 ")

 +280     ;;1648

 +281     ;;21,"00904-5811-46 ")

 +282     ;;1649

 +283     ;;21,"00904-5811-61 ")

 +284     ;;1650

 +285     ;;21,"00904-5811-80 ")

 +286     ;;1651

 +287     ;;21,"00904-5811-89 ")

 +288     ;;1652

 +289     ;;21,"00904-5812-40 ")

 +290     ;;1517

 +291     ;;21,"00904-5812-89 ")

 +292     ;;1518

 +293     ;;21,"00904-6189-40 ")

 +294     ;;13

 +295     ;;21,"00904-6190-40 ")

 +296     ;;82

 +297     ;;21,"00904-6191-40 ")

 +298     ;;191

 +299     ;;21,"00904-6192-40 ")

 +300     ;;252

 +301     ;;21,"00955-1040-30 ")

 +302     ;;3098

 +303     ;;21,"00955-1040-90 ")

 +304     ;;3099

 +305     ;;21,"00955-1041-30 ")

 +306     ;;3164

 +307     ;;21,"00955-1041-90 ")

 +308     ;;3165

 +309     ;;21,"00955-1042-30 ")

 +310     ;;3229

 +311     ;;21,"00955-1042-90 ")

 +312     ;;3230

 +313     ;;21,"00955-1045-30 ")

 +314     ;;4694

 +315     ;;21,"00955-1045-90 ")

 +316     ;;4695

 +317     ;;21,"00955-1046-30 ")

 +318     ;;4722

 +319     ;;21,"00955-1046-90 ")

 +320     ;;4723

 +321     ;;21,"10544-0170-30 ")

 +322     ;;1003

 +323     ;;21,"10544-0237-30 ")

 +324     ;;4442

 +325     ;;21,"10544-0238-60 ")

 +326     ;;1761

 +327     ;;21,"10544-0239-60 ")

 +328     ;;2179

 +329     ;;21,"10544-0240-30 ")

 +330     ;;2385

 +331     ;;21,"10544-0564-30 ")

 +332     ;;4373

 +333     ;;21,"12280-0005-90 ")

 +334     ;;3264

 +335     ;;21,"12280-0008-00 ")

 +336     ;;3660

 +337     ;;21,"12280-0008-90 ")

 +338     ;;3661

 +339     ;;21,"12280-0009-90 ")

 +340     ;;5106

 +341     ;;21,"12280-0033-00 ")

 +342     ;;326

 +343     ;;21,"12280-0059-90 ")

 +344     ;;2609

 +345     ;;21,"12280-0061-00 ")

 +346     ;;2884

 +347     ;;21,"12280-0063-30 ")

 +348     ;;3137

 +349     ;;21,"12280-0063-90 ")

 +350     ;;3138

 +351     ;;21,"12280-0066-30 ")

 +352     ;;3445

 +353     ;;21,"12280-0067-15 ")

 +354     ;;5065

 +355     ;;21,"12280-0067-30 ")

 +356     ;;5066

 +357     ;;21,"12280-0067-90 ")

 +358     ;;5067

 +359     ;;21,"12280-0120-30 ")

 +360     ;;4073

 +361     ;;21,"12280-0121-30 ")

 +362     ;;4045

 +363     ;;21,"12280-0123-30 ")

 +364     ;;4022

 +365     ;;21,"12280-0124-30 ")

 +366     ;;4443

 +367     ;;21,"12280-0126-30 ")

 +368     ;;4371

 +369     ;;21,"12280-0126-60 ")

 +370     ;;4372

 +371     ;;21,"12280-0127-30 ")

 +372     ;;4222

 +373     ;;21,"12280-0129-60 ")

 +374     ;;2293

 +375     ;;21,"12280-0144-00 ")

 +376     ;;2178

 +377     ;;21,"12280-0168-30 ")

 +378     ;;3577

 +379     ;;21,"12280-0168-90 ")

 +380     ;;3578

 +381     ;;21,"12280-0183-30 ")

 +382     ;;4223

 +383     ;;21,"12280-0220-00 ")

 +384     ;;4074

 +385     ;;21,"12280-0228-90 ")

 +386     ;;2669

 +387     ;;21,"12280-0340-30 ")

 +388     ;;3056

 +389     ;;21,"12280-0369-30 ")

 +390     ;;3202

 +391     ;;21,"12280-0369-90 ")

 +392     ;;3203

 +393     ;;21,"12280-0370-30 ")

 +394     ;;4670

 +395     ;;21,"12280-0370-90 ")

 +396     ;;4671

 +397     ;;21,"12280-0371-30 ")

 +398     ;;4708

 +399     ;;21,"12280-0371-90 ")

 +400     ;;4709

 +401     ;;21,"12280-0375-30 ")

 +402     ;;3555

 +403     ;;21,"12280-0375-90 ")

 +404     ;;3556

 +405     ;;21,"12280-0378-90 ")

 +406     ;;3710

 +407     ;;21,"12280-0379-90 ")

 +408     ;;5153

 +409     ;;21,"12280-0380-30 ")

 +410     ;;4756

 +411     ;;21,"12280-0380-90 ")

 +412     ;;4757

 +413     ;;21,"12280-0382-30 ")

 +414     ;;4979

 +415     ;;21,"12280-0383-30 ")

 +416     ;;4987

 +417     ;;21,"12280-0400-30 ")

 +418     ;;3711

 +419     ;;21,"13411-0106-01 ")

 +420     ;;3143

 +421     ;;21,"13411-0106-03 ")

 +422     ;;3144

 +423     ;;21,"13411-0106-06 ")

 +424     ;;3145

 +425     ;;21,"13411-0106-09 ")

 +426     ;;3146

 +427     ;;21,"13411-0106-15 ")

 +428     ;;3147

 +429     ;;21,"13411-0107-01 ")

 +430     ;;3207

 +431     ;;21,"13411-0107-03 ")

 +432     ;;3208

 +433     ;;21,"13411-0107-06 ")

 +434     ;;3209

 +435     ;;21,"13411-0107-09 ")

 +436     ;;3210

 +437     ;;21,"13411-0107-15 ")

 +438     ;;3211

 +439     ;;21,"13411-0142-01 ")

 +440     ;;3643

 +441     ;;21,"13411-0142-02 ")

 +442     ;;3644

 +443     ;;21,"13411-0142-03 ")

 +444     ;;3645

 +445     ;;21,"13411-0142-06 ")

 +446     ;;3646

 +447     ;;21,"13411-0142-09 ")

 +448     ;;3647

 +449     ;;21,"13411-0143-01 ")

 +450     ;;3669

 +451     ;;21,"13411-0143-02 ")

 +452     ;;3670

 +453     ;;21,"13411-0143-03 ")

 +454     ;;3671

 +455     ;;21,"13411-0143-06 ")

 +456     ;;3672

 +457     ;;21,"13411-0143-09 ")

 +458     ;;3673

 +459     ;;21,"13411-0144-01 ")

 +460     ;;5017

 +461     ;;21,"13411-0144-02 ")

 +462     ;;5018

 +463     ;;21,"13411-0144-03 ")

 +464     ;;5019

 +465     ;;21,"13411-0144-06 ")

 +466     ;;5020

 +467     ;;21,"13411-0144-09 ")

 +468     ;;5021

 +469     ;;21,"13411-0145-01 ")

 +470     ;;5073

 +471     ;;21,"13411-0145-02 ")

 +472     ;;5074

 +473     ;;21,"13411-0145-03 ")

 +474     ;;5075

 +475     ;;21,"13411-0145-06 ")

 +476     ;;5076

 +477     ;;21,"13411-0145-09 ")

 +478     ;;5077

 +479     ;;21,"13411-0156-01 ")

 +480     ;;5112

 +481     ;;21,"13411-0156-02 ")

 +482     ;;5113

 +483     ;;21,"13411-0156-03 ")

 +484     ;;5114

 +485     ;;21,"13411-0156-06 ")

 +486     ;;5115

 +487     ;;21,"13411-0156-09 ")

 +488     ;;5116

 +489     ;;21,"13411-0184-02 ")

 +490     ;;614

 +491     ;;21,"13411-0184-03 ")

 +492     ;;615

 +493     ;;21,"13411-0184-06 ")

 +494     ;;616

 +495     ;;21,"13411-0184-09 ")

 +496     ;;617

 +497     ;;21,"13411-0184-10 ")

 +498     ;;618

 +499     ;;21,"13668-0113-10 ")

 +500     ;;3276

 +501     ;;21,"13668-0113-90 ")

 +502     ;;3277

 +503     ;;21,"13668-0114-10 ")

 +504     ;;3367

 +505     ;;21,"13668-0114-30 ")

 +506     ;;3368

 +507     ;;21,"13668-0114-90 ")

 +508     ;;3369

 +509     ;;21,"13668-0115-10 ")

 +510     ;;3469

 +511     ;;21,"13668-0115-30 ")

 +512     ;;3470

 +513     ;;21,"13668-0115-90 ")

 +514     ;;3471

 +515     ;;21,"13668-0116-10 ")

 +516     ;;4785

 +517     ;;21,"13668-0116-30 ")

 +518     ;;4786

 +519     ;;21,"13668-0116-90 ")

 +520     ;;4787

 +521     ;;21,"13668-0117-10 ")

 +522     ;;4851

 +523     ;;21,"13668-0117-30 ")

 +524     ;;4852

 +525     ;;21,"13668-0117-90 ")

 +526     ;;4853

 +527     ;;21,"13668-0118-10 ")

 +528     ;;4909

 +529     ;;21,"13668-0118-30 ")

 +530     ;;4910

 +531     ;;21,"13668-0118-90 ")

 +532     ;;4911

 +533     ;;21,"13668-0409-10 ")

 +534     ;;3431

 +535     ;;21,"13668-0409-30 ")

 +536     ;;3432

 +537     ;;21,"13668-0409-90 ")

 +538     ;;3433

 +539     ;;21,"13811-0627-10 ")

 +540     ;;36

 +541     ;;21,"13811-0628-10 ")

 +542     ;;56

 +543     ;;21,"13811-0628-50 ")

 +544     ;;57

 +545     ;;21,"13811-0629-10 ")

 +546     ;;158

 +547     ;;21,"13811-0629-50 ")

 +548     ;;159

 +549     ;;21,"13811-0630-10 ")

 +550     ;;293

 +551     ;;21,"13811-0630-50 ")

 +552     ;;294

 +553     ;;21,"15338-0200-30 ")

 +554     ;;740

 +555     ;;21,"15338-0211-30 ")

 +556     ;;902

 +557     ;;21,"15338-0220-30 ")

 +558     ;;1041

 +559     ;;21,"15338-0222-30 ")

 +560     ;;1042

 +561     ;;21,"15338-0233-30 ")

 +562     ;;1199

 +563     ;;21,"16252-0541-30 ")

 +564     ;;2970

 +565     ;;21,"16252-0542-90 ")

 +566     ;;2989

 +567     ;;21,"16252-0543-90 ")

 +568     ;;3014

 +569     ;;21,"16252-0570-30 ")

 +570     ;;2727

 +571     ;;21,"16252-0571-01 ")

 +572     ;;2760

 +573     ;;21,"16252-0571-50 ")

 +574     ;;2761

 +575     ;;21,"16252-0572-01 ")

 +576     ;;2825

 +577     ;;21,"16252-0572-50 ")

 +578     ;;2826

 +579     ;;21,"16252-0573-01 ")

 +580     ;;2899

 +581     ;;21,"16252-0573-50 ")

 +582     ;;2900

 +583     ;;21,"16252-0610-01 ")

 +584     ;;2546

 +585     ;;21,"16252-0611-01 ")

 +586     ;;2554

 +587     ;;21,"16252-0612-01 ")

 +588     ;;4517

 +589     ;;21,"16252-0613-01 ")

 +590     ;;4523

 +591     ;;21,"16252-0614-01 ")

 +592     ;;4530

 +593     ;;21,"16571-0500-50 ")

 +594     ;;3302

 +595     ;;21,"16571-0501-11 ")

 +596     ;;3395

 +597     ;;21,"16571-0502-11 ")

 +598     ;;3504

 +599     ;;21,"16590-0063-30 ")

 +600     ;;3253

 +601     ;;21,"16590-0259-30 ")

 +602     ;;193

 +603     ;;21,"16590-0277-30 ")

 +604     ;;1004

 +605     ;;21,"16590-0277-60 ")

 +606     ;;1005

 +607     ;;21,"16590-0277-90 ")

 +608     ;;1006

 +609     ;;21,"16590-0280-30 ")

 +610     ;;90

 +611     ;;21,"16590-0306-30 ")

 +612     ;;1762

 +613     ;;21,"16590-0306-60 ")

 +614     ;;1763

 +615     ;;21,"16590-0306-90 ")

 +616     ;;1764

 +617     ;;21,"16590-0307-30 ")

 +618     ;;2175

 +619     ;;21,"16590-0307-60 ")

 +620     ;;2176

 +621     ;;21,"16590-0307-90 ")

 +622     ;;2177

 +623     ;;21,"16590-0309-30 ")

 +624     ;;4444

 +625     ;;21,"16590-0309-60 ")

 +626     ;;4445

 +627     ;;21,"16590-0309-72 ")

 +628     ;;4446

 +629     ;;21,"16590-0309-90 ")

 +630     ;;4447

 +631     ;;21,"16590-0312-30 ")

 +632     ;;5013

 +633     ;;21,"16590-0332-30 ")

 +634     ;;5119

 +635     ;;21,"16590-0356-30 ")

 +636     ;;2386

 +637     ;;21,"16590-0356-60 ")

 +638     ;;2387

 +639     ;;21,"16590-0360-30 ")

 +640     ;;2388

 +641     ;;21,"16590-0360-60 ")

 +642     ;;2389

 +643     ;;21,"16590-0360-90 ")

 +644     ;;2390

 +645     ;;21,"16590-0392-30 ")

 +646     ;;1208

 +647     ;;21,"16590-0392-60 ")

 +648     ;;1209

 +649     ;;21,"16590-0392-90 ")

 +650     ;;1210

 +651     ;;21,"16590-0952-90 ")

 +652     ;;3516

 +653     ;;21,"16590-0954-60 ")

 +654     ;;4929

 +655     ;;21,"16714-0224-01 ")

 +656     ;;4857

 +657     ;;21,"16714-0224-02 ")

 +658     ;;4858

 +659     ;;21,"16714-0225-01 ")

 +660     ;;4926

 +661     ;;21,"16714-0225-02 ")

 +662     ;;4927

 +663     ;;21,"16714-0225-04 ")

 +664     ;;4928

 +665     ;;21,"16714-0226-01 ")

 +666     ;;4803

 +667     ;;21,"16714-0226-02 ")

 +668     ;;4804

 +669     ;;21,"16714-0226-04 ")

 +670     ;;4805

 +671     ;;21,"16714-0581-02 ")

 +672     ;;3269

 +673     ;;21,"16714-0581-03 ")

 +674     ;;3270

 +675     ;;21,"16714-0582-01 ")

 +676     ;;3355

 +677     ;;21,"16714-0582-02 ")

 +678     ;;3356

 +679     ;;21,"16714-0582-03 ")

 +680     ;;3357

 +681     ;;21,"16714-0583-01 ")

 +682     ;;3456

 +683     ;;21,"16714-0583-02 ")

 +684     ;;3457

 +685     ;;21,"16714-0583-03 ")

 +686     ;;3458

 +687     ;;21,"17236-0997-04 ")

 +688     ;;784

 +689     ;;21,"17236-0997-30 ")

 +690     ;;785

 +691     ;;21,"18837-0277-30 ")

 +692     ;;1573

 +693     ;;21,"21695-0326-30 ")

 +694     ;;69

 +695     ;;21,"21695-0326-60 ")

 +696     ;;99

 +697     ;;21,"21695-0326-90 ")

 +698     ;;100

 +699     ;;21,"21695-0327-30 ")

 +700     ;;213

 +701     ;;21,"21695-0327-60 ")

 +702     ;;214

 +703     ;;21,"21695-0327-90 ")

 +704     ;;215

 +705     ;;21,"21695-0328-30 ")

 +706     ;;1689

 +707     ;;21,"21695-0328-90 ")

 +708     ;;1690

 +709     ;;21,"21695-0329-15 ")

 +710     ;;1878

 +711     ;;21,"21695-0329-30 ")

 +712     ;;1879

 +713     ;;21,"21695-0329-78 ")

 +714     ;;1880

 +715     ;;21,"21695-0329-90 ")

 +716     ;;1881

 +717     ;;21,"21695-0330-20 ")

 +718     ;;2200

 +719     ;;21,"21695-0330-30 ")

 +720     ;;2201

 +721     ;;21,"21695-0330-60 ")

 +722     ;;2202

 +723     ;;21,"21695-0330-90 ")

 +724     ;;2203

 +725     ;;21,"21695-0331-30 ")

 +726     ;;2428

 +727     ;;21,"21695-0331-40 ")

 +728     ;;2429

 +729     ;;21,"21695-0331-60 ")

 +730     ;;2430

 +731     ;;21,"21695-0331-90 ")

 +732     ;;2431

 +733     ;;21,"21695-0345-30 ")

 +734     ;;1480

 +735     ;;21,"21695-0345-90 ")

 +736     ;;1481

 +737     ;;21,"21695-0393-30 ")

 +738     ;;2601

 +739     ;;21,"21695-0394-30 ")

 +740     ;;2637

 +741     ;;21,"21695-0477-30 ")

 +742     ;;469

 +743     ;;21,"21695-0477-78 ")

 +744     ;;470

 +745     ;;21,"21695-0478-30 ")

 +746     ;;560

 +747     ;;21,"21695-0487-30 ")

 +748     ;;903

 +749     ;;21,"21695-0487-90 ")

 +750     ;;904

 +751     ;;21,"21695-0488-30 ")

 +752     ;;1038

 +753     ;;21,"21695-0488-60 ")

 +754     ;;1039

 +755     ;;21,"21695-0488-90 ")

 +756     ;;1040

 +757     ;;21,"21695-0489-30 ")

 +758     ;;1200

 +759     ;;21,"21695-0489-90 ")

 +760     ;;1201

 +761     ;;21,"21695-0612-90 ")

 +762     ;;20

 +763     ;;21,"21695-0687-30 ")

 +764     ;;4814

 +765     ;;21,"21695-0714-30 ")

 +766     ;;3409

 +767     ;;21,"21695-0714-90 ")

 +768     ;;3410

 +769     ;;21,"21695-0717-30 ")

 +770     ;;3506

 +771     ;;21,"21695-0717-45 ")

 +772     ;;3507

 +773     ;;21,"21695-0717-90 ")

 +774     ;;3508

 +775     ;;21,"21695-0733-30 ")

 +776     ;;4254