How to display the selection screen fields for selected checkboxes

Question

Hi all,
         I have 7 checkboxes, for each check box we have some seletion screen fields.if i select first check box,i want to display first slection screen fields only.
and if we select more than one check box how to display the selection screen fields for selected check boxes,please help me this
Thanks
sriman.

Answer 1

hi,
Try this code
report z_13317_sdn2.
tables : mara, marc, dd03l.
parameters : p_chk1 as checkbox user-command ABC,
             p_chk2 as checkbox user-command PQR,
             p_chk3 as checkbox user-command XYZ.
select-options : s_matnr for mara-matnr modif id A,
                 s_ersda for mara-ersda modif id A,
                 s_werks for marc-werks modif id B,
                 s_lvorm for marc-lvorm modif id B,
                 s_tab for dd03l-tabname modif id C.
data: v_chk1,
      v_chk2,
      v_chk3.
at selection-screen output.
  loop at screen.
    if screen-group1 = 'A' or
       screen-group1 = 'B' or
       screen-group1 = 'C'.
        screen-input = 0.
       modify screen.
    endif.
  endloop.
  loop at screen.
    if v_chk1 = 'X'.
      if screen-group1 = 'A'.
        screen-input = 1.
        modify screen.
      endif.
    endif.
    if v_chk2 = 'X'.
      if screen-group1 = 'B'.
        screen-input = 1.
        modify screen.
      endif.
    endif.
    if v_chk3 = 'X'.
      if screen-group1 = 'C'.
        screen-input = 1.
        modify screen.
      endif.
    endif.
  endloop.
at selection-screen.
  if sy-ucomm = 'ABC'.
    if v_chk1 = ' '.
      v_chk1 = 'X'.
    else.
      v_chk1 = ' '.
    endif.
  endif.
  if sy-ucomm = 'PQR'.
    if v_chk2 = ' '.
      v_chk2 = 'X'.
    else.
      v_chk2 = ' '.
    endif.
  endif.
  if sy-ucomm = 'XYZ'.
    if v_chk3 = ' '.
      v_chk3 = 'X'.
    else.
      v_chk3 = ' '.
    endif.
  endif.
Regards,
Sailaja.