Routine: BGP7LXKC

BGP7LXKC ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 29, 2006 ;

 ;;7.0;IHS CLINICAL REPORTING;;JAN 24, 2007

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

TMP ;;TAXONOMY (WITH BULLETIN)

 ;;21,"63739-0082-02 ")

 ;;610

 ;;21,"63868-0500-24 ")

 ;;686

 ;;21,"63868-0995-01 ")

 ;;611

 ;;21,"63868-0995-24 ")

 ;;612

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

 ;;873

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

 ;;874

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

 ;;875

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

 ;;876

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

 ;;877

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

 ;;878

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

 ;;879

 ;;21,"63874-0309-42 ")

 ;;880

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

 ;;881

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

 ;;882

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

 ;;883

 ;;21,"63874-0309-74 ")

 ;;884

 ;;21,"63874-0309-77 ")

 ;;885

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

 ;;467

 ;;21,"64125-0128-10 ")

 ;;468

 ;;21,"64543-0111-01 ")

 ;;88

 ;;21,"64543-0112-01 ")

 ;;169

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

 ;;170

 ;;21,"64731-0295-01 ")

 ;;65

 ;;21,"64731-0300-01 ")

 ;;121

 ;;21,"64731-0305-01 ")

 ;;89

 ;;21,"64731-0860-01 ")

 ;;469

 ;;21,"64759-0002-01 ")

 ;;470

 ;;21,"65162-0156-10 ")

 ;;687

 ;;21,"65162-0156-11 ")

 ;;688

 ;;21,"65162-0301-10 ")

 ;;471

 ;;21,"65162-0516-10 ")

 ;;613

 ;;21,"65162-0516-11 ")

 ;;614

 ;;21,"65234-0074-05 ")

 ;;472

 ;;21,"65234-0074-10 ")

 ;;473

 ;;21,"65581-0007-21 ")

 ;;474

 ;;21,"65581-0007-28 ")

 ;;475

 ;;21,"65779-0059-24 ")

 ;;615

 ;;21,"66116-0643-20 ")

 ;;616

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

 ;;617

 ;;21,"66213-0421-10 ")

 ;;476

 ;;21,"66213-0421-50 ")

 ;;477

 ;;21,"66213-0422-04 ")

 ;;478

 ;;21,"66213-0422-16 ")

 ;;479

 ;;21,"66213-0423-04 ")

 ;;480

 ;;21,"66213-0423-16 ")

 ;;481

 ;;21,"66213-0425-10 ")

 ;;482

 ;;21,"66213-0425-11 ")

 ;;483

 ;;21,"66346-0082-23 ")

 ;;484

 ;;21,"66346-0082-31 ")

 ;;485

 ;;21,"66346-0152-23 ")

 ;;486

 ;;21,"66346-0152-31 ")

 ;;487

 ;;21,"66479-0860-01 ")

 ;;488

 ;;21,"66663-0219-01 ")

 ;;489

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

 ;;196

 ;;21,"66993-0402-02 ")

 ;;66

 ;;21,"67204-0531-01 ")

 ;;490

 ;;21,"67555-0155-10 ")

 ;;491

 ;;21,"68013-0005-01 ")

 ;;122

 ;;21,"68030-0053-01 ")

 ;;558

 ;;21,"68030-3594-01 ")

 ;;559

 ;;21,"68115-0041-20 ")

 ;;492

 ;;21,"68115-0041-30 ")

 ;;493

 ;;21,"68115-0116-24 ")

 ;;560

 ;;21,"68115-0118-15 ")

 ;;494

 ;;21,"68115-0118-20 ")

 ;;495

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

 ;;496

 ;;21,"68115-0678-00 ")

 ;;123

 ;;21,"68115-0788-00 ")

 ;;497

 ;;21,"68115-0897-04 ")

 ;;498

 ;;21,"71114-4121-00 ")

 ;;561

 ;;21,"71114-4121-01 ")

 ;;562

 ;;21,"71114-4121-06 ")

 ;;563

 ;;21,"73913-1096-56 ")

 ;;658

 ;;21,"73913-1283-01 ")

 ;;564

 ;;21,"73913-1283-24 ")

 ;;565

 ;;21,"80328-5567-04 ")

 ;;821

 ;;21,"80328-5859-68 ")

 ;;566

 ;;21,"80328-5867-84 ")

 ;;659

 ;;21,"82468-0120-21 ")

 ;;567

 ;;21,"87701-0435-84 ")

 ;;568

 ;;21,"87701-0436-18 ")

 ;;569

 ;;21,"87701-0537-32 ")

 ;;848

 ;;21,"87701-0537-47 ")

 ;;570

 ;;21,"87701-0538-40 ")

 ;;660

 ;;21,"87701-0649-55 ")

 ;;661

 ;;21,"87701-0836-23 ")

 ;;571

 ;;21,"87701-0837-14 ")

 ;;662

 ;;21,"87701-0843-41 ")

 ;;572

 ;;21,"87701-0843-84 ")

 ;;663

 ;;21,"87701-0890-06 ")

 ;;849

 ;;21,"87701-0898-65 ")

 ;;573

 ;;21,"94441-0200-94 ")

 ;;664

 ;;21,"94441-0212-87 ")

 ;;665

 ;;21,"97807-0070-29 ")

 ;;574

 ;;21,"97807-0070-30 ")

 ;;666

 ;;21,"97807-0071-07 ")

 ;;575

 ;;9002226,628,.01)

 ;;BGP HEDIS BELLADONNA ALKA NDC

 ;;9002226,628,.02)

;;@

 ;;9002226,628,.04)

;;n

 ;;9002226,628,.06)

;;@

 ;;9002226,628,.08)

;;@

 ;;9002226,628,.09)

;;@

 ;;9002226,628,.11)

;;@

 ;;9002226,628,.12)

;;@

 ;;9002226,628,.13)

;;1

 ;;9002226,628,.14)

;;@

 ;;9002226,628,.15)

;;@

 ;;9002226,628,.16)

;;@

 ;;9002226,628,.17)

;;@

 ;;9002226,628,3101)

