BGP73F19.m

BGP73F19 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JAN 05, 2017;

 ;;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

 Q

 ;

TMP ;;TAXONOMY (WITH BULLETIN)

 ;;21,"67253-0143-15 ")

 ;;6019

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

 ;;6020

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

 ;;6021

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

 ;;6022

 ;;21,"67253-0146-45 ")

 ;;6023

 ;;21,"67253-0146-46 ")

 ;;6024

 ;;21,"67253-0146-47 ")

 ;;6025

 ;;21,"67253-0147-40 ")

 ;;6026

 ;;21,"67253-0147-43 ")

 ;;6027

 ;;21,"67253-0147-44 ")

 ;;6028

 ;;21,"67253-0148-45 ")

 ;;6029

 ;;21,"67253-0148-46 ")

 ;;6030

 ;;21,"67253-0148-47 ")

 ;;6031

 ;;21,"67253-0149-40 ")

 ;;6032

 ;;21,"67253-0149-43 ")

 ;;6033

 ;;21,"67253-0149-44 ")

 ;;6034

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

 ;;6035

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

 ;;6036

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

 ;;6037

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

 ;;6038

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

 ;;6039

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

 ;;6040

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

 ;;6041

 ;;21,"67253-0182-20 ")

 ;;6042

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

 ;;6043

 ;;21,"67253-0183-20 ")

 ;;6044

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

 ;;6045

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

 ;;6046

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

 ;;6047

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

 ;;6048

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

 ;;6049

 ;;21,"67253-0202-20 ")

 ;;6050

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

 ;;6051

 ;;21,"67253-0203-20 ")

 ;;6052

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

 ;;6053

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

 ;;6054

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

 ;;6055

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

 ;;6056

 ;;21,"67253-0388-15 ")

 ;;6057

 ;;21,"67253-0389-15 ")

 ;;6058

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

 ;;6059

 ;;21,"67253-0391-15 ")

 ;;6060

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

 ;;6061

 ;;21,"67405-0475-62 ")

 ;;6062

 ;;21,"67405-0550-05 ")

 ;;6063

 ;;21,"67405-0550-55 ")

 ;;6064

 ;;21,"67405-0650-55 ")

 ;;6065

 ;;21,"67405-0651-05 ")

 ;;6066

 ;;21,"67405-0651-55 ")

 ;;6067

 ;;21,"67405-0660-10 ")

 ;;6068

 ;;21,"67405-0661-10 ")

 ;;6069

 ;;21,"67457-0437-10 ")

 ;;6070

 ;;21,"67544-0775-28 ")

 ;;6071

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

 ;;6072

 ;;21,"67877-0219-05 ")

 ;;6073

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

 ;;6074

 ;;21,"67877-0220-05 ")

 ;;6075

 ;;21,"67877-0255-20 ")

 ;;6076

 ;;21,"67877-0255-23 ")

 ;;6077

 ;;21,"68001-0150-06 ")

 ;;6078

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

 ;;6079

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

 ;;6080

 ;;21,"68047-0714-60 ")

 ;;6081

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

 ;;6082

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

 ;;6083

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

 ;;6084

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

 ;;6085

 ;;21,"68071-0055-28 ")

 ;;6086

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

 ;;6087

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

 ;;6088

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

 ;;6089

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

 ;;6090

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

 ;;6091

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

 ;;6092

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

 ;;6093

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

 ;;6094

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

 ;;6095

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

 ;;6096

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

 ;;6097

 ;;21,"68071-0398-40 ")

 ;;6098

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

 ;;6099

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

 ;;6100

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

 ;;6101

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

 ;;6102

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

 ;;6103

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

 ;;6104

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

 ;;6105

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

 ;;6106

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

 ;;6107

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

 ;;6108

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

 ;;6109

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

 ;;6110

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

 ;;6111

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

 ;;6112

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

 ;;6113

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

 ;;6114

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

 ;;6115

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

 ;;6116

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

 ;;6117

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

 ;;6118

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

 ;;6119

 ;;21,"68084-0278-30 ")

 ;;6120

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

 ;;6121

 ;;21,"68084-0278-89 ")

 ;;6122

 ;;21,"68084-0279-21 ")

 ;;6123

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

 ;;6124

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

 ;;6125

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

 ;;6126

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

 ;;6127

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

 ;;6128

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

 ;;6129

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

 ;;6130

 ;;21,"68084-0464-21 ")

 ;;6131

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

 ;;6132

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

 ;;6133

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

 ;;6134

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

 ;;6135

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

 ;;6136

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

 ;;6137

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

 ;;6138

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

 ;;6139

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

 ;;6140

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

 ;;6141

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

 ;;6142

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

 ;;6143

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

 ;;6144

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

 ;;6145

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

 ;;6146

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

 ;;6147

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

 ;;6148

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

 ;;6149

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

 ;;6150

 ;;21,"68115-0026-06 ")

 ;;6151

 ;;21,"68115-0026-09 ")

 ;;6152

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

 ;;6153

 ;;21,"68115-0026-40 ")

 ;;6154

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

 ;;6155

 ;;21,"68115-0030-10 ")

 ;;6156

 ;;21,"68115-0032-40 ")

 ;;6157

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

 ;;6158

 ;;21,"68115-0033-40 ")

 ;;6159

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

 ;;6160

 ;;21,"68115-0081-06 ")

 ;;6161

 ;;21,"68115-0081-10 ")

 ;;6162

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

 ;;6163

 ;;21,"68115-0082-06 ")

 ;;6164

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

 ;;6165

 ;;21,"68115-0104-06 ")

 ;;6166

 ;;21,"68115-0104-40 ")

 ;;6167

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

 ;;6168

 ;;21,"68115-0105-40 ")

 ;;6169

 ;;21,"68115-0125-28 ")

 ;;6170

 ;;21,"68115-0131-06 ")

 ;;6171

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

 ;;6172

 ;;21,"68115-0131-21 ")

 ;;6173

 ;;21,"68115-0131-40 ")

 ;;6174

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

 ;;6175

 ;;21,"68115-0133-40 ")

 ;;6176

 ;;21,"68115-0134-06 ")

 ;;6177

 ;;21,"68115-0134-40 ")

 ;;6178

 ;;21,"68115-0421-28 ")

 ;;6179

 ;;21,"68115-0445-22 ")

 ;;6180

 ;;21,"68160-0161-13 ")

 ;;6181

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

 ;;6182

 ;;21,"68180-0121-02 ")

 ;;6183

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

 ;;6184

 ;;21,"68180-0122-02 ")

 ;;6185

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

 ;;6186

 ;;21,"68180-0123-02 ")

 ;;6187

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

 ;;6188

 ;;21,"68180-0124-02 ")

 ;;6189

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

 ;;6190

 ;;21,"68180-0160-13 ")

 ;;6191

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

 ;;6192

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

 ;;6193

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

 ;;6194

 ;;21,"68180-0180-08 ")

 ;;6195

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

 ;;6196

 ;;21,"68180-0181-02 ")

 ;;6197

 ;;21,"68180-0182-02 ")

 ;;6198

 ;;21,"68180-0182-03 ")

 ;;6199

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

 ;;6200

 ;;21,"68180-0202-02 ")

 ;;6201

 ;;21,"68180-0202-03 ")

 ;;6202

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

 ;;6203

 ;;21,"68180-0240-08 ")

 ;;6204

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

 ;;6205

 ;;21,"68180-0241-02 ")

 ;;6206

 ;;21,"68180-0241-08 ")

 ;;6207

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

 ;;6208

 ;;21,"68180-0242-20 ")

 ;;6209

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

 ;;6210

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

 ;;6211

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

 ;;6212

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

 ;;6213

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

 ;;6214

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

 ;;6215

 ;;21,"68180-0407-03 ")

 ;;6216

 ;;21,"68180-0407-04 ")

 ;;6217

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

 ;;6218

 ;;21,"68180-0611-10 ")

 ;;6219

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

 ;;6220

 ;;21,"68180-0622-10 ")

 ;;6221

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

 ;;6222

 ;;21,"68180-0633-10 ")

 ;;6223

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

 ;;6224

 ;;21,"68180-0644-10 ")

 ;;6225

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

 ;;6226

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

 ;;6227

 ;;21,"68180-0652-08 ")

 ;;6228

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

 ;;6229

 ;;21,"68180-0711-60 ")

 ;;6230

 ;;21,"68180-0722-10 ")

 ;;6231

 ;;21,"68180-0722-20 ")

 ;;6232

 ;;21,"68180-0723-10 ")

 ;;6233

 ;;21,"68180-0723-20 ")

 ;;6234

 ;;21,"68258-3012-01 ")

 ;;6235

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

 ;;6236

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

 ;;6237

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

 ;;6238

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

 ;;6239

 ;;21,"68308-0775-60 ")

 ;;6240

 ;;21,"68330-0001-01 ")

 ;;6241

 ;;21,"68330-0001-10 ")

 ;;6242

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

 ;;6243

 ;;21,"68330-0002-10 ")

 ;;6244

 ;;21,"68330-0003-01 ")

 ;;6245

 ;;21,"68330-0003-10 ")

 ;;6246

 ;;21,"68330-0004-01 ")

 ;;6247

 ;;21,"68330-0004-10 ")

 ;;6248

 ;;21,"68330-0015-25 ")

 ;;6249

 ;;21,"68382-0015-01 ")

 ;;6250

 ;;21,"68382-0015-18 ")

 ;;6251

 ;;21,"68382-0016-01 ")

 ;;6252

 ;;21,"68382-0016-18 ")

 ;;6253

 ;;21,"68382-0017-01 ")

 ;;6254

 ;;21,"68382-0017-18 ")

 ;;6255

 ;;21,"68382-0707-18 ")

 ;;6256

 ;;21,"68382-0761-14 ")

 ;;6257

 ;;21,"68382-0762-14 ")

 ;;6258

 ;;21,"68382-0763-14 ")

 ;;6259

 ;;21,"68382-0764-05 ")

 ;;6260

 ;;21,"68382-0764-06 ")

 ;;6261

 ;;21,"68382-0765-05 ")

 ;;6262

 ;;21,"68382-0765-06 ")

 ;;6263

 ;;21,"68382-0782-01 ")

 ;;6264

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

 ;;6265

 ;;21,"68387-0190-20 ")

 ;;6266

 ;;21,"68387-0190-21 ")

 ;;6267

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

 ;;6268

 ;;21,"68387-0190-40 ")

 ;;6269

 ;;21,"68387-0380-20 ")

 ;;6270

 ;;21,"68387-0385-20 ")

 ;;6271

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

 ;;6272

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

 ;;6273

 ;;21,"68387-0390-20 ")

 ;;6274

 ;;21,"68387-0390-28 ")

 ;;6275

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

 ;;6276

 ;;21,"68387-0430-40 ")

 ;;6277

 ;;21,"68387-0470-14 ")

 ;;6278

 ;;21,"68387-0470-20 ")

 ;;6279

 ;;21,"68387-0534-01 ")

 ;;6280

 ;;21,"68387-0535-15 ")

 ;;6281

 ;;21,"68387-0535-20 ")

 ;;6282

 ;;21,"68387-0565-06 ")

 ;;6283

 ;;21,"68387-0580-15 ")

 ;;6284

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

 ;;6285

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

 ;;6286

 ;;21,"68453-0115-05 ")

 ;;6287

 ;;21,"68453-0142-03 ")

 ;;6288

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

 ;;6289

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

 ;;6290

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

 ;;6291

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

 ;;6292

 ;;21,"68645-0030-20 ")

 ;;6293

 ;;21,"68774-0120-60 ")

 ;;6294

 ;;21,"68774-0122-60 ")

 ;;6295

 ;;21,"68774-0302-29 ")

 ;;6296

 ;;21,"68774-0302-35 ")

 ;;6297

 ;;21,"68774-0303-29 ")

 ;;6298

 ;;21,"68774-0303-35 ")

 ;;6299

 ;;21,"68820-0063-06 ")

 ;;6300

 ;;21,"68820-0063-19 ")

 ;;6301

 ;;21,"68820-0064-17 ")

 ;;6302

 ;;21,"68820-0064-37 ")

 ;;6303

 ;;21,"68820-0065-17 ")

 ;;6304

 ;;21,"68820-0065-37 ")

 ;;6305

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

 ;;6306

 ;;21,"69097-0226-70 ")

 ;;6307

 ;;21,"69097-0227-70 ")

 ;;6308

 ;;21,"69235-0310-50 ")

 ;;6309

 ;;21,"69489-0111-60 ")

 ;;6310

 ;;21,"69543-0101-10 ")

 ;;6311

 ;;21,"69543-0101-50 ")

 ;;6312

 ;;21,"69543-0102-10 ")

 ;;6313

 ;;21,"69543-0102-50 ")

 ;;6314

 ;;21,"69654-0501-05 ")

 ;;6315

 ;;21,"69668-0431-01 ")

 ;;6316

 ;;21,"69668-0432-01 ")

 ;;6317

 ;;21,"69668-0433-01 ")

 ;;6318

 ;;21,"76439-0101-10 ")

 ;;6319

 ;;21,"76439-0101-50 ")

 ;;6320

 ;;21,"76439-0102-10 ")

 ;;6321

 ;;21,"76439-0102-50 ")

 ;;6322

 ;;21,"76439-0103-10 ")

 ;;6323

 ;;21,"76439-0103-50 ")

 ;;6324

 ;;21,"76439-0104-10 ")

 ;;6325

 ;;21,"76439-0104-50 ")

 ;;6326

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

 ;;6327

 ;;21,"99207-0460-30 ")

 ;;6328

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

 ;;6329

 ;;21,"99207-0461-30 ")

 ;;6330

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

 ;;6331

 ;;21,"99207-0462-30 ")

 ;;6332

 ;;21,"99207-0463-30 ")

 ;;6333

 ;;21,"99207-0464-30 ")

 ;;6334

 ;;21,"99207-0465-30 ")

 ;;6335

 ;;21,"99207-0466-30 ")

 ;;6336

 ;;21,"99207-0467-30 ")

 ;;6337

 ;;21,"99207-0490-10 ")

 ;;6338

 ;;21,"99207-0491-10 ")

 ;;6339

 ;;21,"99207-0492-11 ")

 ;;6340

 ;;21,"99207-0492-50 ")

 ;;6341

 ;;21,"99207-0497-05 ")

 ;;6342

 ;;21,"99207-0498-05 ")

 ;;6343

 ;;21,"99207-0499-05 ")

 ;;6344

 ;;21,"99207-0499-10 ")

 ;;6345

 ;;21,"99207-0499-11 ")

 ;;6346

 ;;9002226,868,.01)

 ;;BGP HEDIS ANTIBIOTICS NDC

 ;;9002226,868,.02)

 ;;@

 ;;9002226,868,.04)

 ;;n

 ;;9002226,868,.06)

 ;;@

 ;;9002226,868,.08)

 ;;@

