Routine: BGP71N7

BGP71N7 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 30, 2016 ;

 ;;17.1;IHS CLINICAL REPORTING;;MAY 10, 2017;Build 29

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,"67544-0996-28 ")

 ;;1987

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

 ;;1988

 ;;21,"67544-0996-40 ")

 ;;1989

 ;;21,"67544-0996-45 ")

 ;;1990

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

 ;;1991

 ;;21,"67544-0996-59 ")

 ;;1992

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

 ;;1993

 ;;21,"67544-0996-62 ")

 ;;1994

 ;;21,"67877-0210-01 ")

 ;;1995

 ;;21,"67877-0211-01 ")

 ;;1996

 ;;21,"68047-0721-01 ")

 ;;2051

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

 ;;1997

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

 ;;1998

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

 ;;2035

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

 ;;2055

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

 ;;2056

 ;;21,"68071-0421-90 ")

 ;;2057

 ;;21,"68071-0698-10 ")

 ;;2036

 ;;21,"68071-0698-14 ")

 ;;2037

 ;;21,"68071-0698-20 ")

 ;;2038

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

 ;;2039

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

 ;;2040

 ;;21,"68071-0703-14 ")

 ;;2041

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

 ;;2042

 ;;21,"68071-0703-45 ")

 ;;2043

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

 ;;2044

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

 ;;2045

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

 ;;2046

 ;;21,"68071-2007-03 ")

 ;;2047

 ;;21,"68071-2007-06 ")

 ;;2048

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

 ;;2049

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

 ;;2050

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

 ;;2052

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

 ;;2053

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

 ;;2054

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

 ;;2058

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

 ;;2059

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

 ;;2060

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

 ;;2079

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

 ;;2080

 ;;21,"68084-0396-65 ")

 ;;2081

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

 ;;2061

 ;;21,"68084-0523-21 ")

 ;;2062

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

 ;;2084

 ;;21,"68084-0790-21 ")

 ;;2085

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

 ;;2086

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

 ;;2087

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

 ;;2088

 ;;21,"68084-0814-21 ")

 ;;2089

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

 ;;2090

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

 ;;2091

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

 ;;2063

 ;;21,"68084-0889-21 ")

 ;;2064

 ;;21,"68084-0934-32 ")

 ;;2094

 ;;21,"68084-0934-33 ")

 ;;2095

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

 ;;2096

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

 ;;2097

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

 ;;2098

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

 ;;2099

 ;;21,"68180-0311-01 ")

 ;;2100

 ;;21,"68180-0312-01 ")

 ;;2101

 ;;21,"68180-0313-01 ")

 ;;2102

 ;;21,"68180-0314-06 ")

 ;;2103

 ;;21,"68180-0315-06 ")

 ;;2104

 ;;21,"68180-0316-06 ")

 ;;2105

 ;;21,"68180-0317-06 ")

 ;;2106

 ;;21,"68180-0322-01 ")

 ;;2065

 ;;21,"68180-0323-01 ")

 ;;2066

 ;;21,"68180-0324-01 ")

 ;;2067

 ;;21,"68180-0779-01 ")

 ;;2068

 ;;21,"68180-0780-01 ")

 ;;2069

 ;;21,"68258-2012-09 ")

 ;;2112

 ;;21,"68258-7048-03 ")

 ;;2070

 ;;21,"68258-7049-03 ")

 ;;2071

 ;;21,"68258-7160-03 ")

 ;;2115

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

 ;;2116

 ;;21,"68308-0220-01 ")

 ;;2117

 ;;21,"68308-0312-10 ")

 ;;2118

 ;;21,"68308-0554-10 ")

 ;;2119

 ;;21,"68387-0520-12 ")

 ;;2120

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

 ;;2121

 ;;21,"68387-0520-60 ")

 ;;2122

 ;;21,"68387-0520-90 ")

 ;;2123

 ;;21,"68405-0023-26 ")

 ;;2072

 ;;21,"68405-0044-26 ")

 ;;2073

 ;;21,"68405-0053-26 ")

 ;;2126

 ;;21,"68453-0170-10 ")

 ;;2127

 ;;21,"68462-0279-01 ")

 ;;2074

 ;;21,"68462-0279-05 ")

 ;;2075

 ;;21,"68462-0280-01 ")

 ;;2076

 ;;21,"68462-0280-05 ")

 ;;2077

 ;;21,"68462-0382-01 ")

 ;;2078

 ;;21,"68462-0383-01 ")

 ;;2082

 ;;21,"68462-0384-01 ")

 ;;2083

 ;;21,"68645-0230-59 ")

 ;;2135

 ;;21,"68788-0748-03 ")

 ;;2136

 ;;21,"68788-0748-06 ")

 ;;2137

 ;;21,"68788-0748-09 ")

 ;;2138

 ;;21,"68788-2212-03 ")

 ;;2139

 ;;21,"68788-2212-06 ")

 ;;2140

 ;;21,"68788-2212-09 ")

 ;;2141

 ;;21,"68788-2213-03 ")

 ;;2142

 ;;21,"68788-2213-06 ")

 ;;2143

 ;;21,"68788-8923-01 ")

 ;;2092

 ;;21,"68788-8923-02 ")

 ;;2093

 ;;21,"68788-8923-03 ")

 ;;2107

 ;;21,"68788-8923-06 ")

 ;;2108

 ;;21,"68788-8923-09 ")

 ;;2109

 ;;21,"68788-8953-01 ")

 ;;2110

 ;;21,"68788-8953-02 ")

 ;;2111

 ;;21,"68788-8953-03 ")

 ;;2113

 ;;21,"68788-8953-06 ")

 ;;2114

 ;;21,"68788-8953-09 ")

 ;;2124

 ;;21,"68788-8970-02 ")

 ;;2125

 ;;21,"68788-8970-03 ")

 ;;2128

 ;;21,"68788-8970-06 ")

 ;;2129

 ;;21,"68788-8970-09 ")

 ;;2130

 ;;21,"68788-8971-03 ")

 ;;2131

 ;;21,"68788-8971-06 ")

 ;;2132

 ;;21,"68788-8971-09 ")

 ;;2133

 ;;21,"68788-9013-03 ")

 ;;2161

 ;;21,"68788-9013-06 ")

 ;;2162

 ;;21,"68788-9013-09 ")

 ;;2163

 ;;21,"68788-9127-03 ")

 ;;2134

 ;;21,"68788-9127-06 ")

 ;;2144

 ;;21,"68788-9127-09 ")

 ;;2145

 ;;21,"68788-9824-01 ")

 ;;2146

 ;;21,"68788-9824-02 ")

 ;;2147

 ;;21,"68788-9824-03 ")

 ;;2148

 ;;21,"68788-9824-06 ")

 ;;2149

 ;;21,"68788-9824-09 ")

 ;;2150

 ;;21,"68788-9905-03 ")

 ;;2151

 ;;21,"68788-9905-06 ")

 ;;2152

 ;;21,"68788-9905-09 ")

 ;;2153

 ;;21,"69158-0000-00 ")

 ;;2154

 ;;21,"69158-0001-00 ")

 ;;2155

 ;;21,"69158-0002-00 ")

 ;;2156

 ;;21,"69315-0133-01 ")

 ;;2157

 ;;21,"69315-0133-10 ")

 ;;2158

 ;;21,"69315-0134-01 ")

 ;;2159

 ;;21,"69315-0134-10 ")

 ;;2160

 ;;21,"69315-0135-01 ")

 ;;2164

 ;;21,"69315-0135-10 ")

 ;;2165

 ;;21,"69499-0302-30 ")

 ;;2166

 ;;21,"69499-0302-40 ")

 ;;2167

 ;;21,"69874-0422-10 ")

 ;;2168

 ;;21,"70362-0721-01 ")

 ;;2169

 ;;21,"70362-0722-01 ")

 ;;2170

 ;;21,"75826-0112-10 ")

 ;;2171

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

 ;;2172

 ;;21,"76478-0501-20 ")

 ;;2173

 ;;21,"76478-0501-50 ")

 ;;2174

 ;;9002226,1799,.01)

 ;;BGP HEDIS CENTRAL NERVOUS NDC

 ;;9002226,1799,.02)

