BGP47Z3.m

BGP47Z3 ;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,"21695-0512-30 ")

 ;;1921

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

 ;;1922

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

 ;;34

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

 ;;213

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

 ;;214

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

 ;;215

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

 ;;352

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

 ;;353

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

 ;;1679

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

 ;;1104

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

 ;;1789

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

 ;;1790

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

 ;;2307

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

 ;;2180

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

 ;;1532

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

 ;;1524

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

 ;;1589

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

 ;;1590

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

 ;;2443

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

 ;;2444

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

 ;;1114

 ;;21,"23155-0026-01 ")

 ;;1861

 ;;21,"23155-0027-01 ")

 ;;1956

 ;;21,"23490-5055-03 ")

 ;;15

 ;;21,"23490-5056-01 ")

 ;;481

 ;;21,"23490-5056-02 ")

 ;;482

 ;;21,"23490-5057-03 ")

 ;;154

 ;;21,"23490-5057-04 ")

 ;;155

 ;;21,"23490-5057-06 ")

 ;;156

 ;;21,"23490-5057-09 ")

 ;;157

 ;;21,"23490-5447-03 ")

 ;;642

 ;;21,"23490-5447-06 ")

 ;;643

 ;;21,"23490-5450-03 ")

 ;;1125

 ;;21,"23490-5450-04 ")

 ;;1126

 ;;21,"23490-5991-01 ")

 ;;1511

 ;;21,"23490-5992-01 ")

 ;;1583

 ;;21,"23490-6462-01 ")

 ;;1927

 ;;21,"23490-6462-05 ")

 ;;1928

 ;;21,"23490-6463-01 ")

 ;;1980

 ;;21,"23490-6464-01 ")

 ;;2036

 ;;21,"23490-6464-09 ")

 ;;2037

 ;;21,"23490-6466-01 ")

 ;;2130

 ;;21,"23490-6466-06 ")

 ;;2131

 ;;21,"23490-6466-09 ")

 ;;2132

 ;;21,"23490-7060-01 ")

 ;;2351

 ;;21,"23490-7062-01 ")

 ;;2496

 ;;21,"24477-0515-01 ")

 ;;1451

 ;;21,"24477-0516-01 ")

 ;;1462

 ;;21,"24658-0190-10 ")

 ;;1

 ;;21,"24658-0190-90 ")

 ;;2

 ;;21,"24658-0191-10 ")

 ;;135

 ;;21,"24658-0191-90 ")

 ;;136

 ;;21,"24658-0192-10 ")

 ;;449

 ;;21,"24658-0192-90 ")

 ;;450

 ;;21,"31722-0237-10 ")

 ;;88

 ;;21,"31722-0237-90 ")

 ;;89

 ;;21,"31722-0238-10 ")

 ;;260

 ;;21,"31722-0238-90 ")

 ;;261

 ;;21,"31722-0239-10 ")

 ;;405

 ;;21,"31722-0239-90 ")

 ;;406

 ;;21,"33261-0437-02 ")

 ;;137

 ;;21,"33261-0437-30 ")

 ;;138

 ;;21,"33261-0437-60 ")

 ;;139

 ;;21,"33261-0437-90 ")

 ;;140

 ;;21,"33261-0535-02 ")

 ;;358

 ;;21,"33261-0535-30 ")

 ;;359

 ;;21,"33261-0535-60 ")

 ;;360

 ;;21,"33261-0535-90 ")

 ;;361

 ;;21,"33261-0675-00 ")

 ;;1999

 ;;21,"33261-0675-02 ")

 ;;1984

 ;;21,"33261-0675-07 ")

 ;;1985

 ;;21,"33261-0675-14 ")

 ;;1986

 ;;21,"33261-0675-20 ")

 ;;1987

 ;;21,"33261-0675-21 ")

 ;;1988

 ;;21,"33261-0675-28 ")

 ;;1989

 ;;21,"33261-0675-30 ")

 ;;1990

 ;;21,"33261-0675-60 ")

 ;;1991

 ;;21,"33261-0675-90 ")

 ;;1992

 ;;21,"33261-0824-00 ")

 ;;2320

 ;;21,"33261-0824-30 ")

 ;;2321

 ;;21,"33261-0824-60 ")

 ;;2322

 ;;21,"33261-0824-90 ")

 ;;2323

 ;;21,"33261-0825-00 ")

 ;;2484

 ;;21,"33261-0825-30 ")

 ;;2485

 ;;21,"33261-0825-60 ")

 ;;2486

 ;;21,"33261-0825-90 ")

 ;;2487

 ;;21,"33261-0826-00 ")

 ;;46

 ;;21,"33261-0826-30 ")

 ;;47

 ;;21,"33261-0826-60 ")

 ;;48

 ;;21,"33261-0826-90 ")

 ;;49

 ;;21,"33261-0836-00 ")

 ;;2058

 ;;21,"33261-0836-30 ")

 ;;2059

 ;;21,"33261-0836-60 ")

 ;;2060

 ;;21,"33261-0836-90 ")

 ;;2061

 ;;21,"33261-0840-00 ")

 ;;1777

 ;;21,"33261-0840-30 ")

 ;;1778

 ;;21,"33261-0840-60 ")

 ;;1779

 ;;21,"33261-0840-90 ")

 ;;1780

 ;;21,"33261-0844-00 ")

 ;;1656

 ;;21,"33261-0844-30 ")

 ;;1657

 ;;21,"33261-0844-60 ")

 ;;1658

 ;;21,"33261-0844-90 ")

 ;;1659

 ;;21,"33261-0982-00 ")

 ;;2362

 ;;21,"33261-0982-30 ")

 ;;2363

 ;;21,"33261-0982-60 ")

 ;;2364

 ;;21,"33261-0982-90 ")

 ;;2365

 ;;21,"33358-0109-30 ")

 ;;724

 ;;21,"33358-0222-00 ")

 ;;2412

 ;;21,"33358-0262-00 ")

 ;;1680

 ;;21,"33358-0262-30 ")

 ;;1681

 ;;21,"35356-0002-10 ")

 ;;451

 ;;21,"35356-0026-00 ")

 ;;608

 ;;21,"35356-0027-00 ")

 ;;653

 ;;21,"35356-0059-10 ")

 ;;219

 ;;21,"35356-0059-30 ")

 ;;220

 ;;21,"35356-0059-60 ")

 ;;221

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

 ;;222

 ;;21,"35356-0268-30 ")

 ;;2532

 ;;21,"35356-0510-30 ")

 ;;942

 ;;21,"35356-0511-30 ")

 ;;971

 ;;21,"35356-0739-10 ")

 ;;114

 ;;21,"35356-0740-10 ")

 ;;115

 ;;21,"35356-0774-30 ")

 ;;479

 ;;21,"35356-0774-60 ")

 ;;480

 ;;21,"35356-0858-30 ")

 ;;152

 ;;21,"35356-0858-60 ")

 ;;153

 ;;21,"35356-0866-60 ")

 ;;637

 ;;21,"35356-0907-30 ")

 ;;678

 ;;21,"35356-0907-90 ")

 ;;679

 ;;21,"35356-0915-30 ")

 ;;38

 ;;21,"35356-0917-30 ")

 ;;2317

 ;;21,"35356-0947-30 ")

 ;;1035

 ;;21,"35356-0952-30 ")

 ;;1637

 ;;21,"35356-0960-30 ")

 ;;2399

 ;;21,"35356-0960-60 ")

 ;;2400

 ;;21,"35356-0960-90 ")

 ;;2401

 ;;21,"35356-0965-30 ")

 ;;2425

 ;;21,"35356-0965-60 ")

 ;;2426

 ;;21,"35356-0965-90 ")

 ;;2427

 ;;21,"35356-0971-30 ")

 ;;555

 ;;21,"35356-0971-60 ")

 ;;556

 ;;21,"35356-0971-90 ")

 ;;557

 ;;21,"42254-0072-30 ")

 ;;2396

 ;;21,"42254-0073-30 ")

 ;;2436

 ;;21,"42254-0074-30 ")

 ;;2507

 ;;21,"42254-0095-30 ")

 ;;1726

 ;;21,"42254-0095-90 ")

 ;;1727

 ;;21,"42254-0398-30 ")

 ;;960

 ;;21,"42254-0421-30 ")

 ;;897

 ;;21,"42254-0429-30 ")

 ;;2073

 ;;21,"42291-0640-90 ")

 ;;1434

 ;;21,"42291-0641-90 ")

 ;;1449

 ;;21,"42806-0055-05 ")

 ;;35

 ;;21,"42806-0055-09 ")

 ;;36

 ;;21,"42806-0055-10 ")

 ;;37

 ;;21,"42806-0056-05 ")

 ;;210

 ;;21,"42806-0056-09 ")

 ;;211

 ;;21,"42806-0056-10 ")

 ;;212

 ;;21,"42806-0057-05 ")

 ;;354

 ;;21,"42806-0057-09 ")

 ;;355

 ;;21,"42806-0057-10 ")

 ;;356

 ;;21,"42806-0501-01 ")

 ;;1431

 ;;21,"42806-0501-05 ")

 ;;1432

 ;;21,"42806-0501-09 ")

 ;;1433

 ;;21,"42806-0502-01 ")

 ;;1446

 ;;21,"42806-0502-05 ")

 ;;1447

 ;;21,"42806-0502-09 ")

 ;;1448

 ;;21,"43063-0011-01 ")

 ;;2199

 ;;21,"43063-0171-14 ")

 ;;2292

 ;;21,"43063-0232-30 ")

 ;;2445

 ;;21,"43063-0232-60 ")

 ;;2446

 ;;21,"43063-0233-60 ")

 ;;2312

 ;;21,"43063-0234-60 ")

 ;;2371

 ;;21,"43063-0402-60 ")

 ;;2368

 ;;21,"43063-0404-30 ")

 ;;452

 ;;21,"43063-0404-90 ")

 ;;453

 ;;21,"43353-0073-30 ")

 ;;409

 ;;21,"43353-0073-45 ")

 ;;410

 ;;21,"43353-0073-53 ")

 ;;411

 ;;21,"43353-0130-30 ")

 ;;1578

 ;;21,"43353-0130-60 ")

 ;;1579

 ;;21,"43353-0130-80 ")

 ;;1580

 ;;21,"43353-0188-30 ")

 ;;412

 ;;21,"43353-0188-45 ")

 ;;413

 ;;21,"43353-0256-30 ")

 ;;262

 ;;21,"43353-0256-45 ")

 ;;263

 ;;21,"43353-0256-53 ")

 ;;264

 ;;21,"43353-0256-60 ")

 ;;265

 ;;21,"43353-0295-30 ")

 ;;320

 ;;21,"43353-0295-45 ")

 ;;321

 ;;21,"43353-0295-53 ")

 ;;322

 ;;21,"43353-0295-60 ")

 ;;319

 ;;21,"43353-0311-30 ")

 ;;1555

 ;;21,"43353-0311-60 ")

 ;;1556

 ;;21,"43353-0311-80 ")

 ;;1557

 ;;21,"43353-0328-60 ")

 ;;182

 ;;21,"43353-0452-30 ")

 ;;116

 ;;21,"43353-0534-30 ")

 ;;476

 ;;21,"43353-0534-45 ")

 ;;477

 ;;21,"43353-0534-60 ")

 ;;478

 ;;21,"43353-0545-45 ")

 ;;158

 ;;21,"43353-0551-30 ")

 ;;475

 ;;21,"43353-0599-60 ")

 ;;2054

 ;;21,"43353-0599-80 ")

 ;;2055

 ;;21,"43353-0600-30 ")

 ;;2153

 ;;21,"43353-0600-60 ")

 ;;2154

 ;;21,"43353-0601-60 ")

 ;;2096

 ;;21,"43353-0602-60 ")

 ;;2097

 ;;21,"43353-0684-15 ")

 ;;174

 ;;21,"43353-0684-30 ")

 ;;175

 ;;21,"43353-0684-45 ")

 ;;176

 ;;21,"43353-0691-30 ")

 ;;465

 ;;21,"43353-0723-60 ")

 ;;1525

 ;;21,"43353-0750-60 ")

 ;;1638

 ;;21,"43353-0750-81 ")

 ;;1639

 ;;21,"43353-0782-30 ")

 ;;1607

 ;;21,"43353-0782-60 ")

 ;;1608

 ;;21,"43353-0782-80 ")

 ;;1609

 ;;21,"43353-0792-30 ")

 ;;1533

 ;;21,"43353-0792-60 ")

 ;;1534

 ;;21,"43353-0836-30 ")

 ;;1604

 ;;21,"43353-0836-60 ")

 ;;1605

 ;;21,"43353-0836-80 ")

 ;;1606

 ;;21,"43547-0230-09 ")

 ;;65

 ;;21,"43547-0230-11 ")

 ;;66

 ;;21,"43547-0231-09 ")

 ;;216

 ;;21,"43547-0231-11 ")

 ;;217

 ;;21,"43547-0232-09 ")

 ;;362

 ;;21,"43547-0232-11 ")

 ;;363

 ;;21,"43683-0133-30 ")

 ;;218

 ;;21,"45963-0152-02 ")

 ;;1634

 ;;21,"47335-0669-13 ")

 ;;788

 ;;21,"47335-0669-81 ")

 ;;789

 ;;21,"47335-0669-83 ")

 ;;790

 ;;21,"47335-0670-13 ")

 ;;804

 ;;21,"47335-0670-81 ")

 ;;805

 ;;21,"47335-0670-83 ")

 ;;806

 ;;21,"47335-0671-13 ")

 ;;831

 ;;21,"47335-0671-81 ")

 ;;832

 ;;21,"47335-0671-83 ")

 ;;833

 ;;21,"47335-0672-13 ")

 ;;859

 ;;21,"47335-0672-81 ")

 ;;860

 ;;21,"47335-0672-83 ")

 ;;861

 ;;21,"47335-0673-13 ")

 ;;902

 ;;21,"47335-0673-81 ")

 ;;903

 ;;21,"47335-0673-83 ")

 ;;904

 ;;21,"47335-0675-13 ")

 ;;978

 ;;21,"47335-0675-81 ")

 ;;979

 ;;21,"47335-0676-13 ")

 ;;1051

 ;;21,"47335-0676-81 ")

 ;;1052

 ;;21,"47335-0677-13 ")

 ;;1127

 ;;21,"47335-0677-81 ")

 ;;1128

 ;;21,"47335-0678-13 ")

 ;;1174

 ;;21,"47335-0678-81 ")

 ;;1175

 ;;21,"47335-0679-81 ")

 ;;1184

 ;;21,"47463-0018-30 ")

 ;;403

 ;;21,"47463-0018-90 ")

 ;;404

 ;;21,"47463-0019-30 ")

 ;;266

 ;;21,"47463-0019-90 ")

 ;;267

 ;;21,"47463-0020-30 ")

 ;;2338

 ;;21,"47463-0021-30 ")

 ;;2466

 ;;21,"47463-0022-30 ")

 ;;2374

 ;;21,"47463-0023-30 ")

 ;;2582

 ;;21,"47463-0024-30 ")

 ;;2573

 ;;21,"47463-0210-30 ")

 ;;959

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

 ;;1036

 ;;21,"47463-0212-30 ")

 ;;1103

 ;;21,"47463-0213-30 ")

 ;;1170

 ;;21,"47463-0542-30 ")

 ;;1523

 ;;21,"47463-0543-30 ")

 ;;1596

 ;;21,"47463-0544-30 ")

 ;;1803

 ;;21,"47463-0819-30 ")

 ;;1957

 ;;21,"47463-0820-30 ")

 ;;1860

 ;;21,"47463-5705-30 ")

 ;;1464

 ;;21,"47463-5706-30 ")

 ;;1538

 ;;21,"47463-5707-30 ")

 ;;1611

 ;;21,"47781-0368-01 ")

 ;;1514

 ;;21,"47781-0369-01 ")

 ;;1588

 ;;21,"47781-0370-01 ")

 ;;1636

 ;;21,"49884-0271-01 ")

 ;;2020

 ;;21,"49884-0272-01 ")

 ;;2098

 ;;21,"49884-0273-01 ")

 ;;2201

 ;;21,"49884-0273-05 ")

 ;;2202

 ;;21,"49884-0498-01 ")

 ;;1427

 ;;21,"49884-0498-05 ")

 ;;1428

 ;;21,"49884-0499-01 ")

 ;;1444

 ;;21,"49884-0499-05 ")

 ;;1445

 ;;21,"49884-0677-01 ")

 ;;1509

 ;;21,"49884-0677-05 ")

 ;;1510

 ;;21,"49884-0678-01 ")

 ;;1581

 ;;21,"49884-0678-05 ")

 ;;1582

 ;;21,"49884-0679-01 ")

 ;;1635

 ;;21,"49884-0829-05 ")

 ;;972

 ;;21,"49884-0829-09 ")

 ;;973

 ;;21,"49884-0829-11 ")

 ;;974

 ;;21,"49884-0830-05 ")

 ;;1031

 ;;21,"49884-0830-09 ")

 ;;1032

 ;;21,"49884-0830-11 ")

 ;;1033

 ;;21,"49884-0831-05 ")

 ;;1100

 ;;21,"49884-0831-09 ")

 ;;1101

 ;;21,"49884-0831-11 ")

 ;;1102

 ;;21,"49884-0832-05 ")

 ;;1161

 ;;21,"49884-0832-09 ")

 ;;1162

 ;;21,"49884-0832-11 ")

 ;;1163

 ;;21,"49884-0929-01 ")

 ;;2288

 ;;21,"49884-0929-05 ")

 ;;2289

 ;;21,"49884-0930-01 ")

 ;;2305

 ;;21,"49884-0930-05 ")

 ;;2306

 ;;21,"49884-0931-01 ")

 ;;2360

 ;;21,"49884-0931-05 ")

 ;;2361

 ;;21,"49884-0932-01 ")

 ;;2451

 ;;21,"49884-0932-05 ")

 ;;2452

 ;;21,"49884-0952-01 ")

 ;;2421

 ;;21,"49884-0952-05 ")

 ;;2422

 ;;21,"49884-0953-01 ")

 ;;2501

 ;;21,"49884-0953-05 ")

 ;;2502

 ;;21,"49999-0075-00 ")

 ;;2126

 ;;21,"49999-0075-30 ")

 ;;2127

 ;;21,"49999-0075-90 ")

 ;;2128

 ;;21,"49999-0248-10 ")

 ;;357

 ;;21,"49999-0283-00 ")

 ;;1923

 ;;21,"49999-0283-30 ")

 ;;1924

 ;;21,"49999-0283-60 ")

 ;;1925

 ;;21,"49999-0283-90 ")

 ;;1926

 ;;21,"49999-0284-00 ")

 ;;2038

 ;;21,"49999-0284-30 ")

 ;;2039

 ;;21,"49999-0284-60 ")

 ;;2052

 ;;21,"49999-0284-90 ")

 ;;2053

 ;;21,"49999-0296-30 ")

 ;;1338

 ;;21,"49999-0310-00 ")

 ;;1878

 ;;21,"49999-0310-60 ")

 ;;1879

 ;;21,"49999-0357-30 ")

 ;;1682

 ;;21,"49999-0357-60 ")

 ;;1683

 ;;21,"49999-0357-90 ")

 ;;1684

 ;;21,"49999-0436-30 ")

 ;;293

 ;;21,"49999-0436-90 ")

 ;;294

 ;;21,"49999-0476-30 ")

 ;;1725

 ;;21,"49999-0476-60 ")

 ;;1568

 ;;21,"49999-0476-90 ")

 ;;1569

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

 ;;505

 ;;21,"49999-0478-90 ")

 ;;506

 ;;21,"49999-0496-30 ")

 ;;1054

 ;;21,"49999-0499-10 ")

 ;;899

 ;;21,"49999-0572-10 ")

 ;;1377

 ;;21,"49999-0821-10 ")

 ;;1291

 ;;21,"49999-0946-30 ")

 ;;2497

 ;;21,"49999-0947-30 ")

 ;;2352

 ;;21,"49999-0948-30 ")

 ;;2415

 ;;21,"49999-0989-30 ")

 ;;2638

 ;;21,"50111-0486-01 ")

 ;;1862

 ;;21,"50111-0486-02 ")

 ;;1863

 ;;21,"50111-0486-03 ")

 ;;1864

 ;;21,"50111-0487-01 ")

 ;;1954

 ;;21,"50111-0487-02 ")

 ;;1955

 ;;21,"50268-0081-15 ")

 ;;268

 ;;21,"50268-0082-15 ")

 ;;402

 ;;21,"50268-0597-15 ")

 ;;1507

 ;;21,"50268-0598-15 ")

 ;;1577

 ;;21,"50268-0599-15 ")

 ;;1631

 ;;21,"50419-0701-05 ")

 ;;1475

 ;;21,"50419-0701-10 ")

 ;;1476

 ;;21,"50419-0702-05 ")

 ;;1543

 ;;21,"50419-0702-10 ")

 ;;1544

 ;;21,"50419-0703-05 ")

 ;;1617

 ;;21,"51079-0400-01 ")

 ;;1673

 ;;21,"51079-0400-20 ")

 ;;1674

 ;;21,"51079-0450-01 ")

 ;;16

 ;;21,"51079-0450-20 ")

 ;;17

 ;;21,"51079-0450-63 ")

 ;;18

 ;;21,"51079-0450-66 ")

 ;;19

 ;;21,"51079-0451-01 ")

 ;;149

 ;;21,"51079-0451-17 ")

 ;;150

 ;;21,"51079-0451-19 ")

 ;;151

 ;;21,"51079-0451-20 ")

 ;;123

 ;;21,"51079-0451-30 ")

 ;;110

 ;;21,"51079-0451-56 ")

 ;;111

 ;;21,"51079-0451-69 ")

 ;;112

 ;;21,"51079-0452-01 ")

 ;;443

 ;;21,"51079-0452-17 ")

 ;;444

 ;;21,"51079-0452-19 ")

 ;;445

 ;;21,"51079-0452-20 ")

 ;;446

 ;;21,"51079-0452-30 ")

 ;;447

 ;;21,"51079-0452-56 ")

 ;;448

 ;;21,"51079-0467-01 ")

 ;;1285

 ;;21,"51079-0467-20 ")

 ;;1286

 ;;21,"51079-0468-01 ")

 ;;1343

 ;;21,"51079-0468-20 ")

 ;;1344

 ;;21,"51079-0682-01 ")

 ;;1865

 ;;21,"51079-0682-17 ")

 ;;1866

 ;;21,"51079-0682-19 ")

 ;;1867