;;@

 ;;9002226.02101,"628,00002-1675-01 ",.01)

 ;;00002-1675-01

 ;;9002226.02101,"628,00002-1675-01 ",.02)

 ;;00002-1675-01

 ;;9002226.02101,"628,00025-0061-31 ",.01)

 ;;00025-0061-31

 ;;9002226.02101,"628,00025-0061-31 ",.02)

 ;;00025-0061-31

 ;;9002226.02101,"628,00025-0061-34 ",.01)

 ;;00025-0061-34

 ;;9002226.02101,"628,00025-0061-34 ",.02)

 ;;00025-0061-34

 ;;9002226.02101,"628,00025-0061-51 ",.01)

 ;;00025-0061-51

 ;;9002226.02101,"628,00025-0061-51 ",.02)

 ;;00025-0061-51

 ;;9002226.02101,"628,00025-0061-52 ",.01)

 ;;00025-0061-52

 ;;9002226.02101,"628,00025-0061-52 ",.02)

 ;;00025-0061-52

 ;;9002226.02101,"628,00025-0061-55 ",.01)

 ;;00025-0061-55

 ;;9002226.02101,"628,00025-0061-55 ",.02)

 ;;00025-0061-55

 ;;9002226.02101,"628,00025-0066-02 ",.01)

 ;;00025-0066-02

 ;;9002226.02101,"628,00025-0066-02 ",.02)

 ;;00025-0066-02

 ;;9002226.02101,"628,00031-4207-63 ",.01)

 ;;00031-4207-63

 ;;9002226.02101,"628,00031-4207-63 ",.02)

 ;;00031-4207-63

 ;;9002226.02101,"628,00031-4221-12 ",.01)

 ;;00031-4221-12

 ;;9002226.02101,"628,00031-4221-12 ",.02)

 ;;00031-4221-12

 ;;9002226.02101,"628,00031-4221-25 ",.01)

 ;;00031-4221-25

 ;;9002226.02101,"628,00031-4221-25 ",.02)

 ;;00031-4221-25

 ;;9002226.02101,"628,00031-4221-29 ",.01)

 ;;00031-4221-29

 ;;9002226.02101,"628,00031-4221-29 ",.02)

 ;;00031-4221-29

 ;;9002226.02101,"628,00031-4235-63 ",.01)

 ;;00031-4235-63

 ;;9002226.02101,"628,00031-4235-63 ",.02)

 ;;00031-4235-63

 ;;9002226.02101,"628,00031-4235-70 ",.01)

 ;;00031-4235-70

 ;;9002226.02101,"628,00031-4235-70 ",.02)

 ;;00031-4235-70

 ;;9002226.02101,"628,00031-4250-63 ",.01)

 ;;00031-4250-63

 ;;9002226.02101,"628,00031-4250-63 ",.02)

 ;;00031-4250-63

 ;;9002226.02101,"628,00031-4250-74 ",.01)

 ;;00031-4250-74

 ;;9002226.02101,"628,00031-4250-74 ",.02)

 ;;00031-4250-74

 ;;9002226.02101,"628,00037-0301-92 ",.01)

 ;;00037-0301-92

 ;;9002226.02101,"628,00037-0301-92 ",.02)

 ;;00037-0301-92

 ;;9002226.02101,"628,00054-3194-46 ",.01)

 ;;00054-3194-46

 ;;9002226.02101,"628,00054-3194-46 ",.02)

 ;;00054-3194-46

 ;;9002226.02101,"628,00054-8171-16 ",.01)

 ;;00054-8171-16

 ;;9002226.02101,"628,00054-8171-16 ",.02)

 ;;00054-8171-16

 ;;9002226.02101,"628,00054-8191-16 ",.01)

 ;;00054-8191-16

 ;;9002226.02101,"628,00054-8191-16 ",.02)

 ;;00054-8191-16

 ;;9002226.02101,"628,00067-4345-04 ",.01)

 ;;00067-4345-04

 ;;9002226.02101,"628,00067-4345-04 ",.02)

 ;;00067-4345-04

 ;;9002226.02101,"628,00067-4346-24 ",.01)

 ;;00067-4346-24

 ;;9002226.02101,"628,00067-4346-24 ",.02)

 ;;00067-4346-24

 ;;9002226.02101,"628,00071-0373-32 ",.01)

 ;;00071-0373-32

 ;;9002226.02101,"628,00071-0373-32 ",.02)

 ;;00071-0373-32

 ;;9002226.02101,"628,00071-0373-40 ",.01)

 ;;00071-0373-40

 ;;9002226.02101,"628,00071-0373-40 ",.02)

 ;;00071-0373-40

 ;;9002226.02101,"628,00071-2002-20 ",.01)

 ;;00071-2002-20

 ;;9002226.02101,"628,00071-2002-20 ",.02)

 ;;00071-2002-20

 ;;9002226.02101,"628,00071-2195-20 ",.01)

 ;;00071-2195-20

 ;;9002226.02101,"628,00071-2195-20 ",.02)

 ;;00071-2195-20

 ;;9002226.02101,"628,00074-1630-10 ",.01)

 ;;00074-1630-10

 ;;9002226.02101,"628,00074-1630-10 ",.02)

 ;;00074-1630-10

 ;;9002226.02101,"628,00074-4910-01 ",.01)

 ;;00074-4910-01

 ;;9002226.02101,"628,00074-4910-01 ",.02)

 ;;00074-4910-01

 ;;9002226.02101,"628,00074-4910-15 ",.01)

 ;;00074-4910-15

 ;;9002226.02101,"628,00074-4910-15 ",.02)

 ;;00074-4910-15

 ;;9002226.02101,"628,00074-4910-33 ",.01)

 ;;00074-4910-33

 ;;9002226.02101,"628,00074-4910-33 ",.02)

 ;;00074-4910-33

 ;;9002226.02101,"628,00074-4910-34 ",.01)

 ;;00074-4910-34

 ;;9002226.02101,"628,00074-4910-34 ",.02)

 ;;00074-4910-34

 ;;9002226.02101,"628,00074-4911-01 ",.01)

 ;;00074-4911-01

 ;;9002226.02101,"628,00074-4911-01 ",.02)

 ;;00074-4911-01

 ;;9002226.02101,"628,00074-4911-18 ",.01)

 ;;00074-4911-18

 ;;9002226.02101,"628,00074-4911-18 ",.02)

 ;;00074-4911-18

 ;;9002226.02101,"628,00074-4911-33 ",.01)

 ;;00074-4911-33

 ;;9002226.02101,"628,00074-4911-33 ",.02)

 ;;00074-4911-33

 ;;9002226.02101,"628,00074-4911-34 ",.01)

 ;;00074-4911-34

 ;;9002226.02101,"628,00074-4911-34 ",.02)

 ;;00074-4911-34

 ;;9002226.02101,"628,00074-7897-15 ",.01)

 ;;00074-7897-15

 ;;9002226.02101,"628,00074-7897-15 ",.02)

 ;;00074-7897-15

 ;;9002226.02101,"628,00074-9629-02 ",.01)

 ;;00074-9629-02

 ;;9002226.02101,"628,00074-9629-02 ",.02)

 ;;00074-9629-02

 ;;9002226.02101,"628,00074-9629-05 ",.01)

 ;;00074-9629-05

 ;;9002226.02101,"628,00074-9629-05 ",.02)

 ;;00074-9629-05

 ;;9002226.02101,"628,00074-9630-05 ",.01)

 ;;00074-9630-05

 ;;9002226.02101,"628,00074-9630-05 ",.02)

 ;;00074-9630-05

 ;;9002226.02101,"628,00076-0108-03 ",.01)

 ;;00076-0108-03

 ;;9002226.02101,"628,00076-0108-03 ",.02)

 ;;00076-0108-03

 ;;9002226.02101,"628,00076-0909-90 ",.01)

 ;;00076-0909-90

 ;;9002226.02101,"628,00076-0909-90 ",.02)

 ;;00076-0909-90

 ;;9002226.02101,"628,00086-0074-05 ",.01)

 ;;00086-0074-05

 ;;9002226.02101,"628,00086-0074-05 ",.02)

 ;;00086-0074-05

 ;;9002226.02101,"628,00086-0074-10 ",.01)

 ;;00086-0074-10

 ;;9002226.02101,"628,00086-0074-10 ",.02)

 ;;00086-0074-10

 ;;9002226.02101,"628,00091-0202-01 ",.01)

 ;;00091-0202-01

 ;;9002226.02101,"628,00091-0202-01 ",.02)

 ;;00091-0202-01

 ;;9002226.02101,"628,00091-1536-05 ",.01)

 ;;00091-1536-05

 ;;9002226.02101,"628,00091-1536-05 ",.02)

 ;;00091-1536-05

 ;;9002226.02101,"628,00091-3111-01 ",.01)

 ;;00091-3111-01

 ;;9002226.02101,"628,00091-3111-01 ",.02)

 ;;00091-3111-01

 ;;9002226.02101,"628,00091-3475-01 ",.01)

 ;;00091-3475-01

 ;;9002226.02101,"628,00091-3475-01 ",.02)

 ;;00091-3475-01

 ;;9002226.02101,"628,00091-3531-01 ",.01)

 ;;00091-3531-01

 ;;9002226.02101,"628,00091-3531-01 ",.02)

 ;;00091-3531-01

 ;;9002226.02101,"628,00091-3531-05 ",.01)

 ;;00091-3531-05

 ;;9002226.02101,"628,00091-3531-05 ",.02)

 ;;00091-3531-05

 ;;9002226.02101,"628,00091-3532-01 ",.01)

 ;;00091-3532-01

 ;;9002226.02101,"628,00091-3532-01 ",.02)

 ;;00091-3532-01

 ;;9002226.02101,"628,00091-3532-05 ",.01)

 ;;00091-3532-05

 ;;9002226.02101,"628,00091-3532-05 ",.02)

 ;;00091-3532-05

 ;;9002226.02101,"628,00091-3534-01 ",.01)

 ;;00091-3534-01

 ;;9002226.02101,"628,00091-3534-01 ",.02)

 ;;00091-3534-01

 ;;9002226.02101,"628,00091-3537-01 ",.01)

 ;;00091-3537-01

 ;;9002226.02101,"628,00091-3537-01 ",.02)

 ;;00091-3537-01

 ;;9002226.02101,"628,00091-3537-05 ",.01)

 ;;00091-3537-05

 ;;9002226.02101,"628,00091-3537-05 ",.02)

 ;;00091-3537-05

 ;;9002226.02101,"628,00091-3538-01 ",.01)

 ;;00091-3538-01

 ;;9002226.02101,"628,00091-3538-01 ",.02)

 ;;00091-3538-01

 ;;9002226.02101,"628,00091-3538-05 ",.01)

 ;;00091-3538-05

 ;;9002226.02101,"628,00091-3538-05 ",.02)

 ;;00091-3538-05

 ;;9002226.02101,"628,00091-4532-16 ",.01)

 ;;00091-4532-16

 ;;9002226.02101,"628,00091-4532-16 ",.02)

 ;;00091-4532-16

 ;;9002226.02101,"628,00091-4536-15 ",.01)

 ;;00091-4536-15

 ;;9002226.02101,"628,00091-4536-15 ",.02)

 ;;00091-4536-15

 ;;9002226.02101,"628,00091-4538-15 ",.01)

 ;;00091-4538-15

 ;;9002226.02101,"628,00091-4538-15 ",.02)

 ;;00091-4538-15

 ;;9002226.02101,"628,00115-1111-02 ",.01)

 ;;00115-1111-02

 ;;9002226.02101,"628,00115-1111-02 ",.02)

 ;;00115-1111-02

 ;;9002226.02101,"628,00115-1111-04 ",.01)

 ;;00115-1111-04

 ;;9002226.02101,"628,00115-1111-04 ",.02)

 ;;00115-1111-04

 ;;9002226.02101,"628,00115-4652-01 ",.01)

 ;;00115-4652-01

 ;;9002226.02101,"628,00115-4652-01 ",.02)

 ;;00115-4652-01

 ;;9002226.02101,"628,00115-4652-03 ",.01)

 ;;00115-4652-03

 ;;9002226.02101,"628,00115-4652-03 ",.02)

 ;;00115-4652-03

 ;;9002226.02101,"628,00143-1140-10 ",.01)

 ;;00143-1140-10

 ;;9002226.02101,"628,00143-1140-10 ",.02)

 ;;00143-1140-10

 ;;9002226.02101,"628,00143-1140-51 ",.01)

 ;;00143-1140-51

 ;;9002226.02101,"628,00143-1140-51 ",.02)

 ;;00143-1140-51

 ;;9002226.02101,"628,00144-0716-01 ",.01)

 ;;00144-0716-01

 ;;9002226.02101,"628,00144-0716-01 ",.02)

 ;;00144-0716-01

 ;;9002226.02101,"628,00144-0717-01 ",.01)

 ;;00144-0717-01

 ;;9002226.02101,"628,00144-0717-01 ",.02)

 ;;00144-0717-01

 ;;9002226.02101,"628,00172-3966-60 ",.01)

 ;;00172-3966-60

 ;;9002226.02101,"628,00172-3966-60 ",.02)

 ;;00172-3966-60

 ;;9002226.02101,"628,00172-3966-80 ",.01)

 ;;00172-3966-80

 ;;9002226.02101,"628,00172-3966-80 ",.02)

 ;;00172-3966-80

 ;;9002226.02101,"628,00172-4375-60 ",.01)

 ;;00172-4375-60

 ;;9002226.02101,"628,00172-4375-60 ",.02)

 ;;00172-4375-60

 ;;9002226.02101,"628,00182-0686-40 ",.01)

 ;;00182-0686-40

 ;;9002226.02101,"628,00182-0686-40 ",.02)

 ;;00182-0686-40

 ;;9002226.02101,"628,00182-0686-41 ",.01)

 ;;00182-0686-41

 ;;9002226.02101,"628,00182-0686-41 ",.02)

 ;;00182-0686-41

 ;;9002226.02101,"628,00182-0850-01 ",.01)

 ;;00182-0850-01

 ;;9002226.02101,"628,00182-0850-01 ",.02)

 ;;00182-0850-01

 ;;9002226.02101,"628,00182-1006-01 ",.01)

 ;;00182-1006-01

 ;;9002226.02101,"628,00182-1006-01 ",.02)

 ;;00182-1006-01

 ;;9002226.02101,"628,00182-1006-05 ",.01)

 ;;00182-1006-05

 ;;9002226.02101,"628,00182-1006-05 ",.02)

 ;;00182-1006-05

 ;;9002226.02101,"628,00182-1006-10 ",.01)

 ;;00182-1006-10

 ;;9002226.02101,"628,00182-1006-10 ",.02)

 ;;00182-1006-10

 ;;9002226.02101,"628,00182-1048-10 ",.01)

 ;;00182-1048-10

 ;;9002226.02101,"628,00182-1048-10 ",.02)

 ;;00182-1048-10

 ;;9002226.02101,"628,00182-1607-01 ",.01)

 ;;00182-1607-01

 ;;9002226.02101,"628,00182-1607-01 ",.02)

 ;;00182-1607-01

 ;;9002226.02101,"628,00182-1847-01 ",.01)

 ;;00182-1847-01

 ;;9002226.02101,"628,00182-1847-01 ",.02)

 ;;00182-1847-01

 ;;9002226.02101,"628,00182-1990-01 ",.01)

 ;;00182-1990-01

 ;;9002226.02101,"628,00182-1990-01 ",.02)

 ;;00182-1990-01

 ;;9002226.02101,"628,00182-1993-01 ",.01)

 ;;00182-1993-01

 ;;9002226.02101,"628,00182-1993-01 ",.02)

 ;;00182-1993-01

 ;;9002226.02101,"628,00182-6136-40 ",.01)

 ;;00182-6136-40

 ;;9002226.02101,"628,00182-6136-40 ",.02)

 ;;00182-6136-40

