BGP31K8 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 29, 2012;
;;13.0;IHS CLINICAL REPORTING;;NOV 20, 2012;Build 81
;
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,"68115-0264-30 ")
;;2725
;;21,"68115-0264-60 ")
;;2726
;;21,"68115-0264-90 ")
;;2727
;;21,"68115-0318-30 ")
;;2728
;;21,"68115-0318-40 ")
;;2729
;;21,"68115-0319-00 ")
;;2730
;;21,"68115-0319-08 ")
;;2731
;;21,"68115-0319-15 ")
;;2732
;;21,"68115-0319-20 ")
;;2733
;;21,"68115-0319-30 ")
;;2734
;;21,"68115-0319-60 ")
;;2735
;;21,"68115-0319-90 ")
;;2736
;;21,"68115-0319-99 ")
;;2737
;;21,"68115-0440-00 ")
;;2738
;;21,"68115-0440-04 ")
;;2739
;;21,"68115-0440-12 ")
;;2740
;;21,"68115-0440-15 ")
;;2741
;;21,"68115-0440-20 ")
;;2742
;;21,"68115-0440-21 ")
;;2743
;;21,"68115-0440-28 ")
;;2744
;;21,"68115-0440-30 ")
;;2745
;;21,"68115-0440-40 ")
;;2746
;;21,"68115-0440-45 ")
;;2747
;;21,"68115-0440-48 ")
;;2748
;;21,"68115-0440-50 ")
;;2749
;;21,"68115-0440-56 ")
;;2750
;;21,"68115-0440-60 ")
;;2751
;;21,"68115-0440-90 ")
;;2752
;;21,"68115-0440-97 ")
;;2753
;;21,"68115-0440-99 ")
;;2754
;;21,"68115-0450-30 ")
;;2755
;;21,"68115-0546-00 ")
;;2756
;;21,"68258-1050-01 ")
;;2757
;;21,"68258-7013-01 ")
;;2758
;;21,"68258-7013-02 ")
;;2759
;;21,"68258-7013-03 ")
;;2760
;;21,"68258-7013-09 ")
;;2761
;;21,"68258-7019-09 ")
;;2762
;;21,"68258-7061-05 ")
;;2763
;;21,"68258-7094-05 ")
;;2764
;;21,"68258-7100-01 ")
;;2765
;;21,"68258-7100-02 ")
;;2766
;;21,"68258-7100-03 ")
;;2767
;;21,"68258-7100-06 ")
;;2768
;;21,"68258-7100-09 ")
;;2769
;;21,"68258-9095-01 ")
;;2770
;;21,"68387-0108-30 ")
;;2771
;;21,"68387-0108-60 ")
;;2772
;;21,"68387-0108-90 ")
;;2773
;;21,"68387-0340-24 ")
;;2774
;;21,"68387-0340-30 ")
;;2775
;;21,"68387-0340-45 ")
;;2776
;;21,"68387-0340-60 ")
;;2777
;;21,"68387-0340-90 ")
;;2778
;;21,"68387-0342-60 ")
;;2779
;;21,"68387-0375-30 ")
;;2780
;;21,"68387-0375-90 ")
;;2781
;;21,"68387-0500-10 ")
;;2782
;;21,"68387-0500-12 ")
;;2783
;;21,"68387-0500-15 ")
;;2784
;;21,"68387-0500-30 ")
;;2785
;;21,"68387-0500-45 ")
;;2786
;;21,"68387-0500-60 ")
;;2787
;;21,"68387-0500-90 ")
;;2788
;;21,"68387-0502-90 ")
;;2789
;;21,"68387-0575-14 ")
;;2790
;;21,"68387-0575-60 ")
;;2791
;;21,"68387-0600-12 ")
;;2792
;;21,"68387-0600-15 ")
;;2793
;;21,"68387-0600-30 ")
;;2794
;;21,"68387-0600-45 ")
;;2795
;;21,"68387-0600-60 ")
;;2796
;;21,"68387-0600-90 ")
;;2797
;;21,"68453-0950-10 ")
;;2798
;;21,"68462-0552-01 ")
;;2799
;;21,"68462-0553-01 ")
;;2800
;;21,"68462-0553-10 ")
;;2801
;;21,"76218-1219-01 ")
;;2802
;;21,"76519-0100-01 ")
;;2803
;;21,"76519-0100-02 ")
;;2804
;;21,"76519-0100-03 ")
;;2805
;;21,"76519-0100-05 ")
;;2806
;;21,"76519-0100-06 ")
;;2807
;;21,"76519-0100-07 ")
;;2808
;;21,"76519-0100-09 ")
;;2809
;;9002226,804,.01)
;;BGP HEDIS SKL MUSCLE RELAX NDC
;;9002226,804,.02)
;;@
;;9002226,804,.04)
;;n
;;9002226,804,.06)
;;@
;;9002226,804,.08)
;;@
;;9002226,804,.09)
;;3120829
;;9002226,804,.11)
;;@
;;9002226,804,.12)
;;@
;;9002226,804,.13)
;;1
;;9002226,804,.14)
;;@
;;9002226,804,.15)
;;@
;;9002226,804,.16)
;;@
;;9002226,804,.17)
;;@
;;9002226,804,3101)
;;@
;;9002226.02101,"804,00005-3562-23 ",.01)
;;00005-3562-23
;;9002226.02101,"804,00005-3562-23 ",.02)
;;00005-3562-23
;;9002226.02101,"804,00005-3563-23 ",.01)
;;00005-3563-23
;;9002226.02101,"804,00005-3563-23 ",.02)
;;00005-3563-23
;;9002226.02101,"804,00005-3563-31 ",.01)
;;00005-3563-31
;;9002226.02101,"804,00005-3563-31 ",.02)
;;00005-3563-31
;;9002226.02101,"804,00006-0931-28 ",.01)
;;00006-0931-28
;;9002226.02101,"804,00006-0931-28 ",.02)
;;00006-0931-28
;;9002226.02101,"804,00031-7409-87 ",.01)
;;00031-7409-87
;;9002226.02101,"804,00031-7409-87 ",.02)
;;00031-7409-87
;;9002226.02101,"804,00031-7409-94 ",.01)
;;00031-7409-94
;;9002226.02101,"804,00031-7409-94 ",.02)
;;00031-7409-94
;;9002226.02101,"804,00031-7429-63 ",.01)
;;00031-7429-63
;;9002226.02101,"804,00031-7429-63 ",.02)
;;00031-7429-63
;;9002226.02101,"804,00031-7449-63 ",.01)
;;00031-7449-63
;;9002226.02101,"804,00031-7449-63 ",.02)
;;00031-7449-63
;;9002226.02101,"804,00031-7449-70 ",.01)
;;00031-7449-70
;;9002226.02101,"804,00031-7449-70 ",.02)
;;00031-7449-70
;;9002226.02101,"804,00037-2001-01 ",.01)
;;00037-2001-01
;;9002226.02101,"804,00037-2001-01 ",.02)
;;00037-2001-01
;;9002226.02101,"804,00037-2001-03 ",.01)
;;00037-2001-03
;;9002226.02101,"804,00037-2001-03 ",.02)
;;00037-2001-03
;;9002226.02101,"804,00037-2001-85 ",.01)
;;00037-2001-85
;;9002226.02101,"804,00037-2001-85 ",.02)
;;00037-2001-85
;;9002226.02101,"804,00037-2103-01 ",.01)
;;00037-2103-01
;;9002226.02101,"804,00037-2103-01 ",.02)
;;00037-2103-01
;;9002226.02101,"804,00037-2103-03 ",.01)
;;00037-2103-03
;;9002226.02101,"804,00037-2103-03 ",.02)
;;00037-2103-03
;;9002226.02101,"804,00037-2103-85 ",.01)
;;00037-2103-85
;;9002226.02101,"804,00037-2103-85 ",.02)
;;00037-2103-85
;;9002226.02101,"804,00037-2250-10 ",.01)
;;00037-2250-10
;;9002226.02101,"804,00037-2250-10 ",.02)
;;00037-2250-10
;;9002226.02101,"804,00037-2250-30 ",.01)
;;00037-2250-30
;;9002226.02101,"804,00037-2250-30 ",.02)
;;00037-2250-30
;;9002226.02101,"804,00037-2403-01 ",.01)
;;00037-2403-01
;;9002226.02101,"804,00037-2403-01 ",.02)
;;00037-2403-01
;;9002226.02101,"804,00045-0325-60 ",.01)
;;00045-0325-60
;;9002226.02101,"804,00045-0325-60 ",.02)
;;00045-0325-60
;;9002226.02101,"804,00045-0325-70 ",.01)
;;00045-0325-70
;;9002226.02101,"804,00045-0325-70 ",.02)
;;00045-0325-70
;;9002226.02101,"804,00086-0062-10 ",.01)
;;00086-0062-10
;;9002226.02101,"804,00086-0062-10 ",.02)
;;00086-0062-10
;;9002226.02101,"804,00086-0062-50 ",.01)
;;00086-0062-50
;;9002226.02101,"804,00086-0062-50 ",.02)
;;00086-0062-50
;;9002226.02101,"804,00089-0221-10 ",.01)
;;00089-0221-10
;;9002226.02101,"804,00089-0221-10 ",.02)
;;00089-0221-10
;;9002226.02101,"804,00089-0231-10 ",.01)
;;00089-0231-10
;;9002226.02101,"804,00089-0231-10 ",.02)
;;00089-0231-10
;;9002226.02101,"804,00089-0233-10 ",.01)
;;00089-0233-10
;;9002226.02101,"804,00089-0233-10 ",.02)
;;00089-0233-10
;;9002226.02101,"804,00089-0540-06 ",.01)
;;00089-0540-06
;;9002226.02101,"804,00089-0540-06 ",.02)
;;00089-0540-06
;;9002226.02101,"804,00091-7429-63 ",.01)
;;00091-7429-63
;;9002226.02101,"804,00091-7429-63 ",.02)
;;00091-7429-63
;;9002226.02101,"804,00091-7449-63 ",.01)
;;00091-7449-63
;;9002226.02101,"804,00091-7449-63 ",.02)
;;00091-7449-63
;;9002226.02101,"804,00091-7449-70 ",.01)
;;00091-7449-70
;;9002226.02101,"804,00091-7449-70 ",.02)
;;00091-7449-70
;;9002226.02101,"804,00093-0542-01 ",.01)
;;00093-0542-01
;;9002226.02101,"804,00093-0542-01 ",.02)
;;00093-0542-01
;;9002226.02101,"804,00093-0542-05 ",.01)
;;00093-0542-05
;;9002226.02101,"804,00093-0542-05 ",.02)
;;00093-0542-05
;;9002226.02101,"804,00093-1919-19 ",.01)
;;00093-1919-19
;;9002226.02101,"804,00093-1919-19 ",.02)
;;00093-1919-19
;;9002226.02101,"804,00093-1919-93 ",.01)
;;00093-1919-93
;;9002226.02101,"804,00093-1919-93 ",.02)
;;00093-1919-93
;;9002226.02101,"804,00095-0150-06 ",.01)
;;00095-0150-06
;;9002226.02101,"804,00095-0150-06 ",.02)
;;00095-0150-06
;;9002226.02101,"804,00095-0300-06 ",.01)
;;00095-0300-06
;;9002226.02101,"804,00095-0300-06 ",.02)
;;00095-0300-06
;;9002226.02101,"804,00115-2011-01 ",.01)
;;00115-2011-01
;;9002226.02101,"804,00115-2011-01 ",.02)
;;00115-2011-01
;;9002226.02101,"804,00115-2011-02 ",.01)
;;00115-2011-02
;;9002226.02101,"804,00115-2011-02 ",.02)
;;00115-2011-02
;;9002226.02101,"804,00143-1176-01 ",.01)
;;00143-1176-01
;;9002226.02101,"804,00143-1176-01 ",.02)
;;00143-1176-01
;;9002226.02101,"804,00143-1176-05 ",.01)
;;00143-1176-05
;;9002226.02101,"804,00143-1176-05 ",.02)
;;00143-1176-05
;;9002226.02101,"804,00143-1176-10 ",.01)
;;00143-1176-10
;;9002226.02101,"804,00143-1176-10 ",.02)
;;00143-1176-10
;;9002226.02101,"804,00143-1290-01 ",.01)
;;00143-1290-01
;;9002226.02101,"804,00143-1290-01 ",.02)
;;00143-1290-01
;;9002226.02101,"804,00143-1290-05 ",.01)
;;00143-1290-05
;;9002226.02101,"804,00143-1290-05 ",.02)
;;00143-1290-05
;;9002226.02101,"804,00143-1292-01 ",.01)
;;00143-1292-01
;;9002226.02101,"804,00143-1292-01 ",.02)
;;00143-1292-01
;;9002226.02101,"804,00143-1292-05 ",.01)
;;00143-1292-05
;;9002226.02101,"804,00143-1292-05 ",.02)
;;00143-1292-05
;;9002226.02101,"804,00143-9749-01 ",.01)
;;00143-9749-01
;;9002226.02101,"804,00143-9749-01 ",.02)
;;00143-9749-01
;;9002226.02101,"804,00143-9749-05 ",.01)
;;00143-9749-05
;;9002226.02101,"804,00143-9749-05 ",.02)
;;00143-9749-05
;;9002226.02101,"804,00143-9749-10 ",.01)
;;00143-9749-10
;;9002226.02101,"804,00143-9749-10 ",.02)
;;00143-9749-10
;;9002226.02101,"804,00172-2813-60 ",.01)
;;00172-2813-60
;;9002226.02101,"804,00172-2813-60 ",.02)
;;00172-2813-60
;;9002226.02101,"804,00182-0573-89 ",.01)
;;00182-0573-89
;;9002226.02101,"804,00182-0573-89 ",.02)
;;00182-0573-89
;;9002226.02101,"804,00182-1919-00 ",.01)
;;00182-1919-00
;;9002226.02101,"804,00182-1919-00 ",.02)
;;00182-1919-00
;;9002226.02101,"804,00182-1919-89 ",.01)
;;00182-1919-89
;;9002226.02101,"804,00182-1919-89 ",.02)
;;00182-1919-89
;;9002226.02101,"804,00185-0022-01 ",.01)
;;00185-0022-01
;;9002226.02101,"804,00185-0022-01 ",.02)
;;00185-0022-01
;;9002226.02101,"804,00185-0022-10 ",.01)
;;00185-0022-10
;;9002226.02101,"804,00185-0022-10 ",.02)
;;00185-0022-10
;;9002226.02101,"804,00185-0448-01 ",.01)
;;00185-0448-01
;;9002226.02101,"804,00185-0448-01 ",.02)
;;00185-0448-01
;;9002226.02101,"804,00185-0448-10 ",.01)
;;00185-0448-10
;;9002226.02101,"804,00185-0448-10 ",.02)
;;00185-0448-10
;;9002226.02101,"804,00185-0713-01 ",.01)
;;00185-0713-01
;;9002226.02101,"804,00185-0713-01 ",.02)
;;00185-0713-01
;;9002226.02101,"804,00185-0713-05 ",.01)
;;00185-0713-05
;;9002226.02101,"804,00185-0713-05 ",.02)
;;00185-0713-05
;;9002226.02101,"804,00185-0714-01 ",.01)
;;00185-0714-01
;;9002226.02101,"804,00185-0714-01 ",.02)
;;00185-0714-01
;;9002226.02101,"804,00185-0724-01 ",.01)
;;00185-0724-01
;;9002226.02101,"804,00185-0724-01 ",.02)
;;00185-0724-01
;;9002226.02101,"804,00185-0724-05 ",.01)
;;00185-0724-05
;;9002226.02101,"804,00185-0724-05 ",.02)
;;00185-0724-05
;;9002226.02101,"804,00185-0749-01 ",.01)
;;00185-0749-01
;;9002226.02101,"804,00185-0749-01 ",.02)
;;00185-0749-01
;;9002226.02101,"804,00247-0013-00 ",.01)
;;00247-0013-00
;;9002226.02101,"804,00247-0013-00 ",.02)
;;00247-0013-00
;;9002226.02101,"804,00247-0013-03 ",.01)
;;00247-0013-03
;;9002226.02101,"804,00247-0013-03 ",.02)
;;00247-0013-03
;;9002226.02101,"804,00247-0013-06 ",.01)
;;00247-0013-06
;;9002226.02101,"804,00247-0013-06 ",.02)
;;00247-0013-06
;;9002226.02101,"804,00247-0013-07 ",.01)
;;00247-0013-07
;;9002226.02101,"804,00247-0013-07 ",.02)
;;00247-0013-07
;;9002226.02101,"804,00247-0013-08 ",.01)
;;00247-0013-08
;;9002226.02101,"804,00247-0013-08 ",.02)
;;00247-0013-08
;;9002226.02101,"804,00247-0013-09 ",.01)
;;00247-0013-09
;;9002226.02101,"804,00247-0013-09 ",.02)
;;00247-0013-09
;;9002226.02101,"804,00247-0013-15 ",.01)
;;00247-0013-15
;;9002226.02101,"804,00247-0013-15 ",.02)
;;00247-0013-15
;;9002226.02101,"804,00247-0013-18 ",.01)
;;00247-0013-18
;;9002226.02101,"804,00247-0013-18 ",.02)
;;00247-0013-18
;;9002226.02101,"804,00247-0013-20 ",.01)
;;00247-0013-20
;;9002226.02101,"804,00247-0013-20 ",.02)
;;00247-0013-20
;;9002226.02101,"804,00247-0013-21 ",.01)
;;00247-0013-21
;;9002226.02101,"804,00247-0013-21 ",.02)
;;00247-0013-21
;;9002226.02101,"804,00247-0013-25 ",.01)
;;00247-0013-25
;;9002226.02101,"804,00247-0013-25 ",.02)
;;00247-0013-25
;;9002226.02101,"804,00247-0013-28 ",.01)
;;00247-0013-28
;;9002226.02101,"804,00247-0013-28 ",.02)
;;00247-0013-28
;;9002226.02101,"804,00247-0013-30 ",.01)
;;00247-0013-30
;;9002226.02101,"804,00247-0013-30 ",.02)
;;00247-0013-30
;;9002226.02101,"804,00247-0013-40 ",.01)
;;00247-0013-40
;;9002226.02101,"804,00247-0013-40 ",.02)
;;00247-0013-40
;;9002226.02101,"804,00247-0013-60 ",.01)
;;00247-0013-60
;;9002226.02101,"804,00247-0013-60 ",.02)
;;00247-0013-60
;;9002226.02101,"804,00247-0013-98 ",.01)
;;00247-0013-98
;;9002226.02101,"804,00247-0013-98 ",.02)
;;00247-0013-98
;;9002226.02101,"804,00247-0088-00 ",.01)
;;00247-0088-00
;;9002226.02101,"804,00247-0088-00 ",.02)
;;00247-0088-00
;;9002226.02101,"804,00247-0088-02 ",.01)
;;00247-0088-02
;;9002226.02101,"804,00247-0088-02 ",.02)
;;00247-0088-02
;;9002226.02101,"804,00247-0088-04 ",.01)
;;00247-0088-04
;;9002226.02101,"804,00247-0088-04 ",.02)
;;00247-0088-04
;;9002226.02101,"804,00247-0088-07 ",.01)
;;00247-0088-07
;;9002226.02101,"804,00247-0088-07 ",.02)
;;00247-0088-07
;;9002226.02101,"804,00247-0088-14 ",.01)
;;00247-0088-14
;;9002226.02101,"804,00247-0088-14 ",.02)
;;00247-0088-14
;;9002226.02101,"804,00247-0088-15 ",.01)
;;00247-0088-15
;;9002226.02101,"804,00247-0088-15 ",.02)
;;00247-0088-15
BGP31K8 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 29, 2012;
+1 ;;13.0;IHS CLINICAL REPORTING;;NOV 20, 2012;Build 81
+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,"68115-0264-30 ")
+2 ;;2725
+3 ;;21,"68115-0264-60 ")
+4 ;;2726
+5 ;;21,"68115-0264-90 ")
+6 ;;2727
+7 ;;21,"68115-0318-30 ")
+8 ;;2728
+9 ;;21,"68115-0318-40 ")
+10 ;;2729
+11 ;;21,"68115-0319-00 ")
+12 ;;2730
+13 ;;21,"68115-0319-08 ")
+14 ;;2731
+15 ;;21,"68115-0319-15 ")
+16 ;;2732
+17 ;;21,"68115-0319-20 ")
+18 ;;2733
+19 ;;21,"68115-0319-30 ")
+20 ;;2734
+21 ;;21,"68115-0319-60 ")
+22 ;;2735
+23 ;;21,"68115-0319-90 ")
+24 ;;2736
+25 ;;21,"68115-0319-99 ")
+26 ;;2737
+27 ;;21,"68115-0440-00 ")
+28 ;;2738
+29 ;;21,"68115-0440-04 ")
+30 ;;2739
+31 ;;21,"68115-0440-12 ")
+32 ;;2740
+33 ;;21,"68115-0440-15 ")
+34 ;;2741
+35 ;;21,"68115-0440-20 ")
+36 ;;2742
+37 ;;21,"68115-0440-21 ")
+38 ;;2743
+39 ;;21,"68115-0440-28 ")
+40 ;;2744
+41 ;;21,"68115-0440-30 ")
+42 ;;2745
+43 ;;21,"68115-0440-40 ")
+44 ;;2746
+45 ;;21,"68115-0440-45 ")
+46 ;;2747
+47 ;;21,"68115-0440-48 ")
+48 ;;2748
+49 ;;21,"68115-0440-50 ")
+50 ;;2749
+51 ;;21,"68115-0440-56 ")
+52 ;;2750
+53 ;;21,"68115-0440-60 ")
+54 ;;2751
+55 ;;21,"68115-0440-90 ")
+56 ;;2752
+57 ;;21,"68115-0440-97 ")
+58 ;;2753
+59 ;;21,"68115-0440-99 ")
+60 ;;2754
+61 ;;21,"68115-0450-30 ")
+62 ;;2755
+63 ;;21,"68115-0546-00 ")
+64 ;;2756
+65 ;;21,"68258-1050-01 ")
+66 ;;2757
+67 ;;21,"68258-7013-01 ")
+68 ;;2758
+69 ;;21,"68258-7013-02 ")
+70 ;;2759
+71 ;;21,"68258-7013-03 ")
+72 ;;2760
+73 ;;21,"68258-7013-09 ")
+74 ;;2761
+75 ;;21,"68258-7019-09 ")
+76 ;;2762
+77 ;;21,"68258-7061-05 ")
+78 ;;2763
+79 ;;21,"68258-7094-05 ")
+80 ;;2764
+81 ;;21,"68258-7100-01 ")
+82 ;;2765
+83 ;;21,"68258-7100-02 ")
+84 ;;2766
+85 ;;21,"68258-7100-03 ")
+86 ;;2767
+87 ;;21,"68258-7100-06 ")
+88 ;;2768
+89 ;;21,"68258-7100-09 ")
+90 ;;2769
+91 ;;21,"68258-9095-01 ")
+92 ;;2770
+93 ;;21,"68387-0108-30 ")
+94 ;;2771
+95 ;;21,"68387-0108-60 ")
+96 ;;2772
+97 ;;21,"68387-0108-90 ")
+98 ;;2773
+99 ;;21,"68387-0340-24 ")
+100 ;;2774
+101 ;;21,"68387-0340-30 ")
+102 ;;2775
+103 ;;21,"68387-0340-45 ")
+104 ;;2776
+105 ;;21,"68387-0340-60 ")
+106 ;;2777
+107 ;;21,"68387-0340-90 ")
+108 ;;2778
+109 ;;21,"68387-0342-60 ")
+110 ;;2779
+111 ;;21,"68387-0375-30 ")
+112 ;;2780
+113 ;;21,"68387-0375-90 ")
+114 ;;2781
+115 ;;21,"68387-0500-10 ")
+116 ;;2782
+117 ;;21,"68387-0500-12 ")
+118 ;;2783
+119 ;;21,"68387-0500-15 ")
+120 ;;2784
+121 ;;21,"68387-0500-30 ")
+122 ;;2785
+123 ;;21,"68387-0500-45 ")
+124 ;;2786
+125 ;;21,"68387-0500-60 ")
+126 ;;2787
+127 ;;21,"68387-0500-90 ")
+128 ;;2788
+129 ;;21,"68387-0502-90 ")
+130 ;;2789
+131 ;;21,"68387-0575-14 ")
+132 ;;2790
+133 ;;21,"68387-0575-60 ")
+134 ;;2791
+135 ;;21,"68387-0600-12 ")
+136 ;;2792
+137 ;;21,"68387-0600-15 ")
+138 ;;2793
+139 ;;21,"68387-0600-30 ")
+140 ;;2794
+141 ;;21,"68387-0600-45 ")
+142 ;;2795
+143 ;;21,"68387-0600-60 ")
+144 ;;2796
+145 ;;21,"68387-0600-90 ")
+146 ;;2797
+147 ;;21,"68453-0950-10 ")
+148 ;;2798
+149 ;;21,"68462-0552-01 ")
+150 ;;2799
+151 ;;21,"68462-0553-01 ")
+152 ;;2800
+153 ;;21,"68462-0553-10 ")
+154 ;;2801
+155 ;;21,"76218-1219-01 ")
+156 ;;2802
+157 ;;21,"76519-0100-01 ")
+158 ;;2803
+159 ;;21,"76519-0100-02 ")
+160 ;;2804
+161 ;;21,"76519-0100-03 ")
+162 ;;2805
+163 ;;21,"76519-0100-05 ")
+164 ;;2806
+165 ;;21,"76519-0100-06 ")
+166 ;;2807
+167 ;;21,"76519-0100-07 ")
+168 ;;2808
+169 ;;21,"76519-0100-09 ")
+170 ;;2809
+171 ;;9002226,804,.01)
+172 ;;BGP HEDIS SKL MUSCLE RELAX NDC
+173 ;;9002226,804,.02)
+174 ;;@
+175 ;;9002226,804,.04)
+176 ;;n
+177 ;;9002226,804,.06)
+178 ;;@
+179 ;;9002226,804,.08)
+180 ;;@
+181 ;;9002226,804,.09)
+182 ;;3120829
+183 ;;9002226,804,.11)
+184 ;;@
+185 ;;9002226,804,.12)
+186 ;;@
+187 ;;9002226,804,.13)
+188 ;;1
+189 ;;9002226,804,.14)
+190 ;;@
+191 ;;9002226,804,.15)
+192 ;;@
+193 ;;9002226,804,.16)
+194 ;;@
+195 ;;9002226,804,.17)
+196 ;;@
+197 ;;9002226,804,3101)
+198 ;;@
+199 ;;9002226.02101,"804,00005-3562-23 ",.01)
+200 ;;00005-3562-23
+201 ;;9002226.02101,"804,00005-3562-23 ",.02)
+202 ;;00005-3562-23
+203 ;;9002226.02101,"804,00005-3563-23 ",.01)
+204 ;;00005-3563-23
+205 ;;9002226.02101,"804,00005-3563-23 ",.02)
+206 ;;00005-3563-23
+207 ;;9002226.02101,"804,00005-3563-31 ",.01)
+208 ;;00005-3563-31
+209 ;;9002226.02101,"804,00005-3563-31 ",.02)
+210 ;;00005-3563-31
+211 ;;9002226.02101,"804,00006-0931-28 ",.01)
+212 ;;00006-0931-28
+213 ;;9002226.02101,"804,00006-0931-28 ",.02)
+214 ;;00006-0931-28
+215 ;;9002226.02101,"804,00031-7409-87 ",.01)
+216 ;;00031-7409-87
+217 ;;9002226.02101,"804,00031-7409-87 ",.02)
+218 ;;00031-7409-87
+219 ;;9002226.02101,"804,00031-7409-94 ",.01)
+220 ;;00031-7409-94
+221 ;;9002226.02101,"804,00031-7409-94 ",.02)
+222 ;;00031-7409-94
+223 ;;9002226.02101,"804,00031-7429-63 ",.01)
+224 ;;00031-7429-63
+225 ;;9002226.02101,"804,00031-7429-63 ",.02)
+226 ;;00031-7429-63
+227 ;;9002226.02101,"804,00031-7449-63 ",.01)
+228 ;;00031-7449-63
+229 ;;9002226.02101,"804,00031-7449-63 ",.02)
+230 ;;00031-7449-63
+231 ;;9002226.02101,"804,00031-7449-70 ",.01)
+232 ;;00031-7449-70
+233 ;;9002226.02101,"804,00031-7449-70 ",.02)
+234 ;;00031-7449-70
+235 ;;9002226.02101,"804,00037-2001-01 ",.01)
+236 ;;00037-2001-01
+237 ;;9002226.02101,"804,00037-2001-01 ",.02)
+238 ;;00037-2001-01
+239 ;;9002226.02101,"804,00037-2001-03 ",.01)
+240 ;;00037-2001-03
+241 ;;9002226.02101,"804,00037-2001-03 ",.02)
+242 ;;00037-2001-03
+243 ;;9002226.02101,"804,00037-2001-85 ",.01)
+244 ;;00037-2001-85
+245 ;;9002226.02101,"804,00037-2001-85 ",.02)
+246 ;;00037-2001-85
+247 ;;9002226.02101,"804,00037-2103-01 ",.01)
+248 ;;00037-2103-01
+249 ;;9002226.02101,"804,00037-2103-01 ",.02)
+250 ;;00037-2103-01
+251 ;;9002226.02101,"804,00037-2103-03 ",.01)
+252 ;;00037-2103-03
+253 ;;9002226.02101,"804,00037-2103-03 ",.02)
+254 ;;00037-2103-03
+255 ;;9002226.02101,"804,00037-2103-85 ",.01)
+256 ;;00037-2103-85
+257 ;;9002226.02101,"804,00037-2103-85 ",.02)
+258 ;;00037-2103-85
+259 ;;9002226.02101,"804,00037-2250-10 ",.01)
+260 ;;00037-2250-10
+261 ;;9002226.02101,"804,00037-2250-10 ",.02)
+262 ;;00037-2250-10
+263 ;;9002226.02101,"804,00037-2250-30 ",.01)
+264 ;;00037-2250-30
+265 ;;9002226.02101,"804,00037-2250-30 ",.02)
+266 ;;00037-2250-30
+267 ;;9002226.02101,"804,00037-2403-01 ",.01)
+268 ;;00037-2403-01
+269 ;;9002226.02101,"804,00037-2403-01 ",.02)
+270 ;;00037-2403-01
+271 ;;9002226.02101,"804,00045-0325-60 ",.01)
+272 ;;00045-0325-60
+273 ;;9002226.02101,"804,00045-0325-60 ",.02)
+274 ;;00045-0325-60
+275 ;;9002226.02101,"804,00045-0325-70 ",.01)
+276 ;;00045-0325-70
+277 ;;9002226.02101,"804,00045-0325-70 ",.02)
+278 ;;00045-0325-70
+279 ;;9002226.02101,"804,00086-0062-10 ",.01)
+280 ;;00086-0062-10
+281 ;;9002226.02101,"804,00086-0062-10 ",.02)
+282 ;;00086-0062-10
+283 ;;9002226.02101,"804,00086-0062-50 ",.01)
+284 ;;00086-0062-50
+285 ;;9002226.02101,"804,00086-0062-50 ",.02)
+286 ;;00086-0062-50
+287 ;;9002226.02101,"804,00089-0221-10 ",.01)
+288 ;;00089-0221-10
+289 ;;9002226.02101,"804,00089-0221-10 ",.02)
+290 ;;00089-0221-10
+291 ;;9002226.02101,"804,00089-0231-10 ",.01)
+292 ;;00089-0231-10
+293 ;;9002226.02101,"804,00089-0231-10 ",.02)
+294 ;;00089-0231-10
+295 ;;9002226.02101,"804,00089-0233-10 ",.01)
+296 ;;00089-0233-10
+297 ;;9002226.02101,"804,00089-0233-10 ",.02)
+298 ;;00089-0233-10
+299 ;;9002226.02101,"804,00089-0540-06 ",.01)
+300 ;;00089-0540-06
+301 ;;9002226.02101,"804,00089-0540-06 ",.02)
+302 ;;00089-0540-06
+303 ;;9002226.02101,"804,00091-7429-63 ",.01)
+304 ;;00091-7429-63
+305 ;;9002226.02101,"804,00091-7429-63 ",.02)
+306 ;;00091-7429-63
+307 ;;9002226.02101,"804,00091-7449-63 ",.01)
+308 ;;00091-7449-63
+309 ;;9002226.02101,"804,00091-7449-63 ",.02)
+310 ;;00091-7449-63
+311 ;;9002226.02101,"804,00091-7449-70 ",.01)
+312 ;;00091-7449-70
+313 ;;9002226.02101,"804,00091-7449-70 ",.02)
+314 ;;00091-7449-70
+315 ;;9002226.02101,"804,00093-0542-01 ",.01)
+316 ;;00093-0542-01
+317 ;;9002226.02101,"804,00093-0542-01 ",.02)
+318 ;;00093-0542-01
+319 ;;9002226.02101,"804,00093-0542-05 ",.01)
+320 ;;00093-0542-05
+321 ;;9002226.02101,"804,00093-0542-05 ",.02)
+322 ;;00093-0542-05
+323 ;;9002226.02101,"804,00093-1919-19 ",.01)
+324 ;;00093-1919-19
+325 ;;9002226.02101,"804,00093-1919-19 ",.02)
+326 ;;00093-1919-19
+327 ;;9002226.02101,"804,00093-1919-93 ",.01)
+328 ;;00093-1919-93
+329 ;;9002226.02101,"804,00093-1919-93 ",.02)
+330 ;;00093-1919-93
+331 ;;9002226.02101,"804,00095-0150-06 ",.01)
+332 ;;00095-0150-06
+333 ;;9002226.02101,"804,00095-0150-06 ",.02)
+334 ;;00095-0150-06
+335 ;;9002226.02101,"804,00095-0300-06 ",.01)
+336 ;;00095-0300-06
+337 ;;9002226.02101,"804,00095-0300-06 ",.02)
+338 ;;00095-0300-06
+339 ;;9002226.02101,"804,00115-2011-01 ",.01)
+340 ;;00115-2011-01
+341 ;;9002226.02101,"804,00115-2011-01 ",.02)
+342 ;;00115-2011-01
+343 ;;9002226.02101,"804,00115-2011-02 ",.01)
+344 ;;00115-2011-02
+345 ;;9002226.02101,"804,00115-2011-02 ",.02)
+346 ;;00115-2011-02
+347 ;;9002226.02101,"804,00143-1176-01 ",.01)
+348 ;;00143-1176-01
+349 ;;9002226.02101,"804,00143-1176-01 ",.02)
+350 ;;00143-1176-01
+351 ;;9002226.02101,"804,00143-1176-05 ",.01)
+352 ;;00143-1176-05
+353 ;;9002226.02101,"804,00143-1176-05 ",.02)
+354 ;;00143-1176-05
+355 ;;9002226.02101,"804,00143-1176-10 ",.01)
+356 ;;00143-1176-10
+357 ;;9002226.02101,"804,00143-1176-10 ",.02)
+358 ;;00143-1176-10
+359 ;;9002226.02101,"804,00143-1290-01 ",.01)
+360 ;;00143-1290-01
+361 ;;9002226.02101,"804,00143-1290-01 ",.02)
+362 ;;00143-1290-01
+363 ;;9002226.02101,"804,00143-1290-05 ",.01)
+364 ;;00143-1290-05
+365 ;;9002226.02101,"804,00143-1290-05 ",.02)
+366 ;;00143-1290-05
+367 ;;9002226.02101,"804,00143-1292-01 ",.01)
+368 ;;00143-1292-01
+369 ;;9002226.02101,"804,00143-1292-01 ",.02)
+370 ;;00143-1292-01
+371 ;;9002226.02101,"804,00143-1292-05 ",.01)
+372 ;;00143-1292-05
+373 ;;9002226.02101,"804,00143-1292-05 ",.02)
+374 ;;00143-1292-05
+375 ;;9002226.02101,"804,00143-9749-01 ",.01)
+376 ;;00143-9749-01
+377 ;;9002226.02101,"804,00143-9749-01 ",.02)
+378 ;;00143-9749-01
+379 ;;9002226.02101,"804,00143-9749-05 ",.01)
+380 ;;00143-9749-05
+381 ;;9002226.02101,"804,00143-9749-05 ",.02)
+382 ;;00143-9749-05
+383 ;;9002226.02101,"804,00143-9749-10 ",.01)
+384 ;;00143-9749-10
+385 ;;9002226.02101,"804,00143-9749-10 ",.02)
+386 ;;00143-9749-10
+387 ;;9002226.02101,"804,00172-2813-60 ",.01)
+388 ;;00172-2813-60
+389 ;;9002226.02101,"804,00172-2813-60 ",.02)
+390 ;;00172-2813-60
+391 ;;9002226.02101,"804,00182-0573-89 ",.01)
+392 ;;00182-0573-89
+393 ;;9002226.02101,"804,00182-0573-89 ",.02)
+394 ;;00182-0573-89
+395 ;;9002226.02101,"804,00182-1919-00 ",.01)
+396 ;;00182-1919-00
+397 ;;9002226.02101,"804,00182-1919-00 ",.02)
+398 ;;00182-1919-00
+399 ;;9002226.02101,"804,00182-1919-89 ",.01)
+400 ;;00182-1919-89
+401 ;;9002226.02101,"804,00182-1919-89 ",.02)
+402 ;;00182-1919-89
+403 ;;9002226.02101,"804,00185-0022-01 ",.01)
+404 ;;00185-0022-01
+405 ;;9002226.02101,"804,00185-0022-01 ",.02)
+406 ;;00185-0022-01
+407 ;;9002226.02101,"804,00185-0022-10 ",.01)
+408 ;;00185-0022-10
+409 ;;9002226.02101,"804,00185-0022-10 ",.02)
+410 ;;00185-0022-10
+411 ;;9002226.02101,"804,00185-0448-01 ",.01)
+412 ;;00185-0448-01
+413 ;;9002226.02101,"804,00185-0448-01 ",.02)
+414 ;;00185-0448-01
+415 ;;9002226.02101,"804,00185-0448-10 ",.01)
+416 ;;00185-0448-10
+417 ;;9002226.02101,"804,00185-0448-10 ",.02)
+418 ;;00185-0448-10
+419 ;;9002226.02101,"804,00185-0713-01 ",.01)
+420 ;;00185-0713-01
+421 ;;9002226.02101,"804,00185-0713-01 ",.02)
+422 ;;00185-0713-01
+423 ;;9002226.02101,"804,00185-0713-05 ",.01)
+424 ;;00185-0713-05
+425 ;;9002226.02101,"804,00185-0713-05 ",.02)
+426 ;;00185-0713-05
+427 ;;9002226.02101,"804,00185-0714-01 ",.01)
+428 ;;00185-0714-01
+429 ;;9002226.02101,"804,00185-0714-01 ",.02)
+430 ;;00185-0714-01
+431 ;;9002226.02101,"804,00185-0724-01 ",.01)
+432 ;;00185-0724-01
+433 ;;9002226.02101,"804,00185-0724-01 ",.02)
+434 ;;00185-0724-01
+435 ;;9002226.02101,"804,00185-0724-05 ",.01)
+436 ;;00185-0724-05
+437 ;;9002226.02101,"804,00185-0724-05 ",.02)
+438 ;;00185-0724-05
+439 ;;9002226.02101,"804,00185-0749-01 ",.01)
+440 ;;00185-0749-01
+441 ;;9002226.02101,"804,00185-0749-01 ",.02)
+442 ;;00185-0749-01
+443 ;;9002226.02101,"804,00247-0013-00 ",.01)
+444 ;;00247-0013-00
+445 ;;9002226.02101,"804,00247-0013-00 ",.02)
+446 ;;00247-0013-00
+447 ;;9002226.02101,"804,00247-0013-03 ",.01)
+448 ;;00247-0013-03
+449 ;;9002226.02101,"804,00247-0013-03 ",.02)
+450 ;;00247-0013-03
+451 ;;9002226.02101,"804,00247-0013-06 ",.01)
+452 ;;00247-0013-06
+453 ;;9002226.02101,"804,00247-0013-06 ",.02)
+454 ;;00247-0013-06
+455 ;;9002226.02101,"804,00247-0013-07 ",.01)
+456 ;;00247-0013-07
+457 ;;9002226.02101,"804,00247-0013-07 ",.02)
+458 ;;00247-0013-07
+459 ;;9002226.02101,"804,00247-0013-08 ",.01)
+460 ;;00247-0013-08
+461 ;;9002226.02101,"804,00247-0013-08 ",.02)
+462 ;;00247-0013-08
+463 ;;9002226.02101,"804,00247-0013-09 ",.01)
+464 ;;00247-0013-09
+465 ;;9002226.02101,"804,00247-0013-09 ",.02)
+466 ;;00247-0013-09
+467 ;;9002226.02101,"804,00247-0013-15 ",.01)
+468 ;;00247-0013-15
+469 ;;9002226.02101,"804,00247-0013-15 ",.02)
+470 ;;00247-0013-15
+471 ;;9002226.02101,"804,00247-0013-18 ",.01)
+472 ;;00247-0013-18
+473 ;;9002226.02101,"804,00247-0013-18 ",.02)
+474 ;;00247-0013-18
+475 ;;9002226.02101,"804,00247-0013-20 ",.01)
+476 ;;00247-0013-20
+477 ;;9002226.02101,"804,00247-0013-20 ",.02)
+478 ;;00247-0013-20
+479 ;;9002226.02101,"804,00247-0013-21 ",.01)
+480 ;;00247-0013-21
+481 ;;9002226.02101,"804,00247-0013-21 ",.02)
+482 ;;00247-0013-21
+483 ;;9002226.02101,"804,00247-0013-25 ",.01)
+484 ;;00247-0013-25
+485 ;;9002226.02101,"804,00247-0013-25 ",.02)
+486 ;;00247-0013-25
+487 ;;9002226.02101,"804,00247-0013-28 ",.01)
+488 ;;00247-0013-28
+489 ;;9002226.02101,"804,00247-0013-28 ",.02)
+490 ;;00247-0013-28
+491 ;;9002226.02101,"804,00247-0013-30 ",.01)
+492 ;;00247-0013-30
+493 ;;9002226.02101,"804,00247-0013-30 ",.02)
+494 ;;00247-0013-30
+495 ;;9002226.02101,"804,00247-0013-40 ",.01)
+496 ;;00247-0013-40
+497 ;;9002226.02101,"804,00247-0013-40 ",.02)
+498 ;;00247-0013-40
+499 ;;9002226.02101,"804,00247-0013-60 ",.01)
+500 ;;00247-0013-60
+501 ;;9002226.02101,"804,00247-0013-60 ",.02)
+502 ;;00247-0013-60
+503 ;;9002226.02101,"804,00247-0013-98 ",.01)
+504 ;;00247-0013-98
+505 ;;9002226.02101,"804,00247-0013-98 ",.02)
+506 ;;00247-0013-98
+507 ;;9002226.02101,"804,00247-0088-00 ",.01)
+508 ;;00247-0088-00
+509 ;;9002226.02101,"804,00247-0088-00 ",.02)
+510 ;;00247-0088-00
+511 ;;9002226.02101,"804,00247-0088-02 ",.01)
+512 ;;00247-0088-02
+513 ;;9002226.02101,"804,00247-0088-02 ",.02)
+514 ;;00247-0088-02
+515 ;;9002226.02101,"804,00247-0088-04 ",.01)
+516 ;;00247-0088-04
+517 ;;9002226.02101,"804,00247-0088-04 ",.02)
+518 ;;00247-0088-04
+519 ;;9002226.02101,"804,00247-0088-07 ",.01)
+520 ;;00247-0088-07
+521 ;;9002226.02101,"804,00247-0088-07 ",.02)
+522 ;;00247-0088-07
+523 ;;9002226.02101,"804,00247-0088-14 ",.01)
+524 ;;00247-0088-14
+525 ;;9002226.02101,"804,00247-0088-14 ",.02)
+526 ;;00247-0088-14
+527 ;;9002226.02101,"804,00247-0088-15 ",.01)
+528 ;;00247-0088-15
+529 ;;9002226.02101,"804,00247-0088-15 ",.02)
+530 ;;00247-0088-15