BGP06M6 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 23, 2010;
;;10.0;IHS CLINICAL REPORTING;;JUN 18, 2010
;
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,"63874-0388-10 ")
;;1953
;;21,"63874-0388-12 ")
;;1954
;;21,"63874-0388-15 ")
;;1955
;;21,"63874-0388-20 ")
;;1956
;;21,"63874-0388-30 ")
;;1957
;;21,"63874-0406-01 ")
;;1958
;;21,"63874-0406-10 ")
;;1959
;;21,"63874-0406-14 ")
;;1960
;;21,"63874-0406-15 ")
;;1961
;;21,"63874-0406-20 ")
;;1962
;;21,"63874-0406-28 ")
;;1963
;;21,"63874-0406-30 ")
;;1964
;;21,"63874-0406-60 ")
;;1965
;;21,"63874-0407-01 ")
;;1966
;;21,"63874-0407-10 ")
;;1967
;;21,"63874-0407-15 ")
;;1968
;;21,"63874-0407-20 ")
;;1969
;;21,"63874-0407-30 ")
;;1970
;;21,"63874-0407-60 ")
;;1971
;;21,"63874-0407-90 ")
;;1972
;;21,"63874-0454-01 ")
;;1973
;;21,"63874-0454-02 ")
;;1974
;;21,"63874-0454-04 ")
;;1975
;;21,"63874-0454-15 ")
;;1976
;;21,"63874-0454-20 ")
;;1977
;;21,"63874-0454-30 ")
;;1978
;;21,"63874-0454-60 ")
;;1979
;;21,"63874-0468-01 ")
;;1980
;;21,"63874-0468-10 ")
;;1981
;;21,"63874-0468-14 ")
;;1982
;;21,"63874-0468-15 ")
;;1983
;;21,"63874-0468-20 ")
;;1984
;;21,"63874-0468-30 ")
;;1985
;;21,"63874-0468-60 ")
;;1986
;;21,"63874-0468-90 ")
;;1987
;;21,"63874-0486-01 ")
;;1988
;;21,"63874-0486-02 ")
;;1989
;;21,"63874-0486-15 ")
;;1990
;;21,"63874-0486-30 ")
;;1991
;;21,"63874-0486-40 ")
;;1992
;;21,"63874-0486-60 ")
;;1993
;;21,"63874-0676-01 ")
;;1994
;;21,"63874-0676-12 ")
;;1995
;;21,"63874-0676-15 ")
;;1996
;;21,"63874-0676-20 ")
;;1997
;;21,"64376-0503-01 ")
;;1998
;;21,"64376-0503-10 ")
;;1999
;;21,"65162-0669-10 ")
;;2000
;;21,"65162-0670-10 ")
;;2001
;;21,"65162-0725-10 ")
;;2002
;;21,"65162-0727-10 ")
;;2003
;;21,"65162-0731-10 ")
;;2004
;;21,"65483-0391-10 ")
;;2005
;;21,"65483-0391-11 ")
;;2006
;;21,"65483-0391-50 ")
;;2007
;;21,"65483-0392-10 ")
;;2008
;;21,"65483-0392-22 ")
;;2009
;;21,"65483-0392-50 ")
;;2010
;;21,"65483-0393-10 ")
;;2011
;;21,"65483-0393-33 ")
;;2012
;;21,"65483-0393-50 ")
;;2013
;;21,"65726-0250-10 ")
;;2014
;;21,"65726-0250-25 ")
;;2015
;;21,"65726-0251-10 ")
;;2016
;;21,"65726-0251-25 ")
;;2017
;;21,"65862-0062-01 ")
;;2018
;;21,"65862-0063-01 ")
;;2019
;;21,"65862-0063-99 ")
;;2020
;;21,"65862-0064-01 ")
;;2021
;;21,"65862-0064-99 ")
;;2022
;;21,"65862-0086-01 ")
;;2023
;;21,"65862-0086-30 ")
;;2024
;;21,"65862-0087-01 ")
;;2025
;;21,"65862-0087-30 ")
;;2026
;;21,"65862-0142-01 ")
;;2027
;;21,"65862-0143-01 ")
;;2028
;;21,"65862-0144-01 ")
;;2029
;;21,"65862-0145-01 ")
;;2030
;;21,"65862-0168-01 ")
;;2031
;;21,"65862-0168-99 ")
;;2032
;;21,"65862-0169-01 ")
;;2033
;;21,"65862-0169-99 ")
;;2034
;;21,"65862-0170-01 ")
;;2035
;;21,"65862-0170-99 ")
;;2036
;;21,"66105-0994-03 ")
;;2037
;;21,"66105-0994-06 ")
;;2038
;;21,"66105-0994-10 ")
;;2039
;;21,"66105-0994-11 ")
;;2040
;;21,"66105-0994-15 ")
;;2041
;;21,"66105-0996-03 ")
;;2042
;;21,"66105-0996-06 ")
;;2043
;;21,"66105-0996-10 ")
;;2044
;;21,"66105-0996-11 ")
;;2045
;;21,"66105-0996-15 ")
;;2046
;;21,"66116-0239-30 ")
;;2047
;;21,"66116-0455-30 ")
;;2048
;;21,"66267-0031-30 ")
;;2049
;;21,"66336-0125-60 ")
;;2050
;;21,"66336-0126-60 ")
;;2051
;;21,"66336-0514-30 ")
;;2052
;;21,"66336-0514-60 ")
;;2053
;;21,"66336-0523-30 ")
;;2054
;;21,"66336-0523-60 ")
;;2055
;;21,"66336-0587-30 ")
;;2056
;;21,"66336-0587-60 ")
;;2057
;;21,"66336-0587-90 ")
;;2058
;;21,"66336-0719-30 ")
;;2059
;;21,"66336-0719-60 ")
;;2060
;;21,"67046-0030-30 ")
;;2061
;;21,"67046-0475-30 ")
;;2062
;;21,"67046-0476-30 ")
;;2063
;;21,"67046-0590-30 ")
;;2064
;;21,"67046-0590-60 ")
;;2065
;;21,"67253-0420-10 ")
;;2066
;;21,"67253-0420-11 ")
;;2067
;;21,"67253-0421-10 ")
;;2068
;;21,"67253-0421-11 ")
;;2069
;;21,"67253-0422-10 ")
;;2070
;;21,"67253-0422-11 ")
;;2071
;;21,"67286-4177-01 ")
;;2072
;;21,"67286-4179-01 ")
;;2073
;;21,"67801-0304-30 ")
;;2074
;;21,"67801-0315-30 ")
;;2075
;;21,"67801-0316-03 ")
;;2076
;;21,"67857-0700-01 ")
;;2077
;;21,"67857-0701-01 ")
;;2078
;;21,"68084-0209-01 ")
;;2079
;;21,"68084-0209-11 ")
;;2080
;;21,"68084-0210-01 ")
;;2081
;;21,"68084-0210-11 ")
;;2082
;;21,"68084-0211-01 ")
;;2083
;;21,"68084-0211-11 ")
;;2084
;;21,"68084-0212-01 ")
;;2085
;;21,"68084-0212-11 ")
;;2086
;;21,"68084-0261-01 ")
;;2087
;;21,"68084-0261-11 ")
;;2088
;;21,"68084-0262-01 ")
;;2089
;;21,"68084-0262-11 ")
;;2090
;;21,"68084-0263-01 ")
;;2091
;;21,"68084-0263-11 ")
;;2092
;;21,"68084-0264-01 ")
;;2093
;;21,"68084-0264-11 ")
;;2094
;;21,"68115-0038-30 ")
;;2095
;;21,"68115-0039-30 ")
;;2096
;;21,"68115-0039-60 ")
;;2097
;;21,"68115-0039-90 ")
;;2098
;;21,"68115-0040-15 ")
;;2099
;;21,"68115-0040-30 ")
;;2100
;;21,"68115-0040-60 ")
;;2101
;;21,"68115-0040-90 ")
;;2102
;;21,"68115-0238-00 ")
;;2103
;;21,"68115-0238-30 ")
;;2104
;;21,"68115-0238-60 ")
;;2105
;;21,"68115-0238-90 ")
;;2106
;;21,"68115-0239-30 ")
;;2107
;;21,"68115-0239-60 ")
;;2108
;;21,"68115-0239-90 ")
;;2109
;;21,"68115-0239-97 ")
;;2110
;;21,"68115-0307-60 ")
;;2111
;;21,"68115-0308-60 ")
;;2112
;;21,"68115-0308-99 ")
;;2113
;;21,"68115-0309-30 ")
;;2114
;;21,"68115-0309-60 ")
;;2115
;;21,"68115-0309-90 ")
;;2116
;;21,"68115-0310-30 ")
;;2117
;;21,"68115-0310-60 ")
;;2118
;;21,"68115-0419-30 ")
;;2119
;;21,"68115-0551-00 ")
;;2120
;;21,"68115-0629-00 ")
;;2121
;;21,"68115-0629-30 ")
;;2122
;;21,"68115-0661-00 ")
;;2123
;;21,"68115-0715-00 ")
;;2124
;;21,"68115-0727-00 ")
;;2125
;;21,"68115-0741-00 ")
;;2126
;;21,"68382-0022-01 ")
;;2127
;;21,"68382-0022-10 ")
;;2128
;;21,"68382-0023-01 ")
;;2129
;;21,"68382-0023-10 ")
;;2130
;;21,"68382-0024-01 ")
;;2131
;;21,"68382-0024-10 ")
;;2132
;;21,"68382-0092-01 ")
;;2133
;;21,"68382-0092-05 ")
;;2134
;;21,"68382-0092-17 ")
;;2135
;;21,"68382-0093-01 ")
;;2136
;;21,"68382-0093-05 ")
;;2137
;;21,"68382-0093-17 ")
;;2138
;;21,"68382-0094-01 ")
;;2139
;;21,"68382-0094-05 ")
;;2140
;;21,"68382-0094-17 ")
;;2141
;;21,"68382-0095-01 ")
;;2142
;;21,"68382-0095-05 ")
;;2143
;;21,"68382-0095-17 ")
;;2144
;;21,"68387-0538-30 ")
;;2145
;;21,"68387-0539-30 ")
;;2146
;;21,"68462-0162-01 ")
;;2147
;;21,"68462-0162-05 ")
;;2148
;;21,"68462-0163-01 ")
;;2149
;;21,"68462-0163-05 ")
;;2150
;;21,"68462-0164-01 ")
;;2151
;;21,"68462-0164-05 ")
;;2152
;;21,"68462-0165-01 ")
;;2153
;;21,"68462-0165-05 ")
;;2154
;;9002226,977,.01)
;;BGP HEDIS BETA BLOCKER NDC
;;9002226,977,.02)
;;@
;;9002226,977,.04)
;;n
;;9002226,977,.06)
;;@
;;9002226,977,.08)
;;@
;;9002226,977,.09)
;;@
;;9002226,977,.11)
;;@
;;9002226,977,.12)
;;@
;;9002226,977,.13)
;;1
;;9002226,977,.14)
;;@
;;9002226,977,.15)
;;@
;;9002226,977,.16)
;;@
;;9002226,977,.17)
;;@
;;9002226,977,3101)
;;@
;;9002226.02101,"977,00003-0207-76 ",.01)
;;00003-0207-76
;;9002226.02101,"977,00003-0207-76 ",.02)
;;00003-0207-76
;;9002226.02101,"977,00003-0241-76 ",.01)
;;00003-0241-76
;;9002226.02101,"977,00003-0241-76 ",.02)
;;00003-0241-76
;;9002226.02101,"977,00005-3234-23 ",.01)
;;00005-3234-23
;;9002226.02101,"977,00005-3234-23 ",.02)
;;00005-3234-23
;;9002226.02101,"977,00005-3235-38 ",.01)
;;00005-3235-38
;;9002226.02101,"977,00005-3235-38 ",.02)
;;00005-3235-38
;;9002226.02101,"977,00005-3238-23 ",.01)
;;00005-3238-23
;;9002226.02101,"977,00005-3238-23 ",.02)
;;00005-3238-23
;;9002226.02101,"977,00006-0437-68 ",.01)
;;00006-0437-68
;;9002226.02101,"977,00006-0437-68 ",.02)
;;00006-0437-68
;;9002226.02101,"977,00007-3370-13 ",.01)
;;00007-3370-13
;;9002226.02101,"977,00007-3370-13 ",.02)
;;00007-3370-13
;;9002226.02101,"977,00007-3370-59 ",.01)
;;00007-3370-59
;;9002226.02101,"977,00007-3370-59 ",.02)
;;00007-3370-59
;;9002226.02101,"977,00007-3371-13 ",.01)
;;00007-3371-13
;;9002226.02101,"977,00007-3371-13 ",.02)
;;00007-3371-13
;;9002226.02101,"977,00007-3371-59 ",.01)
;;00007-3371-59
;;9002226.02101,"977,00007-3371-59 ",.02)
;;00007-3371-59
;;9002226.02101,"977,00007-3372-13 ",.01)
;;00007-3372-13
;;9002226.02101,"977,00007-3372-13 ",.02)
;;00007-3372-13
;;9002226.02101,"977,00007-3372-59 ",.01)
;;00007-3372-59
;;9002226.02101,"977,00007-3372-59 ",.02)
;;00007-3372-59
;;9002226.02101,"977,00007-3373-13 ",.01)
;;00007-3373-13
;;9002226.02101,"977,00007-3373-13 ",.02)
;;00007-3373-13
;;9002226.02101,"977,00007-3373-59 ",.01)
;;00007-3373-59
;;9002226.02101,"977,00007-3373-59 ",.02)
;;00007-3373-59
;;9002226.02101,"977,00007-4139-20 ",.01)
;;00007-4139-20
;;9002226.02101,"977,00007-4139-20 ",.02)
;;00007-4139-20
;;9002226.02101,"977,00007-4140-20 ",.01)
;;00007-4140-20
;;9002226.02101,"977,00007-4140-20 ",.02)
;;00007-4140-20
;;9002226.02101,"977,00007-4141-20 ",.01)
;;00007-4141-20
;;9002226.02101,"977,00007-4141-20 ",.02)
;;00007-4141-20
;;9002226.02101,"977,00007-4142-20 ",.01)
;;00007-4142-20
;;9002226.02101,"977,00007-4142-20 ",.02)
;;00007-4142-20
;;9002226.02101,"977,00024-2300-20 ",.01)
;;00024-2300-20
;;9002226.02101,"977,00024-2300-20 ",.02)
;;00024-2300-20
;;9002226.02101,"977,00024-2301-10 ",.01)
;;00024-2301-10
;;9002226.02101,"977,00024-2301-10 ",.02)
;;00024-2301-10
;;9002226.02101,"977,00025-5101-31 ",.01)
;;00025-5101-31
;;9002226.02101,"977,00025-5101-31 ",.02)
;;00025-5101-31
;;9002226.02101,"977,00025-5201-31 ",.01)
;;00025-5201-31
;;9002226.02101,"977,00025-5201-31 ",.02)
;;00025-5201-31
;;9002226.02101,"977,00028-0035-01 ",.01)
;;00028-0035-01
;;9002226.02101,"977,00028-0035-01 ",.02)
;;00028-0035-01
;;9002226.02101,"977,00028-0051-01 ",.01)
;;00028-0051-01
;;9002226.02101,"977,00028-0051-01 ",.02)
;;00028-0051-01
;;9002226.02101,"977,00028-0051-10 ",.01)
;;00028-0051-10
;;9002226.02101,"977,00028-0051-10 ",.02)
;;00028-0051-10
;;9002226.02101,"977,00028-0053-01 ",.01)
;;00028-0053-01
;;9002226.02101,"977,00028-0053-01 ",.02)
;;00028-0053-01
;;9002226.02101,"977,00028-0071-01 ",.01)
;;00028-0071-01
;;9002226.02101,"977,00028-0071-01 ",.02)
;;00028-0071-01
;;9002226.02101,"977,00028-0071-10 ",.01)
;;00028-0071-10
;;9002226.02101,"977,00028-0071-10 ",.02)
;;00028-0071-10
;;9002226.02101,"977,00028-0073-01 ",.01)
;;00028-0073-01
;;9002226.02101,"977,00028-0073-01 ",.02)
;;00028-0073-01
;;9002226.02101,"977,00046-0421-81 ",.01)
;;00046-0421-81
;;9002226.02101,"977,00046-0421-81 ",.02)
;;00046-0421-81
;;9002226.02101,"977,00046-0421-95 ",.01)
;;00046-0421-95
;;9002226.02101,"977,00046-0421-95 ",.02)
;;00046-0421-95
;;9002226.02101,"977,00046-0422-81 ",.01)
;;00046-0422-81
;;9002226.02101,"977,00046-0422-81 ",.02)
;;00046-0422-81
;;9002226.02101,"977,00046-0422-95 ",.01)
;;00046-0422-95
;;9002226.02101,"977,00046-0422-95 ",.02)
;;00046-0422-95
;;9002226.02101,"977,00046-0424-81 ",.01)
;;00046-0424-81
;;9002226.02101,"977,00046-0424-81 ",.02)
;;00046-0424-81
;;9002226.02101,"977,00046-0424-95 ",.01)
;;00046-0424-95
;;9002226.02101,"977,00046-0424-95 ",.02)
;;00046-0424-95
;;9002226.02101,"977,00046-0426-81 ",.01)
;;00046-0426-81
;;9002226.02101,"977,00046-0426-81 ",.02)
;;00046-0426-81
;;9002226.02101,"977,00046-0428-81 ",.01)
;;00046-0428-81
;;9002226.02101,"977,00046-0428-81 ",.02)
;;00046-0428-81
;;9002226.02101,"977,00046-0428-95 ",.01)
;;00046-0428-95
;;9002226.02101,"977,00046-0428-95 ",.02)
;;00046-0428-95
;;9002226.02101,"977,00046-0470-81 ",.01)
;;00046-0470-81
;;9002226.02101,"977,00046-0470-81 ",.02)
;;00046-0470-81
;;9002226.02101,"977,00046-0471-81 ",.01)
;;00046-0471-81
;;9002226.02101,"977,00046-0471-81 ",.02)
;;00046-0471-81
;;9002226.02101,"977,00046-0473-81 ",.01)
;;00046-0473-81
;;9002226.02101,"977,00046-0473-81 ",.02)
;;00046-0473-81
;;9002226.02101,"977,00046-0479-81 ",.01)
;;00046-0479-81
;;9002226.02101,"977,00046-0479-81 ",.02)
;;00046-0479-81
;;9002226.02101,"977,00046-0484-81 ",.01)
;;00046-0484-81
;;9002226.02101,"977,00046-0484-81 ",.02)
;;00046-0484-81
;;9002226.02101,"977,00046-0488-81 ",.01)
;;00046-0488-81
;;9002226.02101,"977,00046-0488-81 ",.02)
;;00046-0488-81
;;9002226.02101,"977,00054-3727-63 ",.01)
;;00054-3727-63
;;9002226.02101,"977,00054-3727-63 ",.02)
;;00054-3727-63
;;9002226.02101,"977,00054-3730-63 ",.01)
;;00054-3730-63
;;9002226.02101,"977,00054-3730-63 ",.02)
;;00054-3730-63
;;9002226.02101,"977,00054-8764-16 ",.01)
;;00054-8764-16
;;9002226.02101,"977,00054-8764-16 ",.02)
;;00054-8764-16
;;9002226.02101,"977,00074-1664-13 ",.01)
;;00074-1664-13
;;9002226.02101,"977,00074-1664-13 ",.02)
;;00074-1664-13
;;9002226.02101,"977,00074-1665-13 ",.01)
;;00074-1665-13
;;9002226.02101,"977,00074-1665-13 ",.02)
;;00074-1665-13
;;9002226.02101,"977,00078-0458-05 ",.01)
;;00078-0458-05
BGP06M6 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 23, 2010;
+1 ;;10.0;IHS CLINICAL REPORTING;;JUN 18, 2010
+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,"63874-0388-10 ")
+2 ;;1953
+3 ;;21,"63874-0388-12 ")
+4 ;;1954
+5 ;;21,"63874-0388-15 ")
+6 ;;1955
+7 ;;21,"63874-0388-20 ")
+8 ;;1956
+9 ;;21,"63874-0388-30 ")
+10 ;;1957
+11 ;;21,"63874-0406-01 ")
+12 ;;1958
+13 ;;21,"63874-0406-10 ")
+14 ;;1959
+15 ;;21,"63874-0406-14 ")
+16 ;;1960
+17 ;;21,"63874-0406-15 ")
+18 ;;1961
+19 ;;21,"63874-0406-20 ")
+20 ;;1962
+21 ;;21,"63874-0406-28 ")
+22 ;;1963
+23 ;;21,"63874-0406-30 ")
+24 ;;1964
+25 ;;21,"63874-0406-60 ")
+26 ;;1965
+27 ;;21,"63874-0407-01 ")
+28 ;;1966
+29 ;;21,"63874-0407-10 ")
+30 ;;1967
+31 ;;21,"63874-0407-15 ")
+32 ;;1968
+33 ;;21,"63874-0407-20 ")
+34 ;;1969
+35 ;;21,"63874-0407-30 ")
+36 ;;1970
+37 ;;21,"63874-0407-60 ")
+38 ;;1971
+39 ;;21,"63874-0407-90 ")
+40 ;;1972
+41 ;;21,"63874-0454-01 ")
+42 ;;1973
+43 ;;21,"63874-0454-02 ")
+44 ;;1974
+45 ;;21,"63874-0454-04 ")
+46 ;;1975
+47 ;;21,"63874-0454-15 ")
+48 ;;1976
+49 ;;21,"63874-0454-20 ")
+50 ;;1977
+51 ;;21,"63874-0454-30 ")
+52 ;;1978
+53 ;;21,"63874-0454-60 ")
+54 ;;1979
+55 ;;21,"63874-0468-01 ")
+56 ;;1980
+57 ;;21,"63874-0468-10 ")
+58 ;;1981
+59 ;;21,"63874-0468-14 ")
+60 ;;1982
+61 ;;21,"63874-0468-15 ")
+62 ;;1983
+63 ;;21,"63874-0468-20 ")
+64 ;;1984
+65 ;;21,"63874-0468-30 ")
+66 ;;1985
+67 ;;21,"63874-0468-60 ")
+68 ;;1986
+69 ;;21,"63874-0468-90 ")
+70 ;;1987
+71 ;;21,"63874-0486-01 ")
+72 ;;1988
+73 ;;21,"63874-0486-02 ")
+74 ;;1989
+75 ;;21,"63874-0486-15 ")
+76 ;;1990
+77 ;;21,"63874-0486-30 ")
+78 ;;1991
+79 ;;21,"63874-0486-40 ")
+80 ;;1992
+81 ;;21,"63874-0486-60 ")
+82 ;;1993
+83 ;;21,"63874-0676-01 ")
+84 ;;1994
+85 ;;21,"63874-0676-12 ")
+86 ;;1995
+87 ;;21,"63874-0676-15 ")
+88 ;;1996
+89 ;;21,"63874-0676-20 ")
+90 ;;1997
+91 ;;21,"64376-0503-01 ")
+92 ;;1998
+93 ;;21,"64376-0503-10 ")
+94 ;;1999
+95 ;;21,"65162-0669-10 ")
+96 ;;2000
+97 ;;21,"65162-0670-10 ")
+98 ;;2001
+99 ;;21,"65162-0725-10 ")
+100 ;;2002
+101 ;;21,"65162-0727-10 ")
+102 ;;2003
+103 ;;21,"65162-0731-10 ")
+104 ;;2004
+105 ;;21,"65483-0391-10 ")
+106 ;;2005
+107 ;;21,"65483-0391-11 ")
+108 ;;2006
+109 ;;21,"65483-0391-50 ")
+110 ;;2007
+111 ;;21,"65483-0392-10 ")
+112 ;;2008
+113 ;;21,"65483-0392-22 ")
+114 ;;2009
+115 ;;21,"65483-0392-50 ")
+116 ;;2010
+117 ;;21,"65483-0393-10 ")
+118 ;;2011
+119 ;;21,"65483-0393-33 ")
+120 ;;2012
+121 ;;21,"65483-0393-50 ")
+122 ;;2013
+123 ;;21,"65726-0250-10 ")
+124 ;;2014
+125 ;;21,"65726-0250-25 ")
+126 ;;2015
+127 ;;21,"65726-0251-10 ")
+128 ;;2016
+129 ;;21,"65726-0251-25 ")
+130 ;;2017
+131 ;;21,"65862-0062-01 ")
+132 ;;2018
+133 ;;21,"65862-0063-01 ")
+134 ;;2019
+135 ;;21,"65862-0063-99 ")
+136 ;;2020
+137 ;;21,"65862-0064-01 ")
+138 ;;2021
+139 ;;21,"65862-0064-99 ")
+140 ;;2022
+141 ;;21,"65862-0086-01 ")
+142 ;;2023
+143 ;;21,"65862-0086-30 ")
+144 ;;2024
+145 ;;21,"65862-0087-01 ")
+146 ;;2025
+147 ;;21,"65862-0087-30 ")
+148 ;;2026
+149 ;;21,"65862-0142-01 ")
+150 ;;2027
+151 ;;21,"65862-0143-01 ")
+152 ;;2028
+153 ;;21,"65862-0144-01 ")
+154 ;;2029
+155 ;;21,"65862-0145-01 ")
+156 ;;2030
+157 ;;21,"65862-0168-01 ")
+158 ;;2031
+159 ;;21,"65862-0168-99 ")
+160 ;;2032
+161 ;;21,"65862-0169-01 ")
+162 ;;2033
+163 ;;21,"65862-0169-99 ")
+164 ;;2034
+165 ;;21,"65862-0170-01 ")
+166 ;;2035
+167 ;;21,"65862-0170-99 ")
+168 ;;2036
+169 ;;21,"66105-0994-03 ")
+170 ;;2037
+171 ;;21,"66105-0994-06 ")
+172 ;;2038
+173 ;;21,"66105-0994-10 ")
+174 ;;2039
+175 ;;21,"66105-0994-11 ")
+176 ;;2040
+177 ;;21,"66105-0994-15 ")
+178 ;;2041
+179 ;;21,"66105-0996-03 ")
+180 ;;2042
+181 ;;21,"66105-0996-06 ")
+182 ;;2043
+183 ;;21,"66105-0996-10 ")
+184 ;;2044
+185 ;;21,"66105-0996-11 ")
+186 ;;2045
+187 ;;21,"66105-0996-15 ")
+188 ;;2046
+189 ;;21,"66116-0239-30 ")
+190 ;;2047
+191 ;;21,"66116-0455-30 ")
+192 ;;2048
+193 ;;21,"66267-0031-30 ")
+194 ;;2049
+195 ;;21,"66336-0125-60 ")
+196 ;;2050
+197 ;;21,"66336-0126-60 ")
+198 ;;2051
+199 ;;21,"66336-0514-30 ")
+200 ;;2052
+201 ;;21,"66336-0514-60 ")
+202 ;;2053
+203 ;;21,"66336-0523-30 ")
+204 ;;2054
+205 ;;21,"66336-0523-60 ")
+206 ;;2055
+207 ;;21,"66336-0587-30 ")
+208 ;;2056
+209 ;;21,"66336-0587-60 ")
+210 ;;2057
+211 ;;21,"66336-0587-90 ")
+212 ;;2058
+213 ;;21,"66336-0719-30 ")
+214 ;;2059
+215 ;;21,"66336-0719-60 ")
+216 ;;2060
+217 ;;21,"67046-0030-30 ")
+218 ;;2061
+219 ;;21,"67046-0475-30 ")
+220 ;;2062
+221 ;;21,"67046-0476-30 ")
+222 ;;2063
+223 ;;21,"67046-0590-30 ")
+224 ;;2064
+225 ;;21,"67046-0590-60 ")
+226 ;;2065
+227 ;;21,"67253-0420-10 ")
+228 ;;2066
+229 ;;21,"67253-0420-11 ")
+230 ;;2067
+231 ;;21,"67253-0421-10 ")
+232 ;;2068
+233 ;;21,"67253-0421-11 ")
+234 ;;2069
+235 ;;21,"67253-0422-10 ")
+236 ;;2070
+237 ;;21,"67253-0422-11 ")
+238 ;;2071
+239 ;;21,"67286-4177-01 ")
+240 ;;2072
+241 ;;21,"67286-4179-01 ")
+242 ;;2073
+243 ;;21,"67801-0304-30 ")
+244 ;;2074
+245 ;;21,"67801-0315-30 ")
+246 ;;2075
+247 ;;21,"67801-0316-03 ")
+248 ;;2076
+249 ;;21,"67857-0700-01 ")
+250 ;;2077
+251 ;;21,"67857-0701-01 ")
+252 ;;2078
+253 ;;21,"68084-0209-01 ")
+254 ;;2079
+255 ;;21,"68084-0209-11 ")
+256 ;;2080
+257 ;;21,"68084-0210-01 ")
+258 ;;2081
+259 ;;21,"68084-0210-11 ")
+260 ;;2082
+261 ;;21,"68084-0211-01 ")
+262 ;;2083
+263 ;;21,"68084-0211-11 ")
+264 ;;2084
+265 ;;21,"68084-0212-01 ")
+266 ;;2085
+267 ;;21,"68084-0212-11 ")
+268 ;;2086
+269 ;;21,"68084-0261-01 ")
+270 ;;2087
+271 ;;21,"68084-0261-11 ")
+272 ;;2088
+273 ;;21,"68084-0262-01 ")
+274 ;;2089
+275 ;;21,"68084-0262-11 ")
+276 ;;2090
+277 ;;21,"68084-0263-01 ")
+278 ;;2091
+279 ;;21,"68084-0263-11 ")
+280 ;;2092
+281 ;;21,"68084-0264-01 ")
+282 ;;2093
+283 ;;21,"68084-0264-11 ")
+284 ;;2094
+285 ;;21,"68115-0038-30 ")
+286 ;;2095
+287 ;;21,"68115-0039-30 ")
+288 ;;2096
+289 ;;21,"68115-0039-60 ")
+290 ;;2097
+291 ;;21,"68115-0039-90 ")
+292 ;;2098
+293 ;;21,"68115-0040-15 ")
+294 ;;2099
+295 ;;21,"68115-0040-30 ")
+296 ;;2100
+297 ;;21,"68115-0040-60 ")
+298 ;;2101
+299 ;;21,"68115-0040-90 ")
+300 ;;2102
+301 ;;21,"68115-0238-00 ")
+302 ;;2103
+303 ;;21,"68115-0238-30 ")
+304 ;;2104
+305 ;;21,"68115-0238-60 ")
+306 ;;2105
+307 ;;21,"68115-0238-90 ")
+308 ;;2106
+309 ;;21,"68115-0239-30 ")
+310 ;;2107
+311 ;;21,"68115-0239-60 ")
+312 ;;2108
+313 ;;21,"68115-0239-90 ")
+314 ;;2109
+315 ;;21,"68115-0239-97 ")
+316 ;;2110
+317 ;;21,"68115-0307-60 ")
+318 ;;2111
+319 ;;21,"68115-0308-60 ")
+320 ;;2112
+321 ;;21,"68115-0308-99 ")
+322 ;;2113
+323 ;;21,"68115-0309-30 ")
+324 ;;2114
+325 ;;21,"68115-0309-60 ")
+326 ;;2115
+327 ;;21,"68115-0309-90 ")
+328 ;;2116
+329 ;;21,"68115-0310-30 ")
+330 ;;2117
+331 ;;21,"68115-0310-60 ")
+332 ;;2118
+333 ;;21,"68115-0419-30 ")
+334 ;;2119
+335 ;;21,"68115-0551-00 ")
+336 ;;2120
+337 ;;21,"68115-0629-00 ")
+338 ;;2121
+339 ;;21,"68115-0629-30 ")
+340 ;;2122
+341 ;;21,"68115-0661-00 ")
+342 ;;2123
+343 ;;21,"68115-0715-00 ")
+344 ;;2124
+345 ;;21,"68115-0727-00 ")
+346 ;;2125
+347 ;;21,"68115-0741-00 ")
+348 ;;2126
+349 ;;21,"68382-0022-01 ")
+350 ;;2127
+351 ;;21,"68382-0022-10 ")
+352 ;;2128
+353 ;;21,"68382-0023-01 ")
+354 ;;2129
+355 ;;21,"68382-0023-10 ")
+356 ;;2130
+357 ;;21,"68382-0024-01 ")
+358 ;;2131
+359 ;;21,"68382-0024-10 ")
+360 ;;2132
+361 ;;21,"68382-0092-01 ")
+362 ;;2133
+363 ;;21,"68382-0092-05 ")
+364 ;;2134
+365 ;;21,"68382-0092-17 ")
+366 ;;2135
+367 ;;21,"68382-0093-01 ")
+368 ;;2136
+369 ;;21,"68382-0093-05 ")
+370 ;;2137
+371 ;;21,"68382-0093-17 ")
+372 ;;2138
+373 ;;21,"68382-0094-01 ")
+374 ;;2139
+375 ;;21,"68382-0094-05 ")
+376 ;;2140
+377 ;;21,"68382-0094-17 ")
+378 ;;2141
+379 ;;21,"68382-0095-01 ")
+380 ;;2142
+381 ;;21,"68382-0095-05 ")
+382 ;;2143
+383 ;;21,"68382-0095-17 ")
+384 ;;2144
+385 ;;21,"68387-0538-30 ")
+386 ;;2145
+387 ;;21,"68387-0539-30 ")
+388 ;;2146
+389 ;;21,"68462-0162-01 ")
+390 ;;2147
+391 ;;21,"68462-0162-05 ")
+392 ;;2148
+393 ;;21,"68462-0163-01 ")
+394 ;;2149
+395 ;;21,"68462-0163-05 ")
+396 ;;2150
+397 ;;21,"68462-0164-01 ")
+398 ;;2151
+399 ;;21,"68462-0164-05 ")
+400 ;;2152
+401 ;;21,"68462-0165-01 ")
+402 ;;2153
+403 ;;21,"68462-0165-05 ")
+404 ;;2154
+405 ;;9002226,977,.01)
+406 ;;BGP HEDIS BETA BLOCKER NDC
+407 ;;9002226,977,.02)
+408 ;;@
+409 ;;9002226,977,.04)
+410 ;;n
+411 ;;9002226,977,.06)
+412 ;;@
+413 ;;9002226,977,.08)
+414 ;;@
+415 ;;9002226,977,.09)
+416 ;;@
+417 ;;9002226,977,.11)
+418 ;;@
+419 ;;9002226,977,.12)
+420 ;;@
+421 ;;9002226,977,.13)
+422 ;;1
+423 ;;9002226,977,.14)
+424 ;;@
+425 ;;9002226,977,.15)
+426 ;;@
+427 ;;9002226,977,.16)
+428 ;;@
+429 ;;9002226,977,.17)
+430 ;;@
+431 ;;9002226,977,3101)
+432 ;;@
+433 ;;9002226.02101,"977,00003-0207-76 ",.01)
+434 ;;00003-0207-76
+435 ;;9002226.02101,"977,00003-0207-76 ",.02)
+436 ;;00003-0207-76
+437 ;;9002226.02101,"977,00003-0241-76 ",.01)
+438 ;;00003-0241-76
+439 ;;9002226.02101,"977,00003-0241-76 ",.02)
+440 ;;00003-0241-76
+441 ;;9002226.02101,"977,00005-3234-23 ",.01)
+442 ;;00005-3234-23
+443 ;;9002226.02101,"977,00005-3234-23 ",.02)
+444 ;;00005-3234-23
+445 ;;9002226.02101,"977,00005-3235-38 ",.01)
+446 ;;00005-3235-38
+447 ;;9002226.02101,"977,00005-3235-38 ",.02)
+448 ;;00005-3235-38
+449 ;;9002226.02101,"977,00005-3238-23 ",.01)
+450 ;;00005-3238-23
+451 ;;9002226.02101,"977,00005-3238-23 ",.02)
+452 ;;00005-3238-23
+453 ;;9002226.02101,"977,00006-0437-68 ",.01)
+454 ;;00006-0437-68
+455 ;;9002226.02101,"977,00006-0437-68 ",.02)
+456 ;;00006-0437-68
+457 ;;9002226.02101,"977,00007-3370-13 ",.01)
+458 ;;00007-3370-13
+459 ;;9002226.02101,"977,00007-3370-13 ",.02)
+460 ;;00007-3370-13
+461 ;;9002226.02101,"977,00007-3370-59 ",.01)
+462 ;;00007-3370-59
+463 ;;9002226.02101,"977,00007-3370-59 ",.02)
+464 ;;00007-3370-59
+465 ;;9002226.02101,"977,00007-3371-13 ",.01)
+466 ;;00007-3371-13
+467 ;;9002226.02101,"977,00007-3371-13 ",.02)
+468 ;;00007-3371-13
+469 ;;9002226.02101,"977,00007-3371-59 ",.01)
+470 ;;00007-3371-59
+471 ;;9002226.02101,"977,00007-3371-59 ",.02)
+472 ;;00007-3371-59
+473 ;;9002226.02101,"977,00007-3372-13 ",.01)
+474 ;;00007-3372-13
+475 ;;9002226.02101,"977,00007-3372-13 ",.02)
+476 ;;00007-3372-13
+477 ;;9002226.02101,"977,00007-3372-59 ",.01)
+478 ;;00007-3372-59
+479 ;;9002226.02101,"977,00007-3372-59 ",.02)
+480 ;;00007-3372-59
+481 ;;9002226.02101,"977,00007-3373-13 ",.01)
+482 ;;00007-3373-13
+483 ;;9002226.02101,"977,00007-3373-13 ",.02)
+484 ;;00007-3373-13
+485 ;;9002226.02101,"977,00007-3373-59 ",.01)
+486 ;;00007-3373-59
+487 ;;9002226.02101,"977,00007-3373-59 ",.02)
+488 ;;00007-3373-59
+489 ;;9002226.02101,"977,00007-4139-20 ",.01)
+490 ;;00007-4139-20
+491 ;;9002226.02101,"977,00007-4139-20 ",.02)
+492 ;;00007-4139-20
+493 ;;9002226.02101,"977,00007-4140-20 ",.01)
+494 ;;00007-4140-20
+495 ;;9002226.02101,"977,00007-4140-20 ",.02)
+496 ;;00007-4140-20
+497 ;;9002226.02101,"977,00007-4141-20 ",.01)
+498 ;;00007-4141-20
+499 ;;9002226.02101,"977,00007-4141-20 ",.02)
+500 ;;00007-4141-20
+501 ;;9002226.02101,"977,00007-4142-20 ",.01)
+502 ;;00007-4142-20
+503 ;;9002226.02101,"977,00007-4142-20 ",.02)
+504 ;;00007-4142-20
+505 ;;9002226.02101,"977,00024-2300-20 ",.01)
+506 ;;00024-2300-20
+507 ;;9002226.02101,"977,00024-2300-20 ",.02)
+508 ;;00024-2300-20
+509 ;;9002226.02101,"977,00024-2301-10 ",.01)
+510 ;;00024-2301-10
+511 ;;9002226.02101,"977,00024-2301-10 ",.02)
+512 ;;00024-2301-10
+513 ;;9002226.02101,"977,00025-5101-31 ",.01)
+514 ;;00025-5101-31
+515 ;;9002226.02101,"977,00025-5101-31 ",.02)
+516 ;;00025-5101-31
+517 ;;9002226.02101,"977,00025-5201-31 ",.01)
+518 ;;00025-5201-31
+519 ;;9002226.02101,"977,00025-5201-31 ",.02)
+520 ;;00025-5201-31
+521 ;;9002226.02101,"977,00028-0035-01 ",.01)
+522 ;;00028-0035-01
+523 ;;9002226.02101,"977,00028-0035-01 ",.02)
+524 ;;00028-0035-01
+525 ;;9002226.02101,"977,00028-0051-01 ",.01)
+526 ;;00028-0051-01
+527 ;;9002226.02101,"977,00028-0051-01 ",.02)
+528 ;;00028-0051-01
+529 ;;9002226.02101,"977,00028-0051-10 ",.01)
+530 ;;00028-0051-10
+531 ;;9002226.02101,"977,00028-0051-10 ",.02)
+532 ;;00028-0051-10
+533 ;;9002226.02101,"977,00028-0053-01 ",.01)
+534 ;;00028-0053-01
+535 ;;9002226.02101,"977,00028-0053-01 ",.02)
+536 ;;00028-0053-01
+537 ;;9002226.02101,"977,00028-0071-01 ",.01)
+538 ;;00028-0071-01
+539 ;;9002226.02101,"977,00028-0071-01 ",.02)
+540 ;;00028-0071-01
+541 ;;9002226.02101,"977,00028-0071-10 ",.01)
+542 ;;00028-0071-10
+543 ;;9002226.02101,"977,00028-0071-10 ",.02)
+544 ;;00028-0071-10
+545 ;;9002226.02101,"977,00028-0073-01 ",.01)
+546 ;;00028-0073-01
+547 ;;9002226.02101,"977,00028-0073-01 ",.02)
+548 ;;00028-0073-01
+549 ;;9002226.02101,"977,00046-0421-81 ",.01)
+550 ;;00046-0421-81
+551 ;;9002226.02101,"977,00046-0421-81 ",.02)
+552 ;;00046-0421-81
+553 ;;9002226.02101,"977,00046-0421-95 ",.01)
+554 ;;00046-0421-95
+555 ;;9002226.02101,"977,00046-0421-95 ",.02)
+556 ;;00046-0421-95
+557 ;;9002226.02101,"977,00046-0422-81 ",.01)
+558 ;;00046-0422-81
+559 ;;9002226.02101,"977,00046-0422-81 ",.02)
+560 ;;00046-0422-81
+561 ;;9002226.02101,"977,00046-0422-95 ",.01)
+562 ;;00046-0422-95
+563 ;;9002226.02101,"977,00046-0422-95 ",.02)
+564 ;;00046-0422-95
+565 ;;9002226.02101,"977,00046-0424-81 ",.01)
+566 ;;00046-0424-81
+567 ;;9002226.02101,"977,00046-0424-81 ",.02)
+568 ;;00046-0424-81
+569 ;;9002226.02101,"977,00046-0424-95 ",.01)
+570 ;;00046-0424-95
+571 ;;9002226.02101,"977,00046-0424-95 ",.02)
+572 ;;00046-0424-95
+573 ;;9002226.02101,"977,00046-0426-81 ",.01)
+574 ;;00046-0426-81
+575 ;;9002226.02101,"977,00046-0426-81 ",.02)
+576 ;;00046-0426-81
+577 ;;9002226.02101,"977,00046-0428-81 ",.01)
+578 ;;00046-0428-81
+579 ;;9002226.02101,"977,00046-0428-81 ",.02)
+580 ;;00046-0428-81
+581 ;;9002226.02101,"977,00046-0428-95 ",.01)
+582 ;;00046-0428-95
+583 ;;9002226.02101,"977,00046-0428-95 ",.02)
+584 ;;00046-0428-95
+585 ;;9002226.02101,"977,00046-0470-81 ",.01)
+586 ;;00046-0470-81
+587 ;;9002226.02101,"977,00046-0470-81 ",.02)
+588 ;;00046-0470-81
+589 ;;9002226.02101,"977,00046-0471-81 ",.01)
+590 ;;00046-0471-81
+591 ;;9002226.02101,"977,00046-0471-81 ",.02)
+592 ;;00046-0471-81
+593 ;;9002226.02101,"977,00046-0473-81 ",.01)
+594 ;;00046-0473-81
+595 ;;9002226.02101,"977,00046-0473-81 ",.02)
+596 ;;00046-0473-81
+597 ;;9002226.02101,"977,00046-0479-81 ",.01)
+598 ;;00046-0479-81
+599 ;;9002226.02101,"977,00046-0479-81 ",.02)
+600 ;;00046-0479-81
+601 ;;9002226.02101,"977,00046-0484-81 ",.01)
+602 ;;00046-0484-81
+603 ;;9002226.02101,"977,00046-0484-81 ",.02)
+604 ;;00046-0484-81
+605 ;;9002226.02101,"977,00046-0488-81 ",.01)
+606 ;;00046-0488-81
+607 ;;9002226.02101,"977,00046-0488-81 ",.02)
+608 ;;00046-0488-81
+609 ;;9002226.02101,"977,00054-3727-63 ",.01)
+610 ;;00054-3727-63
+611 ;;9002226.02101,"977,00054-3727-63 ",.02)
+612 ;;00054-3727-63
+613 ;;9002226.02101,"977,00054-3730-63 ",.01)
+614 ;;00054-3730-63
+615 ;;9002226.02101,"977,00054-3730-63 ",.02)
+616 ;;00054-3730-63
+617 ;;9002226.02101,"977,00054-8764-16 ",.01)
+618 ;;00054-8764-16
+619 ;;9002226.02101,"977,00054-8764-16 ",.02)
+620 ;;00054-8764-16
+621 ;;9002226.02101,"977,00074-1664-13 ",.01)
+622 ;;00074-1664-13
+623 ;;9002226.02101,"977,00074-1664-13 ",.02)
+624 ;;00074-1664-13
+625 ;;9002226.02101,"977,00074-1665-13 ",.01)
+626 ;;00074-1665-13
+627 ;;9002226.02101,"977,00074-1665-13 ",.02)
+628 ;;00074-1665-13
+629 ;;9002226.02101,"977,00078-0458-05 ",.01)
+630 ;;00078-0458-05