BGP51L3.m

BGP51L3 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 19, 2014;

 ;;15.1;IHS CLINICAL REPORTING;;MAY 06, 2015;Build 143

 ;

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,"58016-0744-00 ")

 ;;28

 ;;21,"58016-0744-10 ")

 ;;29

 ;;21,"58016-0744-12 ")

 ;;30

 ;;21,"58016-0744-14 ")

 ;;31

 ;;21,"58016-0744-15 ")

 ;;32

 ;;21,"58016-0744-20 ")

 ;;33

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

 ;;34

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

 ;;69

 ;;21,"58016-0948-10 ")

 ;;70

 ;;21,"58016-0948-12 ")

 ;;71

 ;;21,"58016-0948-14 ")

 ;;72

 ;;21,"58016-0948-15 ")

 ;;73

 ;;21,"58016-0948-20 ")

 ;;74

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

 ;;75

 ;;21,"58016-0948-50 ")

 ;;76

 ;;21,"58016-4074-01 ")

 ;;396

 ;;21,"58118-0886-03 ")

 ;;201

 ;;21,"58118-2331-03 ")

 ;;837

 ;;21,"58118-2331-09 ")

 ;;838

 ;;21,"58118-2332-03 ")

 ;;897

 ;;21,"58118-2332-09 ")

 ;;898

 ;;21,"58118-8343-08 ")

 ;;489

 ;;21,"58118-8343-09 ")

 ;;490

 ;;21,"58864-0224-30 ")

 ;;574

 ;;21,"58864-0224-60 ")

 ;;575

 ;;21,"58864-0224-93 ")

 ;;576

 ;;21,"58864-0421-01 ")

 ;;106

 ;;21,"58864-0711-30 ")

 ;;814

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

 ;;156

 ;;21,"58864-0804-30 ")

 ;;200

 ;;21,"58864-0951-30 ")

 ;;138

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

 ;;834

 ;;21,"58864-0953-30 ")

 ;;901

 ;;21,"59762-2330-07 ")

 ;;792

 ;;21,"59762-2331-06 ")

 ;;835

 ;;21,"59762-2331-08 ")

 ;;836

 ;;21,"59762-2332-06 ")

 ;;899

 ;;21,"59762-2332-08 ")

 ;;900

 ;;21,"59762-3725-01 ")

 ;;449

 ;;21,"59762-3726-03 ")

 ;;488

 ;;21,"59762-3727-04 ")

 ;;569

 ;;21,"59762-3727-06 ")

 ;;570

 ;;21,"59762-3727-07 ")

 ;;571

 ;;21,"59762-7020-09 ")

 ;;450

 ;;21,"59762-7021-05 ")

 ;;486

 ;;21,"59762-7021-09 ")

 ;;487

 ;;21,"59762-7022-05 ")

 ;;572

 ;;21,"59762-7022-09 ")

 ;;573

 ;;21,"60429-0283-01 ")

 ;;732

 ;;21,"60429-0284-01 ")

 ;;744

 ;;21,"60429-0285-01 ")

 ;;762

 ;;21,"60429-0327-01 ")

 ;;157

 ;;21,"60429-0328-01 ")

 ;;199

 ;;21,"60429-0329-01 ")

 ;;235

 ;;21,"60432-0126-08 ")

 ;;998

 ;;21,"60432-0126-16 ")

 ;;999

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

 ;;1000

 ;;21,"61570-0072-01 ")

 ;;136

 ;;21,"61570-0073-01 ")

 ;;137

 ;;21,"61570-0074-01 ")

 ;;144

 ;;21,"61570-0075-50 ")

 ;;145

 ;;21,"62559-0149-01 ")

 ;;376

 ;;21,"62559-0150-01 ")

 ;;362

 ;;21,"62559-1490-00 ")

 ;;383

 ;;21,"62559-1507-00 ")

 ;;372

 ;;21,"63629-1392-01 ")

 ;;850

 ;;21,"63629-1392-02 ")

 ;;851

 ;;21,"63629-1392-03 ")

 ;;852

 ;;21,"63629-1393-01 ")

 ;;685

 ;;21,"63629-1393-02 ")

 ;;686

 ;;21,"63629-1393-03 ")

 ;;687

 ;;21,"63629-1393-04 ")

 ;;688

 ;;21,"63629-2793-01 ")

 ;;948

 ;;21,"63629-2793-03 ")

 ;;949

 ;;21,"63629-2793-04 ")

 ;;950

 ;;21,"63629-2793-05 ")

 ;;951

 ;;21,"63629-2907-01 ")

 ;;541

 ;;21,"63629-2907-02 ")

 ;;542

 ;;21,"63629-3397-03 ")

 ;;735

 ;;21,"63629-3755-01 ")

 ;;209

 ;;21,"63629-3755-02 ")

 ;;210

 ;;21,"63629-3998-01 ")

 ;;810

 ;;21,"63629-4368-01 ")

 ;;1063

 ;;21,"63629-4368-02 ")

 ;;1064

 ;;21,"63629-4368-03 ")

 ;;1065

 ;;21,"63629-4368-04 ")

 ;;1066

 ;;21,"63739-0119-10 ")

 ;;708

 ;;21,"63739-0165-10 ")

 ;;979

 ;;21,"63739-0549-51 ")

 ;;986

 ;;21,"63874-0317-01 ")

 ;;691

 ;;21,"63874-0317-02 ")

 ;;692

 ;;21,"63874-0317-04 ")

 ;;693

 ;;21,"63874-0317-10 ")

 ;;694

 ;;21,"63874-0317-12 ")

 ;;695

 ;;21,"63874-0317-14 ")

 ;;696

 ;;21,"63874-0317-15 ")

 ;;697

 ;;21,"63874-0317-20 ")

 ;;698

 ;;21,"63874-0317-24 ")

 ;;699

 ;;21,"63874-0317-28 ")

 ;;700

 ;;21,"63874-0317-30 ")

 ;;701

 ;;21,"63874-0317-40 ")

 ;;702

 ;;21,"63874-0317-50 ")

 ;;703

 ;;21,"63874-0317-60 ")

 ;;704

 ;;21,"63874-0317-90 ")

 ;;705

 ;;21,"63874-0357-01 ")

 ;;9

 ;;21,"63874-0357-02 ")

 ;;10

 ;;21,"63874-0357-10 ")

 ;;11

 ;;21,"63874-0357-12 ")

 ;;12

 ;;21,"63874-0357-14 ")

 ;;13

 ;;21,"63874-0357-15 ")

 ;;14

 ;;21,"63874-0357-20 ")

 ;;15

 ;;21,"63874-0357-21 ")

 ;;16

 ;;21,"63874-0357-24 ")

 ;;17

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

 ;;18

 ;;21,"63874-0357-40 ")

 ;;19

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

 ;;20

 ;;21,"63874-0588-01 ")

 ;;530

 ;;21,"63874-0588-04 ")

 ;;531

 ;;21,"63874-0588-10 ")

 ;;532

 ;;21,"63874-0588-14 ")

 ;;533

 ;;21,"63874-0588-20 ")

 ;;534

 ;;21,"63874-0588-30 ")

 ;;535

 ;;21,"63874-0588-60 ")

 ;;536

 ;;21,"63874-0588-80 ")

 ;;537

 ;;21,"63874-0588-90 ")

 ;;538

 ;;21,"63874-0665-01 ")

 ;;465

 ;;21,"63874-0665-04 ")

 ;;466

 ;;21,"63874-0665-10 ")

 ;;467

 ;;21,"63874-0665-14 ")

 ;;468

 ;;21,"63874-0665-30 ")

 ;;469

 ;;21,"63874-0665-60 ")

 ;;470

 ;;21,"63874-0665-90 ")

 ;;471

 ;;21,"64011-0215-41 ")

 ;;251

 ;;21,"64248-0101-01 ")

 ;;346

 ;;21,"64248-0102-01 ")

 ;;353

 ;;21,"64720-0123-10 ")

 ;;464

 ;;21,"64720-0124-10 ")

 ;;539

 ;;21,"64720-0125-10 ")

 ;;706

 ;;21,"64720-0125-11 ")

 ;;707

 ;;21,"64727-3298-01 ")

 ;;1015

 ;;21,"64727-3298-02 ")

 ;;1014

 ;;21,"64727-3299-01 ")

 ;;1036

 ;;21,"64727-3299-02 ")

 ;;1037

 ;;21,"64727-3300-01 ")

 ;;1069

 ;;21,"64727-3300-02 ")

 ;;1070

 ;;21,"64727-3302-01 ")

 ;;1044

 ;;21,"64727-3302-02 ")

 ;;1045

 ;;21,"64727-3303-01 ")

 ;;1079

 ;;21,"64727-3303-02 ")

 ;;1080

 ;;21,"64727-3305-01 ")

 ;;1092

 ;;21,"64727-3305-02 ")

 ;;1093

 ;;21,"64727-3307-01 ")

 ;;1100

 ;;21,"64727-3307-02 ")

 ;;1101

 ;;21,"64727-3308-01 ")

 ;;1111

 ;;21,"64727-3308-02 ")

 ;;1112

 ;;21,"64727-3309-01 ")

 ;;1142

 ;;21,"64727-3309-02 ")

 ;;1143

 ;;21,"64727-3310-01 ")

 ;;1119

 ;;21,"64727-3310-02 ")

 ;;1120

 ;;21,"64727-3312-01 ")

 ;;1126

 ;;21,"64727-3312-02 ")

 ;;1127

 ;;21,"64727-3320-01 ")

 ;;1131

 ;;21,"64727-3320-02 ")

 ;;1132

 ;;21,"64727-3340-01 ")

 ;;1138

 ;;21,"64727-3340-02 ")

 ;;1139

 ;;21,"64727-4050-01 ")

 ;;1018

 ;;21,"64727-4050-02 ")

 ;;1019

 ;;21,"64727-4150-01 ")

 ;;1040

 ;;21,"64727-4150-02 ")

 ;;1041

 ;;21,"64727-4250-01 ")

 ;;1048

 ;;21,"64727-4250-02 ")

 ;;1049

 ;;21,"64727-4350-01 ")

 ;;1075

 ;;21,"64727-4350-02 ")

 ;;1076

 ;;21,"64727-4450-01 ")

 ;;1096

 ;;21,"64727-4450-02 ")

 ;;1097

 ;;21,"64727-4550-01 ")

 ;;1115

 ;;21,"64727-4550-02 ")

 ;;1116

 ;;21,"64727-5450-01 ")

 ;;1020

 ;;21,"64727-5450-02 ")

 ;;1021

 ;;21,"64727-5550-01 ")

 ;;1042

 ;;21,"64727-5550-02 ")

 ;;1043

 ;;21,"64727-5650-01 ")

 ;;1050

 ;;21,"64727-5650-02 ")

 ;;1051

 ;;21,"64727-5750-01 ")

 ;;1077

 ;;21,"64727-5750-02 ")

 ;;1078

 ;;21,"64727-5850-01 ")

 ;;1098

 ;;21,"64727-5850-02 ")

 ;;1099

 ;;21,"64727-5950-01 ")

 ;;1117

 ;;21,"64727-5950-02 ")

 ;;1118

 ;;21,"64727-6050-01 ")

 ;;1083

 ;;21,"64727-6050-02 ")

 ;;1084

 ;;21,"64727-6150-01 ")

 ;;1104

 ;;21,"64727-6150-02 ")

 ;;1105

 ;;21,"64727-7065-01 ")

 ;;1016

 ;;21,"64727-7065-02 ")

 ;;1017

 ;;21,"64727-7070-01 ")

 ;;1038

 ;;21,"64727-7070-02 ")

 ;;1039

 ;;21,"64727-7072-01 ")

 ;;1046

 ;;21,"64727-7072-02 ")

 ;;1047

 ;;21,"64727-7073-01 ")

 ;;1073

 ;;21,"64727-7073-02 ")

 ;;1074

 ;;21,"64727-7074-01 ")

 ;;1081

 ;;21,"64727-7074-02 ")

 ;;1082

 ;;21,"64727-7075-01 ")

 ;;1094

 ;;21,"64727-7075-02 ")

 ;;1095

 ;;21,"64727-7078-01 ")

 ;;1102

 ;;21,"64727-7078-02 ")

 ;;1103

 ;;21,"64727-7080-01 ")

 ;;1113

 ;;21,"64727-7080-02 ")

 ;;1114

 ;;21,"64727-7085-01 ")

 ;;1144

 ;;21,"64727-7085-02 ")

 ;;1145

 ;;21,"64727-7090-01 ")

 ;;1121

 ;;21,"64727-7090-02 ")

 ;;1122

 ;;21,"64727-7095-01 ")

 ;;1128

 ;;21,"64727-7095-02 ")

 ;;1129

 ;;21,"64727-7100-01 ")

 ;;1133

 ;;21,"64727-7100-02 ")

 ;;1134

 ;;21,"64727-7150-01 ")

 ;;1140

 ;;21,"64727-7150-02 ")

 ;;1141

 ;;21,"65243-0176-09 ")

 ;;620

 ;;21,"65243-0176-12 ")

 ;;621

 ;;21,"65243-0176-18 ")

 ;;622

 ;;21,"65243-0176-27 ")

 ;;623

 ;;21,"65243-0176-36 ")

 ;;624

 ;;21,"65243-0185-36 ")

 ;;625

 ;;21,"65243-0325-09 ")

 ;;512

 ;;21,"65243-0325-18 ")

 ;;513

 ;;21,"65243-0343-09 ")

 ;;618

 ;;21,"65243-0343-36 ")

 ;;619

 ;;21,"65243-0375-09 ")

 ;;507

 ;;21,"65862-0028-01 ")

 ;;454

 ;;21,"65862-0029-01 ")

 ;;505

 ;;21,"65862-0029-05 ")

 ;;506

 ;;21,"65862-0030-01 ")

 ;;628

 ;;21,"65862-0030-99 ")

 ;;629

 ;;21,"65862-0080-01 ")

 ;;795

 ;;21,"65862-0080-05 ")

 ;;796

 ;;21,"65862-0081-01 ")

 ;;839

 ;;21,"65862-0081-05 ")

 ;;840

 ;;21,"65862-0082-01 ")

 ;;902

 ;;21,"65862-0082-05 ")

 ;;903

 ;;21,"66105-0984-03 ")

 ;;455

 ;;21,"66105-0984-06 ")

 ;;456

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

 ;;457

 ;;21,"66105-0984-11 ")

 ;;458

 ;;21,"66105-0984-50 ")

 ;;459

 ;;21,"66105-0985-03 ")

 ;;500

 ;;21,"66105-0985-06 ")

 ;;501

 ;;21,"66105-0985-10 ")

 ;;502

 ;;21,"66105-0985-11 ")

 ;;503

 ;;21,"66105-0985-50 ")

 ;;504

 ;;21,"66105-0986-03 ")

 ;;630

 ;;21,"66105-0986-06 ")

 ;;631

 ;;21,"66105-0986-10 ")

 ;;632

 ;;21,"66105-0986-11 ")

 ;;633

 ;;21,"66105-0986-50 ")

 ;;634

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

 ;;813

 ;;21,"66116-0285-30 ")

 ;;79

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

 ;;150

 ;;21,"66116-0438-30 ")

 ;;183

 ;;21,"66267-0093-60 ")

 ;;226

 ;;21,"66267-0103-30 ")

 ;;635

 ;;21,"66267-0174-30 ")

 ;;78

 ;;21,"66336-0028-30 ")

 ;;508

 ;;21,"66336-0028-90 ")

 ;;509

 ;;21,"66336-0319-30 ")

 ;;869

 ;;21,"66336-0506-30 ")

 ;;117

 ;;21,"66336-0532-30 ")

 ;;38

 ;;21,"66336-0584-30 ")

 ;;184

 ;;21,"66336-0584-90 ")

 ;;185

 ;;21,"66336-0585-30 ")

 ;;224

 ;;21,"66336-0585-90 ")

 ;;225

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

 ;;42

 ;;21,"66336-0598-90 ")

 ;;43

 ;;21,"66336-0599-30 ")

 ;;77

 ;;21,"66336-0712-90 ")

 ;;773

 ;;21,"66336-0784-30 ")

 ;;908

 ;;21,"66336-0784-60 ")

 ;;909

 ;;21,"66336-0784-90 ")

 ;;910

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

 ;;151

 ;;21,"66336-0850-30 ")

 ;;844

 ;;21,"66336-0850-60 ")

 ;;845

 ;;21,"66336-0850-90 ")

 ;;846

 ;;21,"66336-0938-30 ")

 ;;660

 ;;21,"66336-0938-60 ")

 ;;661

 ;;21,"66336-0938-90 ")

 ;;662

 ;;21,"66336-0977-30 ")

 ;;339

 ;;21,"66689-0020-01 ")

 ;;984

 ;;21,"66689-0020-50 ")

 ;;985

 ;;21,"67253-0460-10 ")

 ;;733

 ;;21,"67253-0461-10 ")

 ;;749

 ;;21,"67253-0461-11 ")

 ;;750

 ;;21,"67253-0461-50 ")

 ;;751

 ;;21,"67253-0462-10 ")

 ;;770

 ;;21,"67253-0462-11 ")

 ;;771

 ;;21,"67253-0462-50 ")

 ;;772

 ;;21,"67544-0296-70 ")

 ;;868

 ;;21,"67544-0364-70 ")

 ;;907

 ;;21,"67544-0417-70 ")

 ;;906

 ;;21,"67544-0511-70 ")

 ;;911

 ;;21,"67544-0511-94 ")

 ;;912

 ;;21,"67544-0566-53 ")

 ;;636

 ;;21,"67544-0566-60 ")

 ;;637

 ;;21,"67544-0566-70 ")

 ;;638

 ;;21,"67544-0566-80 ")

 ;;639

 ;;21,"67544-0566-90 ")

 ;;640

 ;;21,"67544-0566-92 ")

 ;;641

 ;;21,"67544-0566-94 ")

 ;;642

 ;;21,"67544-0613-53 ")

 ;;643

 ;;21,"67544-0613-60 ")

 ;;644

 ;;21,"67544-0613-70 ")

 ;;645

 ;;21,"67544-0613-80 ")

 ;;646

 ;;21,"67544-0613-90 ")

 ;;647

 ;;21,"67544-0613-92 ")

 ;;648

 ;;21,"67544-0613-94 ")

 ;;649

 ;;21,"67544-0643-80 ")

 ;;650

 ;;21,"67544-0643-94 ")

 ;;651

 ;;21,"67544-0653-53 ")

 ;;652

 ;;21,"67544-0653-60 ")

 ;;653

 ;;21,"67544-0653-70 ")

 ;;654

 ;;21,"67544-0653-80 ")

 ;;655

 ;;21,"67544-0653-90 ")

 ;;656

 ;;21,"67544-0653-92 ")

 ;;657

 ;;21,"67544-0653-94 ")

 ;;658

 ;;21,"67544-0653-98 ")

 ;;659

 ;;21,"67544-0661-41 ")

 ;;460

 ;;21,"67544-0661-81 ")

 ;;461

 ;;21,"67544-0875-60 ")

 ;;497

 ;;21,"67544-0875-80 ")

 ;;498

 ;;21,"67544-0927-60 ")

 ;;499

 ;;21,"67544-1008-30 ")

 ;;186

 ;;21,"67544-1129-70 ")

 ;;913

 ;;21,"68071-0028-30 ")

 ;;914

 ;;21,"68071-0028-60 ")

 ;;915

 ;;21,"68084-0136-01 ")

 ;;793

 ;;21,"68084-0136-11 ")

 ;;794

 ;;21,"68084-0137-01 ")

 ;;842

 ;;21,"68084-0137-11 ")

 ;;843

 ;;21,"68084-0138-01 ")

 ;;916

 ;;21,"68084-0138-11 ")

 ;;917

 ;;21,"68084-0745-25 ")

 ;;932

 ;;21,"68084-0745-95 ")

 ;;933

 ;;21,"68094-0518-59 ")

 ;;1003

 ;;21,"68094-0518-62 ")

 ;;1004

 ;;21,"68094-0528-59 ")

 ;;987

 ;;21,"68094-0528-61 ")

 ;;988

 ;;21,"68094-0528-62 ")

 ;;989

 ;;21,"68258-5975-08 ")

 ;;268

 ;;21,"68258-5978-02 ")

 ;;384

 ;;21,"68258-5979-02 ")

 ;;391

 ;;21,"68258-5980-02 ")

 ;;400

 ;;21,"68258-5981-02 ")

 ;;403

 ;;21,"68645-0210-54 ")

 ;;518

 ;;21,"68645-0211-54 ")

 ;;727

 ;;21,"68968-6610-08 ")

 ;;291

 ;;21,"68968-6637-08 ")

 ;;267

 ;;21,"68968-6650-08 ")

 ;;275

 ;;21,"68968-6675-08 ")

 ;;282

 ;;21,"99207-0190-56 ")

 ;;250

 ;;9002226,806,.01)

 ;;BGP HEDIS ENDOCRINE NDC

 ;;9002226,806,.02)

 ;;@

 ;;9002226,806,.04)

 ;;n

 ;;9002226,806,.06)

 ;;@

 ;;9002226,806,.08)

 ;;@

 ;;9002226,806,.09)

 ;;3140819

 ;;9002226,806,.11)

 ;;@

 ;;9002226,806,.12)

 ;;@

 ;;9002226,806,.13)

 ;;1

 ;;9002226,806,.14)

 ;;@

 ;;9002226,806,.15)

 ;;50.67

 ;;9002226,806,.16)

 ;;@

 ;;9002226,806,.17)

 ;;@

 ;;9002226,806,3101)

 ;;@

 ;;9002226.02101,"806,00008-1123-12 ",.01)

 ;;00008-1123-12

 ;;9002226.02101,"806,00008-1123-12 ",.02)

 ;;00008-1123-12

 ;;9002226.02101,"806,00009-0141-01 ",.01)

 ;;00009-0141-01

 ;;9002226.02101,"806,00009-0141-01 ",.02)

 ;;00009-0141-01

 ;;9002226.02101,"806,00009-0171-05 ",.01)

 ;;00009-0171-05

 ;;9002226.02101,"806,00009-0171-05 ",.02)

 ;;00009-0171-05

 ;;9002226.02101,"806,00009-0341-01 ",.01)

 ;;00009-0341-01

 ;;9002226.02101,"806,00009-0341-01 ",.02)

 ;;00009-0341-01

 ;;9002226.02101,"806,00009-0352-01 ",.01)

 ;;00009-0352-01

 ;;9002226.02101,"806,00009-0352-01 ",.02)

 ;;00009-0352-01

 ;;9002226.02101,"806,00009-0352-04 ",.01)

 ;;00009-0352-04

 ;;9002226.02101,"806,00009-0352-04 ",.02)

 ;;00009-0352-04

 ;;9002226.02101,"806,00009-3449-01 ",.01)

 ;;00009-3449-01