;;@

 ;;9002226,1799,.04)

;;n

 ;;9002226,1799,.06)

;;@

 ;;9002226,1799,.08)

;;@

 ;;9002226,1799,.09)

 ;;3160812

 ;;9002226,1799,.11)

;;@

 ;;9002226,1799,.12)

;;@

 ;;9002226,1799,.13)

;;1

 ;;9002226,1799,.14)

;;@

 ;;9002226,1799,.15)

 ;;50.67

 ;;9002226,1799,.16)

;;@

 ;;9002226,1799,.17)

;;@

 ;;9002226,1799,.22)

;;1

 ;;9002226,1799,3101)

;;@

 ;;9002226.02101,"1799,00024-5401-31 ",.01)

 ;;00024-5401-31

 ;;9002226.02101,"1799,00024-5401-31 ",.02)

 ;;00024-5401-31

 ;;9002226.02101,"1799,00024-5421-31 ",.01)

 ;;00024-5421-31

 ;;9002226.02101,"1799,00024-5421-31 ",.02)

 ;;00024-5421-31

 ;;9002226.02101,"1799,00024-5421-50 ",.01)

 ;;00024-5421-50

 ;;9002226.02101,"1799,00024-5421-50 ",.02)

 ;;00024-5421-50

 ;;9002226.02101,"1799,00024-5501-10 ",.01)

 ;;00024-5501-10

 ;;9002226.02101,"1799,00024-5501-10 ",.02)

 ;;00024-5501-10

 ;;9002226.02101,"1799,00024-5501-31 ",.01)

 ;;00024-5501-31

 ;;9002226.02101,"1799,00024-5501-31 ",.02)

 ;;00024-5501-31

 ;;9002226.02101,"1799,00024-5521-10 ",.01)

 ;;00024-5521-10

 ;;9002226.02101,"1799,00024-5521-10 ",.02)

 ;;00024-5521-10

 ;;9002226.02101,"1799,00024-5521-31 ",.01)

 ;;00024-5521-31

 ;;9002226.02101,"1799,00024-5521-31 ",.02)

 ;;00024-5521-31

 ;;9002226.02101,"1799,00024-5521-50 ",.01)

 ;;00024-5521-50

 ;;9002226.02101,"1799,00024-5521-50 ",.02)

 ;;00024-5521-50

 ;;9002226.02101,"1799,00037-0110-16 ",.01)

 ;;00037-0110-16

 ;;9002226.02101,"1799,00037-0110-16 ",.02)

 ;;00037-0110-16

 ;;9002226.02101,"1799,00037-0113-60 ",.01)

 ;;00037-0113-60

 ;;9002226.02101,"1799,00037-0113-60 ",.02)

 ;;00037-0113-60

 ;;9002226.02101,"1799,00037-0114-60 ",.01)

 ;;00037-0114-60

 ;;9002226.02101,"1799,00037-0114-60 ",.02)

 ;;00037-0114-60

 ;;9002226.02101,"1799,00037-6010-30 ",.01)

 ;;00037-6010-30

 ;;9002226.02101,"1799,00037-6010-30 ",.02)

 ;;00037-6010-30

 ;;9002226.02101,"1799,00037-6050-30 ",.01)

 ;;00037-6050-30

 ;;9002226.02101,"1799,00037-6050-30 ",.02)

 ;;00037-6050-30

 ;;9002226.02101,"1799,00054-0084-25 ",.01)

 ;;00054-0084-25

 ;;9002226.02101,"1799,00054-0084-25 ",.02)

 ;;00054-0084-25

 ;;9002226.02101,"1799,00054-0085-25 ",.01)

 ;;00054-0085-25

 ;;9002226.02101,"1799,00054-0085-25 ",.02)

 ;;00054-0085-25

 ;;9002226.02101,"1799,00054-0086-25 ",.01)

 ;;00054-0086-25

 ;;9002226.02101,"1799,00054-0086-25 ",.02)

 ;;00054-0086-25

 ;;9002226.02101,"1799,00054-0086-29 ",.01)

 ;;00054-0086-29

 ;;9002226.02101,"1799,00054-0086-29 ",.02)

 ;;00054-0086-29

 ;;9002226.02101,"1799,00054-0087-25 ",.01)

 ;;00054-0087-25

 ;;9002226.02101,"1799,00054-0087-25 ",.02)

 ;;00054-0087-25

 ;;9002226.02101,"1799,00054-0087-29 ",.01)

 ;;00054-0087-29

 ;;9002226.02101,"1799,00054-0087-29 ",.02)

 ;;00054-0087-29

 ;;9002226.02101,"1799,00054-0273-13 ",.01)

 ;;00054-0273-13

 ;;9002226.02101,"1799,00054-0273-13 ",.02)

 ;;00054-0273-13

 ;;9002226.02101,"1799,00054-0274-13 ",.01)

 ;;00054-0274-13

 ;;9002226.02101,"1799,00054-0274-13 ",.02)

 ;;00054-0274-13

 ;;9002226.02101,"1799,00054-0275-13 ",.01)

 ;;00054-0275-13

 ;;9002226.02101,"1799,00054-0275-13 ",.02)

 ;;00054-0275-13

 ;;9002226.02101,"1799,00054-0276-13 ",.01)

 ;;00054-0276-13

 ;;9002226.02101,"1799,00054-0276-13 ",.02)

 ;;00054-0276-13

 ;;9002226.02101,"1799,00054-0290-13 ",.01)

 ;;00054-0290-13

 ;;9002226.02101,"1799,00054-0290-13 ",.02)

 ;;00054-0290-13

 ;;9002226.02101,"1799,00054-0291-25 ",.01)

 ;;00054-0291-25

 ;;9002226.02101,"1799,00054-0291-25 ",.02)

 ;;00054-0291-25

 ;;9002226.02101,"1799,00054-0292-25 ",.01)

 ;;00054-0292-25

 ;;9002226.02101,"1799,00054-0292-25 ",.02)

 ;;00054-0292-25

 ;;9002226.02101,"1799,00093-0073-01 ",.01)

 ;;00093-0073-01

 ;;9002226.02101,"1799,00093-0073-01 ",.02)

 ;;00093-0073-01

 ;;9002226.02101,"1799,00093-0074-01 ",.01)

 ;;00093-0074-01

 ;;9002226.02101,"1799,00093-0074-01 ",.02)

 ;;00093-0074-01

 ;;9002226.02101,"1799,00093-5268-01 ",.01)

 ;;00093-5268-01

 ;;9002226.02101,"1799,00093-5268-01 ",.02)

 ;;00093-5268-01

 ;;9002226.02101,"1799,00093-5269-01 ",.01)

 ;;00093-5269-01

 ;;9002226.02101,"1799,00093-5269-01 ",.02)

 ;;00093-5269-01

 ;;9002226.02101,"1799,00093-5537-56 ",.01)

 ;;00093-5537-56

 ;;9002226.02101,"1799,00093-5537-56 ",.02)

 ;;00093-5537-56

 ;;9002226.02101,"1799,00093-5538-01 ",.01)

 ;;00093-5538-01

 ;;9002226.02101,"1799,00093-5538-01 ",.02)

 ;;00093-5538-01

 ;;9002226.02101,"1799,00093-5539-01 ",.01)

 ;;00093-5539-01

 ;;9002226.02101,"1799,00093-5539-01 ",.02)

 ;;00093-5539-01

 ;;9002226.02101,"1799,00093-9612-12 ",.01)

 ;;00093-9612-12

 ;;9002226.02101,"1799,00093-9612-12 ",.02)

 ;;00093-9612-12

 ;;9002226.02101,"1799,00095-0950-05 ",.01)

 ;;00095-0950-05

 ;;9002226.02101,"1799,00095-0950-05 ",.02)

 ;;00095-0950-05

 ;;9002226.02101,"1799,00095-3000-01 ",.01)

 ;;00095-3000-01

 ;;9002226.02101,"1799,00095-3000-01 ",.02)

 ;;00095-3000-01

 ;;9002226.02101,"1799,00143-1115-01 ",.01)

 ;;00143-1115-01

 ;;9002226.02101,"1799,00143-1115-01 ",.02)

 ;;00143-1115-01

 ;;9002226.02101,"1799,00143-1115-05 ",.01)

 ;;00143-1115-05

 ;;9002226.02101,"1799,00143-1115-05 ",.02)

 ;;00143-1115-05

 ;;9002226.02101,"1799,00143-1445-01 ",.01)

 ;;00143-1445-01

 ;;9002226.02101,"1799,00143-1445-01 ",.02)

 ;;00143-1445-01

 ;;9002226.02101,"1799,00143-1445-05 ",.01)

 ;;00143-1445-05

 ;;9002226.02101,"1799,00143-1445-05 ",.02)

 ;;00143-1445-05

 ;;9002226.02101,"1799,00143-1445-10 ",.01)

 ;;00143-1445-10

 ;;9002226.02101,"1799,00143-1445-10 ",.02)

 ;;00143-1445-10

 ;;9002226.02101,"1799,00143-1450-01 ",.01)

 ;;00143-1450-01

 ;;9002226.02101,"1799,00143-1450-01 ",.02)

 ;;00143-1450-01

 ;;9002226.02101,"1799,00143-1450-05 ",.01)

 ;;00143-1450-05

 ;;9002226.02101,"1799,00143-1450-05 ",.02)

 ;;00143-1450-05

 ;;9002226.02101,"1799,00143-1450-10 ",.01)

 ;;00143-1450-10

 ;;9002226.02101,"1799,00143-1450-10 ",.02)

 ;;00143-1450-10

 ;;9002226.02101,"1799,00143-1455-01 ",.01)

 ;;00143-1455-01

 ;;9002226.02101,"1799,00143-1455-01 ",.02)

 ;;00143-1455-01

 ;;9002226.02101,"1799,00143-1455-05 ",.01)

 ;;00143-1455-05

 ;;9002226.02101,"1799,00143-1455-05 ",.02)

 ;;00143-1455-05

 ;;9002226.02101,"1799,00143-1455-10 ",.01)

 ;;00143-1455-10

 ;;9002226.02101,"1799,00143-1455-10 ",.02)

 ;;00143-1455-10

 ;;9002226.02101,"1799,00143-1458-01 ",.01)

 ;;00143-1458-01