BGP73F19  ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JAN 05, 2017;

 +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,"67253-0143-15 ")

 +2       ;;6019

 +3       ;;21,"67253-0144-10 ")

 +4       ;;6020

 +5       ;;21,"67253-0144-50 ")

 +6       ;;6021

 +7       ;;21,"67253-0145-10 ")

 +8       ;;6022

 +9       ;;21,"67253-0146-45 ")

 +10      ;;6023

 +11      ;;21,"67253-0146-46 ")

 +12      ;;6024

 +13      ;;21,"67253-0146-47 ")

 +14      ;;6025

 +15      ;;21,"67253-0147-40 ")

 +16      ;;6026

 +17      ;;21,"67253-0147-43 ")

 +18      ;;6027

 +19      ;;21,"67253-0147-44 ")

 +20      ;;6028

 +21      ;;21,"67253-0148-45 ")

 +22      ;;6029

 +23      ;;21,"67253-0148-46 ")

 +24      ;;6030

 +25      ;;21,"67253-0148-47 ")

 +26      ;;6031

 +27      ;;21,"67253-0149-40 ")

 +28      ;;6032

 +29      ;;21,"67253-0149-43 ")

 +30      ;;6033

 +31      ;;21,"67253-0149-44 ")

 +32      ;;6034

 +33      ;;21,"67253-0150-10 ")

 +34      ;;6035

 +35      ;;21,"67253-0150-50 ")

 +36      ;;6036

 +37      ;;21,"67253-0180-10 ")

 +38      ;;6037

 +39      ;;21,"67253-0180-50 ")

 +40      ;;6038

 +41      ;;21,"67253-0181-10 ")

 +42      ;;6039

 +43      ;;21,"67253-0181-50 ")

 +44      ;;6040

 +45      ;;21,"67253-0182-10 ")

 +46      ;;6041

 +47      ;;21,"67253-0182-20 ")

 +48      ;;6042

 +49      ;;21,"67253-0183-10 ")

 +50      ;;6043

 +51      ;;21,"67253-0183-20 ")

 +52      ;;6044

 +53      ;;21,"67253-0200-10 ")

 +54      ;;6045

 +55      ;;21,"67253-0200-11 ")

 +56      ;;6046

 +57      ;;21,"67253-0201-10 ")

 +58      ;;6047

 +59      ;;21,"67253-0201-50 ")

 +60      ;;6048

 +61      ;;21,"67253-0202-10 ")

 +62      ;;6049

 +63      ;;21,"67253-0202-20 ")

 +64      ;;6050

 +65      ;;21,"67253-0203-10 ")

 +66      ;;6051

 +67      ;;21,"67253-0203-20 ")

 +68      ;;6052

 +69      ;;21,"67253-0300-10 ")

 +70      ;;6053

 +71      ;;21,"67253-0300-50 ")

 +72      ;;6054

 +73      ;;21,"67253-0301-10 ")

 +74      ;;6055

 +75      ;;21,"67253-0301-50 ")

 +76      ;;6056

 +77      ;;21,"67253-0388-15 ")

 +78      ;;6057

 +79      ;;21,"67253-0389-15 ")

 +80      ;;6058

 +81      ;;21,"67253-0389-50 ")

 +82      ;;6059

 +83      ;;21,"67253-0391-15 ")

 +84      ;;6060

 +85      ;;21,"67253-0391-50 ")

 +86      ;;6061

 +87      ;;21,"67405-0475-62 ")

 +88      ;;6062

 +89      ;;21,"67405-0550-05 ")

 +90      ;;6063

 +91      ;;21,"67405-0550-55 ")

 +92      ;;6064

 +93      ;;21,"67405-0650-55 ")

 +94      ;;6065

 +95      ;;21,"67405-0651-05 ")

 +96      ;;6066

 +97      ;;21,"67405-0651-55 ")

 +98      ;;6067

 +99      ;;21,"67405-0660-10 ")

 +100     ;;6068

 +101     ;;21,"67405-0661-10 ")

 +102     ;;6069

 +103     ;;21,"67457-0437-10 ")

 +104     ;;6070

 +105     ;;21,"67544-0775-28 ")

 +106     ;;6071

 +107     ;;21,"67877-0219-01 ")

 +108     ;;6072

 +109     ;;21,"67877-0219-05 ")

 +110     ;;6073

 +111     ;;21,"67877-0220-01 ")

 +112     ;;6074

 +113     ;;21,"67877-0220-05 ")

 +114     ;;6075

 +115     ;;21,"67877-0255-20 ")

 +116     ;;6076

 +117     ;;21,"67877-0255-23 ")

 +118     ;;6077

 +119     ;;21,"68001-0150-06 ")

 +120     ;;6078

 +121     ;;21,"68047-0713-01 ")

 +122     ;;6079

 +123     ;;21,"68047-0714-01 ")

 +124     ;;6080

 +125     ;;21,"68047-0714-60 ")

 +126     ;;6081

 +127     ;;21,"68071-0055-06 ")

 +128     ;;6082

 +129     ;;21,"68071-0055-10 ")

 +130     ;;6083

 +131     ;;21,"68071-0055-14 ")

 +132     ;;6084

 +133     ;;21,"68071-0055-20 ")

 +134     ;;6085

 +135     ;;21,"68071-0055-28 ")

 +136     ;;6086

 +137     ;;21,"68071-0055-30 ")

 +138     ;;6087

 +139     ;;21,"68071-0331-14 ")

 +140     ;;6088

 +141     ;;21,"68071-0331-20 ")

 +142     ;;6089

 +143     ;;21,"68071-0331-30 ")

 +144     ;;6090

 +145     ;;21,"68071-0337-14 ")

 +146     ;;6091

 +147     ;;21,"68071-0337-20 ")

 +148     ;;6092

 +149     ;;21,"68071-0337-30 ")

 +150     ;;6093

 +151     ;;21,"68071-0398-06 ")

 +152     ;;6094

 +153     ;;21,"68071-0398-14 ")

 +154     ;;6095

 +155     ;;21,"68071-0398-20 ")

 +156     ;;6096

 +157     ;;21,"68071-0398-30 ")

 +158     ;;6097

 +159     ;;21,"68071-0398-40 ")

 +160     ;;6098

 +161     ;;21,"68071-0398-90 ")

 +162     ;;6099

 +163     ;;21,"68084-0069-01 ")

 +164     ;;6100

 +165     ;;21,"68084-0069-11 ")

 +166     ;;6101

 +167     ;;21,"68084-0070-01 ")

 +168     ;;6102

 +169     ;;21,"68084-0070-11 ")

 +170     ;;6103

 +171     ;;21,"68084-0071-01 ")

 +172     ;;6104

 +173     ;;21,"68084-0071-11 ")

 +174     ;;6105

 +175     ;;21,"68084-0218-11 ")

 +176     ;;6106

 +177     ;;21,"68084-0219-11 ")

 +178     ;;6107

 +179     ;;21,"68084-0230-01 ")

 +180     ;;6108

 +181     ;;21,"68084-0230-11 ")

 +182     ;;6109

 +183     ;;21,"68084-0235-01 ")

 +184     ;;6110

 +185     ;;21,"68084-0235-11 ")

 +186     ;;6111

 +187     ;;21,"68084-0236-01 ")

 +188     ;;6112

 +189     ;;21,"68084-0236-11 ")

 +190     ;;6113

 +191     ;;21,"68084-0243-01 ")

 +192     ;;6114

 +193     ;;21,"68084-0243-11 ")

 +194     ;;6115

 +195     ;;21,"68084-0244-01 ")

 +196     ;;6116

 +197     ;;21,"68084-0244-11 ")

 +198     ;;6117

 +199     ;;21,"68084-0278-01 ")

 +200     ;;6118

 +201     ;;21,"68084-0278-11 ")

 +202     ;;6119

 +203     ;;21,"68084-0278-30 ")

 +204     ;;6120

 +205     ;;21,"68084-0278-65 ")

 +206     ;;6121

 +207     ;;21,"68084-0278-89 ")

 +208     ;;6122

 +209     ;;21,"68084-0279-21 ")

 +210     ;;6123

 +211     ;;21,"68084-0289-01 ")

 +212     ;;6124

 +213     ;;21,"68084-0289-11 ")

 +214     ;;6125

 +215     ;;21,"68084-0437-11 ")

 +216     ;;6126

 +217     ;;21,"68084-0437-65 ")

 +218     ;;6127

 +219     ;;21,"68084-0443-11 ")

 +220     ;;6128

 +221     ;;21,"68084-0443-65 ")

 +222     ;;6129

 +223     ;;21,"68084-0464-11 ")

 +224     ;;6130

 +225     ;;21,"68084-0464-21 ")

 +226     ;;6131

 +227     ;;21,"68084-0481-01 ")

 +228     ;;6132

 +229     ;;21,"68084-0481-11 ")

 +230     ;;6133

 +231     ;;21,"68084-0482-01 ")

 +232     ;;6134

 +233     ;;21,"68084-0482-11 ")

 +234     ;;6135

 +235     ;;21,"68084-0483-01 ")

 +236     ;;6136

 +237     ;;21,"68084-0483-11 ")

 +238     ;;6137

 +239     ;;21,"68084-0623-11 ")

 +240     ;;6138

 +241     ;;21,"68084-0623-65 ")

 +242     ;;6139

 +243     ;;21,"68084-0651-25 ")

 +244     ;;6140

 +245     ;;21,"68084-0656-01 ")

 +246     ;;6141

 +247     ;;21,"68084-0722-11 ")

 +248     ;;6142

 +249     ;;21,"68084-0722-65 ")

 +250     ;;6143

 +251     ;;21,"68084-0743-32 ")

 +252     ;;6144

 +253     ;;21,"68084-0747-25 ")

 +254     ;;6145

 +255     ;;21,"68084-0785-25 ")

 +256     ;;6146

 +257     ;;21,"68084-0785-95 ")

 +258     ;;6147

 +259     ;;21,"68084-0906-01 ")

 +260     ;;6148

 +261     ;;21,"68084-0913-32 ")

 +262     ;;6149

 +263     ;;21,"68084-0920-32 ")

 +264     ;;6150

 +265     ;;21,"68115-0026-06 ")

 +266     ;;6151

 +267     ;;21,"68115-0026-09 ")

 +268     ;;6152

 +269     ;;21,"68115-0026-15 ")

 +270     ;;6153

 +271     ;;21,"68115-0026-40 ")

 +272     ;;6154

 +273     ;;21,"68115-0029-20 ")

 +274     ;;6155

 +275     ;;21,"68115-0030-10 ")

 +276     ;;6156

 +277     ;;21,"68115-0032-40 ")

 +278     ;;6157

 +279     ;;21,"68115-0033-15 ")

 +280     ;;6158

 +281     ;;21,"68115-0033-40 ")

 +282     ;;6159

 +283     ;;21,"68115-0067-20 ")

 +284     ;;6160

 +285     ;;21,"68115-0081-06 ")

 +286     ;;6161

 +287     ;;21,"68115-0081-10 ")

 +288     ;;6162

 +289     ;;21,"68115-0082-01 ")

 +290     ;;6163

 +291     ;;21,"68115-0082-06 ")

 +292     ;;6164

 +293     ;;21,"68115-0090-20 ")

 +294     ;;6165

 +295     ;;21,"68115-0104-06 ")

 +296     ;;6166

 +297     ;;21,"68115-0104-40 ")

 +298     ;;6167

 +299     ;;21,"68115-0105-30 ")

 +300     ;;6168

 +301     ;;21,"68115-0105-40 ")

 +302     ;;6169

 +303     ;;21,"68115-0125-28 ")

 +304     ;;6170

 +305     ;;21,"68115-0131-06 ")

 +306     ;;6171

 +307     ;;21,"68115-0131-15 ")

 +308     ;;6172

 +309     ;;21,"68115-0131-21 ")

 +310     ;;6173

 +311     ;;21,"68115-0131-40 ")

 +312     ;;6174

 +313     ;;21,"68115-0133-20 ")

 +314     ;;6175

 +315     ;;21,"68115-0133-40 ")

 +316     ;;6176

 +317     ;;21,"68115-0134-06 ")

 +318     ;;6177

 +319     ;;21,"68115-0134-40 ")

 +320     ;;6178

 +321     ;;21,"68115-0421-28 ")

 +322     ;;6179

 +323     ;;21,"68115-0445-22 ")

 +324     ;;6180

 +325     ;;21,"68160-0161-13 ")

 +326     ;;6181

 +327     ;;21,"68180-0121-01 ")

 +328     ;;6182

 +329     ;;21,"68180-0121-02 ")

 +330     ;;6183

 +331     ;;21,"68180-0122-01 ")

 +332     ;;6184

 +333     ;;21,"68180-0122-02 ")

 +334     ;;6185

 +335     ;;21,"68180-0123-01 ")

 +336     ;;6186

 +337     ;;21,"68180-0123-02 ")

 +338     ;;6187

 +339     ;;21,"68180-0124-01 ")

 +340     ;;6188

 +341     ;;21,"68180-0124-02 ")

 +342     ;;6189

 +343     ;;21,"68180-0160-06 ")

 +344     ;;6190

 +345     ;;21,"68180-0160-13 ")

 +346     ;;6191

 +347     ;;21,"68180-0161-06 ")

 +348     ;;6192

 +349     ;;21,"68180-0162-06 ")

 +350     ;;6193

 +351     ;;21,"68180-0180-01 ")

 +352     ;;6194

 +353     ;;21,"68180-0180-08 ")

 +354     ;;6195

 +355     ;;21,"68180-0181-01 ")

 +356     ;;6196

 +357     ;;21,"68180-0181-02 ")

 +358     ;;6197

 +359     ;;21,"68180-0182-02 ")

 +360     ;;6198

 +361     ;;21,"68180-0182-03 ")

 +362     ;;6199

 +363     ;;21,"68180-0202-01 ")

 +364     ;;6200

 +365     ;;21,"68180-0202-02 ")

 +366     ;;6201

 +367     ;;21,"68180-0202-03 ")

 +368     ;;6202

 +369     ;;21,"68180-0240-01 ")

 +370     ;;6203

 +371     ;;21,"68180-0240-08 ")

 +372     ;;6204

 +373     ;;21,"68180-0241-01 ")

 +374     ;;6205

 +375     ;;21,"68180-0241-02 ")

 +376     ;;6206

 +377     ;;21,"68180-0241-08 ")

 +378     ;;6207

 +379     ;;21,"68180-0242-01 ")

 +380     ;;6208

 +381     ;;21,"68180-0242-20 ")

 +382     ;;6209

 +383     ;;21,"68180-0379-06 ")

 +384     ;;6210

 +385     ;;21,"68180-0380-06 ")

 +386     ;;6211

 +387     ;;21,"68180-0381-06 ")

 +388     ;;6212

 +389     ;;21,"68180-0392-01 ")

 +390     ;;6213

 +391     ;;21,"68180-0393-01 ")

 +392     ;;6214

 +393     ;;21,"68180-0405-01 ")

 +394     ;;6215

 +395     ;;21,"68180-0407-03 ")

 +396     ;;6216

 +397     ;;21,"68180-0407-04 ")

 +398     ;;6217

 +399     ;;21,"68180-0611-01 ")

 +400     ;;6218

 +401     ;;21,"68180-0611-10 ")

 +402     ;;6219

 +403     ;;21,"68180-0622-01 ")

 +404     ;;6220

 +405     ;;21,"68180-0622-10 ")

 +406     ;;6221

 +407     ;;21,"68180-0633-01 ")

 +408     ;;6222

 +409     ;;21,"68180-0633-10 ")

 +410     ;;6223

 +411     ;;21,"68180-0644-01 ")

 +412     ;;6224

 +413     ;;21,"68180-0644-10 ")

 +414     ;;6225

 +415     ;;21,"68180-0650-01 ")

 +416     ;;6226

 +417     ;;21,"68180-0651-01 ")

 +418     ;;6227

 +419     ;;21,"68180-0652-08 ")

 +420     ;;6228

 +421     ;;21,"68180-0657-01 ")

 +422     ;;6229

 +423     ;;21,"68180-0711-60 ")

 +424     ;;6230

 +425     ;;21,"68180-0722-10 ")

 +426     ;;6231

 +427     ;;21,"68180-0722-20 ")

 +428     ;;6232

 +429     ;;21,"68180-0723-10 ")

 +430     ;;6233

 +431     ;;21,"68180-0723-20 ")

 +432     ;;6234

 +433     ;;21,"68258-3012-01 ")

 +434     ;;6235

 +435     ;;21,"68258-9300-02 ")

 +436     ;;6236

 +437     ;;21,"68308-0250-10 ")

 +438     ;;6237

 +439     ;;21,"68308-0710-10 ")

 +440     ;;6238

 +441     ;;21,"68308-0715-10 ")

 +442     ;;6239

 +443     ;;21,"68308-0775-60 ")

 +444     ;;6240

 +445     ;;21,"68330-0001-01 ")

 +446     ;;6241

 +447     ;;21,"68330-0001-10 ")

 +448     ;;6242

 +449     ;;21,"68330-0002-01 ")

 +450     ;;6243

 +451     ;;21,"68330-0002-10 ")

 +452     ;;6244

 +453     ;;21,"68330-0003-01 ")

 +454     ;;6245

 +455     ;;21,"68330-0003-10 ")

 +456     ;;6246

 +457     ;;21,"68330-0004-01 ")

 +458     ;;6247

 +459     ;;21,"68330-0004-10 ")

 +460     ;;6248

 +461     ;;21,"68330-0015-25 ")

 +462     ;;6249

 +463     ;;21,"68382-0015-01 ")

 +464     ;;6250

 +465     ;;21,"68382-0015-18 ")

 +466     ;;6251

 +467     ;;21,"68382-0016-01 ")

 +468     ;;6252

 +469     ;;21,"68382-0016-18 ")

 +470     ;;6253

 +471     ;;21,"68382-0017-01 ")

 +472     ;;6254

 +473     ;;21,"68382-0017-18 ")

 +474     ;;6255

 +475     ;;21,"68382-0707-18 ")

 +476     ;;6256

 +477     ;;21,"68382-0761-14 ")

 +478     ;;6257

 +479     ;;21,"68382-0762-14 ")

 +480     ;;6258

 +481     ;;21,"68382-0763-14 ")

 +482     ;;6259

 +483     ;;21,"68382-0764-05 ")

 +484     ;;6260

 +485     ;;21,"68382-0764-06 ")

 +486     ;;6261

 +487     ;;21,"68382-0765-05 ")

 +488     ;;6262

 +489     ;;21,"68382-0765-06 ")

 +490     ;;6263

 +491     ;;21,"68382-0782-01 ")

 +492     ;;6264

 +493     ;;21,"68387-0117-30 ")

 +494     ;;6265

 +495     ;;21,"68387-0190-20 ")

 +496     ;;6266

 +497     ;;21,"68387-0190-21 ")

 +498     ;;6267

 +499     ;;21,"68387-0190-30 ")

 +500     ;;6268

 +501     ;;21,"68387-0190-40 ")

 +502     ;;6269

 +503     ;;21,"68387-0380-20 ")

 +504     ;;6270

 +505     ;;21,"68387-0385-20 ")

 +506     ;;6271

 +507     ;;21,"68387-0385-30 ")

 +508     ;;6272

 +509     ;;21,"68387-0385-60 ")

 +510     ;;6273

 +511     ;;21,"68387-0390-20 ")

 +512     ;;6274

 +513     ;;21,"68387-0390-28 ")

 +514     ;;6275

 +515     ;;21,"68387-0430-30 ")

 +516     ;;6276

 +517     ;;21,"68387-0430-40 ")

 +518     ;;6277

 +519     ;;21,"68387-0470-14 ")

 +520     ;;6278

 +521     ;;21,"68387-0470-20 ")

 +522     ;;6279

 +523     ;;21,"68387-0534-01 ")

 +524     ;;6280

 +525     ;;21,"68387-0535-15 ")

 +526     ;;6281

 +527     ;;21,"68387-0535-20 ")

 +528     ;;6282

 +529     ;;21,"68387-0565-06 ")

 +530     ;;6283

 +531     ;;21,"68387-0580-15 ")

 +532     ;;6284

 +533     ;;21,"68453-0112-10 ")

 +534     ;;6285

 +535     ;;21,"68453-0113-10 ")

 +536     ;;6286

 +537     ;;21,"68453-0115-05 ")

 +538     ;;6287

 +539     ;;21,"68453-0142-03 ")

 +540     ;;6288

 +541     ;;21,"68462-0339-01 ")

 +542     ;;6289

 +543     ;;21,"68462-0339-05 ")

 +544     ;;6290

 +545     ;;21,"68462-0340-01 ")

 +546     ;;6291

 +547     ;;21,"68462-0340-05 ")

 +548     ;;6292

 +549     ;;21,"68645-0030-20 ")

 +550     ;;6293

 +551     ;;21,"68774-0120-60 ")

 +552     ;;6294

 +553     ;;21,"68774-0122-60 ")

 +554     ;;6295

 +555     ;;21,"68774-0302-29 ")

 +556     ;;6296

 +557     ;;21,"68774-0302-35 ")

 +558     ;;6297

 +559     ;;21,"68774-0303-29 ")

 +560     ;;6298

 +561     ;;21,"68774-0303-35 ")

 +562     ;;6299

 +563     ;;21,"68820-0063-06 ")

 +564     ;;6300

 +565     ;;21,"68820-0063-19 ")

 +566     ;;6301

 +567     ;;21,"68820-0064-17 ")

 +568     ;;6302

 +569     ;;21,"68820-0064-37 ")

 +570     ;;6303

 +571     ;;21,"68820-0065-17 ")

 +572     ;;6304

 +573     ;;21,"68820-0065-37 ")

 +574     ;;6305

 +575     ;;21,"69007-0822-30 ")

 +576     ;;6306

 +577     ;;21,"69097-0226-70 ")

 +578     ;;6307

 +579     ;;21,"69097-0227-70 ")

 +580     ;;6308

 +581     ;;21,"69235-0310-50 ")

 +582     ;;6309

 +583     ;;21,"69489-0111-60 ")

 +584     ;;6310

 +585     ;;21,"69543-0101-10 ")

 +586     ;;6311

 +587     ;;21,"69543-0101-50 ")

 +588     ;;6312

 +589     ;;21,"69543-0102-10 ")

 +590     ;;6313

 +591     ;;21,"69543-0102-50 ")

 +592     ;;6314

 +593     ;;21,"69654-0501-05 ")

 +594     ;;6315

 +595     ;;21,"69668-0431-01 ")

 +596     ;;6316

 +597     ;;21,"69668-0432-01 ")

 +598     ;;6317

 +599     ;;21,"69668-0433-01 ")

 +600     ;;6318

 +601     ;;21,"76439-0101-10 ")

 +602     ;;6319

 +603     ;;21,"76439-0101-50 ")

 +604     ;;6320

 +605     ;;21,"76439-0102-10 ")

 +606     ;;6321

 +607     ;;21,"76439-0102-50 ")

 +608     ;;6322

 +609     ;;21,"76439-0103-10 ")

 +610     ;;6323

 +611     ;;21,"76439-0103-50 ")

 +612     ;;6324

 +613     ;;21,"76439-0104-10 ")

 +614     ;;6325

 +615     ;;21,"76439-0104-50 ")

 +616     ;;6326

 +617     ;;21,"99207-0460-10 ")

 +618     ;;6327

 +619     ;;21,"99207-0460-30 ")

 +620     ;;6328

 +621     ;;21,"99207-0461-10 ")

 +622     ;;6329

 +623     ;;21,"99207-0461-30 ")

 +624     ;;6330

 +625     ;;21,"99207-0462-10 ")

 +626     ;;6331

 +627     ;;21,"99207-0462-30 ")

 +628     ;;6332

 +629     ;;21,"99207-0463-30 ")

 +630     ;;6333

 +631     ;;21,"99207-0464-30 ")

 +632     ;;6334

 +633     ;;21,"99207-0465-30 ")

 +634     ;;6335

 +635     ;;21,"99207-0466-30 ")

 +636     ;;6336

 +637     ;;21,"99207-0467-30 ")

 +638     ;;6337

 +639     ;;21,"99207-0490-10 ")

 +640     ;;6338

 +641     ;;21,"99207-0491-10 ")

 +642     ;;6339

 +643     ;;21,"99207-0492-11 ")

 +644     ;;6340

 +645     ;;21,"99207-0492-50 ")

 +646     ;;6341

 +647     ;;21,"99207-0497-05 ")

 +648     ;;6342

 +649     ;;21,"99207-0498-05 ")

 +650     ;;6343

 +651     ;;21,"99207-0499-05 ")

 +652     ;;6344

 +653     ;;21,"99207-0499-10 ")

 +654     ;;6345

 +655     ;;21,"99207-0499-11 ")

 +656     ;;6346

 +657     ;;9002226,868,.01)

 +658     ;;BGP HEDIS ANTIBIOTICS NDC

 +659     ;;9002226,868,.02)

 +660     ;;@

 +661     ;;9002226,868,.04)

 +662     ;;n

 +663     ;;9002226,868,.06)

 +664     ;;@

 +665     ;;9002226,868,.08)

 +666     ;;@