BGP44T3.m

BGP44T3 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON SEP 11, 2013;

 ;;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,"51138-0221-45 ")

 ;;141

 ;;21,"51138-0221-60 ")

 ;;142

 ;;21,"51138-0222-15 ")

 ;;231

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

 ;;232

 ;;21,"51138-0222-45 ")

 ;;233

 ;;21,"51138-0223-30 ")

 ;;307

 ;;21,"51138-0227-30 ")

 ;;723

 ;;21,"51138-0228-30 ")

 ;;788

 ;;21,"51138-0229-30 ")

 ;;864

 ;;21,"51138-0230-30 ")

 ;;945

 ;;21,"51138-0242-30 ")

 ;;720

 ;;21,"51138-0243-30 ")

 ;;781

 ;;21,"51138-0244-30 ")

 ;;863

 ;;21,"51138-0245-30 ")

 ;;946

 ;;21,"51138-0247-30 ")

 ;;384

 ;;21,"51138-0248-30 ")

 ;;460

 ;;21,"51138-0249-30 ")

 ;;561

 ;;21,"51138-0257-30 ")

 ;;630

 ;;21,"51138-0258-15 ")

 ;;655

 ;;21,"51138-0258-30 ")

 ;;656

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

 ;;681

 ;;21,"51138-0260-30 ")

 ;;990

 ;;21,"51138-0261-30 ")

 ;;1067

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

 ;;1214

 ;;21,"51138-0263-30 ")

 ;;1374

 ;;21,"51138-0264-30 ")

 ;;1519

 ;;21,"51138-0274-30 ")

 ;;388

 ;;21,"51138-0275-30 ")

 ;;457

 ;;21,"51138-0276-30 ")

 ;;564

 ;;21,"51138-0363-30 ")

 ;;1607

 ;;21,"51138-0364-30 ")

 ;;1608

 ;;21,"51138-0365-30 ")

 ;;1637

 ;;21,"51138-0366-30 ")

 ;;1638

 ;;21,"52959-0046-30 ")

 ;;224

 ;;21,"52959-0112-30 ")

 ;;1443

 ;;21,"52959-0720-30 ")

 ;;449

 ;;21,"52959-0759-90 ")

 ;;57

 ;;21,"52959-0760-90 ")

 ;;138

 ;;21,"52959-0944-30 ")

 ;;1327

 ;;21,"52959-0974-00 ")

 ;;405

 ;;21,"52959-0974-30 ")

 ;;406

 ;;21,"52959-0988-30 ")

 ;;1034

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

 ;;1184

 ;;21,"53002-0570-00 ")

 ;;458

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

 ;;459

 ;;21,"53002-1177-00 ")

 ;;562

 ;;21,"53002-1177-03 ")

 ;;563

 ;;21,"53002-1385-00 ")

 ;;359

 ;;21,"53002-1385-03 ")

 ;;360

 ;;21,"53002-1527-00 ")

 ;;1104

 ;;21,"53002-1527-03 ")

 ;;1105

 ;;21,"53002-1528-00 ")

 ;;1245

 ;;21,"53002-1528-03 ")

 ;;1246

 ;;21,"53002-1569-00 ")

 ;;1414

 ;;21,"53002-1569-03 ")

 ;;1415

 ;;21,"53489-0607-01 ")

 ;;410

 ;;21,"53489-0607-06 ")

 ;;411

 ;;21,"53489-0608-01 ")

 ;;421

 ;;21,"53489-0608-06 ")

 ;;422

 ;;21,"53489-0609-01 ")

 ;;528

 ;;21,"53489-0609-06 ")

 ;;529

 ;;21,"53489-0609-10 ")

 ;;530

 ;;21,"54458-0908-02 ")

 ;;818

 ;;21,"54458-0914-10 ")

 ;;551

 ;;21,"54458-0915-10 ")

 ;;448

 ;;21,"54458-0916-10 ")

 ;;397

 ;;21,"54458-0925-10 ")

 ;;903

 ;;21,"54458-0926-10 ")

 ;;817

 ;;21,"54458-0927-10 ")

 ;;742

 ;;21,"54458-0932-10 ")

 ;;1351

 ;;21,"54458-0933-10 ")

 ;;1167

 ;;21,"54458-0934-10 ")

 ;;1043

 ;;21,"54458-0936-10 ")

 ;;544

 ;;21,"54458-0937-10 ")

 ;;452

 ;;21,"54458-0938-10 ")

 ;;394

 ;;21,"54458-0982-10 ")

 ;;575

 ;;21,"54458-0983-10 ")

 ;;476

 ;;21,"54458-0984-10 ")

 ;;374

 ;;21,"54569-3821-00 ")

 ;;322

 ;;21,"54569-4466-00 ")

 ;;67

 ;;21,"54569-4467-00 ")

 ;;144

 ;;21,"54569-4467-01 ")

 ;;145

 ;;21,"54569-4587-00 ")

 ;;246

 ;;21,"54569-4587-01 ")

 ;;247

 ;;21,"54569-5345-00 ")

 ;;375

 ;;21,"54569-5345-01 ")

 ;;376

 ;;21,"54569-5346-00 ")

 ;;480

 ;;21,"54569-5346-02 ")

 ;;481

 ;;21,"54569-5347-00 ")

 ;;570

 ;;21,"54569-5347-02 ")

 ;;571

 ;;21,"54569-5382-00 ")

 ;;306

 ;;21,"54569-5600-00 ")

 ;;646

 ;;21,"54569-5600-01 ")

 ;;647

 ;;21,"54569-5648-00 ")

 ;;1632

 ;;21,"54569-5672-00 ")

 ;;686

 ;;21,"54569-5672-02 ")

 ;;687

 ;;21,"54569-5704-00 ")

 ;;1667

 ;;21,"54569-5746-00 ")

 ;;637

 ;;21,"54569-5766-00 ")

 ;;1620

 ;;21,"54569-5793-00 ")

 ;;782

 ;;21,"54569-5793-01 ")

 ;;783

 ;;21,"54569-5794-00 ")

 ;;861

 ;;21,"54569-5794-01 ")

 ;;862

 ;;21,"54569-5833-01 ")

 ;;1215

 ;;21,"54569-5833-02 ")

 ;;1216

 ;;21,"54569-5833-03 ")

 ;;1217

 ;;21,"54569-5834-01 ")

 ;;1370

 ;;21,"54569-5834-02 ")

 ;;1371

 ;;21,"54569-5834-03 ")

 ;;1372

 ;;21,"54569-5834-04 ")

 ;;1373

 ;;21,"54569-5881-00 ")

 ;;1695

 ;;21,"54569-5951-00 ")

 ;;1704

 ;;21,"54569-6054-01 ")

 ;;707

 ;;21,"54569-6099-00 ")

 ;;1709

 ;;21,"54569-6113-00 ")

 ;;1543

 ;;21,"54569-6113-01 ")

 ;;1544

 ;;21,"54569-6282-00 ")

 ;;45

 ;;21,"54569-6282-01 ")

 ;;46

 ;;21,"54569-6283-00 ")

 ;;128

 ;;21,"54569-6283-01 ")

 ;;129

 ;;21,"54569-6284-00 ")

 ;;210

 ;;21,"54569-6284-01 ")

 ;;211

 ;;21,"54569-6285-00 ")

 ;;286

 ;;21,"54569-6285-01 ")

 ;;287

 ;;21,"54569-6302-00 ")

 ;;1102

 ;;21,"54868-0686-01 ")

 ;;512

 ;;21,"54868-0686-02 ")

 ;;513

 ;;21,"54868-0686-03 ")

 ;;514

 ;;21,"54868-0686-04 ")

 ;;515

 ;;21,"54868-1087-00 ")

 ;;613

 ;;21,"54868-1087-01 ")

 ;;614

 ;;21,"54868-1207-00 ")

 ;;1677

 ;;21,"54868-1207-01 ")

 ;;1678

 ;;21,"54868-1890-00 ")

 ;;703

 ;;21,"54868-1890-01 ")

 ;;704

 ;;21,"54868-2288-00 ")

 ;;757

 ;;21,"54868-2288-01 ")

 ;;758

 ;;21,"54868-2288-02 ")

 ;;759

 ;;21,"54868-2639-00 ")

 ;;1130

 ;;21,"54868-2639-01 ")

 ;;1131

 ;;21,"54868-3104-00 ")

 ;;1277

 ;;21,"54868-3104-01 ")

 ;;1278

 ;;21,"54868-3270-00 ")

 ;;856

 ;;21,"54868-3270-01 ")

 ;;857

 ;;21,"54868-3270-02 ")

 ;;858

 ;;21,"54868-3287-00 ")

 ;;1669

 ;;21,"54868-3287-01 ")

 ;;1670

 ;;21,"54868-3329-00 ")

 ;;335

 ;;21,"54868-3934-00 ")

 ;;73

 ;;21,"54868-3934-01 ")

 ;;74

 ;;21,"54868-3934-02 ")

 ;;75

 ;;21,"54868-3934-03 ")

 ;;76

 ;;21,"54868-3934-04 ")

 ;;77

 ;;21,"54868-3946-00 ")

 ;;153

 ;;21,"54868-3946-01 ")

 ;;154

 ;;21,"54868-3946-02 ")

 ;;155

 ;;21,"54868-3946-03 ")

 ;;156

 ;;21,"54868-3946-04 ")

 ;;157

 ;;21,"54868-4157-00 ")

 ;;1444

 ;;21,"54868-4157-01 ")

 ;;1445

 ;;21,"54868-4157-02 ")

 ;;1446

 ;;21,"54868-4181-00 ")

 ;;1571

 ;;21,"54868-4181-01 ")

 ;;1572

 ;;21,"54868-4224-00 ")

 ;;340

 ;;21,"54868-4224-01 ")

 ;;341

 ;;21,"54868-4229-00 ")

 ;;225

 ;;21,"54868-4229-01 ")

 ;;226

 ;;21,"54868-4229-02 ")

 ;;227

 ;;21,"54868-4229-03 ")

 ;;228

 ;;21,"54868-4585-00 ")

 ;;500

 ;;21,"54868-4585-01 ")

 ;;501

 ;;21,"54868-4585-02 ")

 ;;502

 ;;21,"54868-4585-03 ")

 ;;503

 ;;21,"54868-4593-00 ")

 ;;356

 ;;21,"54868-4593-01 ")

 ;;357

 ;;21,"54868-4593-02 ")

 ;;358

 ;;21,"54868-4601-00 ")

 ;;346

 ;;21,"54868-4634-00 ")

 ;;926

 ;;21,"54868-4774-00 ")

 ;;545

 ;;21,"54868-4774-01 ")

 ;;546

 ;;21,"54868-4774-02 ")

 ;;547

 ;;21,"54868-4774-03 ")

 ;;548

 ;;21,"54868-4807-00 ")

 ;;1573

 ;;21,"54868-4807-01 ")

 ;;1574

 ;;21,"54868-4807-02 ")

 ;;1575

 ;;21,"54868-4934-00 ")

 ;;309

 ;;21,"54868-4934-01 ")

 ;;310

 ;;21,"54868-4934-02 ")

 ;;311

 ;;21,"54868-4934-03 ")

 ;;312

 ;;21,"54868-4963-00 ")

 ;;641

 ;;21,"54868-4963-01 ")

 ;;642

 ;;21,"54868-4963-02 ")

 ;;643

 ;;21,"54868-4963-03 ")

 ;;644

 ;;21,"54868-5085-00 ")

 ;;692

 ;;21,"54868-5085-01 ")

 ;;693

 ;;21,"54868-5085-02 ")

 ;;694

 ;;21,"54868-5085-03 ")

 ;;695

 ;;21,"54868-5085-04 ")

 ;;696

 ;;21,"54868-5087-00 ")

 ;;1578

 ;;21,"54868-5179-00 ")

 ;;1684

 ;;21,"54868-5187-00 ")

 ;;1609

 ;;21,"54868-5187-01 ")

 ;;1610

 ;;21,"54868-5187-02 ")

 ;;1611

 ;;21,"54868-5189-00 ")

 ;;1635

 ;;21,"54868-5189-01 ")

 ;;1636

 ;;21,"54868-5200-00 ")

 ;;1710

 ;;21,"54868-5200-01 ")

 ;;1711

 ;;21,"54868-5209-00 ")

 ;;1702

 ;;21,"54868-5209-01 ")

 ;;1703

 ;;21,"54868-5250-00 ")

 ;;1603

 ;;21,"54868-5259-00 ")

 ;;1644

 ;;21,"54868-5259-01 ")

 ;;1645

 ;;21,"54868-5341-00 ")

 ;;635

 ;;21,"54868-5341-01 ")

 ;;636

 ;;21,"54868-5358-00 ")

 ;;621

 ;;21,"54868-5420-00 ")

 ;;1689

 ;;21,"54868-5523-00 ")

 ;;1717

 ;;21,"54868-5523-01 ")

 ;;1718

 ;;21,"54868-5567-00 ")

 ;;1696

 ;;21,"54868-5576-00 ")

 ;;737

 ;;21,"54868-5576-01 ")

 ;;738

 ;;21,"54868-5577-00 ")

 ;;795

 ;;21,"54868-5577-01 ")

 ;;796

 ;;21,"54868-5578-00 ")

 ;;879

 ;;21,"54868-5578-01 ")

 ;;880

 ;;21,"54868-5578-02 ")

 ;;881

 ;;21,"54868-5579-00 ")

 ;;938

 ;;21,"54868-5579-01 ")

 ;;939

 ;;21,"54868-5627-00 ")

 ;;1115

 ;;21,"54868-5627-01 ")

 ;;1116

 ;;21,"54868-5628-00 ")

 ;;1266

 ;;21,"54868-5628-01 ")

 ;;1267

 ;;21,"54868-5628-02 ")

 ;;1268

 ;;21,"54868-5629-00 ")

 ;;1423

 ;;21,"54868-5629-01 ")

 ;;1424

 ;;21,"54868-5629-02 ")

 ;;1425

 ;;21,"54868-5629-03 ")

 ;;1426

 ;;21,"54868-5629-04 ")

 ;;1427

 ;;21,"54868-5630-00 ")

 ;;1561

 ;;21,"54868-5630-01 ")

 ;;1562

 ;;21,"54868-5653-00 ")

 ;;1581

 ;;21,"54868-5653-01 ")

 ;;1582

 ;;21,"54868-5672-00 ")

 ;;1656

 ;;21,"54868-5699-00 ")

 ;;1661

 ;;21,"54868-5886-00 ")

 ;;1583

 ;;21,"54868-5886-01 ")

 ;;1584

 ;;21,"54868-5904-00 ")

 ;;1590

 ;;21,"54868-5904-01 ")

 ;;1591

 ;;21,"54868-5907-00 ")

 ;;1588

 ;;21,"54868-5907-01 ")

 ;;1589

 ;;21,"54868-6066-00 ")

 ;;967

 ;;21,"54868-6169-00 ")

 ;;1594

 ;;21,"54868-6319-00 ")

 ;;26

 ;;21,"54868-6320-00 ")

 ;;98

 ;;21,"54868-6321-00 ")

 ;;174

 ;;21,"54868-6322-00 ")

 ;;260

 ;;21,"54868-6335-00 ")

 ;;1714

 ;;21,"55045-3014-08 ")

 ;;456

 ;;21,"55045-3015-08 ")

 ;;565

 ;;21,"55045-3655-08 ")

 ;;1114

 ;;21,"55048-0031-30 ")

 ;;38

 ;;21,"55048-0032-30 ")

 ;;117

 ;;21,"55048-0033-30 ")

 ;;192

 ;;21,"55048-0033-90 ")

 ;;193

 ;;21,"55048-0034-30 ")

 ;;279

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

 ;;638

 ;;21,"55048-0096-30 ")

 ;;639

 ;;21,"55048-0097-30 ")

 ;;691

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

 ;;524

 ;;21,"55048-0394-90 ")

 ;;525

 ;;21,"55048-0395-30 ")

 ;;436

 ;;21,"55048-0449-30 ")

 ;;523

 ;;21,"55048-0470-30 ")

 ;;437

 ;;21,"55048-0596-30 ")

 ;;885

 ;;21,"55048-0597-30 ")

 ;;808

 ;;21,"55048-0598-30 ")

 ;;935

 ;;21,"55048-0647-30 ")

 ;;805

 ;;21,"55048-0648-30 ")

 ;;884

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

 ;;1377

 ;;21,"55048-0774-90 ")

 ;;1378

 ;;21,"55048-0775-30 ")

 ;;1237

 ;;21,"55048-0775-90 ")

 ;;1238

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

 ;;1524

 ;;21,"55048-0776-90 ")

 ;;1525

 ;;21,"55048-0821-30 ")

 ;;1618

 ;;21,"55048-0822-30 ")

 ;;1627

 ;;21,"55048-0823-30 ")

 ;;1643

 ;;21,"55048-0864-30 ")

 ;;1239

 ;;21,"55048-0865-30 ")

 ;;1375

 ;;21,"55048-0866-30 ")

 ;;1376

 ;;21,"55111-0121-05 ")

 ;;17

 ;;21,"55111-0121-90 ")

 ;;18

 ;;21,"55111-0122-05 ")

 ;;90

 ;;21,"55111-0122-90 ")

 ;;91

 ;;21,"55111-0123-05 ")

 ;;167

 ;;21,"55111-0123-90 ")

 ;;168

 ;;21,"55111-0124-05 ")

 ;;252

 ;;21,"55111-0124-90 ")

 ;;253

 ;;21,"55111-0197-05 ")

 ;;957

 ;;21,"55111-0197-30 ")

 ;;958

 ;;21,"55111-0197-90 ")

 ;;959

 ;;21,"55111-0198-05 ")

 ;;1028

 ;;21,"55111-0198-30 ")

 ;;1029

 ;;21,"55111-0198-90 ")

 ;;1030

 ;;21,"55111-0199-05 ")

 ;;1187

 ;;21,"55111-0199-10 ")

 ;;1188

 ;;21,"55111-0199-30 ")

 ;;1189

 ;;21,"55111-0199-90 ")

 ;;1190

 ;;21,"55111-0200-05 ")

 ;;1331

 ;;21,"55111-0200-10 ")

 ;;1332

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

 ;;1333

 ;;21,"55111-0200-90 ")

 ;;1334

 ;;21,"55111-0229-05 ")

 ;;746

 ;;21,"55111-0229-90 ")

 ;;747

 ;;21,"55111-0230-05 ")

 ;;809

 ;;21,"55111-0230-90 ")

 ;;810

 ;;21,"55111-0231-05 ")

 ;;894

 ;;21,"55111-0231-90 ")

 ;;895

 ;;21,"55111-0268-05 ")

 ;;1480

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

 ;;1481

 ;;21,"55111-0268-90 ")

 ;;1482

 ;;21,"55111-0274-05 ")

 ;;955

 ;;21,"55111-0274-90 ")

 ;;956

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

 ;;1633

 ;;21,"55289-0293-14 ")

 ;;1179

 ;;21,"55289-0293-30 ")

 ;;1180

 ;;21,"55289-0293-90 ")

 ;;1181

 ;;21,"55289-0338-14 ")

 ;;1099

 ;;21,"55289-0338-30 ")

 ;;1100

 ;;21,"55289-0338-90 ")

 ;;1101

 ;;21,"55289-0395-30 ")

 ;;1314

 ;;21,"55289-0395-90 ")

 ;;1315

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

 ;;518

 ;;21,"55289-0520-30 ")

 ;;1646

 ;;21,"55289-0548-30 ")

 ;;612

 ;;21,"55289-0692-14 ")

 ;;598

 ;;21,"55289-0692-30 ")

 ;;599

 ;;21,"55289-0800-30 ")

 ;;166

 ;;21,"55289-0861-30 ")

 ;;251

 ;;21,"55289-0870-30 ")

 ;;86

 ;;21,"55289-0871-30 ")

 ;;768

 ;;21,"55289-0873-30 ")

 ;;848

 ;;21,"55289-0874-30 ")

 ;;1447

 ;;21,"55289-0881-30 ")

 ;;453

 ;;21,"55289-0932-30 ")

 ;;688

 ;;21,"55289-0935-30 ")

 ;;640

 ;;21,"55289-0980-21 ")

 ;;1612

 ;;21,"58016-0006-00 ")

 ;;1325

 ;;21,"58016-0006-30 ")

 ;;1326

 ;;21,"58016-0006-60 ")

 ;;1389

 ;;21,"58016-0006-90 ")

 ;;1390

 ;;21,"58016-0007-00 ")

 ;;1240

 ;;21,"58016-0007-30 ")

 ;;1241

 ;;21,"58016-0007-60 ")

 ;;1242

 ;;21,"58016-0007-90 ")

 ;;1243

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

 ;;1091

 ;;21,"58016-0008-30 ")

 ;;1092

 ;;21,"58016-0008-60 ")

 ;;1093

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

 ;;1094

 ;;21,"58016-0012-00 ")

 ;;873

 ;;21,"58016-0012-30 ")

 ;;874

 ;;21,"58016-0012-60 ")

 ;;875

 ;;21,"58016-0012-90 ")

 ;;876

 ;;21,"58016-0013-00 ")

 ;;789

 ;;21,"58016-0013-30 ")

 ;;790

 ;;21,"58016-0013-60 ")

 ;;791

 ;;21,"58016-0013-90 ")

 ;;792

 ;;21,"58016-0037-00 ")

 ;;667

 ;;21,"58016-0037-30 ")

 ;;668

 ;;21,"58016-0037-60 ")

 ;;669

 ;;21,"58016-0037-90 ")

 ;;670

 ;;21,"58016-0051-00 ")

 ;;302

 ;;21,"58016-0051-30 ")

 ;;303

 ;;21,"58016-0051-60 ")

 ;;304

 ;;21,"58016-0051-90 ")

 ;;305

 ;;21,"58016-0052-00 ")

 ;;671

 ;;21,"58016-0052-30 ")

 ;;672

 ;;21,"58016-0052-60 ")

 ;;673

 ;;21,"58016-0052-90 ")

 ;;674

 ;;21,"58016-0071-00 ")

 ;;712

 ;;21,"58016-0071-30 ")

 ;;713

 ;;21,"58016-0071-60 ")

 ;;714

 ;;21,"58016-0071-90 ")

 ;;715

 ;;21,"58016-0364-00 ")

 ;;1122

 ;;21,"58016-0364-30 ")

 ;;1123

 ;;21,"58016-0364-60 ")

 ;;1124

 ;;21,"58016-0364-90 ")

 ;;1125

 ;;21,"58016-0365-00 ")

 ;;1429

 ;;21,"58016-0365-30 ")

 ;;1430

 ;;21,"58016-0365-60 ")

 ;;1431

 ;;21,"58016-0365-90 ")

 ;;1432

 ;;21,"58016-0385-00 ")

 ;;1282