BGP7LXKC  ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 29, 2006 ;

 +1       ;;7.0;IHS CLINICAL REPORTING;;JAN 24, 2007

 +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,"63739-0082-02 ")

 +2       ;;610

 +3       ;;21,"63868-0500-24 ")

 +4       ;;686

 +5       ;;21,"63868-0995-01 ")

 +6       ;;611

 +7       ;;21,"63868-0995-24 ")

 +8       ;;612

 +9       ;;21,"63874-0309-01 ")

 +10      ;;873

 +11      ;;21,"63874-0309-02 ")

 +12      ;;874

 +13      ;;21,"63874-0309-04 ")

 +14      ;;875

 +15      ;;21,"63874-0309-15 ")

 +16      ;;876

 +17      ;;21,"63874-0309-20 ")

 +18      ;;877

 +19      ;;21,"63874-0309-30 ")

 +20      ;;878

 +21      ;;21,"63874-0309-40 ")

 +22      ;;879

 +23      ;;21,"63874-0309-42 ")

 +24      ;;880

 +25      ;;21,"63874-0309-50 ")

 +26      ;;881

 +27      ;;21,"63874-0309-60 ")

 +28      ;;882

 +29      ;;21,"63874-0309-72 ")

 +30      ;;883

 +31      ;;21,"63874-0309-74 ")

 +32      ;;884

 +33      ;;21,"63874-0309-77 ")

 +34      ;;885

 +35      ;;21,"64125-0102-01 ")

 +36      ;;467

 +37      ;;21,"64125-0128-10 ")

 +38      ;;468

 +39      ;;21,"64543-0111-01 ")

 +40      ;;88

 +41      ;;21,"64543-0112-01 ")

 +42      ;;169

 +43      ;;21,"64543-0118-90 ")

 +44      ;;170

 +45      ;;21,"64731-0295-01 ")

 +46      ;;65

 +47      ;;21,"64731-0300-01 ")

 +48      ;;121

 +49      ;;21,"64731-0305-01 ")

 +50      ;;89

 +51      ;;21,"64731-0860-01 ")

 +52      ;;469

 +53      ;;21,"64759-0002-01 ")

 +54      ;;470

 +55      ;;21,"65162-0156-10 ")

 +56      ;;687

 +57      ;;21,"65162-0156-11 ")

 +58      ;;688

 +59      ;;21,"65162-0301-10 ")

 +60      ;;471

 +61      ;;21,"65162-0516-10 ")

 +62      ;;613

 +63      ;;21,"65162-0516-11 ")

 +64      ;;614

 +65      ;;21,"65234-0074-05 ")

 +66      ;;472

 +67      ;;21,"65234-0074-10 ")

 +68      ;;473

 +69      ;;21,"65581-0007-21 ")

 +70      ;;474

 +71      ;;21,"65581-0007-28 ")

 +72      ;;475

 +73      ;;21,"65779-0059-24 ")

 +74      ;;615

 +75      ;;21,"66116-0643-20 ")

 +76      ;;616

 +77      ;;21,"66116-0644-30 ")

 +78      ;;617

 +79      ;;21,"66213-0421-10 ")

 +80      ;;476

 +81      ;;21,"66213-0421-50 ")

 +82      ;;477

 +83      ;;21,"66213-0422-04 ")

 +84      ;;478

 +85      ;;21,"66213-0422-16 ")

 +86      ;;479

 +87      ;;21,"66213-0423-04 ")

 +88      ;;480

 +89      ;;21,"66213-0423-16 ")

 +90      ;;481

 +91      ;;21,"66213-0425-10 ")

 +92      ;;482

 +93      ;;21,"66213-0425-11 ")

 +94      ;;483

 +95      ;;21,"66346-0082-23 ")

 +96      ;;484

 +97      ;;21,"66346-0082-31 ")

 +98      ;;485

 +99      ;;21,"66346-0152-23 ")

 +100     ;;486

 +101     ;;21,"66346-0152-31 ")

 +102     ;;487

 +103     ;;21,"66479-0860-01 ")

 +104     ;;488

 +105     ;;21,"66663-0219-01 ")

 +106     ;;489

 +107     ;;21,"66934-0200-30 ")

 +108     ;;196

 +109     ;;21,"66993-0402-02 ")

 +110     ;;66

 +111     ;;21,"67204-0531-01 ")

 +112     ;;490

 +113     ;;21,"67555-0155-10 ")

 +114     ;;491

 +115     ;;21,"68013-0005-01 ")

 +116     ;;122

 +117     ;;21,"68030-0053-01 ")

 +118     ;;558

 +119     ;;21,"68030-3594-01 ")

 +120     ;;559

 +121     ;;21,"68115-0041-20 ")

 +122     ;;492

 +123     ;;21,"68115-0041-30 ")

 +124     ;;493

 +125     ;;21,"68115-0116-24 ")

 +126     ;;560

 +127     ;;21,"68115-0118-15 ")

 +128     ;;494

 +129     ;;21,"68115-0118-20 ")

 +130     ;;495

 +131     ;;21,"68115-0118-30 ")

 +132     ;;496

 +133     ;;21,"68115-0678-00 ")

 +134     ;;123

 +135     ;;21,"68115-0788-00 ")

 +136     ;;497

 +137     ;;21,"68115-0897-04 ")

 +138     ;;498

 +139     ;;21,"71114-4121-00 ")

 +140     ;;561

 +141     ;;21,"71114-4121-01 ")

 +142     ;;562

 +143     ;;21,"71114-4121-06 ")

 +144     ;;563

 +145     ;;21,"73913-1096-56 ")

 +146     ;;658

 +147     ;;21,"73913-1283-01 ")

 +148     ;;564

 +149     ;;21,"73913-1283-24 ")

 +150     ;;565

 +151     ;;21,"80328-5567-04 ")

 +152     ;;821

 +153     ;;21,"80328-5859-68 ")

 +154     ;;566

 +155     ;;21,"80328-5867-84 ")

 +156     ;;659

 +157     ;;21,"82468-0120-21 ")

 +158     ;;567

 +159     ;;21,"87701-0435-84 ")

 +160     ;;568

 +161     ;;21,"87701-0436-18 ")

 +162     ;;569

 +163     ;;21,"87701-0537-32 ")

 +164     ;;848

 +165     ;;21,"87701-0537-47 ")

 +166     ;;570

 +167     ;;21,"87701-0538-40 ")

 +168     ;;660

 +169     ;;21,"87701-0649-55 ")

 +170     ;;661

 +171     ;;21,"87701-0836-23 ")

 +172     ;;571

 +173     ;;21,"87701-0837-14 ")

 +174     ;;662

 +175     ;;21,"87701-0843-41 ")

 +176     ;;572

 +177     ;;21,"87701-0843-84 ")

 +178     ;;663

 +179     ;;21,"87701-0890-06 ")

 +180     ;;849

 +181     ;;21,"87701-0898-65 ")

 +182     ;;573

 +183     ;;21,"94441-0200-94 ")

 +184     ;;664

 +185     ;;21,"94441-0212-87 ")

 +186     ;;665

 +187     ;;21,"97807-0070-29 ")

 +188     ;;574

 +189     ;;21,"97807-0070-30 ")

 +190     ;;666

 +191     ;;21,"97807-0071-07 ")

 +192     ;;575

 +193     ;;9002226,628,.01)

 +194     ;;BGP HEDIS BELLADONNA ALKA NDC

 +195     ;;9002226,628,.02)

 +196     ;;@

 +197     ;;9002226,628,.04)

 +198     ;;n

 +199     ;;9002226,628,.06)

 +200     ;;@

 +201     ;;9002226,628,.08)

 +202     ;;@

 +203     ;;9002226,628,.09)

 +204     ;;@

 +205     ;;9002226,628,.11)

 +206     ;;@

 +207     ;;9002226,628,.12)

 +208     ;;@

 +209     ;;9002226,628,.13)

 +210     ;;1

 +211     ;;9002226,628,.14)

 +212     ;;@

 +213     ;;9002226,628,.15)

 +214     ;;@

 +215     ;;9002226,628,.16)

 +216     ;;@

 +217     ;;9002226,628,.17)

 +218     ;;@

 +219     ;;9002226,628,3101)

 +220     ;;@

 +221     ;;9002226.02101,"628,00002-1675-01 ",.01)

 +222     ;;00002-1675-01

 +223     ;;9002226.02101,"628,00002-1675-01 ",.02)

 +224     ;;00002-1675-01

 +225     ;;9002226.02101,"628,00025-0061-31 ",.01)

 +226     ;;00025-0061-31

 +227     ;;9002226.02101,"628,00025-0061-31 ",.02)

 +228     ;;00025-0061-31

 +229     ;;9002226.02101,"628,00025-0061-34 ",.01)

 +230     ;;00025-0061-34

 +231     ;;9002226.02101,"628,00025-0061-34 ",.02)

 +232     ;;00025-0061-34

 +233     ;;9002226.02101,"628,00025-0061-51 ",.01)

 +234     ;;00025-0061-51

 +235     ;;9002226.02101,"628,00025-0061-51 ",.02)

 +236     ;;00025-0061-51

 +237     ;;9002226.02101,"628,00025-0061-52 ",.01)

 +238     ;;00025-0061-52

 +239     ;;9002226.02101,"628,00025-0061-52 ",.02)

 +240     ;;00025-0061-52

 +241     ;;9002226.02101,"628,00025-0061-55 ",.01)

 +242     ;;00025-0061-55

 +243     ;;9002226.02101,"628,00025-0061-55 ",.02)

 +244     ;;00025-0061-55

 +245     ;;9002226.02101,"628,00025-0066-02 ",.01)

 +246     ;;00025-0066-02

 +247     ;;9002226.02101,"628,00025-0066-02 ",.02)

 +248     ;;00025-0066-02

 +249     ;;9002226.02101,"628,00031-4207-63 ",.01)

 +250     ;;00031-4207-63

 +251     ;;9002226.02101,"628,00031-4207-63 ",.02)

 +252     ;;00031-4207-63

 +253     ;;9002226.02101,"628,00031-4221-12 ",.01)

 +254     ;;00031-4221-12

 +255     ;;9002226.02101,"628,00031-4221-12 ",.02)

 +256     ;;00031-4221-12

 +257     ;;9002226.02101,"628,00031-4221-25 ",.01)

 +258     ;;00031-4221-25

 +259     ;;9002226.02101,"628,00031-4221-25 ",.02)

 +260     ;;00031-4221-25

 +261     ;;9002226.02101,"628,00031-4221-29 ",.01)

 +262     ;;00031-4221-29

 +263     ;;9002226.02101,"628,00031-4221-29 ",.02)

 +264     ;;00031-4221-29

 +265     ;;9002226.02101,"628,00031-4235-63 ",.01)

 +266     ;;00031-4235-63

 +267     ;;9002226.02101,"628,00031-4235-63 ",.02)

 +268     ;;00031-4235-63

 +269     ;;9002226.02101,"628,00031-4235-70 ",.01)

 +270     ;;00031-4235-70

 +271     ;;9002226.02101,"628,00031-4235-70 ",.02)

 +272     ;;00031-4235-70

 +273     ;;9002226.02101,"628,00031-4250-63 ",.01)

 +274     ;;00031-4250-63

 +275     ;;9002226.02101,"628,00031-4250-63 ",.02)

 +276     ;;00031-4250-63

 +277     ;;9002226.02101,"628,00031-4250-74 ",.01)

 +278     ;;00031-4250-74

 +279     ;;9002226.02101,"628,00031-4250-74 ",.02)

 +280     ;;00031-4250-74

 +281     ;;9002226.02101,"628,00037-0301-92 ",.01)

 +282     ;;00037-0301-92

 +283     ;;9002226.02101,"628,00037-0301-92 ",.02)

 +284     ;;00037-0301-92

 +285     ;;9002226.02101,"628,00054-3194-46 ",.01)

 +286     ;;00054-3194-46

 +287     ;;9002226.02101,"628,00054-3194-46 ",.02)

 +288     ;;00054-3194-46

 +289     ;;9002226.02101,"628,00054-8171-16 ",.01)

 +290     ;;00054-8171-16

 +291     ;;9002226.02101,"628,00054-8171-16 ",.02)

 +292     ;;00054-8171-16

 +293     ;;9002226.02101,"628,00054-8191-16 ",.01)

 +294     ;;00054-8191-16

 +295     ;;9002226.02101,"628,00054-8191-16 ",.02)

 +296     ;;00054-8191-16

 +297     ;;9002226.02101,"628,00067-4345-04 ",.01)

 +298     ;;00067-4345-04

 +299     ;;9002226.02101,"628,00067-4345-04 ",.02)

 +300     ;;00067-4345-04

 +301     ;;9002226.02101,"628,00067-4346-24 ",.01)

 +302     ;;00067-4346-24

 +303     ;;9002226.02101,"628,00067-4346-24 ",.02)

 +304     ;;00067-4346-24

 +305     ;;9002226.02101,"628,00071-0373-32 ",.01)

 +306     ;;00071-0373-32

 +307     ;;9002226.02101,"628,00071-0373-32 ",.02)

 +308     ;;00071-0373-32

 +309     ;;9002226.02101,"628,00071-0373-40 ",.01)

 +310     ;;00071-0373-40

 +311     ;;9002226.02101,"628,00071-0373-40 ",.02)

 +312     ;;00071-0373-40

 +313     ;;9002226.02101,"628,00071-2002-20 ",.01)

 +314     ;;00071-2002-20

 +315     ;;9002226.02101,"628,00071-2002-20 ",.02)

 +316     ;;00071-2002-20

 +317     ;;9002226.02101,"628,00071-2195-20 ",.01)

 +318     ;;00071-2195-20

 +319     ;;9002226.02101,"628,00071-2195-20 ",.02)

 +320     ;;00071-2195-20

 +321     ;;9002226.02101,"628,00074-1630-10 ",.01)

 +322     ;;00074-1630-10

 +323     ;;9002226.02101,"628,00074-1630-10 ",.02)

 +324     ;;00074-1630-10

 +325     ;;9002226.02101,"628,00074-4910-01 ",.01)

 +326     ;;00074-4910-01

 +327     ;;9002226.02101,"628,00074-4910-01 ",.02)

 +328     ;;00074-4910-01

 +329     ;;9002226.02101,"628,00074-4910-15 ",.01)

 +330     ;;00074-4910-15

 +331     ;;9002226.02101,"628,00074-4910-15 ",.02)

 +332     ;;00074-4910-15

 +333     ;;9002226.02101,"628,00074-4910-33 ",.01)

 +334     ;;00074-4910-33

 +335     ;;9002226.02101,"628,00074-4910-33 ",.02)

 +336     ;;00074-4910-33

 +337     ;;9002226.02101,"628,00074-4910-34 ",.01)

 +338     ;;00074-4910-34

 +339     ;;9002226.02101,"628,00074-4910-34 ",.02)

 +340     ;;00074-4910-34

 +341     ;;9002226.02101,"628,00074-4911-01 ",.01)

 +342     ;;00074-4911-01

 +343     ;;9002226.02101,"628,00074-4911-01 ",.02)

 +344     ;;00074-4911-01

 +345     ;;9002226.02101,"628,00074-4911-18 ",.01)

 +346     ;;00074-4911-18

 +347     ;;9002226.02101,"628,00074-4911-18 ",.02)

 +348     ;;00074-4911-18

 +349     ;;9002226.02101,"628,00074-4911-33 ",.01)

 +350     ;;00074-4911-33

 +351     ;;9002226.02101,"628,00074-4911-33 ",.02)

 +352     ;;00074-4911-33

 +353     ;;9002226.02101,"628,00074-4911-34 ",.01)

 +354     ;;00074-4911-34

 +355     ;;9002226.02101,"628,00074-4911-34 ",.02)

 +356     ;;00074-4911-34

 +357     ;;9002226.02101,"628,00074-7897-15 ",.01)

 +358     ;;00074-7897-15

 +359     ;;9002226.02101,"628,00074-7897-15 ",.02)

 +360     ;;00074-7897-15

 +361     ;;9002226.02101,"628,00074-9629-02 ",.01)

 +362     ;;00074-9629-02

 +363     ;;9002226.02101,"628,00074-9629-02 ",.02)

 +364     ;;00074-9629-02

 +365     ;;9002226.02101,"628,00074-9629-05 ",.01)

 +366     ;;00074-9629-05

 +367     ;;9002226.02101,"628,00074-9629-05 ",.02)

 +368     ;;00074-9629-05

 +369     ;;9002226.02101,"628,00074-9630-05 ",.01)

 +370     ;;00074-9630-05

 +371     ;;9002226.02101,"628,00074-9630-05 ",.02)

 +372     ;;00074-9630-05

 +373     ;;9002226.02101,"628,00076-0108-03 ",.01)

 +374     ;;00076-0108-03

 +375     ;;9002226.02101,"628,00076-0108-03 ",.02)

 +376     ;;00076-0108-03

 +377     ;;9002226.02101,"628,00076-0909-90 ",.01)

 +378     ;;00076-0909-90

 +379     ;;9002226.02101,"628,00076-0909-90 ",.02)

 +380     ;;00076-0909-90

 +381     ;;9002226.02101,"628,00086-0074-05 ",.01)

 +382     ;;00086-0074-05

 +383     ;;9002226.02101,"628,00086-0074-05 ",.02)

 +384     ;;00086-0074-05

 +385     ;;9002226.02101,"628,00086-0074-10 ",.01)

 +386     ;;00086-0074-10

 +387     ;;9002226.02101,"628,00086-0074-10 ",.02)

 +388     ;;00086-0074-10

 +389     ;;9002226.02101,"628,00091-0202-01 ",.01)

 +390     ;;00091-0202-01

 +391     ;;9002226.02101,"628,00091-0202-01 ",.02)

 +392     ;;00091-0202-01

 +393     ;;9002226.02101,"628,00091-1536-05 ",.01)

 +394     ;;00091-1536-05

 +395     ;;9002226.02101,"628,00091-1536-05 ",.02)

 +396     ;;00091-1536-05

 +397     ;;9002226.02101,"628,00091-3111-01 ",.01)

 +398     ;;00091-3111-01

 +399     ;;9002226.02101,"628,00091-3111-01 ",.02)

 +400     ;;00091-3111-01

 +401     ;;9002226.02101,"628,00091-3475-01 ",.01)

 +402     ;;00091-3475-01

 +403     ;;9002226.02101,"628,00091-3475-01 ",.02)

 +404     ;;00091-3475-01

 +405     ;;9002226.02101,"628,00091-3531-01 ",.01)

 +406     ;;00091-3531-01

 +407     ;;9002226.02101,"628,00091-3531-01 ",.02)

 +408     ;;00091-3531-01

 +409     ;;9002226.02101,"628,00091-3531-05 ",.01)

 +410     ;;00091-3531-05

 +411     ;;9002226.02101,"628,00091-3531-05 ",.02)

 +412     ;;00091-3531-05

 +413     ;;9002226.02101,"628,00091-3532-01 ",.01)

 +414     ;;00091-3532-01

 +415     ;;9002226.02101,"628,00091-3532-01 ",.02)

 +416     ;;00091-3532-01

 +417     ;;9002226.02101,"628,00091-3532-05 ",.01)

 +418     ;;00091-3532-05

 +419     ;;9002226.02101,"628,00091-3532-05 ",.02)

 +420     ;;00091-3532-05

 +421     ;;9002226.02101,"628,00091-3534-01 ",.01)

 +422     ;;00091-3534-01

 +423     ;;9002226.02101,"628,00091-3534-01 ",.02)

 +424     ;;00091-3534-01

 +425     ;;9002226.02101,"628,00091-3537-01 ",.01)

 +426     ;;00091-3537-01

 +427     ;;9002226.02101,"628,00091-3537-01 ",.02)

 +428     ;;00091-3537-01

 +429     ;;9002226.02101,"628,00091-3537-05 ",.01)

 +430     ;;00091-3537-05

 +431     ;;9002226.02101,"628,00091-3537-05 ",.02)

 +432     ;;00091-3537-05

 +433     ;;9002226.02101,"628,00091-3538-01 ",.01)

 +434     ;;00091-3538-01

 +435     ;;9002226.02101,"628,00091-3538-01 ",.02)

 +436     ;;00091-3538-01

 +437     ;;9002226.02101,"628,00091-3538-05 ",.01)

 +438     ;;00091-3538-05

 +439     ;;9002226.02101,"628,00091-3538-05 ",.02)

 +440     ;;00091-3538-05

 +441     ;;9002226.02101,"628,00091-4532-16 ",.01)

 +442     ;;00091-4532-16

 +443     ;;9002226.02101,"628,00091-4532-16 ",.02)

 +444     ;;00091-4532-16

 +445     ;;9002226.02101,"628,00091-4536-15 ",.01)

 +446     ;;00091-4536-15

 +447     ;;9002226.02101,"628,00091-4536-15 ",.02)

 +448     ;;00091-4536-15

 +449     ;;9002226.02101,"628,00091-4538-15 ",.01)

 +450     ;;00091-4538-15

 +451     ;;9002226.02101,"628,00091-4538-15 ",.02)

 +452     ;;00091-4538-15

 +453     ;;9002226.02101,"628,00115-1111-02 ",.01)

 +454     ;;00115-1111-02

 +455     ;;9002226.02101,"628,00115-1111-02 ",.02)

 +456     ;;00115-1111-02

 +457     ;;9002226.02101,"628,00115-1111-04 ",.01)

 +458     ;;00115-1111-04

 +459     ;;9002226.02101,"628,00115-1111-04 ",.02)

 +460     ;;00115-1111-04

 +461     ;;9002226.02101,"628,00115-4652-01 ",.01)

 +462     ;;00115-4652-01

 +463     ;;9002226.02101,"628,00115-4652-01 ",.02)

 +464     ;;00115-4652-01

 +465     ;;9002226.02101,"628,00115-4652-03 ",.01)

 +466     ;;00115-4652-03

 +467     ;;9002226.02101,"628,00115-4652-03 ",.02)

 +468     ;;00115-4652-03

 +469     ;;9002226.02101,"628,00143-1140-10 ",.01)

 +470     ;;00143-1140-10

 +471     ;;9002226.02101,"628,00143-1140-10 ",.02)

 +472     ;;00143-1140-10

 +473     ;;9002226.02101,"628,00143-1140-51 ",.01)

 +474     ;;00143-1140-51

 +475     ;;9002226.02101,"628,00143-1140-51 ",.02)

 +476     ;;00143-1140-51

 +477     ;;9002226.02101,"628,00144-0716-01 ",.01)

 +478     ;;00144-0716-01

 +479     ;;9002226.02101,"628,00144-0716-01 ",.02)

 +480     ;;00144-0716-01

 +481     ;;9002226.02101,"628,00144-0717-01 ",.01)

 +482     ;;00144-0717-01

 +483     ;;9002226.02101,"628,00144-0717-01 ",.02)

 +484     ;;00144-0717-01

 +485     ;;9002226.02101,"628,00172-3966-60 ",.01)

 +486     ;;00172-3966-60

 +487     ;;9002226.02101,"628,00172-3966-60 ",.02)

 +488     ;;00172-3966-60

 +489     ;;9002226.02101,"628,00172-3966-80 ",.01)

 +490     ;;00172-3966-80

 +491     ;;9002226.02101,"628,00172-3966-80 ",.02)

 +492     ;;00172-3966-80

 +493     ;;9002226.02101,"628,00172-4375-60 ",.01)

 +494     ;;00172-4375-60

 +495     ;;9002226.02101,"628,00172-4375-60 ",.02)

 +496     ;;00172-4375-60

 +497     ;;9002226.02101,"628,00182-0686-40 ",.01)

 +498     ;;00182-0686-40

 +499     ;;9002226.02101,"628,00182-0686-40 ",.02)

 +500     ;;00182-0686-40

 +501     ;;9002226.02101,"628,00182-0686-41 ",.01)

 +502     ;;00182-0686-41

 +503     ;;9002226.02101,"628,00182-0686-41 ",.02)

 +504     ;;00182-0686-41

 +505     ;;9002226.02101,"628,00182-0850-01 ",.01)

 +506     ;;00182-0850-01

 +507     ;;9002226.02101,"628,00182-0850-01 ",.02)

 +508     ;;00182-0850-01

 +509     ;;9002226.02101,"628,00182-1006-01 ",.01)

 +510     ;;00182-1006-01

 +511     ;;9002226.02101,"628,00182-1006-01 ",.02)

 +512     ;;00182-1006-01

 +513     ;;9002226.02101,"628,00182-1006-05 ",.01)

 +514     ;;00182-1006-05

 +515     ;;9002226.02101,"628,00182-1006-05 ",.02)

 +516     ;;00182-1006-05

 +517     ;;9002226.02101,"628,00182-1006-10 ",.01)

 +518     ;;00182-1006-10

 +519     ;;9002226.02101,"628,00182-1006-10 ",.02)

 +520     ;;00182-1006-10

 +521     ;;9002226.02101,"628,00182-1048-10 ",.01)

 +522     ;;00182-1048-10

 +523     ;;9002226.02101,"628,00182-1048-10 ",.02)

 +524     ;;00182-1048-10

 +525     ;;9002226.02101,"628,00182-1607-01 ",.01)

 +526     ;;00182-1607-01

 +527     ;;9002226.02101,"628,00182-1607-01 ",.02)

 +528     ;;00182-1607-01

 +529     ;;9002226.02101,"628,00182-1847-01 ",.01)

 +530     ;;00182-1847-01

 +531     ;;9002226.02101,"628,00182-1847-01 ",.02)

 +532     ;;00182-1847-01

 +533     ;;9002226.02101,"628,00182-1990-01 ",.01)

 +534     ;;00182-1990-01

 +535     ;;9002226.02101,"628,00182-1990-01 ",.02)

 +536     ;;00182-1990-01

 +537     ;;9002226.02101,"628,00182-1993-01 ",.01)

 +538     ;;00182-1993-01

 +539     ;;9002226.02101,"628,00182-1993-01 ",.02)

 +540     ;;00182-1993-01

 +541     ;;9002226.02101,"628,00182-6136-40 ",.01)

 +542     ;;00182-6136-40

 +543     ;;9002226.02101,"628,00182-6136-40 ",.02)

 +544     ;;00182-6136-40

BGP7LXKC.m