BGP71N7   ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 30, 2016 ;

 +1       ;;17.1;IHS CLINICAL REPORTING;;MAY 10, 2017;Build 29

 +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,"67544-0996-28 ")

 +2       ;;1987

 +3       ;;21,"67544-0996-30 ")

 +4       ;;1988

 +5       ;;21,"67544-0996-40 ")

 +6       ;;1989

 +7       ;;21,"67544-0996-45 ")

 +8       ;;1990

 +9       ;;21,"67544-0996-53 ")

 +10      ;;1991

 +11      ;;21,"67544-0996-59 ")

 +12      ;;1992

 +13      ;;21,"67544-0996-60 ")

 +14      ;;1993

 +15      ;;21,"67544-0996-62 ")

 +16      ;;1994

 +17      ;;21,"67877-0210-01 ")

 +18      ;;1995

 +19      ;;21,"67877-0211-01 ")

 +20      ;;1996

 +21      ;;21,"68047-0721-01 ")

 +22      ;;2051

 +23      ;;21,"68071-0304-30 ")

 +24      ;;1997

 +25      ;;21,"68071-0361-30 ")

 +26      ;;1998

 +27      ;;21,"68071-0414-30 ")

 +28      ;;2035

 +29      ;;21,"68071-0421-30 ")

 +30      ;;2055

 +31      ;;21,"68071-0421-60 ")

 +32      ;;2056

 +33      ;;21,"68071-0421-90 ")

 +34      ;;2057

 +35      ;;21,"68071-0698-10 ")

 +36      ;;2036

 +37      ;;21,"68071-0698-14 ")

 +38      ;;2037

 +39      ;;21,"68071-0698-20 ")

 +40      ;;2038

 +41      ;;21,"68071-0698-30 ")

 +42      ;;2039

 +43      ;;21,"68071-0698-60 ")

 +44      ;;2040

 +45      ;;21,"68071-0703-14 ")

 +46      ;;2041

 +47      ;;21,"68071-0703-30 ")

 +48      ;;2042

 +49      ;;21,"68071-0703-45 ")

 +50      ;;2043

 +51      ;;21,"68071-0703-60 ")

 +52      ;;2044

 +53      ;;21,"68071-0788-30 ")

 +54      ;;2045

 +55      ;;21,"68071-0789-30 ")

 +56      ;;2046

 +57      ;;21,"68071-2007-03 ")

 +58      ;;2047

 +59      ;;21,"68071-2007-06 ")

 +60      ;;2048

 +61      ;;21,"68084-0189-01 ")

 +62      ;;2049

 +63      ;;21,"68084-0189-11 ")

 +64      ;;2050

 +65      ;;21,"68084-0200-01 ")

 +66      ;;2052

 +67      ;;21,"68084-0200-11 ")

 +68      ;;2053

 +69      ;;21,"68084-0225-01 ")

 +70      ;;2054

 +71      ;;21,"68084-0225-11 ")

 +72      ;;2058

 +73      ;;21,"68084-0226-01 ")

 +74      ;;2059

 +75      ;;21,"68084-0226-11 ")

 +76      ;;2060

 +77      ;;21,"68084-0396-01 ")

 +78      ;;2079

 +79      ;;21,"68084-0396-11 ")

 +80      ;;2080

 +81      ;;21,"68084-0396-65 ")

 +82      ;;2081

 +83      ;;21,"68084-0523-11 ")

 +84      ;;2061

 +85      ;;21,"68084-0523-21 ")

 +86      ;;2062

 +87      ;;21,"68084-0790-11 ")

 +88      ;;2084

 +89      ;;21,"68084-0790-21 ")

 +90      ;;2085

 +91      ;;21,"68084-0790-25 ")

 +92      ;;2086

 +93      ;;21,"68084-0790-95 ")

 +94      ;;2087

 +95      ;;21,"68084-0814-11 ")

 +96      ;;2088

 +97      ;;21,"68084-0814-21 ")

 +98      ;;2089

 +99      ;;21,"68084-0818-25 ")

 +100     ;;2090

 +101     ;;21,"68084-0818-95 ")

 +102     ;;2091

 +103     ;;21,"68084-0889-11 ")

 +104     ;;2063

 +105     ;;21,"68084-0889-21 ")

 +106     ;;2064

 +107     ;;21,"68084-0934-32 ")

 +108     ;;2094

 +109     ;;21,"68084-0934-33 ")

 +110     ;;2095

 +111     ;;21,"68084-0989-25 ")

 +112     ;;2096

 +113     ;;21,"68084-0989-95 ")

 +114     ;;2097

 +115     ;;21,"68084-0995-25 ")

 +116     ;;2098

 +117     ;;21,"68084-0995-95 ")

 +118     ;;2099

 +119     ;;21,"68180-0311-01 ")

 +120     ;;2100

 +121     ;;21,"68180-0312-01 ")

 +122     ;;2101

 +123     ;;21,"68180-0313-01 ")

 +124     ;;2102

 +125     ;;21,"68180-0314-06 ")

 +126     ;;2103

 +127     ;;21,"68180-0315-06 ")

 +128     ;;2104

 +129     ;;21,"68180-0316-06 ")

 +130     ;;2105

 +131     ;;21,"68180-0317-06 ")

 +132     ;;2106

 +133     ;;21,"68180-0322-01 ")

 +134     ;;2065

 +135     ;;21,"68180-0323-01 ")

 +136     ;;2066

 +137     ;;21,"68180-0324-01 ")

 +138     ;;2067

 +139     ;;21,"68180-0779-01 ")

 +140     ;;2068

 +141     ;;21,"68180-0780-01 ")

 +142     ;;2069

 +143     ;;21,"68258-2012-09 ")

 +144     ;;2112

 +145     ;;21,"68258-7048-03 ")

 +146     ;;2070

 +147     ;;21,"68258-7049-03 ")

 +148     ;;2071

 +149     ;;21,"68258-7160-03 ")

 +150     ;;2115

 +151     ;;21,"68308-0219-01 ")

 +152     ;;2116

 +153     ;;21,"68308-0220-01 ")

 +154     ;;2117

 +155     ;;21,"68308-0312-10 ")

 +156     ;;2118

 +157     ;;21,"68308-0554-10 ")

 +158     ;;2119

 +159     ;;21,"68387-0520-12 ")

 +160     ;;2120

 +161     ;;21,"68387-0520-30 ")

 +162     ;;2121

 +163     ;;21,"68387-0520-60 ")

 +164     ;;2122

 +165     ;;21,"68387-0520-90 ")

 +166     ;;2123

 +167     ;;21,"68405-0023-26 ")

 +168     ;;2072

 +169     ;;21,"68405-0044-26 ")

 +170     ;;2073

 +171     ;;21,"68405-0053-26 ")

 +172     ;;2126

 +173     ;;21,"68453-0170-10 ")

 +174     ;;2127

 +175     ;;21,"68462-0279-01 ")

 +176     ;;2074

 +177     ;;21,"68462-0279-05 ")

 +178     ;;2075

 +179     ;;21,"68462-0280-01 ")

 +180     ;;2076

 +181     ;;21,"68462-0280-05 ")

 +182     ;;2077

 +183     ;;21,"68462-0382-01 ")

 +184     ;;2078

 +185     ;;21,"68462-0383-01 ")

 +186     ;;2082

 +187     ;;21,"68462-0384-01 ")

 +188     ;;2083

 +189     ;;21,"68645-0230-59 ")

 +190     ;;2135

 +191     ;;21,"68788-0748-03 ")

 +192     ;;2136

 +193     ;;21,"68788-0748-06 ")

 +194     ;;2137

 +195     ;;21,"68788-0748-09 ")

 +196     ;;2138

 +197     ;;21,"68788-2212-03 ")

 +198     ;;2139

 +199     ;;21,"68788-2212-06 ")

 +200     ;;2140

 +201     ;;21,"68788-2212-09 ")

 +202     ;;2141

 +203     ;;21,"68788-2213-03 ")

 +204     ;;2142

 +205     ;;21,"68788-2213-06 ")

 +206     ;;2143

 +207     ;;21,"68788-8923-01 ")

 +208     ;;2092

 +209     ;;21,"68788-8923-02 ")

 +210     ;;2093

 +211     ;;21,"68788-8923-03 ")

 +212     ;;2107

 +213     ;;21,"68788-8923-06 ")

 +214     ;;2108

 +215     ;;21,"68788-8923-09 ")

 +216     ;;2109

 +217     ;;21,"68788-8953-01 ")

 +218     ;;2110

 +219     ;;21,"68788-8953-02 ")

 +220     ;;2111

 +221     ;;21,"68788-8953-03 ")

 +222     ;;2113

 +223     ;;21,"68788-8953-06 ")

 +224     ;;2114

 +225     ;;21,"68788-8953-09 ")

 +226     ;;2124

 +227     ;;21,"68788-8970-02 ")

 +228     ;;2125

 +229     ;;21,"68788-8970-03 ")

 +230     ;;2128

 +231     ;;21,"68788-8970-06 ")

 +232     ;;2129

 +233     ;;21,"68788-8970-09 ")

 +234     ;;2130

 +235     ;;21,"68788-8971-03 ")

 +236     ;;2131

 +237     ;;21,"68788-8971-06 ")

 +238     ;;2132

 +239     ;;21,"68788-8971-09 ")

 +240     ;;2133

 +241     ;;21,"68788-9013-03 ")

 +242     ;;2161

 +243     ;;21,"68788-9013-06 ")

 +244     ;;2162

 +245     ;;21,"68788-9013-09 ")

 +246     ;;2163

 +247     ;;21,"68788-9127-03 ")

 +248     ;;2134

 +249     ;;21,"68788-9127-06 ")

 +250     ;;2144

 +251     ;;21,"68788-9127-09 ")

 +252     ;;2145

 +253     ;;21,"68788-9824-01 ")

 +254     ;;2146

 +255     ;;21,"68788-9824-02 ")

 +256     ;;2147

 +257     ;;21,"68788-9824-03 ")

 +258     ;;2148

 +259     ;;21,"68788-9824-06 ")

 +260     ;;2149

 +261     ;;21,"68788-9824-09 ")

 +262     ;;2150

 +263     ;;21,"68788-9905-03 ")

 +264     ;;2151

 +265     ;;21,"68788-9905-06 ")

 +266     ;;2152

 +267     ;;21,"68788-9905-09 ")

 +268     ;;2153

 +269     ;;21,"69158-0000-00 ")

 +270     ;;2154

 +271     ;;21,"69158-0001-00 ")

 +272     ;;2155

 +273     ;;21,"69158-0002-00 ")

 +274     ;;2156

 +275     ;;21,"69315-0133-01 ")

 +276     ;;2157

 +277     ;;21,"69315-0133-10 ")

 +278     ;;2158

 +279     ;;21,"69315-0134-01 ")

 +280     ;;2159

 +281     ;;21,"69315-0134-10 ")

 +282     ;;2160

 +283     ;;21,"69315-0135-01 ")

 +284     ;;2164

 +285     ;;21,"69315-0135-10 ")

 +286     ;;2165

 +287     ;;21,"69499-0302-30 ")

 +288     ;;2166

 +289     ;;21,"69499-0302-40 ")

 +290     ;;2167

 +291     ;;21,"69874-0422-10 ")

 +292     ;;2168

 +293     ;;21,"70362-0721-01 ")

 +294     ;;2169

 +295     ;;21,"70362-0722-01 ")

 +296     ;;2170

 +297     ;;21,"75826-0112-10 ")

 +298     ;;2171

 +299     ;;21,"75826-0118-10 ")

 +300     ;;2172

 +301     ;;21,"76478-0501-20 ")

 +302     ;;2173

 +303     ;;21,"76478-0501-50 ")

 +304     ;;2174

 +305     ;;9002226,1799,.01)

 +306     ;;BGP HEDIS CENTRAL NERVOUS NDC

 +307     ;;9002226,1799,.02)

 +308     ;;@

 +309     ;;9002226,1799,.04)

 +310     ;;n

 +311     ;;9002226,1799,.06)

 +312     ;;@

 +313     ;;9002226,1799,.08)

 +314     ;;@

 +315     ;;9002226,1799,.09)

 +316     ;;3160812

 +317     ;;9002226,1799,.11)

 +318     ;;@

 +319     ;;9002226,1799,.12)

 +320     ;;@

 +321     ;;9002226,1799,.13)

 +322     ;;1

 +323     ;;9002226,1799,.14)

 +324     ;;@

 +325     ;;9002226,1799,.15)

 +326     ;;50.67

 +327     ;;9002226,1799,.16)

 +328     ;;@

 +329     ;;9002226,1799,.17)

 +330     ;;@

 +331     ;;9002226,1799,.22)

 +332     ;;1

 +333     ;;9002226,1799,3101)

 +334     ;;@

 +335     ;;9002226.02101,"1799,00024-5401-31 ",.01)

 +336     ;;00024-5401-31

 +337     ;;9002226.02101,"1799,00024-5401-31 ",.02)

 +338     ;;00024-5401-31

 +339     ;;9002226.02101,"1799,00024-5421-31 ",.01)

 +340     ;;00024-5421-31

 +341     ;;9002226.02101,"1799,00024-5421-31 ",.02)

 +342     ;;00024-5421-31

 +343     ;;9002226.02101,"1799,00024-5421-50 ",.01)

 +344     ;;00024-5421-50

 +345     ;;9002226.02101,"1799,00024-5421-50 ",.02)

 +346     ;;00024-5421-50

 +347     ;;9002226.02101,"1799,00024-5501-10 ",.01)

 +348     ;;00024-5501-10

 +349     ;;9002226.02101,"1799,00024-5501-10 ",.02)

 +350     ;;00024-5501-10

 +351     ;;9002226.02101,"1799,00024-5501-31 ",.01)

 +352     ;;00024-5501-31

 +353     ;;9002226.02101,"1799,00024-5501-31 ",.02)

 +354     ;;00024-5501-31

 +355     ;;9002226.02101,"1799,00024-5521-10 ",.01)

 +356     ;;00024-5521-10

 +357     ;;9002226.02101,"1799,00024-5521-10 ",.02)

 +358     ;;00024-5521-10

 +359     ;;9002226.02101,"1799,00024-5521-31 ",.01)

 +360     ;;00024-5521-31

 +361     ;;9002226.02101,"1799,00024-5521-31 ",.02)

 +362     ;;00024-5521-31

 +363     ;;9002226.02101,"1799,00024-5521-50 ",.01)

 +364     ;;00024-5521-50

 +365     ;;9002226.02101,"1799,00024-5521-50 ",.02)

 +366     ;;00024-5521-50

 +367     ;;9002226.02101,"1799,00037-0110-16 ",.01)

 +368     ;;00037-0110-16

 +369     ;;9002226.02101,"1799,00037-0110-16 ",.02)

 +370     ;;00037-0110-16

 +371     ;;9002226.02101,"1799,00037-0113-60 ",.01)

 +372     ;;00037-0113-60

 +373     ;;9002226.02101,"1799,00037-0113-60 ",.02)

 +374     ;;00037-0113-60

 +375     ;;9002226.02101,"1799,00037-0114-60 ",.01)

 +376     ;;00037-0114-60

 +377     ;;9002226.02101,"1799,00037-0114-60 ",.02)

 +378     ;;00037-0114-60

 +379     ;;9002226.02101,"1799,00037-6010-30 ",.01)

 +380     ;;00037-6010-30

 +381     ;;9002226.02101,"1799,00037-6010-30 ",.02)

 +382     ;;00037-6010-30

 +383     ;;9002226.02101,"1799,00037-6050-30 ",.01)

 +384     ;;00037-6050-30

 +385     ;;9002226.02101,"1799,00037-6050-30 ",.02)

 +386     ;;00037-6050-30

 +387     ;;9002226.02101,"1799,00054-0084-25 ",.01)

 +388     ;;00054-0084-25

 +389     ;;9002226.02101,"1799,00054-0084-25 ",.02)

 +390     ;;00054-0084-25

 +391     ;;9002226.02101,"1799,00054-0085-25 ",.01)

 +392     ;;00054-0085-25

 +393     ;;9002226.02101,"1799,00054-0085-25 ",.02)

 +394     ;;00054-0085-25

 +395     ;;9002226.02101,"1799,00054-0086-25 ",.01)

 +396     ;;00054-0086-25

 +397     ;;9002226.02101,"1799,00054-0086-25 ",.02)

 +398     ;;00054-0086-25

 +399     ;;9002226.02101,"1799,00054-0086-29 ",.01)

 +400     ;;00054-0086-29

 +401     ;;9002226.02101,"1799,00054-0086-29 ",.02)

 +402     ;;00054-0086-29

 +403     ;;9002226.02101,"1799,00054-0087-25 ",.01)

 +404     ;;00054-0087-25

 +405     ;;9002226.02101,"1799,00054-0087-25 ",.02)

 +406     ;;00054-0087-25

 +407     ;;9002226.02101,"1799,00054-0087-29 ",.01)

 +408     ;;00054-0087-29

 +409     ;;9002226.02101,"1799,00054-0087-29 ",.02)

 +410     ;;00054-0087-29

 +411     ;;9002226.02101,"1799,00054-0273-13 ",.01)

 +412     ;;00054-0273-13

 +413     ;;9002226.02101,"1799,00054-0273-13 ",.02)

 +414     ;;00054-0273-13

 +415     ;;9002226.02101,"1799,00054-0274-13 ",.01)

 +416     ;;00054-0274-13

 +417     ;;9002226.02101,"1799,00054-0274-13 ",.02)

 +418     ;;00054-0274-13

 +419     ;;9002226.02101,"1799,00054-0275-13 ",.01)

 +420     ;;00054-0275-13

 +421     ;;9002226.02101,"1799,00054-0275-13 ",.02)

 +422     ;;00054-0275-13

 +423     ;;9002226.02101,"1799,00054-0276-13 ",.01)

 +424     ;;00054-0276-13

 +425     ;;9002226.02101,"1799,00054-0276-13 ",.02)

 +426     ;;00054-0276-13

 +427     ;;9002226.02101,"1799,00054-0290-13 ",.01)

 +428     ;;00054-0290-13

 +429     ;;9002226.02101,"1799,00054-0290-13 ",.02)

 +430     ;;00054-0290-13

 +431     ;;9002226.02101,"1799,00054-0291-25 ",.01)

 +432     ;;00054-0291-25

 +433     ;;9002226.02101,"1799,00054-0291-25 ",.02)

 +434     ;;00054-0291-25

 +435     ;;9002226.02101,"1799,00054-0292-25 ",.01)

 +436     ;;00054-0292-25

 +437     ;;9002226.02101,"1799,00054-0292-25 ",.02)

 +438     ;;00054-0292-25

 +439     ;;9002226.02101,"1799,00093-0073-01 ",.01)

 +440     ;;00093-0073-01

 +441     ;;9002226.02101,"1799,00093-0073-01 ",.02)

 +442     ;;00093-0073-01

 +443     ;;9002226.02101,"1799,00093-0074-01 ",.01)

 +444     ;;00093-0074-01

 +445     ;;9002226.02101,"1799,00093-0074-01 ",.02)

 +446     ;;00093-0074-01

 +447     ;;9002226.02101,"1799,00093-5268-01 ",.01)

 +448     ;;00093-5268-01

 +449     ;;9002226.02101,"1799,00093-5268-01 ",.02)

 +450     ;;00093-5268-01

 +451     ;;9002226.02101,"1799,00093-5269-01 ",.01)

 +452     ;;00093-5269-01

 +453     ;;9002226.02101,"1799,00093-5269-01 ",.02)

 +454     ;;00093-5269-01

 +455     ;;9002226.02101,"1799,00093-5537-56 ",.01)

 +456     ;;00093-5537-56

 +457     ;;9002226.02101,"1799,00093-5537-56 ",.02)

 +458     ;;00093-5537-56

 +459     ;;9002226.02101,"1799,00093-5538-01 ",.01)

 +460     ;;00093-5538-01

 +461     ;;9002226.02101,"1799,00093-5538-01 ",.02)

 +462     ;;00093-5538-01

 +463     ;;9002226.02101,"1799,00093-5539-01 ",.01)

 +464     ;;00093-5539-01

 +465     ;;9002226.02101,"1799,00093-5539-01 ",.02)

 +466     ;;00093-5539-01

 +467     ;;9002226.02101,"1799,00093-9612-12 ",.01)

 +468     ;;00093-9612-12

 +469     ;;9002226.02101,"1799,00093-9612-12 ",.02)

 +470     ;;00093-9612-12

 +471     ;;9002226.02101,"1799,00095-0950-05 ",.01)

 +472     ;;00095-0950-05

 +473     ;;9002226.02101,"1799,00095-0950-05 ",.02)

 +474     ;;00095-0950-05

 +475     ;;9002226.02101,"1799,00095-3000-01 ",.01)

 +476     ;;00095-3000-01

 +477     ;;9002226.02101,"1799,00095-3000-01 ",.02)

 +478     ;;00095-3000-01

 +479     ;;9002226.02101,"1799,00143-1115-01 ",.01)

 +480     ;;00143-1115-01

 +481     ;;9002226.02101,"1799,00143-1115-01 ",.02)

 +482     ;;00143-1115-01

 +483     ;;9002226.02101,"1799,00143-1115-05 ",.01)

 +484     ;;00143-1115-05

 +485     ;;9002226.02101,"1799,00143-1115-05 ",.02)

 +486     ;;00143-1115-05

 +487     ;;9002226.02101,"1799,00143-1445-01 ",.01)

 +488     ;;00143-1445-01

 +489     ;;9002226.02101,"1799,00143-1445-01 ",.02)

 +490     ;;00143-1445-01

 +491     ;;9002226.02101,"1799,00143-1445-05 ",.01)

 +492     ;;00143-1445-05

 +493     ;;9002226.02101,"1799,00143-1445-05 ",.02)

 +494     ;;00143-1445-05

 +495     ;;9002226.02101,"1799,00143-1445-10 ",.01)

 +496     ;;00143-1445-10

 +497     ;;9002226.02101,"1799,00143-1445-10 ",.02)

 +498     ;;00143-1445-10

 +499     ;;9002226.02101,"1799,00143-1450-01 ",.01)

 +500     ;;00143-1450-01

 +501     ;;9002226.02101,"1799,00143-1450-01 ",.02)

 +502     ;;00143-1450-01

 +503     ;;9002226.02101,"1799,00143-1450-05 ",.01)

 +504     ;;00143-1450-05

 +505     ;;9002226.02101,"1799,00143-1450-05 ",.02)

 +506     ;;00143-1450-05

 +507     ;;9002226.02101,"1799,00143-1450-10 ",.01)

 +508     ;;00143-1450-10

 +509     ;;9002226.02101,"1799,00143-1450-10 ",.02)

 +510     ;;00143-1450-10

 +511     ;;9002226.02101,"1799,00143-1455-01 ",.01)

 +512     ;;00143-1455-01

 +513     ;;9002226.02101,"1799,00143-1455-01 ",.02)

 +514     ;;00143-1455-01

 +515     ;;9002226.02101,"1799,00143-1455-05 ",.01)

 +516     ;;00143-1455-05

 +517     ;;9002226.02101,"1799,00143-1455-05 ",.02)

 +518     ;;00143-1455-05

 +519     ;;9002226.02101,"1799,00143-1455-10 ",.01)

 +520     ;;00143-1455-10

 +521     ;;9002226.02101,"1799,00143-1455-10 ",.02)

 +522     ;;00143-1455-10

 +523     ;;9002226.02101,"1799,00143-1458-01 ",.01)

 +524     ;;00143-1458-01

BGP71N7.m