Refreshing problem

Question

Here I have 2 radio buttons.
first it will check with a ztable against entered supplying plant(s_werks)
and receiving plant(r_werks).
when i select first radio button,
it adds one plant(zplants-plant) to the r_werks.
when i select second radio button it adds same plant(zplants-plant) to
the s_werks.
when i run the report first time with selecting either first or second
radio button, it is displaying perfectly.
when i comes back and selects another radio button,
the zplant-plant field is displaying in both the columns, but it has to
display in only one column.
It is not refreshing the selection values....
AT SELECTION-SCREEN ON RADIOBUTTON GROUP R6.
   Select * from zplants
               where reswk in s_werks
                 and werks in r_werks.
     if sy-subrc eq 0.
       if l1_dat = 'X'. " l1 radio button
       r_werks-sign = 'I'.
       r_werks-option = 'EQ'.
       r_werks-low = zplants-plant.
       append r_werks.
       select single * from zritem where
                       l1_dvry in xblnr.
         if sy-subrc eq 0.
         select single * from zrhdr where
                     l1_sto = zritem-l1_sto
                     and receiv_plant in r_werks.
        endif.
      elseif l2_dat = 'X'. " l2 radio button
      s_werks-sign = 'I'.
      s_werks-option = 'EQ'.
      s_werks-low = zplants-plant.
      append s_werks.
      select single * from zritem where
                    l2_dvry in xblnr.
         if sy-subrc = 0.
         select single * from zrhdr where
                       l1_sto = zritem-l1_sto
                       and spply_plant in s_werks.
        endif.
     endif.
   endif.
  endselect.
anybody has solution...

Answer 1

As I look at the code, it appears as if you want to use R_WERKS when the user selects L1_DAT radiobutton and use S_WERKS when the user select L2_DAT radiobutton. If I am correct so far, the I would like to split your logic into two sections.
Section 1.
Do not show s_werks. To achieve this you need to define your radiobuttons as follows:
PARAMETERS: l1_dat RADIOBUTTON GROUP r6 DEFAULT 'X' USER-COMMAND werk,
            l2_dat RADIOBUTTON GROUP r6.
You need to define S_WERKS and R_WERKS as follows:
SELECT-OPTIONS: s_werks FOR zplants-werks MODIF ID swrk,
                r_werks FOR zplants-werks MODIF ID rwrk.
Now you need the following code.
AT SELECTION-SCREEN OUTPUT.
  IF l1_dat = 'X'.
    LOOP AT SCREEN.
      IF screen-group1 = 'SWRK'.
        screen-active = 0.
      ELSE.
        screen-active = 1.
      ENDIF.
      MODIFY SCREEN.
    ENDLOOP.
  ELSEIF l2_dat = 'X'.
    LOOP AT SCREEN.
      IF screen-group1 = 'RWRK'.
        screen-active = 0.
      ELSE.
        screen-active = 1.
      ENDIF.
      MODIFY SCREEN.
    ENDLOOP.
  ENDIF.
Section 2.
I will move your ON RADIOBUTTON GROUP code into the start-of-selection.
Please let me know if I am on the wrong track here.
Srinivas