‎2007 May 07 8:57 AM
‎2007 May 07 8:59 AM
‎2007 May 07 9:04 AM
If you mean to clear all fields at selection screen (by refreshing) create a button to refresh, do as below, fastest way to do it with minimum code.
BEGIN OF LINE,
PUSHBUTTON 2(83) text-020 USER-COMMAND cli1,
END OF LINE
********************************
AT SELECTION-SCREEN.
IF sscrfields-ucomm = c_purge_click.
SUBMIT <Same prog name> VIA SELECTION-SCREEN
AND RETURN.
ENDIF.
Pls. reward point if helpfull.
Thanks
Sachin
‎2007 May 07 9:05 AM
Hi,
You can use AT Selection screen output event.
Under this event. you can modify the screen attributes.
Reward if useful,
Thanks,
USR
‎2007 May 07 9:06 AM
Here is a piece of code....
It is basically for on click of radio button....
************************************************************************
S E L E C T I O N - S C R E E N *
************************************************************************
selection-screen begin of block blk3 with frame title text-t03.
parameters : p_fr1 radiobutton group gr2 user-command CLICK ,
p_bk1 radiobutton group gr2 .
selection-screen end of block blk3 .
selection-screen begin of block blk1 with frame title text-t01 .
parameters : p_file like rlgrap-filename .
parameters : p_erf like rlgrap-filename .
selection-screen end of block blk1 .
selection-screen begin of block blk2 with frame title text-t02 .
parameters : dsn like rlgrap-filename default '/interf/thaon_vosges'.
parameters :dsn_err like rlgrap-filename default '/interf/thaon_vosges'.
selection-screen end of block blk2 .
************************************************************************
**
A T S E L E C T I O N - S C R E E N
**
************************************************************************
at selection-screen on value-request for p_file .
call function 'F4_FILENAME'
importing
file_name = vv_file.
p_file = vv_file .
at selection-screen on value-request for p_erf .
call function 'F4_FILENAME'
importing
file_name = vv_file2.
p_erf = vv_file2 .
at selection-screen output .
IF V_INITIAL IS INITIAL .
LOOP AT SCREEN .
if screen-name cs 'DSN' or
screen-name cs 'DSN_ERR' .
"screen-name cs 'P_FILE' or
"screen-name cs 'P_ERRF' OR
" screen-name cs 'P_FORE' or
" screen-name cs 'P_BACK' OR
"screen-name cs 'P_ERR' .
screen-active = 0 .
modify screen .
endif.
ADD 1 TO V_INITIAL .
ENDLOOP .
ENDIF.
if p_fr1 = 'X' .
loop at screen .
if screen-name cs 'DSN' or
screen-name cs 'DSN_ERR' .
screen-active = 0 .
modify screen .
endif.
endloop .
elseif p_bk1 = 'X'.
loop at screen .
if screen-name cs 'P_FILE' or
screen-name cs 'P_ERF' .
screen-active = 0 .
The code is for ... if you select the radio button... then some more elements will appear on the screen...
Regards,
Jayant ..
<b>Please award if helpful</b>