BGP47Z3   ;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,"21695-0512-30 ")

 +2       ;;1921

 +3       ;;21,"21695-0512-90 ")

 +4       ;;1922

 +5       ;;21,"21695-0541-60 ")

 +6       ;;34

 +7       ;;21,"21695-0542-30 ")

 +8       ;;213

 +9       ;;21,"21695-0542-60 ")

 +10      ;;214

 +11      ;;21,"21695-0542-90 ")

 +12      ;;215

 +13      ;;21,"21695-0543-30 ")

 +14      ;;352

 +15      ;;21,"21695-0543-90 ")

 +16      ;;353

 +17      ;;21,"21695-0776-30 ")

 +18      ;;1679

 +19      ;;21,"21695-0803-30 ")

 +20      ;;1104

 +21      ;;21,"21695-0807-30 ")

 +22      ;;1789

 +23      ;;21,"21695-0807-90 ")

 +24      ;;1790

 +25      ;;21,"21695-0866-90 ")

 +26      ;;2307

 +27      ;;21,"21695-0868-90 ")

 +28      ;;2180

 +29      ;;21,"21695-0908-30 ")

 +30      ;;1532

 +31      ;;21,"21695-0908-90 ")

 +32      ;;1524

 +33      ;;21,"21695-0909-30 ")

 +34      ;;1589

 +35      ;;21,"21695-0909-90 ")

 +36      ;;1590

 +37      ;;21,"21695-0916-30 ")

 +38      ;;2443

 +39      ;;21,"21695-0916-90 ")

 +40      ;;2444

 +41      ;;21,"21695-0998-30 ")

 +42      ;;1114

 +43      ;;21,"23155-0026-01 ")

 +44      ;;1861

 +45      ;;21,"23155-0027-01 ")

 +46      ;;1956

 +47      ;;21,"23490-5055-03 ")

 +48      ;;15

 +49      ;;21,"23490-5056-01 ")

 +50      ;;481

 +51      ;;21,"23490-5056-02 ")

 +52      ;;482

 +53      ;;21,"23490-5057-03 ")

 +54      ;;154

 +55      ;;21,"23490-5057-04 ")

 +56      ;;155

 +57      ;;21,"23490-5057-06 ")

 +58      ;;156

 +59      ;;21,"23490-5057-09 ")

 +60      ;;157

 +61      ;;21,"23490-5447-03 ")

 +62      ;;642

 +63      ;;21,"23490-5447-06 ")

 +64      ;;643

 +65      ;;21,"23490-5450-03 ")

 +66      ;;1125

 +67      ;;21,"23490-5450-04 ")

 +68      ;;1126

 +69      ;;21,"23490-5991-01 ")

 +70      ;;1511

 +71      ;;21,"23490-5992-01 ")

 +72      ;;1583

 +73      ;;21,"23490-6462-01 ")

 +74      ;;1927

 +75      ;;21,"23490-6462-05 ")

 +76      ;;1928

 +77      ;;21,"23490-6463-01 ")

 +78      ;;1980

 +79      ;;21,"23490-6464-01 ")

 +80      ;;2036

 +81      ;;21,"23490-6464-09 ")

 +82      ;;2037

 +83      ;;21,"23490-6466-01 ")

 +84      ;;2130

 +85      ;;21,"23490-6466-06 ")

 +86      ;;2131

 +87      ;;21,"23490-6466-09 ")

 +88      ;;2132

 +89      ;;21,"23490-7060-01 ")

 +90      ;;2351

 +91      ;;21,"23490-7062-01 ")

 +92      ;;2496

 +93      ;;21,"24477-0515-01 ")

 +94      ;;1451

 +95      ;;21,"24477-0516-01 ")

 +96      ;;1462

 +97      ;;21,"24658-0190-10 ")

 +98      ;;1

 +99      ;;21,"24658-0190-90 ")

 +100     ;;2

 +101     ;;21,"24658-0191-10 ")

 +102     ;;135

 +103     ;;21,"24658-0191-90 ")

 +104     ;;136

 +105     ;;21,"24658-0192-10 ")

 +106     ;;449

 +107     ;;21,"24658-0192-90 ")

 +108     ;;450

 +109     ;;21,"31722-0237-10 ")

 +110     ;;88

 +111     ;;21,"31722-0237-90 ")

 +112     ;;89

 +113     ;;21,"31722-0238-10 ")

 +114     ;;260

 +115     ;;21,"31722-0238-90 ")

 +116     ;;261

 +117     ;;21,"31722-0239-10 ")

 +118     ;;405

 +119     ;;21,"31722-0239-90 ")

 +120     ;;406

 +121     ;;21,"33261-0437-02 ")

 +122     ;;137

 +123     ;;21,"33261-0437-30 ")

 +124     ;;138

 +125     ;;21,"33261-0437-60 ")

 +126     ;;139

 +127     ;;21,"33261-0437-90 ")

 +128     ;;140

 +129     ;;21,"33261-0535-02 ")

 +130     ;;358

 +131     ;;21,"33261-0535-30 ")

 +132     ;;359

 +133     ;;21,"33261-0535-60 ")

 +134     ;;360

 +135     ;;21,"33261-0535-90 ")

 +136     ;;361

 +137     ;;21,"33261-0675-00 ")

 +138     ;;1999

 +139     ;;21,"33261-0675-02 ")

 +140     ;;1984

 +141     ;;21,"33261-0675-07 ")

 +142     ;;1985

 +143     ;;21,"33261-0675-14 ")

 +144     ;;1986

 +145     ;;21,"33261-0675-20 ")

 +146     ;;1987

 +147     ;;21,"33261-0675-21 ")

 +148     ;;1988

 +149     ;;21,"33261-0675-28 ")

 +150     ;;1989

 +151     ;;21,"33261-0675-30 ")

 +152     ;;1990

 +153     ;;21,"33261-0675-60 ")

 +154     ;;1991

 +155     ;;21,"33261-0675-90 ")

 +156     ;;1992

 +157     ;;21,"33261-0824-00 ")

 +158     ;;2320

 +159     ;;21,"33261-0824-30 ")

 +160     ;;2321

 +161     ;;21,"33261-0824-60 ")

 +162     ;;2322

 +163     ;;21,"33261-0824-90 ")

 +164     ;;2323

 +165     ;;21,"33261-0825-00 ")

 +166     ;;2484

 +167     ;;21,"33261-0825-30 ")

 +168     ;;2485

 +169     ;;21,"33261-0825-60 ")

 +170     ;;2486

 +171     ;;21,"33261-0825-90 ")

 +172     ;;2487

 +173     ;;21,"33261-0826-00 ")

 +174     ;;46

 +175     ;;21,"33261-0826-30 ")

 +176     ;;47

 +177     ;;21,"33261-0826-60 ")

 +178     ;;48

 +179     ;;21,"33261-0826-90 ")

 +180     ;;49

 +181     ;;21,"33261-0836-00 ")

 +182     ;;2058

 +183     ;;21,"33261-0836-30 ")

 +184     ;;2059

 +185     ;;21,"33261-0836-60 ")

 +186     ;;2060

 +187     ;;21,"33261-0836-90 ")

 +188     ;;2061

 +189     ;;21,"33261-0840-00 ")

 +190     ;;1777

 +191     ;;21,"33261-0840-30 ")

 +192     ;;1778

 +193     ;;21,"33261-0840-60 ")

 +194     ;;1779

 +195     ;;21,"33261-0840-90 ")

 +196     ;;1780

 +197     ;;21,"33261-0844-00 ")

 +198     ;;1656

 +199     ;;21,"33261-0844-30 ")

 +200     ;;1657

 +201     ;;21,"33261-0844-60 ")

 +202     ;;1658

 +203     ;;21,"33261-0844-90 ")

 +204     ;;1659

 +205     ;;21,"33261-0982-00 ")

 +206     ;;2362

 +207     ;;21,"33261-0982-30 ")

 +208     ;;2363

 +209     ;;21,"33261-0982-60 ")

 +210     ;;2364

 +211     ;;21,"33261-0982-90 ")

 +212     ;;2365

 +213     ;;21,"33358-0109-30 ")

 +214     ;;724

 +215     ;;21,"33358-0222-00 ")

 +216     ;;2412

 +217     ;;21,"33358-0262-00 ")

 +218     ;;1680

 +219     ;;21,"33358-0262-30 ")

 +220     ;;1681

 +221     ;;21,"35356-0002-10 ")

 +222     ;;451

 +223     ;;21,"35356-0026-00 ")

 +224     ;;608

 +225     ;;21,"35356-0027-00 ")

 +226     ;;653

 +227     ;;21,"35356-0059-10 ")

 +228     ;;219

 +229     ;;21,"35356-0059-30 ")

 +230     ;;220

 +231     ;;21,"35356-0059-60 ")

 +232     ;;221

 +233     ;;21,"35356-0059-90 ")

 +234     ;;222

 +235     ;;21,"35356-0268-30 ")

 +236     ;;2532

 +237     ;;21,"35356-0510-30 ")

 +238     ;;942

 +239     ;;21,"35356-0511-30 ")

 +240     ;;971

 +241     ;;21,"35356-0739-10 ")

 +242     ;;114

 +243     ;;21,"35356-0740-10 ")

 +244     ;;115

 +245     ;;21,"35356-0774-30 ")

 +246     ;;479

 +247     ;;21,"35356-0774-60 ")

 +248     ;;480

 +249     ;;21,"35356-0858-30 ")

 +250     ;;152

 +251     ;;21,"35356-0858-60 ")

 +252     ;;153

 +253     ;;21,"35356-0866-60 ")

 +254     ;;637

 +255     ;;21,"35356-0907-30 ")

 +256     ;;678

 +257     ;;21,"35356-0907-90 ")

 +258     ;;679

 +259     ;;21,"35356-0915-30 ")

 +260     ;;38

 +261     ;;21,"35356-0917-30 ")

 +262     ;;2317

 +263     ;;21,"35356-0947-30 ")

 +264     ;;1035

 +265     ;;21,"35356-0952-30 ")

 +266     ;;1637

 +267     ;;21,"35356-0960-30 ")

 +268     ;;2399

 +269     ;;21,"35356-0960-60 ")

 +270     ;;2400

 +271     ;;21,"35356-0960-90 ")

 +272     ;;2401

 +273     ;;21,"35356-0965-30 ")

 +274     ;;2425

 +275     ;;21,"35356-0965-60 ")

 +276     ;;2426

 +277     ;;21,"35356-0965-90 ")

 +278     ;;2427

 +279     ;;21,"35356-0971-30 ")

 +280     ;;555

 +281     ;;21,"35356-0971-60 ")

 +282     ;;556

 +283     ;;21,"35356-0971-90 ")

 +284     ;;557

 +285     ;;21,"42254-0072-30 ")

 +286     ;;2396

 +287     ;;21,"42254-0073-30 ")

 +288     ;;2436

 +289     ;;21,"42254-0074-30 ")

 +290     ;;2507

 +291     ;;21,"42254-0095-30 ")

 +292     ;;1726

 +293     ;;21,"42254-0095-90 ")

 +294     ;;1727

 +295     ;;21,"42254-0398-30 ")

 +296     ;;960

 +297     ;;21,"42254-0421-30 ")

 +298     ;;897

 +299     ;;21,"42254-0429-30 ")

 +300     ;;2073

 +301     ;;21,"42291-0640-90 ")

 +302     ;;1434

 +303     ;;21,"42291-0641-90 ")

 +304     ;;1449

 +305     ;;21,"42806-0055-05 ")

 +306     ;;35

 +307     ;;21,"42806-0055-09 ")

 +308     ;;36

 +309     ;;21,"42806-0055-10 ")

 +310     ;;37

 +311     ;;21,"42806-0056-05 ")

 +312     ;;210

 +313     ;;21,"42806-0056-09 ")

 +314     ;;211

 +315     ;;21,"42806-0056-10 ")

 +316     ;;212

 +317     ;;21,"42806-0057-05 ")

 +318     ;;354

 +319     ;;21,"42806-0057-09 ")

 +320     ;;355

 +321     ;;21,"42806-0057-10 ")

 +322     ;;356

 +323     ;;21,"42806-0501-01 ")

 +324     ;;1431

 +325     ;;21,"42806-0501-05 ")

 +326     ;;1432

 +327     ;;21,"42806-0501-09 ")

 +328     ;;1433

 +329     ;;21,"42806-0502-01 ")

 +330     ;;1446

 +331     ;;21,"42806-0502-05 ")

 +332     ;;1447

 +333     ;;21,"42806-0502-09 ")

 +334     ;;1448

 +335     ;;21,"43063-0011-01 ")

 +336     ;;2199

 +337     ;;21,"43063-0171-14 ")

 +338     ;;2292

 +339     ;;21,"43063-0232-30 ")

 +340     ;;2445

 +341     ;;21,"43063-0232-60 ")

 +342     ;;2446

 +343     ;;21,"43063-0233-60 ")

 +344     ;;2312

 +345     ;;21,"43063-0234-60 ")

 +346     ;;2371

 +347     ;;21,"43063-0402-60 ")

 +348     ;;2368

 +349     ;;21,"43063-0404-30 ")

 +350     ;;452

 +351     ;;21,"43063-0404-90 ")

 +352     ;;453

 +353     ;;21,"43353-0073-30 ")

 +354     ;;409

 +355     ;;21,"43353-0073-45 ")

 +356     ;;410

 +357     ;;21,"43353-0073-53 ")

 +358     ;;411

 +359     ;;21,"43353-0130-30 ")

 +360     ;;1578

 +361     ;;21,"43353-0130-60 ")

 +362     ;;1579

 +363     ;;21,"43353-0130-80 ")

 +364     ;;1580

 +365     ;;21,"43353-0188-30 ")

 +366     ;;412

 +367     ;;21,"43353-0188-45 ")

 +368     ;;413

 +369     ;;21,"43353-0256-30 ")

 +370     ;;262

 +371     ;;21,"43353-0256-45 ")

 +372     ;;263

 +373     ;;21,"43353-0256-53 ")

 +374     ;;264

 +375     ;;21,"43353-0256-60 ")

 +376     ;;265

 +377     ;;21,"43353-0295-30 ")

 +378     ;;320

 +379     ;;21,"43353-0295-45 ")

 +380     ;;321

 +381     ;;21,"43353-0295-53 ")

 +382     ;;322

 +383     ;;21,"43353-0295-60 ")

 +384     ;;319

 +385     ;;21,"43353-0311-30 ")

 +386     ;;1555

 +387     ;;21,"43353-0311-60 ")

 +388     ;;1556

 +389     ;;21,"43353-0311-80 ")

 +390     ;;1557

 +391     ;;21,"43353-0328-60 ")

 +392     ;;182

 +393     ;;21,"43353-0452-30 ")

 +394     ;;116

 +395     ;;21,"43353-0534-30 ")

 +396     ;;476

 +397     ;;21,"43353-0534-45 ")

 +398     ;;477

 +399     ;;21,"43353-0534-60 ")

 +400     ;;478

 +401     ;;21,"43353-0545-45 ")

 +402     ;;158

 +403     ;;21,"43353-0551-30 ")

 +404     ;;475

 +405     ;;21,"43353-0599-60 ")

 +406     ;;2054

 +407     ;;21,"43353-0599-80 ")

 +408     ;;2055

 +409     ;;21,"43353-0600-30 ")

 +410     ;;2153

 +411     ;;21,"43353-0600-60 ")

 +412     ;;2154

 +413     ;;21,"43353-0601-60 ")

 +414     ;;2096

 +415     ;;21,"43353-0602-60 ")

 +416     ;;2097

 +417     ;;21,"43353-0684-15 ")

 +418     ;;174

 +419     ;;21,"43353-0684-30 ")

 +420     ;;175

 +421     ;;21,"43353-0684-45 ")

 +422     ;;176

 +423     ;;21,"43353-0691-30 ")

 +424     ;;465

 +425     ;;21,"43353-0723-60 ")

 +426     ;;1525

 +427     ;;21,"43353-0750-60 ")

 +428     ;;1638

 +429     ;;21,"43353-0750-81 ")

 +430     ;;1639

 +431     ;;21,"43353-0782-30 ")

 +432     ;;1607

 +433     ;;21,"43353-0782-60 ")

 +434     ;;1608

 +435     ;;21,"43353-0782-80 ")

 +436     ;;1609

 +437     ;;21,"43353-0792-30 ")

 +438     ;;1533

 +439     ;;21,"43353-0792-60 ")

 +440     ;;1534

 +441     ;;21,"43353-0836-30 ")

 +442     ;;1604

 +443     ;;21,"43353-0836-60 ")

 +444     ;;1605

 +445     ;;21,"43353-0836-80 ")

 +446     ;;1606

 +447     ;;21,"43547-0230-09 ")

 +448     ;;65

 +449     ;;21,"43547-0230-11 ")

 +450     ;;66

 +451     ;;21,"43547-0231-09 ")

 +452     ;;216

 +453     ;;21,"43547-0231-11 ")

 +454     ;;217

 +455     ;;21,"43547-0232-09 ")

 +456     ;;362

 +457     ;;21,"43547-0232-11 ")

 +458     ;;363

 +459     ;;21,"43683-0133-30 ")

 +460     ;;218

 +461     ;;21,"45963-0152-02 ")

 +462     ;;1634

 +463     ;;21,"47335-0669-13 ")

 +464     ;;788

 +465     ;;21,"47335-0669-81 ")

 +466     ;;789

 +467     ;;21,"47335-0669-83 ")

 +468     ;;790

 +469     ;;21,"47335-0670-13 ")

 +470     ;;804

 +471     ;;21,"47335-0670-81 ")

 +472     ;;805

 +473     ;;21,"47335-0670-83 ")

 +474     ;;806

 +475     ;;21,"47335-0671-13 ")

 +476     ;;831

 +477     ;;21,"47335-0671-81 ")

 +478     ;;832

 +479     ;;21,"47335-0671-83 ")

 +480     ;;833

 +481     ;;21,"47335-0672-13 ")

 +482     ;;859

 +483     ;;21,"47335-0672-81 ")

 +484     ;;860

 +485     ;;21,"47335-0672-83 ")

 +486     ;;861

 +487     ;;21,"47335-0673-13 ")

 +488     ;;902

 +489     ;;21,"47335-0673-81 ")

 +490     ;;903

 +491     ;;21,"47335-0673-83 ")

 +492     ;;904

 +493     ;;21,"47335-0675-13 ")

 +494     ;;978

 +495     ;;21,"47335-0675-81 ")

 +496     ;;979

 +497     ;;21,"47335-0676-13 ")

 +498     ;;1051

 +499     ;;21,"47335-0676-81 ")

 +500     ;;1052

 +501     ;;21,"47335-0677-13 ")

 +502     ;;1127

 +503     ;;21,"47335-0677-81 ")

 +504     ;;1128

 +505     ;;21,"47335-0678-13 ")

 +506     ;;1174

 +507     ;;21,"47335-0678-81 ")

 +508     ;;1175

 +509     ;;21,"47335-0679-81 ")

 +510     ;;1184

 +511     ;;21,"47463-0018-30 ")

 +512     ;;403

 +513     ;;21,"47463-0018-90 ")

 +514     ;;404

 +515     ;;21,"47463-0019-30 ")

 +516     ;;266

 +517     ;;21,"47463-0019-90 ")

 +518     ;;267

 +519     ;;21,"47463-0020-30 ")

 +520     ;;2338

 +521     ;;21,"47463-0021-30 ")

 +522     ;;2466

 +523     ;;21,"47463-0022-30 ")

 +524     ;;2374

 +525     ;;21,"47463-0023-30 ")

 +526     ;;2582

 +527     ;;21,"47463-0024-30 ")

 +528     ;;2573

 +529     ;;21,"47463-0210-30 ")

 +530     ;;959

 +531     ;;21,"47463-0211-30 ")

 +532     ;;1036

 +533     ;;21,"47463-0212-30 ")

 +534     ;;1103

 +535     ;;21,"47463-0213-30 ")

 +536     ;;1170

 +537     ;;21,"47463-0542-30 ")

 +538     ;;1523