Search on this Website

Thursday, September 25, 2008

How to Hide Parameters on Selection Screen



REPORT ZSACHIN_ALV_DEEP27.

*----------------------------------------------------------------------*
* T A B L E S *
*----------------------------------------------------------------------*

tables: mara, skb1, BSEG.

*----------------------------------------------------------------------*
* S E L E C T I O N S C R E E N *
*----------------------------------------------------------------------*

selection-screen: Begin of block b1 with frame title text-001.

parameters : R1 radiobutton group g1 default 'X' user-command AA.

select-options : s_bukrs for skb1-bukrs MODIF ID AA.
parameters : p_GJAHR type bseg-GJAHR MODIF ID AA.
parameters : p_MONAT type bkpf-MONAT MODIF ID AA.
select-options : s_SEG for BSEG-SEGMENT MODIF ID AA.

parameters : R2 radiobutton group g1.

select-options: s1_bukrs for skb1-bukrs MODIF ID CC.
parameters: p1_GJAHR type bseg-GJAHR MODIF ID CC.
parameters: p1_MONAT type bkpf-MONAT MODIF ID CC.
select-options: s1_SEG for bseg-SEGMENT MODIF ID CC.
select-options: s1_PRCTR for bseg-PRCTR MODIF ID CC.

selection-screen: end of block b1.


*----------------------------------------------------------------------*
* AT S E L E C T I O N S C R E E N O U T P U T *
*----------------------------------------------------------------------*

At selection-screen output.

If R1 = 'X'.

loop at screen.

if screen-group1 = 'AA'.
screen-input = '1'.
modify screen.
endif.

if screen-group1 = 'CC'.
screen-input = '0'.
modify screen.
endif.

endloop.

elseif R2 = 'X'.

loop at screen.

if screen-group1 = 'AA'.
screen-input = '0'.
modify screen.
endif.

if screen-group1 = 'CC'.
screen-input = '1'.
modify screen.
endif.

endloop.

endif.


No comments: