hi everyone
i have 2 checkboxes on a selection-screen
when i select one, the other shd be invisible, but my code is not working, can you check that plz
SELECTION-SCREEN: BEGIN OF BLOCK b02 WITH FRAME.
PARAMETERS:
p_rs_ch TYPE c AS CHECKBOX modif id B1 user-command com1,
p_ri_ch TYPE c AS CHECKBOX modif id B1 user-command com1.
SELECTION-SCREEN: END OF BLOCK b02.
INCLUDE zzfl0031obj_b.
*INCLUDE zzfl0031obj_lvp.
INITIALIZATION.
at selection-screen output.
loop at screen.
if p_rs_ch NE 'X' and screen-group1 = 'B1'.
screen-input = '0'.
screen-invisible = '1'.
endif.
if p_ri_ch NE 'X' and screen-group1 = 'B1'.
screen-input = '0'.
screen-invisible = '1'.
endif.
endloop.
PERFORM f_check_authorization.
Ending of modification <CM0554 New Version>
PERFORM init_data.
AT SELECTION-SCREEN.
IF p_rs_ch IS INITIAL AND p_ri_ch IS INITIAL.
MESSAGE e917(zz).
ENDIF.
IF NOT p_rs_ch IS INITIAL.
PERFORM f_check_rights USING 'FINANCE_RS' lc_rs.
ENDIF.