BGP8FXSD ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON SEP 28, 2007 ;
;;8.0;IHS CLINICAL REPORTING;;MAR 12, 2008
;;;BGP6;;SEP 28, 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
Q
;
TMP ;;TAXONOMY (WITH BULLETIN)
;;21,"63874-0330-45 ")
;;348
;;21,"63874-0330-50 ")
;;349
;;21,"63874-0330-56 ")
;;350
;;21,"63874-0330-60 ")
;;351
;;21,"63874-0330-72 ")
;;352
;;21,"63874-0330-74 ")
;;353
;;21,"63874-0330-75 ")
;;354
;;21,"63874-0330-77 ")
;;355
;;21,"63874-0330-80 ")
;;356
;;21,"63874-0330-84 ")
;;357
;;21,"63874-0330-90 ")
;;358
;;21,"63874-0371-01 ")
;;1078
;;21,"63874-0371-03 ")
;;1079
;;21,"63874-0371-04 ")
;;1080
;;21,"63874-0371-12 ")
;;1081
;;21,"63874-0371-14 ")
;;1082
;;21,"63874-0371-15 ")
;;1083
;;21,"63874-0371-20 ")
;;1084
;;21,"63874-0371-24 ")
;;1085
;;21,"63874-0371-30 ")
;;1086
;;21,"63874-0371-40 ")
;;1087
;;21,"63874-0371-50 ")
;;1088
;;21,"63874-0371-60 ")
;;1089
;;21,"63874-0371-73 ")
;;1090
;;21,"63874-0371-84 ")
;;1091
;;21,"63874-0372-01 ")
;;1253
;;21,"63874-0372-03 ")
;;1254
;;21,"63874-0372-04 ")
;;1255
;;21,"63874-0372-08 ")
;;1256
;;21,"63874-0372-10 ")
;;1257
;;21,"63874-0372-12 ")
;;1258
;;21,"63874-0372-14 ")
;;1259
;;21,"63874-0372-15 ")
;;1260
;;21,"63874-0372-20 ")
;;1261
;;21,"63874-0372-21 ")
;;1262
;;21,"63874-0372-24 ")
;;1263
;;21,"63874-0372-28 ")
;;1264
;;21,"63874-0372-30 ")
;;1265
;;21,"63874-0372-40 ")
;;1266
;;21,"63874-0372-42 ")
;;1267
;;21,"63874-0372-50 ")
;;1268
;;21,"63874-0372-56 ")
;;1269
;;21,"63874-0372-60 ")
;;1270
;;21,"63874-0372-90 ")
;;1271
;;21,"63874-0419-01 ")
;;524
;;21,"63874-0419-03 ")
;;525
;;21,"63874-0419-04 ")
;;526
;;21,"63874-0419-08 ")
;;527
;;21,"63874-0419-10 ")
;;528
;;21,"63874-0419-12 ")
;;529
;;21,"63874-0419-14 ")
;;530
;;21,"63874-0419-15 ")
;;531
;;21,"63874-0419-16 ")
;;532
;;21,"63874-0419-20 ")
;;533
;;21,"63874-0419-21 ")
;;534
;;21,"63874-0419-24 ")
;;535
;;21,"63874-0419-28 ")
;;536
;;21,"63874-0419-30 ")
;;537
;;21,"63874-0419-40 ")
;;538
;;21,"63874-0419-42 ")
;;539
;;21,"63874-0419-50 ")
;;540
;;21,"63874-0419-56 ")
;;541
;;21,"63874-0419-60 ")
;;542
;;21,"63874-0419-72 ")
;;543
;;21,"63874-0419-74 ")
;;544
;;21,"63874-0419-77 ")
;;545
;;21,"63874-0419-90 ")
;;546
;;21,"63874-0531-10 ")
;;1359
;;21,"63874-0531-14 ")
;;1360
;;21,"63874-0531-30 ")
;;1361
;;21,"63874-0531-40 ")
;;1362
;;21,"66267-0042-12 ")
;;359
;;21,"66267-0042-15 ")
;;360
;;21,"66267-0042-20 ")
;;361
;;21,"66267-0042-30 ")
;;362
;;21,"66267-0042-40 ")
;;363
;;21,"66267-0042-60 ")
;;364
;;21,"66267-0042-90 ")
;;365
;;21,"66267-0042-91 ")
;;366
;;21,"66267-0043-12 ")
;;367
;;21,"66267-0043-15 ")
;;368
;;21,"66267-0043-20 ")
;;369
;;21,"66267-0043-30 ")
;;370
;;21,"66267-0043-40 ")
;;371
;;21,"66267-0043-45 ")
;;372
;;21,"66267-0043-60 ")
;;373
;;21,"66267-0043-90 ")
;;374
;;21,"66267-0043-91 ")
;;375
;;21,"66267-0055-20 ")
;;547
;;21,"66267-0055-30 ")
;;548
;;21,"66267-0055-40 ")
;;549
;;21,"66267-0064-10 ")
;;796
;;21,"66267-0064-15 ")
;;797
;;21,"66267-0064-20 ")
;;798
;;21,"66267-0064-30 ")
;;799
;;21,"66267-0064-40 ")
;;800
;;21,"66267-0064-45 ")
;;801
;;21,"66267-0064-60 ")
;;802
;;21,"66267-0064-90 ")
;;803
;;21,"66267-0064-91 ")
;;804
;;21,"66267-0145-20 ")
;;1092
;;21,"66267-0145-30 ")
;;1093
;;21,"66267-0145-40 ")
;;1094
;;21,"66267-0145-60 ")
;;1095
;;21,"66267-0145-90 ")
;;1096
;;21,"66267-0146-12 ")
;;1272
;;21,"66267-0146-20 ")
;;1273
;;21,"66267-0146-30 ")
;;1274
;;21,"66267-0146-40 ")
;;1275
;;21,"66267-0146-60 ")
;;1276
;;21,"66267-0157-14 ")
;;1363
;;21,"66267-0157-20 ")
;;1364
;;21,"66267-0158-15 ")
;;1365
;;21,"66267-0158-30 ")
;;1366
;;21,"66267-0158-60 ")
;;1367
;;21,"66267-0193-07 ")
;;896
;;21,"66267-0193-10 ")
;;897
;;21,"66267-0193-14 ")
;;898
;;21,"66267-0193-20 ")
;;899
;;21,"66267-0193-28 ")
;;900
;;21,"66267-0193-30 ")
;;901
;;21,"66267-0193-40 ")
;;902
;;21,"66267-0611-08 ")
;;932
;;21,"66267-0611-15 ")
;;933
;;21,"66267-0611-20 ")
;;934
;;21,"66267-0611-21 ")
;;935
;;21,"66267-0611-30 ")
;;936
;;21,"66267-0611-40 ")
;;937
;;21,"66267-0611-42 ")
;;938
;;21,"66267-1007-00 ")
;;376
;;21,"66336-0581-15 ")
;;805
;;21,"66336-0581-20 ")
;;806
;;21,"66336-0581-30 ")
;;807
;;21,"68115-0063-00 ")
;;377
;;21,"68115-0063-04 ")
;;378
;;21,"68115-0063-12 ")
;;379
;;21,"68115-0063-15 ")
;;380
;;21,"68115-0063-20 ")
;;381
;;21,"68115-0063-28 ")
;;382
;;21,"68115-0063-30 ")
;;383
;;21,"68115-0063-40 ")
;;384
;;21,"68115-0063-45 ")
;;385
;;21,"68115-0063-48 ")
;;386
;;21,"68115-0063-50 ")
;;387
;;21,"68115-0063-56 ")
;;388
;;21,"68115-0063-60 ")
;;389
;;21,"68115-0063-90 ")
;;390
;;21,"68115-0063-96 ")
;;391
;;21,"68115-0063-99 ")
;;392
;;21,"68115-0077-00 ")
;;550
;;21,"68115-0077-15 ")
;;551
;;21,"68115-0077-30 ")
;;552
;;21,"68115-0077-40 ")
;;553
;;21,"68115-0077-60 ")
;;554
;;21,"68115-0077-90 ")
;;555
;;21,"68115-0095-00 ")
;;808
;;21,"68115-0095-12 ")
;;809
;;21,"68115-0095-15 ")
;;810
;;21,"68115-0095-20 ")
;;811
;;21,"68115-0095-30 ")
;;812
;;21,"68115-0095-40 ")
;;813
;;21,"68115-0095-45 ")
;;814
;;21,"68115-0095-60 ")
;;815
;;21,"68115-0095-90 ")
;;816
;;21,"68115-0095-99 ")
;;817
;;21,"68115-0234-00 ")
;;1097
;;21,"68115-0234-20 ")
;;1098
;;21,"68115-0234-30 ")
;;1099
;;21,"68115-0234-40 ")
;;1100
;;21,"68115-0234-60 ")
;;1101
;;21,"68115-0234-90 ")
;;1102
;;21,"68115-0235-20 ")
;;1277
;;21,"68115-0235-30 ")
;;1278
;;21,"68115-0235-60 ")
;;1279
;;21,"68115-0235-90 ")
;;1280
;;21,"68115-0235-99 ")
;;1281
;;21,"68115-0264-30 ")
;;1368
;;21,"68115-0264-60 ")
;;1369
;;21,"68115-0318-30 ")
;;903
;;21,"68115-0318-40 ")
;;904
;;21,"68115-0319-00 ")
;;939
;;21,"68115-0319-08 ")
;;940
;;21,"68115-0319-15 ")
;;941
;;21,"68115-0319-20 ")
;;942
;;21,"68115-0319-30 ")
;;943
;;21,"68115-0319-90 ")
;;944
;;21,"68115-0319-99 ")
;;945
;;21,"68115-0440-00 ")
;;393
;;21,"68115-0440-04 ")
;;394
;;21,"68115-0440-12 ")
;;395
;;21,"68115-0440-15 ")
;;396
;;21,"68115-0440-20 ")
;;397
;;21,"68115-0440-28 ")
;;398
;;21,"68115-0440-30 ")
;;399
;;21,"68115-0440-40 ")
;;400
;;21,"68115-0440-45 ")
;;401
;;21,"68115-0440-48 ")
;;402
;;21,"68115-0440-50 ")
;;403
;;21,"68115-0440-56 ")
;;404
;;21,"68115-0440-60 ")
;;405
;;21,"68115-0440-90 ")
;;406
;;21,"68115-0440-97 ")
;;407
;;21,"68115-0440-99 ")
;;408
;;21,"68115-0450-30 ")
;;838
;;9002226,629,.01)
;;BGP HEDIS SKL MUSCLE RELAX NDC
;;9002226,629,.02)
;;@
;;9002226,629,.04)
;;n
;;9002226,629,.06)
;;@
;;9002226,629,.08)
;;@
;;9002226,629,.09)
;;@
;;9002226,629,.11)
;;@
;;9002226,629,.12)
;;@
;;9002226,629,.13)
;;1
;;9002226,629,.14)
;;@
;;9002226,629,.15)
;;@
;;9002226,629,.16)
;;@
;;9002226,629,.17)
;;@
;;9002226,629,3101)
;;@
;;9002226.02101,"629,00005-3562-23 ",.01)
;;00005-3562-23
;;9002226.02101,"629,00005-3562-23 ",.02)
;;00005-3562-23
;;9002226.02101,"629,00005-3563-23 ",.01)
;;00005-3563-23
;;9002226.02101,"629,00005-3563-23 ",.02)
;;00005-3563-23
;;9002226.02101,"629,00005-3563-31 ",.01)
;;00005-3563-31
;;9002226.02101,"629,00005-3563-31 ",.02)
;;00005-3563-31
;;9002226.02101,"629,00006-0931-28 ",.01)
;;00006-0931-28
;;9002226.02101,"629,00006-0931-28 ",.02)
;;00006-0931-28
;;9002226.02101,"629,00006-0931-68 ",.01)
;;00006-0931-68
;;9002226.02101,"629,00006-0931-68 ",.02)
;;00006-0931-68
;;9002226.02101,"629,00031-7409-87 ",.01)
;;00031-7409-87
;;9002226.02101,"629,00031-7409-87 ",.02)
;;00031-7409-87
;;9002226.02101,"629,00031-7409-94 ",.01)
;;00031-7409-94
;;9002226.02101,"629,00031-7409-94 ",.02)
;;00031-7409-94
;;9002226.02101,"629,00031-7429-63 ",.01)
;;00031-7429-63
;;9002226.02101,"629,00031-7429-63 ",.02)
;;00031-7429-63
;;9002226.02101,"629,00031-7429-70 ",.01)
;;00031-7429-70
;;9002226.02101,"629,00031-7429-70 ",.02)
;;00031-7429-70
;;9002226.02101,"629,00031-7449-63 ",.01)
;;00031-7449-63
;;9002226.02101,"629,00031-7449-63 ",.02)
;;00031-7449-63
;;9002226.02101,"629,00031-7449-70 ",.01)
;;00031-7449-70
;;9002226.02101,"629,00031-7449-70 ",.02)
;;00031-7449-70
;;9002226.02101,"629,00031-7469-63 ",.01)
;;00031-7469-63
;;9002226.02101,"629,00031-7469-63 ",.02)
;;00031-7469-63
;;9002226.02101,"629,00037-2001-01 ",.01)
;;00037-2001-01
;;9002226.02101,"629,00037-2001-01 ",.02)
;;00037-2001-01
;;9002226.02101,"629,00037-2001-03 ",.01)
;;00037-2001-03
;;9002226.02101,"629,00037-2001-03 ",.02)
;;00037-2001-03
;;9002226.02101,"629,00037-2001-85 ",.01)
;;00037-2001-85
;;9002226.02101,"629,00037-2001-85 ",.02)
;;00037-2001-85
;;9002226.02101,"629,00037-2103-01 ",.01)
;;00037-2103-01
;;9002226.02101,"629,00037-2103-01 ",.02)
;;00037-2103-01
;;9002226.02101,"629,00037-2103-03 ",.01)
;;00037-2103-03
;;9002226.02101,"629,00037-2103-03 ",.02)
;;00037-2103-03
;;9002226.02101,"629,00037-2103-85 ",.01)
;;00037-2103-85
;;9002226.02101,"629,00037-2103-85 ",.02)
;;00037-2103-85
;;9002226.02101,"629,00037-2403-01 ",.01)
;;00037-2403-01
;;9002226.02101,"629,00037-2403-01 ",.02)
;;00037-2403-01
;;9002226.02101,"629,00045-0325-60 ",.01)
;;00045-0325-60
;;9002226.02101,"629,00045-0325-60 ",.02)
;;00045-0325-60
;;9002226.02101,"629,00086-0062-10 ",.01)
;;00086-0062-10
;;9002226.02101,"629,00086-0062-10 ",.02)
;;00086-0062-10
;;9002226.02101,"629,00086-0062-50 ",.01)
;;00086-0062-50
;;9002226.02101,"629,00086-0062-50 ",.02)
;;00086-0062-50
;;9002226.02101,"629,00089-0221-10 ",.01)
;;00089-0221-10
;;9002226.02101,"629,00089-0221-10 ",.02)
;;00089-0221-10
;;9002226.02101,"629,00089-0231-10 ",.01)
;;00089-0231-10
;;9002226.02101,"629,00089-0231-10 ",.02)
;;00089-0231-10
;;9002226.02101,"629,00089-0233-10 ",.01)
;;00089-0233-10
;;9002226.02101,"629,00089-0233-10 ",.02)
;;00089-0233-10
;;9002226.02101,"629,00089-0233-50 ",.01)
;;00089-0233-50
;;9002226.02101,"629,00089-0233-50 ",.02)
;;00089-0233-50
;;9002226.02101,"629,00089-0540-06 ",.01)
;;00089-0540-06
;;9002226.02101,"629,00089-0540-06 ",.02)
;;00089-0540-06
;;9002226.02101,"629,00091-7429-63 ",.01)
;;00091-7429-63
;;9002226.02101,"629,00091-7429-63 ",.02)
;;00091-7429-63
;;9002226.02101,"629,00091-7449-63 ",.01)
;;00091-7449-63
;;9002226.02101,"629,00091-7449-63 ",.02)
;;00091-7449-63
;;9002226.02101,"629,00091-7449-70 ",.01)
;;00091-7449-70
;;9002226.02101,"629,00091-7449-70 ",.02)
;;00091-7449-70
;;9002226.02101,"629,00093-0542-01 ",.01)
;;00093-0542-01
;;9002226.02101,"629,00093-0542-01 ",.02)
;;00093-0542-01
;;9002226.02101,"629,00093-0542-05 ",.01)
;;00093-0542-05
;;9002226.02101,"629,00093-0542-05 ",.02)
;;00093-0542-05
;;9002226.02101,"629,00115-2011-01 ",.01)
;;00115-2011-01
;;9002226.02101,"629,00115-2011-01 ",.02)
;;00115-2011-01
;;9002226.02101,"629,00115-2011-02 ",.01)
;;00115-2011-02
;;9002226.02101,"629,00115-2011-02 ",.02)
;;00115-2011-02
;;9002226.02101,"629,00115-3900-01 ",.01)
;;00115-3900-01
;;9002226.02101,"629,00115-3900-01 ",.02)
;;00115-3900-01
;;9002226.02101,"629,00115-3900-02 ",.01)
;;00115-3900-02
;;9002226.02101,"629,00115-3900-02 ",.02)
;;00115-3900-02
;;9002226.02101,"629,00115-3900-03 ",.01)
;;00115-3900-03
;;9002226.02101,"629,00115-3900-03 ",.02)
;;00115-3900-03
;;9002226.02101,"629,00115-3902-01 ",.01)
;;00115-3902-01
;;9002226.02101,"629,00115-3902-01 ",.02)
;;00115-3902-01
;;9002226.02101,"629,00115-3902-02 ",.01)
;;00115-3902-02
;;9002226.02101,"629,00115-3902-02 ",.02)
;;00115-3902-02
;;9002226.02101,"629,00115-3902-03 ",.01)
;;00115-3902-03
;;9002226.02101,"629,00115-3902-03 ",.02)
;;00115-3902-03
;;9002226.02101,"629,00143-1176-01 ",.01)
;;00143-1176-01
;;9002226.02101,"629,00143-1176-01 ",.02)
;;00143-1176-01
;;9002226.02101,"629,00143-1176-05 ",.01)
;;00143-1176-05
;;9002226.02101,"629,00143-1176-05 ",.02)
;;00143-1176-05
;;9002226.02101,"629,00143-1176-10 ",.01)
;;00143-1176-10
;;9002226.02101,"629,00143-1176-10 ",.02)
;;00143-1176-10
;;9002226.02101,"629,00143-1290-01 ",.01)
;;00143-1290-01
;;9002226.02101,"629,00143-1290-01 ",.02)
;;00143-1290-01
;;9002226.02101,"629,00143-1290-05 ",.01)
;;00143-1290-05
;;9002226.02101,"629,00143-1290-05 ",.02)
;;00143-1290-05
;;9002226.02101,"629,00143-1292-01 ",.01)
;;00143-1292-01
;;9002226.02101,"629,00143-1292-01 ",.02)
;;00143-1292-01
;;9002226.02101,"629,00143-1292-05 ",.01)
;;00143-1292-05
;;9002226.02101,"629,00143-1292-05 ",.02)
;;00143-1292-05
;;9002226.02101,"629,00172-2813-60 ",.01)
;;00172-2813-60
;;9002226.02101,"629,00172-2813-60 ",.02)
;;00172-2813-60
;;9002226.02101,"629,00172-2813-70 ",.01)
;;00172-2813-70
;;9002226.02101,"629,00172-2813-70 ",.02)
;;00172-2813-70
;;9002226.02101,"629,00182-0572-01 ",.01)
;;00182-0572-01
;;9002226.02101,"629,00182-0572-01 ",.02)
;;00182-0572-01
BGP8FXSD ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON SEP 28, 2007 ;
+1 ;;8.0;IHS CLINICAL REPORTING;;MAR 12, 2008
+2 ;;;BGP6;;SEP 28, 2007
+3 ;
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-0330-45 ")
+2 ;;348
+3 ;;21,"63874-0330-50 ")
+4 ;;349
+5 ;;21,"63874-0330-56 ")
+6 ;;350
+7 ;;21,"63874-0330-60 ")
+8 ;;351
+9 ;;21,"63874-0330-72 ")
+10 ;;352
+11 ;;21,"63874-0330-74 ")
+12 ;;353
+13 ;;21,"63874-0330-75 ")
+14 ;;354
+15 ;;21,"63874-0330-77 ")
+16 ;;355
+17 ;;21,"63874-0330-80 ")
+18 ;;356
+19 ;;21,"63874-0330-84 ")
+20 ;;357
+21 ;;21,"63874-0330-90 ")
+22 ;;358
+23 ;;21,"63874-0371-01 ")
+24 ;;1078
+25 ;;21,"63874-0371-03 ")
+26 ;;1079
+27 ;;21,"63874-0371-04 ")
+28 ;;1080
+29 ;;21,"63874-0371-12 ")
+30 ;;1081
+31 ;;21,"63874-0371-14 ")
+32 ;;1082
+33 ;;21,"63874-0371-15 ")
+34 ;;1083
+35 ;;21,"63874-0371-20 ")
+36 ;;1084
+37 ;;21,"63874-0371-24 ")
+38 ;;1085
+39 ;;21,"63874-0371-30 ")
+40 ;;1086
+41 ;;21,"63874-0371-40 ")
+42 ;;1087
+43 ;;21,"63874-0371-50 ")
+44 ;;1088
+45 ;;21,"63874-0371-60 ")
+46 ;;1089
+47 ;;21,"63874-0371-73 ")
+48 ;;1090
+49 ;;21,"63874-0371-84 ")
+50 ;;1091
+51 ;;21,"63874-0372-01 ")
+52 ;;1253
+53 ;;21,"63874-0372-03 ")
+54 ;;1254
+55 ;;21,"63874-0372-04 ")
+56 ;;1255
+57 ;;21,"63874-0372-08 ")
+58 ;;1256
+59 ;;21,"63874-0372-10 ")
+60 ;;1257
+61 ;;21,"63874-0372-12 ")
+62 ;;1258
+63 ;;21,"63874-0372-14 ")
+64 ;;1259
+65 ;;21,"63874-0372-15 ")
+66 ;;1260
+67 ;;21,"63874-0372-20 ")
+68 ;;1261
+69 ;;21,"63874-0372-21 ")
+70 ;;1262
+71 ;;21,"63874-0372-24 ")
+72 ;;1263
+73 ;;21,"63874-0372-28 ")
+74 ;;1264
+75 ;;21,"63874-0372-30 ")
+76 ;;1265
+77 ;;21,"63874-0372-40 ")
+78 ;;1266
+79 ;;21,"63874-0372-42 ")
+80 ;;1267
+81 ;;21,"63874-0372-50 ")
+82 ;;1268
+83 ;;21,"63874-0372-56 ")
+84 ;;1269
+85 ;;21,"63874-0372-60 ")
+86 ;;1270
+87 ;;21,"63874-0372-90 ")
+88 ;;1271
+89 ;;21,"63874-0419-01 ")
+90 ;;524
+91 ;;21,"63874-0419-03 ")
+92 ;;525
+93 ;;21,"63874-0419-04 ")
+94 ;;526
+95 ;;21,"63874-0419-08 ")
+96 ;;527
+97 ;;21,"63874-0419-10 ")
+98 ;;528
+99 ;;21,"63874-0419-12 ")
+100 ;;529
+101 ;;21,"63874-0419-14 ")
+102 ;;530
+103 ;;21,"63874-0419-15 ")
+104 ;;531
+105 ;;21,"63874-0419-16 ")
+106 ;;532
+107 ;;21,"63874-0419-20 ")
+108 ;;533
+109 ;;21,"63874-0419-21 ")
+110 ;;534
+111 ;;21,"63874-0419-24 ")
+112 ;;535
+113 ;;21,"63874-0419-28 ")
+114 ;;536
+115 ;;21,"63874-0419-30 ")
+116 ;;537
+117 ;;21,"63874-0419-40 ")
+118 ;;538
+119 ;;21,"63874-0419-42 ")
+120 ;;539
+121 ;;21,"63874-0419-50 ")
+122 ;;540
+123 ;;21,"63874-0419-56 ")
+124 ;;541
+125 ;;21,"63874-0419-60 ")
+126 ;;542
+127 ;;21,"63874-0419-72 ")
+128 ;;543
+129 ;;21,"63874-0419-74 ")
+130 ;;544
+131 ;;21,"63874-0419-77 ")
+132 ;;545
+133 ;;21,"63874-0419-90 ")
+134 ;;546
+135 ;;21,"63874-0531-10 ")
+136 ;;1359
+137 ;;21,"63874-0531-14 ")
+138 ;;1360
+139 ;;21,"63874-0531-30 ")
+140 ;;1361
+141 ;;21,"63874-0531-40 ")
+142 ;;1362
+143 ;;21,"66267-0042-12 ")
+144 ;;359
+145 ;;21,"66267-0042-15 ")
+146 ;;360
+147 ;;21,"66267-0042-20 ")
+148 ;;361
+149 ;;21,"66267-0042-30 ")
+150 ;;362
+151 ;;21,"66267-0042-40 ")
+152 ;;363
+153 ;;21,"66267-0042-60 ")
+154 ;;364
+155 ;;21,"66267-0042-90 ")
+156 ;;365
+157 ;;21,"66267-0042-91 ")
+158 ;;366
+159 ;;21,"66267-0043-12 ")
+160 ;;367
+161 ;;21,"66267-0043-15 ")
+162 ;;368
+163 ;;21,"66267-0043-20 ")
+164 ;;369
+165 ;;21,"66267-0043-30 ")
+166 ;;370
+167 ;;21,"66267-0043-40 ")
+168 ;;371
+169 ;;21,"66267-0043-45 ")
+170 ;;372
+171 ;;21,"66267-0043-60 ")
+172 ;;373
+173 ;;21,"66267-0043-90 ")
+174 ;;374
+175 ;;21,"66267-0043-91 ")
+176 ;;375
+177 ;;21,"66267-0055-20 ")
+178 ;;547
+179 ;;21,"66267-0055-30 ")
+180 ;;548
+181 ;;21,"66267-0055-40 ")
+182 ;;549
+183 ;;21,"66267-0064-10 ")
+184 ;;796
+185 ;;21,"66267-0064-15 ")
+186 ;;797
+187 ;;21,"66267-0064-20 ")
+188 ;;798
+189 ;;21,"66267-0064-30 ")
+190 ;;799
+191 ;;21,"66267-0064-40 ")
+192 ;;800
+193 ;;21,"66267-0064-45 ")
+194 ;;801
+195 ;;21,"66267-0064-60 ")
+196 ;;802
+197 ;;21,"66267-0064-90 ")
+198 ;;803
+199 ;;21,"66267-0064-91 ")
+200 ;;804
+201 ;;21,"66267-0145-20 ")
+202 ;;1092
+203 ;;21,"66267-0145-30 ")
+204 ;;1093
+205 ;;21,"66267-0145-40 ")
+206 ;;1094
+207 ;;21,"66267-0145-60 ")
+208 ;;1095
+209 ;;21,"66267-0145-90 ")
+210 ;;1096
+211 ;;21,"66267-0146-12 ")
+212 ;;1272
+213 ;;21,"66267-0146-20 ")
+214 ;;1273
+215 ;;21,"66267-0146-30 ")
+216 ;;1274
+217 ;;21,"66267-0146-40 ")
+218 ;;1275
+219 ;;21,"66267-0146-60 ")
+220 ;;1276
+221 ;;21,"66267-0157-14 ")
+222 ;;1363
+223 ;;21,"66267-0157-20 ")
+224 ;;1364
+225 ;;21,"66267-0158-15 ")
+226 ;;1365
+227 ;;21,"66267-0158-30 ")
+228 ;;1366
+229 ;;21,"66267-0158-60 ")
+230 ;;1367
+231 ;;21,"66267-0193-07 ")
+232 ;;896
+233 ;;21,"66267-0193-10 ")
+234 ;;897
+235 ;;21,"66267-0193-14 ")
+236 ;;898
+237 ;;21,"66267-0193-20 ")
+238 ;;899
+239 ;;21,"66267-0193-28 ")
+240 ;;900
+241 ;;21,"66267-0193-30 ")
+242 ;;901
+243 ;;21,"66267-0193-40 ")
+244 ;;902
+245 ;;21,"66267-0611-08 ")
+246 ;;932
+247 ;;21,"66267-0611-15 ")
+248 ;;933
+249 ;;21,"66267-0611-20 ")
+250 ;;934
+251 ;;21,"66267-0611-21 ")
+252 ;;935
+253 ;;21,"66267-0611-30 ")
+254 ;;936
+255 ;;21,"66267-0611-40 ")
+256 ;;937
+257 ;;21,"66267-0611-42 ")
+258 ;;938
+259 ;;21,"66267-1007-00 ")
+260 ;;376
+261 ;;21,"66336-0581-15 ")
+262 ;;805
+263 ;;21,"66336-0581-20 ")
+264 ;;806
+265 ;;21,"66336-0581-30 ")
+266 ;;807
+267 ;;21,"68115-0063-00 ")
+268 ;;377
+269 ;;21,"68115-0063-04 ")
+270 ;;378
+271 ;;21,"68115-0063-12 ")
+272 ;;379
+273 ;;21,"68115-0063-15 ")
+274 ;;380
+275 ;;21,"68115-0063-20 ")
+276 ;;381
+277 ;;21,"68115-0063-28 ")
+278 ;;382
+279 ;;21,"68115-0063-30 ")
+280 ;;383
+281 ;;21,"68115-0063-40 ")
+282 ;;384
+283 ;;21,"68115-0063-45 ")
+284 ;;385
+285 ;;21,"68115-0063-48 ")
+286 ;;386
+287 ;;21,"68115-0063-50 ")
+288 ;;387
+289 ;;21,"68115-0063-56 ")
+290 ;;388
+291 ;;21,"68115-0063-60 ")
+292 ;;389
+293 ;;21,"68115-0063-90 ")
+294 ;;390
+295 ;;21,"68115-0063-96 ")
+296 ;;391
+297 ;;21,"68115-0063-99 ")
+298 ;;392
+299 ;;21,"68115-0077-00 ")
+300 ;;550
+301 ;;21,"68115-0077-15 ")
+302 ;;551
+303 ;;21,"68115-0077-30 ")
+304 ;;552
+305 ;;21,"68115-0077-40 ")
+306 ;;553
+307 ;;21,"68115-0077-60 ")
+308 ;;554
+309 ;;21,"68115-0077-90 ")
+310 ;;555
+311 ;;21,"68115-0095-00 ")
+312 ;;808
+313 ;;21,"68115-0095-12 ")
+314 ;;809
+315 ;;21,"68115-0095-15 ")
+316 ;;810
+317 ;;21,"68115-0095-20 ")
+318 ;;811
+319 ;;21,"68115-0095-30 ")
+320 ;;812
+321 ;;21,"68115-0095-40 ")
+322 ;;813
+323 ;;21,"68115-0095-45 ")
+324 ;;814
+325 ;;21,"68115-0095-60 ")
+326 ;;815
+327 ;;21,"68115-0095-90 ")
+328 ;;816
+329 ;;21,"68115-0095-99 ")
+330 ;;817
+331 ;;21,"68115-0234-00 ")
+332 ;;1097
+333 ;;21,"68115-0234-20 ")
+334 ;;1098
+335 ;;21,"68115-0234-30 ")
+336 ;;1099
+337 ;;21,"68115-0234-40 ")
+338 ;;1100
+339 ;;21,"68115-0234-60 ")
+340 ;;1101
+341 ;;21,"68115-0234-90 ")
+342 ;;1102
+343 ;;21,"68115-0235-20 ")
+344 ;;1277
+345 ;;21,"68115-0235-30 ")
+346 ;;1278
+347 ;;21,"68115-0235-60 ")
+348 ;;1279
+349 ;;21,"68115-0235-90 ")
+350 ;;1280
+351 ;;21,"68115-0235-99 ")
+352 ;;1281
+353 ;;21,"68115-0264-30 ")
+354 ;;1368
+355 ;;21,"68115-0264-60 ")
+356 ;;1369
+357 ;;21,"68115-0318-30 ")
+358 ;;903
+359 ;;21,"68115-0318-40 ")
+360 ;;904
+361 ;;21,"68115-0319-00 ")
+362 ;;939
+363 ;;21,"68115-0319-08 ")
+364 ;;940
+365 ;;21,"68115-0319-15 ")
+366 ;;941
+367 ;;21,"68115-0319-20 ")
+368 ;;942
+369 ;;21,"68115-0319-30 ")
+370 ;;943
+371 ;;21,"68115-0319-90 ")
+372 ;;944
+373 ;;21,"68115-0319-99 ")
+374 ;;945
+375 ;;21,"68115-0440-00 ")
+376 ;;393
+377 ;;21,"68115-0440-04 ")
+378 ;;394
+379 ;;21,"68115-0440-12 ")
+380 ;;395
+381 ;;21,"68115-0440-15 ")
+382 ;;396
+383 ;;21,"68115-0440-20 ")
+384 ;;397
+385 ;;21,"68115-0440-28 ")
+386 ;;398
+387 ;;21,"68115-0440-30 ")
+388 ;;399
+389 ;;21,"68115-0440-40 ")
+390 ;;400
+391 ;;21,"68115-0440-45 ")
+392 ;;401
+393 ;;21,"68115-0440-48 ")
+394 ;;402
+395 ;;21,"68115-0440-50 ")
+396 ;;403
+397 ;;21,"68115-0440-56 ")
+398 ;;404
+399 ;;21,"68115-0440-60 ")
+400 ;;405
+401 ;;21,"68115-0440-90 ")
+402 ;;406
+403 ;;21,"68115-0440-97 ")
+404 ;;407
+405 ;;21,"68115-0440-99 ")
+406 ;;408
+407 ;;21,"68115-0450-30 ")
+408 ;;838
+409 ;;9002226,629,.01)
+410 ;;BGP HEDIS SKL MUSCLE RELAX NDC
+411 ;;9002226,629,.02)
+412 ;;@
+413 ;;9002226,629,.04)
+414 ;;n
+415 ;;9002226,629,.06)
+416 ;;@
+417 ;;9002226,629,.08)
+418 ;;@
+419 ;;9002226,629,.09)
+420 ;;@
+421 ;;9002226,629,.11)
+422 ;;@
+423 ;;9002226,629,.12)
+424 ;;@
+425 ;;9002226,629,.13)
+426 ;;1
+427 ;;9002226,629,.14)
+428 ;;@
+429 ;;9002226,629,.15)
+430 ;;@
+431 ;;9002226,629,.16)
+432 ;;@
+433 ;;9002226,629,.17)
+434 ;;@
+435 ;;9002226,629,3101)
+436 ;;@
+437 ;;9002226.02101,"629,00005-3562-23 ",.01)
+438 ;;00005-3562-23
+439 ;;9002226.02101,"629,00005-3562-23 ",.02)
+440 ;;00005-3562-23
+441 ;;9002226.02101,"629,00005-3563-23 ",.01)
+442 ;;00005-3563-23
+443 ;;9002226.02101,"629,00005-3563-23 ",.02)
+444 ;;00005-3563-23
+445 ;;9002226.02101,"629,00005-3563-31 ",.01)
+446 ;;00005-3563-31
+447 ;;9002226.02101,"629,00005-3563-31 ",.02)
+448 ;;00005-3563-31
+449 ;;9002226.02101,"629,00006-0931-28 ",.01)
+450 ;;00006-0931-28
+451 ;;9002226.02101,"629,00006-0931-28 ",.02)
+452 ;;00006-0931-28
+453 ;;9002226.02101,"629,00006-0931-68 ",.01)
+454 ;;00006-0931-68
+455 ;;9002226.02101,"629,00006-0931-68 ",.02)
+456 ;;00006-0931-68
+457 ;;9002226.02101,"629,00031-7409-87 ",.01)
+458 ;;00031-7409-87
+459 ;;9002226.02101,"629,00031-7409-87 ",.02)
+460 ;;00031-7409-87
+461 ;;9002226.02101,"629,00031-7409-94 ",.01)
+462 ;;00031-7409-94
+463 ;;9002226.02101,"629,00031-7409-94 ",.02)
+464 ;;00031-7409-94
+465 ;;9002226.02101,"629,00031-7429-63 ",.01)
+466 ;;00031-7429-63
+467 ;;9002226.02101,"629,00031-7429-63 ",.02)
+468 ;;00031-7429-63
+469 ;;9002226.02101,"629,00031-7429-70 ",.01)
+470 ;;00031-7429-70
+471 ;;9002226.02101,"629,00031-7429-70 ",.02)
+472 ;;00031-7429-70
+473 ;;9002226.02101,"629,00031-7449-63 ",.01)
+474 ;;00031-7449-63
+475 ;;9002226.02101,"629,00031-7449-63 ",.02)
+476 ;;00031-7449-63
+477 ;;9002226.02101,"629,00031-7449-70 ",.01)
+478 ;;00031-7449-70
+479 ;;9002226.02101,"629,00031-7449-70 ",.02)
+480 ;;00031-7449-70
+481 ;;9002226.02101,"629,00031-7469-63 ",.01)
+482 ;;00031-7469-63
+483 ;;9002226.02101,"629,00031-7469-63 ",.02)
+484 ;;00031-7469-63
+485 ;;9002226.02101,"629,00037-2001-01 ",.01)
+486 ;;00037-2001-01
+487 ;;9002226.02101,"629,00037-2001-01 ",.02)
+488 ;;00037-2001-01
+489 ;;9002226.02101,"629,00037-2001-03 ",.01)
+490 ;;00037-2001-03
+491 ;;9002226.02101,"629,00037-2001-03 ",.02)
+492 ;;00037-2001-03
+493 ;;9002226.02101,"629,00037-2001-85 ",.01)
+494 ;;00037-2001-85
+495 ;;9002226.02101,"629,00037-2001-85 ",.02)
+496 ;;00037-2001-85
+497 ;;9002226.02101,"629,00037-2103-01 ",.01)
+498 ;;00037-2103-01
+499 ;;9002226.02101,"629,00037-2103-01 ",.02)
+500 ;;00037-2103-01
+501 ;;9002226.02101,"629,00037-2103-03 ",.01)
+502 ;;00037-2103-03
+503 ;;9002226.02101,"629,00037-2103-03 ",.02)
+504 ;;00037-2103-03
+505 ;;9002226.02101,"629,00037-2103-85 ",.01)
+506 ;;00037-2103-85
+507 ;;9002226.02101,"629,00037-2103-85 ",.02)
+508 ;;00037-2103-85
+509 ;;9002226.02101,"629,00037-2403-01 ",.01)
+510 ;;00037-2403-01
+511 ;;9002226.02101,"629,00037-2403-01 ",.02)
+512 ;;00037-2403-01
+513 ;;9002226.02101,"629,00045-0325-60 ",.01)
+514 ;;00045-0325-60
+515 ;;9002226.02101,"629,00045-0325-60 ",.02)
+516 ;;00045-0325-60
+517 ;;9002226.02101,"629,00086-0062-10 ",.01)
+518 ;;00086-0062-10
+519 ;;9002226.02101,"629,00086-0062-10 ",.02)
+520 ;;00086-0062-10
+521 ;;9002226.02101,"629,00086-0062-50 ",.01)
+522 ;;00086-0062-50
+523 ;;9002226.02101,"629,00086-0062-50 ",.02)
+524 ;;00086-0062-50
+525 ;;9002226.02101,"629,00089-0221-10 ",.01)
+526 ;;00089-0221-10
+527 ;;9002226.02101,"629,00089-0221-10 ",.02)
+528 ;;00089-0221-10
+529 ;;9002226.02101,"629,00089-0231-10 ",.01)
+530 ;;00089-0231-10
+531 ;;9002226.02101,"629,00089-0231-10 ",.02)
+532 ;;00089-0231-10
+533 ;;9002226.02101,"629,00089-0233-10 ",.01)
+534 ;;00089-0233-10
+535 ;;9002226.02101,"629,00089-0233-10 ",.02)
+536 ;;00089-0233-10
+537 ;;9002226.02101,"629,00089-0233-50 ",.01)
+538 ;;00089-0233-50
+539 ;;9002226.02101,"629,00089-0233-50 ",.02)
+540 ;;00089-0233-50
+541 ;;9002226.02101,"629,00089-0540-06 ",.01)
+542 ;;00089-0540-06
+543 ;;9002226.02101,"629,00089-0540-06 ",.02)
+544 ;;00089-0540-06
+545 ;;9002226.02101,"629,00091-7429-63 ",.01)
+546 ;;00091-7429-63
+547 ;;9002226.02101,"629,00091-7429-63 ",.02)
+548 ;;00091-7429-63
+549 ;;9002226.02101,"629,00091-7449-63 ",.01)
+550 ;;00091-7449-63
+551 ;;9002226.02101,"629,00091-7449-63 ",.02)
+552 ;;00091-7449-63
+553 ;;9002226.02101,"629,00091-7449-70 ",.01)
+554 ;;00091-7449-70
+555 ;;9002226.02101,"629,00091-7449-70 ",.02)
+556 ;;00091-7449-70
+557 ;;9002226.02101,"629,00093-0542-01 ",.01)
+558 ;;00093-0542-01
+559 ;;9002226.02101,"629,00093-0542-01 ",.02)
+560 ;;00093-0542-01
+561 ;;9002226.02101,"629,00093-0542-05 ",.01)
+562 ;;00093-0542-05
+563 ;;9002226.02101,"629,00093-0542-05 ",.02)
+564 ;;00093-0542-05
+565 ;;9002226.02101,"629,00115-2011-01 ",.01)
+566 ;;00115-2011-01
+567 ;;9002226.02101,"629,00115-2011-01 ",.02)
+568 ;;00115-2011-01
+569 ;;9002226.02101,"629,00115-2011-02 ",.01)
+570 ;;00115-2011-02
+571 ;;9002226.02101,"629,00115-2011-02 ",.02)
+572 ;;00115-2011-02
+573 ;;9002226.02101,"629,00115-3900-01 ",.01)
+574 ;;00115-3900-01
+575 ;;9002226.02101,"629,00115-3900-01 ",.02)
+576 ;;00115-3900-01
+577 ;;9002226.02101,"629,00115-3900-02 ",.01)
+578 ;;00115-3900-02
+579 ;;9002226.02101,"629,00115-3900-02 ",.02)
+580 ;;00115-3900-02
+581 ;;9002226.02101,"629,00115-3900-03 ",.01)
+582 ;;00115-3900-03
+583 ;;9002226.02101,"629,00115-3900-03 ",.02)
+584 ;;00115-3900-03
+585 ;;9002226.02101,"629,00115-3902-01 ",.01)
+586 ;;00115-3902-01
+587 ;;9002226.02101,"629,00115-3902-01 ",.02)
+588 ;;00115-3902-01
+589 ;;9002226.02101,"629,00115-3902-02 ",.01)
+590 ;;00115-3902-02
+591 ;;9002226.02101,"629,00115-3902-02 ",.02)
+592 ;;00115-3902-02
+593 ;;9002226.02101,"629,00115-3902-03 ",.01)
+594 ;;00115-3902-03
+595 ;;9002226.02101,"629,00115-3902-03 ",.02)
+596 ;;00115-3902-03
+597 ;;9002226.02101,"629,00143-1176-01 ",.01)
+598 ;;00143-1176-01
+599 ;;9002226.02101,"629,00143-1176-01 ",.02)
+600 ;;00143-1176-01
+601 ;;9002226.02101,"629,00143-1176-05 ",.01)
+602 ;;00143-1176-05
+603 ;;9002226.02101,"629,00143-1176-05 ",.02)
+604 ;;00143-1176-05
+605 ;;9002226.02101,"629,00143-1176-10 ",.01)
+606 ;;00143-1176-10
+607 ;;9002226.02101,"629,00143-1176-10 ",.02)
+608 ;;00143-1176-10
+609 ;;9002226.02101,"629,00143-1290-01 ",.01)
+610 ;;00143-1290-01
+611 ;;9002226.02101,"629,00143-1290-01 ",.02)
+612 ;;00143-1290-01
+613 ;;9002226.02101,"629,00143-1290-05 ",.01)
+614 ;;00143-1290-05
+615 ;;9002226.02101,"629,00143-1290-05 ",.02)
+616 ;;00143-1290-05
+617 ;;9002226.02101,"629,00143-1292-01 ",.01)
+618 ;;00143-1292-01
+619 ;;9002226.02101,"629,00143-1292-01 ",.02)
+620 ;;00143-1292-01
+621 ;;9002226.02101,"629,00143-1292-05 ",.01)
+622 ;;00143-1292-05
+623 ;;9002226.02101,"629,00143-1292-05 ",.02)
+624 ;;00143-1292-05
+625 ;;9002226.02101,"629,00172-2813-60 ",.01)
+626 ;;00172-2813-60
+627 ;;9002226.02101,"629,00172-2813-60 ",.02)
+628 ;;00172-2813-60
+629 ;;9002226.02101,"629,00172-2813-70 ",.01)
+630 ;;00172-2813-70
+631 ;;9002226.02101,"629,00172-2813-70 ",.02)
+632 ;;00172-2813-70
+633 ;;9002226.02101,"629,00182-0572-01 ",.01)
+634 ;;00182-0572-01
+635 ;;9002226.02101,"629,00182-0572-01 ",.02)
+636 ;;00182-0572-01