BGP51L3   ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 19, 2014;

 +1       ;;15.1;IHS CLINICAL REPORTING;;MAY 06, 2015;Build 143

 +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,"58016-0744-00 ")

 +2       ;;28

 +3       ;;21,"58016-0744-10 ")

 +4       ;;29

 +5       ;;21,"58016-0744-12 ")

 +6       ;;30

 +7       ;;21,"58016-0744-14 ")

 +8       ;;31

 +9       ;;21,"58016-0744-15 ")

 +10      ;;32

 +11      ;;21,"58016-0744-20 ")

 +12      ;;33

 +13      ;;21,"58016-0744-30 ")

 +14      ;;34

 +15      ;;21,"58016-0948-00 ")

 +16      ;;69

 +17      ;;21,"58016-0948-10 ")

 +18      ;;70

 +19      ;;21,"58016-0948-12 ")

 +20      ;;71

 +21      ;;21,"58016-0948-14 ")

 +22      ;;72

 +23      ;;21,"58016-0948-15 ")

 +24      ;;73

 +25      ;;21,"58016-0948-20 ")

 +26      ;;74

 +27      ;;21,"58016-0948-30 ")

 +28      ;;75

 +29      ;;21,"58016-0948-50 ")

 +30      ;;76

 +31      ;;21,"58016-4074-01 ")

 +32      ;;396

 +33      ;;21,"58118-0886-03 ")

 +34      ;;201

 +35      ;;21,"58118-2331-03 ")

 +36      ;;837

 +37      ;;21,"58118-2331-09 ")

 +38      ;;838

 +39      ;;21,"58118-2332-03 ")

 +40      ;;897

 +41      ;;21,"58118-2332-09 ")

 +42      ;;898

 +43      ;;21,"58118-8343-08 ")

 +44      ;;489

 +45      ;;21,"58118-8343-09 ")

 +46      ;;490

 +47      ;;21,"58864-0224-30 ")

 +48      ;;574

 +49      ;;21,"58864-0224-60 ")

 +50      ;;575

 +51      ;;21,"58864-0224-93 ")

 +52      ;;576

 +53      ;;21,"58864-0421-01 ")

 +54      ;;106

 +55      ;;21,"58864-0711-30 ")

 +56      ;;814

 +57      ;;21,"58864-0803-30 ")

 +58      ;;156

 +59      ;;21,"58864-0804-30 ")

 +60      ;;200

 +61      ;;21,"58864-0951-30 ")

 +62      ;;138

 +63      ;;21,"58864-0952-30 ")

 +64      ;;834

 +65      ;;21,"58864-0953-30 ")

 +66      ;;901

 +67      ;;21,"59762-2330-07 ")

 +68      ;;792

 +69      ;;21,"59762-2331-06 ")

 +70      ;;835

 +71      ;;21,"59762-2331-08 ")

 +72      ;;836

 +73      ;;21,"59762-2332-06 ")

 +74      ;;899

 +75      ;;21,"59762-2332-08 ")

 +76      ;;900

 +77      ;;21,"59762-3725-01 ")

 +78      ;;449

 +79      ;;21,"59762-3726-03 ")

 +80      ;;488

 +81      ;;21,"59762-3727-04 ")

 +82      ;;569

 +83      ;;21,"59762-3727-06 ")

 +84      ;;570

 +85      ;;21,"59762-3727-07 ")

 +86      ;;571

 +87      ;;21,"59762-7020-09 ")

 +88      ;;450

 +89      ;;21,"59762-7021-05 ")

 +90      ;;486

 +91      ;;21,"59762-7021-09 ")

 +92      ;;487

 +93      ;;21,"59762-7022-05 ")

 +94      ;;572

 +95      ;;21,"59762-7022-09 ")

 +96      ;;573

 +97      ;;21,"60429-0283-01 ")

 +98      ;;732

 +99      ;;21,"60429-0284-01 ")

 +100     ;;744

 +101     ;;21,"60429-0285-01 ")

 +102     ;;762

 +103     ;;21,"60429-0327-01 ")

 +104     ;;157

 +105     ;;21,"60429-0328-01 ")

 +106     ;;199

 +107     ;;21,"60429-0329-01 ")

 +108     ;;235

 +109     ;;21,"60432-0126-08 ")

 +110     ;;998

 +111     ;;21,"60432-0126-16 ")

 +112     ;;999

 +113     ;;21,"60505-0368-01 ")

 +114     ;;1000

 +115     ;;21,"61570-0072-01 ")

 +116     ;;136

 +117     ;;21,"61570-0073-01 ")

 +118     ;;137

 +119     ;;21,"61570-0074-01 ")

 +120     ;;144

 +121     ;;21,"61570-0075-50 ")

 +122     ;;145

 +123     ;;21,"62559-0149-01 ")

 +124     ;;376

 +125     ;;21,"62559-0150-01 ")

 +126     ;;362

 +127     ;;21,"62559-1490-00 ")

 +128     ;;383

 +129     ;;21,"62559-1507-00 ")

 +130     ;;372

 +131     ;;21,"63629-1392-01 ")

 +132     ;;850

 +133     ;;21,"63629-1392-02 ")

 +134     ;;851

 +135     ;;21,"63629-1392-03 ")

 +136     ;;852

 +137     ;;21,"63629-1393-01 ")

 +138     ;;685

 +139     ;;21,"63629-1393-02 ")

 +140     ;;686

 +141     ;;21,"63629-1393-03 ")

 +142     ;;687

 +143     ;;21,"63629-1393-04 ")

 +144     ;;688

 +145     ;;21,"63629-2793-01 ")

 +146     ;;948

 +147     ;;21,"63629-2793-03 ")

 +148     ;;949

 +149     ;;21,"63629-2793-04 ")

 +150     ;;950

 +151     ;;21,"63629-2793-05 ")

 +152     ;;951

 +153     ;;21,"63629-2907-01 ")

 +154     ;;541

 +155     ;;21,"63629-2907-02 ")

 +156     ;;542

 +157     ;;21,"63629-3397-03 ")

 +158     ;;735

 +159     ;;21,"63629-3755-01 ")

 +160     ;;209

 +161     ;;21,"63629-3755-02 ")

 +162     ;;210

 +163     ;;21,"63629-3998-01 ")

 +164     ;;810

 +165     ;;21,"63629-4368-01 ")

 +166     ;;1063

 +167     ;;21,"63629-4368-02 ")

 +168     ;;1064

 +169     ;;21,"63629-4368-03 ")

 +170     ;;1065

 +171     ;;21,"63629-4368-04 ")

 +172     ;;1066

 +173     ;;21,"63739-0119-10 ")

 +174     ;;708

 +175     ;;21,"63739-0165-10 ")

 +176     ;;979

 +177     ;;21,"63739-0549-51 ")

 +178     ;;986

 +179     ;;21,"63874-0317-01 ")

 +180     ;;691

 +181     ;;21,"63874-0317-02 ")

 +182     ;;692

 +183     ;;21,"63874-0317-04 ")

 +184     ;;693

 +185     ;;21,"63874-0317-10 ")

 +186     ;;694

 +187     ;;21,"63874-0317-12 ")

 +188     ;;695

 +189     ;;21,"63874-0317-14 ")

 +190     ;;696

 +191     ;;21,"63874-0317-15 ")

 +192     ;;697

 +193     ;;21,"63874-0317-20 ")

 +194     ;;698

 +195     ;;21,"63874-0317-24 ")

 +196     ;;699

 +197     ;;21,"63874-0317-28 ")

 +198     ;;700

 +199     ;;21,"63874-0317-30 ")

 +200     ;;701

 +201     ;;21,"63874-0317-40 ")

 +202     ;;702

 +203     ;;21,"63874-0317-50 ")

 +204     ;;703

 +205     ;;21,"63874-0317-60 ")

 +206     ;;704

 +207     ;;21,"63874-0317-90 ")

 +208     ;;705

 +209     ;;21,"63874-0357-01 ")

 +210     ;;9

 +211     ;;21,"63874-0357-02 ")

 +212     ;;10

 +213     ;;21,"63874-0357-10 ")

 +214     ;;11

 +215     ;;21,"63874-0357-12 ")

 +216     ;;12

 +217     ;;21,"63874-0357-14 ")

 +218     ;;13

 +219     ;;21,"63874-0357-15 ")

 +220     ;;14

 +221     ;;21,"63874-0357-20 ")

 +222     ;;15

 +223     ;;21,"63874-0357-21 ")

 +224     ;;16

 +225     ;;21,"63874-0357-24 ")

 +226     ;;17

 +227     ;;21,"63874-0357-30 ")

 +228     ;;18

 +229     ;;21,"63874-0357-40 ")

 +230     ;;19

 +231     ;;21,"63874-0357-60 ")

 +232     ;;20

 +233     ;;21,"63874-0588-01 ")

 +234     ;;530

 +235     ;;21,"63874-0588-04 ")

 +236     ;;531

 +237     ;;21,"63874-0588-10 ")

 +238     ;;532

 +239     ;;21,"63874-0588-14 ")

 +240     ;;533

 +241     ;;21,"63874-0588-20 ")

 +242     ;;534

 +243     ;;21,"63874-0588-30 ")

 +244     ;;535

 +245     ;;21,"63874-0588-60 ")

 +246     ;;536

 +247     ;;21,"63874-0588-80 ")

 +248     ;;537

 +249     ;;21,"63874-0588-90 ")

 +250     ;;538

 +251     ;;21,"63874-0665-01 ")

 +252     ;;465

 +253     ;;21,"63874-0665-04 ")

 +254     ;;466

 +255     ;;21,"63874-0665-10 ")

 +256     ;;467

 +257     ;;21,"63874-0665-14 ")

 +258     ;;468

 +259     ;;21,"63874-0665-30 ")

 +260     ;;469

 +261     ;;21,"63874-0665-60 ")

 +262     ;;470

 +263     ;;21,"63874-0665-90 ")

 +264     ;;471

 +265     ;;21,"64011-0215-41 ")

 +266     ;;251

 +267     ;;21,"64248-0101-01 ")

 +268     ;;346

 +269     ;;21,"64248-0102-01 ")

 +270     ;;353

 +271     ;;21,"64720-0123-10 ")

 +272     ;;464

 +273     ;;21,"64720-0124-10 ")

 +274     ;;539

 +275     ;;21,"64720-0125-10 ")

 +276     ;;706

 +277     ;;21,"64720-0125-11 ")

 +278     ;;707

 +279     ;;21,"64727-3298-01 ")

 +280     ;;1015

 +281     ;;21,"64727-3298-02 ")

 +282     ;;1014

 +283     ;;21,"64727-3299-01 ")

 +284     ;;1036

 +285     ;;21,"64727-3299-02 ")

 +286     ;;1037

 +287     ;;21,"64727-3300-01 ")

 +288     ;;1069

 +289     ;;21,"64727-3300-02 ")

 +290     ;;1070

 +291     ;;21,"64727-3302-01 ")

 +292     ;;1044

 +293     ;;21,"64727-3302-02 ")

 +294     ;;1045

 +295     ;;21,"64727-3303-01 ")

 +296     ;;1079

 +297     ;;21,"64727-3303-02 ")

 +298     ;;1080

 +299     ;;21,"64727-3305-01 ")

 +300     ;;1092

 +301     ;;21,"64727-3305-02 ")

 +302     ;;1093

 +303     ;;21,"64727-3307-01 ")

 +304     ;;1100

 +305     ;;21,"64727-3307-02 ")

 +306     ;;1101

 +307     ;;21,"64727-3308-01 ")

 +308     ;;1111

 +309     ;;21,"64727-3308-02 ")

 +310     ;;1112

 +311     ;;21,"64727-3309-01 ")

 +312     ;;1142

 +313     ;;21,"64727-3309-02 ")

 +314     ;;1143

 +315     ;;21,"64727-3310-01 ")

 +316     ;;1119

 +317     ;;21,"64727-3310-02 ")

 +318     ;;1120

 +319     ;;21,"64727-3312-01 ")

 +320     ;;1126

 +321     ;;21,"64727-3312-02 ")

 +322     ;;1127

 +323     ;;21,"64727-3320-01 ")

 +324     ;;1131

 +325     ;;21,"64727-3320-02 ")

 +326     ;;1132

 +327     ;;21,"64727-3340-01 ")

 +328     ;;1138

 +329     ;;21,"64727-3340-02 ")

 +330     ;;1139

 +331     ;;21,"64727-4050-01 ")

 +332     ;;1018

 +333     ;;21,"64727-4050-02 ")

 +334     ;;1019

 +335     ;;21,"64727-4150-01 ")

 +336     ;;1040

 +337     ;;21,"64727-4150-02 ")

 +338     ;;1041

 +339     ;;21,"64727-4250-01 ")

 +340     ;;1048

 +341     ;;21,"64727-4250-02 ")

 +342     ;;1049

 +343     ;;21,"64727-4350-01 ")

 +344     ;;1075

 +345     ;;21,"64727-4350-02 ")

 +346     ;;1076

 +347     ;;21,"64727-4450-01 ")

 +348     ;;1096

 +349     ;;21,"64727-4450-02 ")

 +350     ;;1097

 +351     ;;21,"64727-4550-01 ")

 +352     ;;1115

 +353     ;;21,"64727-4550-02 ")

 +354     ;;1116

 +355     ;;21,"64727-5450-01 ")

 +356     ;;1020

 +357     ;;21,"64727-5450-02 ")

 +358     ;;1021

 +359     ;;21,"64727-5550-01 ")

 +360     ;;1042

 +361     ;;21,"64727-5550-02 ")

 +362     ;;1043

 +363     ;;21,"64727-5650-01 ")

 +364     ;;1050

 +365     ;;21,"64727-5650-02 ")

 +366     ;;1051

 +367     ;;21,"64727-5750-01 ")

 +368     ;;1077

 +369     ;;21,"64727-5750-02 ")

 +370     ;;1078

 +371     ;;21,"64727-5850-01 ")

 +372     ;;1098

 +373     ;;21,"64727-5850-02 ")

 +374     ;;1099

 +375     ;;21,"64727-5950-01 ")

 +376     ;;1117

 +377     ;;21,"64727-5950-02 ")

 +378     ;;1118

 +379     ;;21,"64727-6050-01 ")

 +380     ;;1083

 +381     ;;21,"64727-6050-02 ")

 +382     ;;1084

 +383     ;;21,"64727-6150-01 ")

 +384     ;;1104

 +385     ;;21,"64727-6150-02 ")

 +386     ;;1105

 +387     ;;21,"64727-7065-01 ")

 +388     ;;1016

 +389     ;;21,"64727-7065-02 ")

 +390     ;;1017

 +391     ;;21,"64727-7070-01 ")

 +392     ;;1038

 +393     ;;21,"64727-7070-02 ")

 +394     ;;1039

 +395     ;;21,"64727-7072-01 ")

 +396     ;;1046

 +397     ;;21,"64727-7072-02 ")

 +398     ;;1047

 +399     ;;21,"64727-7073-01 ")

 +400     ;;1073

 +401     ;;21,"64727-7073-02 ")

 +402     ;;1074

 +403     ;;21,"64727-7074-01 ")

 +404     ;;1081

 +405     ;;21,"64727-7074-02 ")

 +406     ;;1082

 +407     ;;21,"64727-7075-01 ")

 +408     ;;1094

 +409     ;;21,"64727-7075-02 ")

 +410     ;;1095

 +411     ;;21,"64727-7078-01 ")

 +412     ;;1102

 +413     ;;21,"64727-7078-02 ")

 +414     ;;1103

 +415     ;;21,"64727-7080-01 ")

 +416     ;;1113

 +417     ;;21,"64727-7080-02 ")

 +418     ;;1114

 +419     ;;21,"64727-7085-01 ")

 +420     ;;1144

 +421     ;;21,"64727-7085-02 ")

 +422     ;;1145

 +423     ;;21,"64727-7090-01 ")

 +424     ;;1121

 +425     ;;21,"64727-7090-02 ")

 +426     ;;1122

 +427     ;;21,"64727-7095-01 ")

 +428     ;;1128

 +429     ;;21,"64727-7095-02 ")

 +430     ;;1129

 +431     ;;21,"64727-7100-01 ")

 +432     ;;1133

 +433     ;;21,"64727-7100-02 ")

 +434     ;;1134

 +435     ;;21,"64727-7150-01 ")

 +436     ;;1140

 +437     ;;21,"64727-7150-02 ")

 +438     ;;1141

 +439     ;;21,"65243-0176-09 ")

 +440     ;;620

 +441     ;;21,"65243-0176-12 ")

 +442     ;;621

 +443     ;;21,"65243-0176-18 ")

 +444     ;;622

 +445     ;;21,"65243-0176-27 ")

 +446     ;;623

 +447     ;;21,"65243-0176-36 ")

 +448     ;;624

 +449     ;;21,"65243-0185-36 ")

 +450     ;;625

 +451     ;;21,"65243-0325-09 ")

 +452     ;;512

 +453     ;;21,"65243-0325-18 ")

 +454     ;;513

 +455     ;;21,"65243-0343-09 ")

 +456     ;;618

 +457     ;;21,"65243-0343-36 ")

 +458     ;;619

 +459     ;;21,"65243-0375-09 ")

 +460     ;;507

 +461     ;;21,"65862-0028-01 ")

 +462     ;;454

 +463     ;;21,"65862-0029-01 ")

 +464     ;;505

 +465     ;;21,"65862-0029-05 ")

 +466     ;;506

 +467     ;;21,"65862-0030-01 ")

 +468     ;;628

 +469     ;;21,"65862-0030-99 ")

 +470     ;;629

 +471     ;;21,"65862-0080-01 ")

 +472     ;;795

 +473     ;;21,"65862-0080-05 ")

 +474     ;;796

 +475     ;;21,"65862-0081-01 ")

 +476     ;;839

 +477     ;;21,"65862-0081-05 ")

 +478     ;;840

 +479     ;;21,"65862-0082-01 ")

 +480     ;;902

 +481     ;;21,"65862-0082-05 ")

 +482     ;;903

 +483     ;;21,"66105-0984-03 ")

 +484     ;;455

 +485     ;;21,"66105-0984-06 ")

 +486     ;;456

 +487     ;;21,"66105-0984-10 ")

 +488     ;;457

 +489     ;;21,"66105-0984-11 ")

 +490     ;;458

 +491     ;;21,"66105-0984-50 ")

 +492     ;;459

 +493     ;;21,"66105-0985-03 ")

 +494     ;;500

 +495     ;;21,"66105-0985-06 ")

 +496     ;;501

 +497     ;;21,"66105-0985-10 ")

 +498     ;;502

 +499     ;;21,"66105-0985-11 ")

 +500     ;;503

 +501     ;;21,"66105-0985-50 ")

 +502     ;;504

 +503     ;;21,"66105-0986-03 ")

 +504     ;;630

 +505     ;;21,"66105-0986-06 ")

 +506     ;;631

 +507     ;;21,"66105-0986-10 ")

 +508     ;;632

 +509     ;;21,"66105-0986-11 ")

 +510     ;;633

 +511     ;;21,"66105-0986-50 ")

 +512     ;;634

 +513     ;;21,"66116-0233-30 ")

 +514     ;;813

 +515     ;;21,"66116-0285-30 ")

 +516     ;;79

 +517     ;;21,"66116-0437-30 ")

 +518     ;;150

 +519     ;;21,"66116-0438-30 ")

 +520     ;;183

 +521     ;;21,"66267-0093-60 ")

 +522     ;;226

 +523     ;;21,"66267-0103-30 ")

 +524     ;;635

 +525     ;;21,"66267-0174-30 ")

 +526     ;;78

 +527     ;;21,"66336-0028-30 ")

 +528     ;;508

 +529     ;;21,"66336-0028-90 ")

 +530     ;;509

 +531     ;;21,"66336-0319-30 ")

 +532     ;;869

 +533     ;;21,"66336-0506-30 ")

 +534     ;;117

 +535     ;;21,"66336-0532-30 ")

 +536     ;;38

 +537     ;;21,"66336-0584-30 ")

 +538     ;;184

 +539     ;;21,"66336-0584-90 ")

 +540     ;;185

 +541     ;;21,"66336-0585-30 ")

 +542     ;;224

 +543     ;;21,"66336-0585-90 ")

 +544     ;;225