BGP44T3   ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON SEP 11, 2013;

 +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,"51138-0221-45 ")

 +2       ;;141

 +3       ;;21,"51138-0221-60 ")

 +4       ;;142

 +5       ;;21,"51138-0222-15 ")

 +6       ;;231

 +7       ;;21,"51138-0222-30 ")

 +8       ;;232

 +9       ;;21,"51138-0222-45 ")

 +10      ;;233

 +11      ;;21,"51138-0223-30 ")

 +12      ;;307

 +13      ;;21,"51138-0227-30 ")

 +14      ;;723

 +15      ;;21,"51138-0228-30 ")

 +16      ;;788

 +17      ;;21,"51138-0229-30 ")

 +18      ;;864

 +19      ;;21,"51138-0230-30 ")

 +20      ;;945

 +21      ;;21,"51138-0242-30 ")

 +22      ;;720

 +23      ;;21,"51138-0243-30 ")

 +24      ;;781

 +25      ;;21,"51138-0244-30 ")

 +26      ;;863

 +27      ;;21,"51138-0245-30 ")

 +28      ;;946

 +29      ;;21,"51138-0247-30 ")

 +30      ;;384

 +31      ;;21,"51138-0248-30 ")

 +32      ;;460

 +33      ;;21,"51138-0249-30 ")

 +34      ;;561

 +35      ;;21,"51138-0257-30 ")

 +36      ;;630

 +37      ;;21,"51138-0258-15 ")

 +38      ;;655

 +39      ;;21,"51138-0258-30 ")

 +40      ;;656

 +41      ;;21,"51138-0259-30 ")

 +42      ;;681

 +43      ;;21,"51138-0260-30 ")

 +44      ;;990

 +45      ;;21,"51138-0261-30 ")

 +46      ;;1067

 +47      ;;21,"51138-0262-30 ")

 +48      ;;1214

 +49      ;;21,"51138-0263-30 ")

 +50      ;;1374

 +51      ;;21,"51138-0264-30 ")

 +52      ;;1519

 +53      ;;21,"51138-0274-30 ")

 +54      ;;388

 +55      ;;21,"51138-0275-30 ")

 +56      ;;457

 +57      ;;21,"51138-0276-30 ")

 +58      ;;564

 +59      ;;21,"51138-0363-30 ")

 +60      ;;1607

 +61      ;;21,"51138-0364-30 ")

 +62      ;;1608

 +63      ;;21,"51138-0365-30 ")

 +64      ;;1637

 +65      ;;21,"51138-0366-30 ")

 +66      ;;1638

 +67      ;;21,"52959-0046-30 ")

 +68      ;;224

 +69      ;;21,"52959-0112-30 ")

 +70      ;;1443

 +71      ;;21,"52959-0720-30 ")

 +72      ;;449

 +73      ;;21,"52959-0759-90 ")

 +74      ;;57

 +75      ;;21,"52959-0760-90 ")

 +76      ;;138

 +77      ;;21,"52959-0944-30 ")

 +78      ;;1327

 +79      ;;21,"52959-0974-00 ")

 +80      ;;405

 +81      ;;21,"52959-0974-30 ")

 +82      ;;406

 +83      ;;21,"52959-0988-30 ")

 +84      ;;1034

 +85      ;;21,"52959-0989-30 ")

 +86      ;;1184

 +87      ;;21,"53002-0570-00 ")

 +88      ;;458

 +89      ;;21,"53002-0570-30 ")

 +90      ;;459

 +91      ;;21,"53002-1177-00 ")

 +92      ;;562

 +93      ;;21,"53002-1177-03 ")

 +94      ;;563

 +95      ;;21,"53002-1385-00 ")

 +96      ;;359

 +97      ;;21,"53002-1385-03 ")

 +98      ;;360

 +99      ;;21,"53002-1527-00 ")

 +100     ;;1104

 +101     ;;21,"53002-1527-03 ")

 +102     ;;1105

 +103     ;;21,"53002-1528-00 ")

 +104     ;;1245

 +105     ;;21,"53002-1528-03 ")

 +106     ;;1246

 +107     ;;21,"53002-1569-00 ")

 +108     ;;1414

 +109     ;;21,"53002-1569-03 ")

 +110     ;;1415

 +111     ;;21,"53489-0607-01 ")

 +112     ;;410

 +113     ;;21,"53489-0607-06 ")

 +114     ;;411

 +115     ;;21,"53489-0608-01 ")

 +116     ;;421

 +117     ;;21,"53489-0608-06 ")

 +118     ;;422

 +119     ;;21,"53489-0609-01 ")

 +120     ;;528

 +121     ;;21,"53489-0609-06 ")

 +122     ;;529

 +123     ;;21,"53489-0609-10 ")

 +124     ;;530

 +125     ;;21,"54458-0908-02 ")

 +126     ;;818

 +127     ;;21,"54458-0914-10 ")

 +128     ;;551

 +129     ;;21,"54458-0915-10 ")

 +130     ;;448

 +131     ;;21,"54458-0916-10 ")

 +132     ;;397

 +133     ;;21,"54458-0925-10 ")

 +134     ;;903

 +135     ;;21,"54458-0926-10 ")

 +136     ;;817

 +137     ;;21,"54458-0927-10 ")

 +138     ;;742

 +139     ;;21,"54458-0932-10 ")

 +140     ;;1351

 +141     ;;21,"54458-0933-10 ")

 +142     ;;1167

 +143     ;;21,"54458-0934-10 ")

 +144     ;;1043

 +145     ;;21,"54458-0936-10 ")

 +146     ;;544

 +147     ;;21,"54458-0937-10 ")

 +148     ;;452

 +149     ;;21,"54458-0938-10 ")

 +150     ;;394

 +151     ;;21,"54458-0982-10 ")

 +152     ;;575

 +153     ;;21,"54458-0983-10 ")

 +154     ;;476

 +155     ;;21,"54458-0984-10 ")

 +156     ;;374

 +157     ;;21,"54569-3821-00 ")

 +158     ;;322

 +159     ;;21,"54569-4466-00 ")

 +160     ;;67

 +161     ;;21,"54569-4467-00 ")

 +162     ;;144

 +163     ;;21,"54569-4467-01 ")

 +164     ;;145

 +165     ;;21,"54569-4587-00 ")

 +166     ;;246

 +167     ;;21,"54569-4587-01 ")

 +168     ;;247

 +169     ;;21,"54569-5345-00 ")

 +170     ;;375

 +171     ;;21,"54569-5345-01 ")

 +172     ;;376

 +173     ;;21,"54569-5346-00 ")

 +174     ;;480

 +175     ;;21,"54569-5346-02 ")

 +176     ;;481

 +177     ;;21,"54569-5347-00 ")

 +178     ;;570

 +179     ;;21,"54569-5347-02 ")

 +180     ;;571

 +181     ;;21,"54569-5382-00 ")

 +182     ;;306

 +183     ;;21,"54569-5600-00 ")

 +184     ;;646

 +185     ;;21,"54569-5600-01 ")

 +186     ;;647

 +187     ;;21,"54569-5648-00 ")

 +188     ;;1632

 +189     ;;21,"54569-5672-00 ")

 +190     ;;686

 +191     ;;21,"54569-5672-02 ")

 +192     ;;687

 +193     ;;21,"54569-5704-00 ")

 +194     ;;1667

 +195     ;;21,"54569-5746-00 ")

 +196     ;;637

 +197     ;;21,"54569-5766-00 ")

 +198     ;;1620

 +199     ;;21,"54569-5793-00 ")

 +200     ;;782

 +201     ;;21,"54569-5793-01 ")

 +202     ;;783

 +203     ;;21,"54569-5794-00 ")

 +204     ;;861

 +205     ;;21,"54569-5794-01 ")

 +206     ;;862

 +207     ;;21,"54569-5833-01 ")

 +208     ;;1215

 +209     ;;21,"54569-5833-02 ")

 +210     ;;1216

 +211     ;;21,"54569-5833-03 ")

 +212     ;;1217

 +213     ;;21,"54569-5834-01 ")

 +214     ;;1370

 +215     ;;21,"54569-5834-02 ")

 +216     ;;1371

 +217     ;;21,"54569-5834-03 ")

 +218     ;;1372

 +219     ;;21,"54569-5834-04 ")

 +220     ;;1373

 +221     ;;21,"54569-5881-00 ")

 +222     ;;1695

 +223     ;;21,"54569-5951-00 ")

 +224     ;;1704

 +225     ;;21,"54569-6054-01 ")

 +226     ;;707

 +227     ;;21,"54569-6099-00 ")

 +228     ;;1709

 +229     ;;21,"54569-6113-00 ")

 +230     ;;1543

 +231     ;;21,"54569-6113-01 ")

 +232     ;;1544

 +233     ;;21,"54569-6282-00 ")

 +234     ;;45

 +235     ;;21,"54569-6282-01 ")

 +236     ;;46

 +237     ;;21,"54569-6283-00 ")

 +238     ;;128

 +239     ;;21,"54569-6283-01 ")

 +240     ;;129

 +241     ;;21,"54569-6284-00 ")

 +242     ;;210

 +243     ;;21,"54569-6284-01 ")

 +244     ;;211

 +245     ;;21,"54569-6285-00 ")

 +246     ;;286

 +247     ;;21,"54569-6285-01 ")

 +248     ;;287

 +249     ;;21,"54569-6302-00 ")

 +250     ;;1102

 +251     ;;21,"54868-0686-01 ")

 +252     ;;512

 +253     ;;21,"54868-0686-02 ")

 +254     ;;513

 +255     ;;21,"54868-0686-03 ")

 +256     ;;514

 +257     ;;21,"54868-0686-04 ")

 +258     ;;515

 +259     ;;21,"54868-1087-00 ")

 +260     ;;613

 +261     ;;21,"54868-1087-01 ")

 +262     ;;614

 +263     ;;21,"54868-1207-00 ")

 +264     ;;1677

 +265     ;;21,"54868-1207-01 ")

 +266     ;;1678

 +267     ;;21,"54868-1890-00 ")

 +268     ;;703

 +269     ;;21,"54868-1890-01 ")

 +270     ;;704

 +271     ;;21,"54868-2288-00 ")

 +272     ;;757

 +273     ;;21,"54868-2288-01 ")

 +274     ;;758

 +275     ;;21,"54868-2288-02 ")

 +276     ;;759

 +277     ;;21,"54868-2639-00 ")

 +278     ;;1130

 +279     ;;21,"54868-2639-01 ")

 +280     ;;1131

 +281     ;;21,"54868-3104-00 ")

 +282     ;;1277

 +283     ;;21,"54868-3104-01 ")

 +284     ;;1278

 +285     ;;21,"54868-3270-00 ")

 +286     ;;856

 +287     ;;21,"54868-3270-01 ")

 +288     ;;857

 +289     ;;21,"54868-3270-02 ")

 +290     ;;858

 +291     ;;21,"54868-3287-00 ")

 +292     ;;1669

 +293     ;;21,"54868-3287-01 ")

 +294     ;;1670

 +295     ;;21,"54868-3329-00 ")

 +296     ;;335

 +297     ;;21,"54868-3934-00 ")

 +298     ;;73

 +299     ;;21,"54868-3934-01 ")

 +300     ;;74

 +301     ;;21,"54868-3934-02 ")

 +302     ;;75

 +303     ;;21,"54868-3934-03 ")

 +304     ;;76

 +305     ;;21,"54868-3934-04 ")

 +306     ;;77

 +307     ;;21,"54868-3946-00 ")

 +308     ;;153

 +309     ;;21,"54868-3946-01 ")

 +310     ;;154

 +311     ;;21,"54868-3946-02 ")

 +312     ;;155

 +313     ;;21,"54868-3946-03 ")

 +314     ;;156

 +315     ;;21,"54868-3946-04 ")

 +316     ;;157

 +317     ;;21,"54868-4157-00 ")

 +318     ;;1444

 +319     ;;21,"54868-4157-01 ")

 +320     ;;1445

 +321     ;;21,"54868-4157-02 ")

 +322     ;;1446

 +323     ;;21,"54868-4181-00 ")

 +324     ;;1571

 +325     ;;21,"54868-4181-01 ")

 +326     ;;1572

 +327     ;;21,"54868-4224-00 ")

 +328     ;;340

 +329     ;;21,"54868-4224-01 ")

 +330     ;;341

 +331     ;;21,"54868-4229-00 ")

 +332     ;;225

 +333     ;;21,"54868-4229-01 ")

 +334     ;;226

 +335     ;;21,"54868-4229-02 ")

 +336     ;;227

 +337     ;;21,"54868-4229-03 ")

 +338     ;;228

 +339     ;;21,"54868-4585-00 ")

 +340     ;;500

 +341     ;;21,"54868-4585-01 ")

 +342     ;;501

 +343     ;;21,"54868-4585-02 ")

 +344     ;;502

 +345     ;;21,"54868-4585-03 ")

 +346     ;;503

 +347     ;;21,"54868-4593-00 ")

 +348     ;;356

 +349     ;;21,"54868-4593-01 ")

 +350     ;;357

 +351     ;;21,"54868-4593-02 ")

 +352     ;;358

 +353     ;;21,"54868-4601-00 ")

 +354     ;;346

 +355     ;;21,"54868-4634-00 ")

 +356     ;;926

 +357     ;;21,"54868-4774-00 ")

 +358     ;;545

 +359     ;;21,"54868-4774-01 ")

 +360     ;;546

 +361     ;;21,"54868-4774-02 ")

 +362     ;;547

 +363     ;;21,"54868-4774-03 ")

 +364     ;;548

 +365     ;;21,"54868-4807-00 ")

 +366     ;;1573

 +367     ;;21,"54868-4807-01 ")

 +368     ;;1574

 +369     ;;21,"54868-4807-02 ")

 +370     ;;1575

 +371     ;;21,"54868-4934-00 ")

 +372     ;;309

 +373     ;;21,"54868-4934-01 ")

 +374     ;;310

 +375     ;;21,"54868-4934-02 ")

 +376     ;;311

 +377     ;;21,"54868-4934-03 ")

 +378     ;;312

 +379     ;;21,"54868-4963-00 ")

 +380     ;;641

 +381     ;;21,"54868-4963-01 ")

 +382     ;;642

 +383     ;;21,"54868-4963-02 ")

 +384     ;;643

 +385     ;;21,"54868-4963-03 ")

 +386     ;;644

 +387     ;;21,"54868-5085-00 ")

 +388     ;;692

 +389     ;;21,"54868-5085-01 ")

 +390     ;;693

 +391     ;;21,"54868-5085-02 ")

 +392     ;;694

 +393     ;;21,"54868-5085-03 ")

 +394     ;;695

 +395     ;;21,"54868-5085-04 ")

 +396     ;;696

 +397     ;;21,"54868-5087-00 ")

 +398     ;;1578

 +399     ;;21,"54868-5179-00 ")

 +400     ;;1684

 +401     ;;21,"54868-5187-00 ")

 +402     ;;1609

 +403     ;;21,"54868-5187-01 ")

 +404     ;;1610

 +405     ;;21,"54868-5187-02 ")

 +406     ;;1611

 +407     ;;21,"54868-5189-00 ")

 +408     ;;1635

 +409     ;;21,"54868-5189-01 ")

 +410     ;;1636

 +411     ;;21,"54868-5200-00 ")

 +412     ;;1710

 +413     ;;21,"54868-5200-01 ")

 +414     ;;1711

 +415     ;;21,"54868-5209-00 ")

 +416     ;;1702

 +417     ;;21,"54868-5209-01 ")

 +418     ;;1703

 +419     ;;21,"54868-5250-00 ")

 +420     ;;1603

 +421     ;;21,"54868-5259-00 ")

 +422     ;;1644

 +423     ;;21,"54868-5259-01 ")

 +424     ;;1645

 +425     ;;21,"54868-5341-00 ")

 +426     ;;635

 +427     ;;21,"54868-5341-01 ")

 +428     ;;636

 +429     ;;21,"54868-5358-00 ")

 +430     ;;621

 +431     ;;21,"54868-5420-00 ")

 +432     ;;1689

 +433     ;;21,"54868-5523-00 ")

 +434     ;;1717

 +435     ;;21,"54868-5523-01 ")

 +436     ;;1718

 +437     ;;21,"54868-5567-00 ")

 +438     ;;1696

 +439     ;;21,"54868-5576-00 ")

 +440     ;;737

 +441     ;;21,"54868-5576-01 ")

 +442     ;;738

 +443     ;;21,"54868-5577-00 ")

 +444     ;;795

 +445     ;;21,"54868-5577-01 ")

 +446     ;;796

 +447     ;;21,"54868-5578-00 ")

 +448     ;;879

 +449     ;;21,"54868-5578-01 ")

 +450     ;;880

 +451     ;;21,"54868-5578-02 ")

 +452     ;;881

 +453     ;;21,"54868-5579-00 ")

 +454     ;;938

 +455     ;;21,"54868-5579-01 ")

 +456     ;;939

 +457     ;;21,"54868-5627-00 ")

 +458     ;;1115

 +459     ;;21,"54868-5627-01 ")

 +460     ;;1116

 +461     ;;21,"54868-5628-00 ")

 +462     ;;1266

 +463     ;;21,"54868-5628-01 ")

 +464     ;;1267

 +465     ;;21,"54868-5628-02 ")

 +466     ;;1268

 +467     ;;21,"54868-5629-00 ")

 +468     ;;1423

 +469     ;;21,"54868-5629-01 ")

 +470     ;;1424

 +471     ;;21,"54868-5629-02 ")

 +472     ;;1425

 +473     ;;21,"54868-5629-03 ")

 +474     ;;1426

 +475     ;;21,"54868-5629-04 ")

 +476     ;;1427

 +477     ;;21,"54868-5630-00 ")

 +478     ;;1561

 +479     ;;21,"54868-5630-01 ")

 +480     ;;1562

 +481     ;;21,"54868-5653-00 ")

 +482     ;;1581

 +483     ;;21,"54868-5653-01 ")

 +484     ;;1582

 +485     ;;21,"54868-5672-00 ")

 +486     ;;1656

 +487     ;;21,"54868-5699-00 ")

 +488     ;;1661

 +489     ;;21,"54868-5886-00 ")

 +490     ;;1583

 +491     ;;21,"54868-5886-01 ")

 +492     ;;1584

 +493     ;;21,"54868-5904-00 ")

 +494     ;;1590

 +495     ;;21,"54868-5904-01 ")

 +496     ;;1591

 +497     ;;21,"54868-5907-00 ")

 +498     ;;1588

 +499     ;;21,"54868-5907-01 ")

 +500     ;;1589

 +501     ;;21,"54868-6066-00 ")

 +502     ;;967

 +503     ;;21,"54868-6169-00 ")

 +504     ;;1594

 +505     ;;21,"54868-6319-00 ")

 +506     ;;26

 +507     ;;21,"54868-6320-00 ")

 +508     ;;98

 +509     ;;21,"54868-6321-00 ")

 +510     ;;174

 +511     ;;21,"54868-6322-00 ")

 +512     ;;260

 +513     ;;21,"54868-6335-00 ")

 +514     ;;1714

 +515     ;;21,"55045-3014-08 ")

 +516     ;;456

 +517     ;;21,"55045-3015-08 ")

 +518     ;;565

 +519     ;;21,"55045-3655-08 ")

 +520     ;;1114

 +521     ;;21,"55048-0031-30 ")

 +522     ;;38

 +523     ;;21,"55048-0032-30 ")

 +524     ;;117

 +525     ;;21,"55048-0033-30 ")

 +526     ;;192

 +527     ;;21,"55048-0033-90 ")

 +528     ;;193

 +529     ;;21,"55048-0034-30 ")

 +530     ;;279

 +531     ;;21,"55048-0095-30 ")

 +532     ;;638

 +533     ;;21,"55048-0096-30 ")

 +534     ;;639

 +535     ;;21,"55048-0097-30 ")