‎2008 Apr 23 7:48 PM
The user wants the custom module pool selection screen to look like a list selection screen. Meaning that they want to have the multiple selection box come up at the end of the field. I don't think that this is possible but maybe someone has some ideas
‎2008 Apr 26 6:36 PM
Use code like the following in your TOP include.
Note that we have defined screen 500 in the code.
Now in your transaction code for this module pool set this as the openingscreen. Please revert in case of any clarifications.
Code.
=AF---
selection-screen : begin of screen 500 as window.
selection-screen : begin of block abc with frame title text-001.
select-options : s_bukrs for mseg-bukrs no intervals no-extension
obligatory.
parameter : p_postdt like mkpf-budat obligatory.
select-options : s_vendor for mseg-lifnr.
selection-screen : end of block abc.
selection-screen : begin of block def with frame title text-002.
parameter : c_fore radiobutton group g1 default 'X',
c_back radiobutton group g1 .
selection-screen : end of block def.
selection-screen : end of screen 500.
at selection-screen.
if sy-ucomm = 'CRET'.
perform get_data.
endif.
‎2008 Apr 23 8:19 PM
Strange requirement....Why not create a z-report with a selection screen and next call screen from module pool? No-body will notice the difference between module pool and report.
‎2008 Apr 26 6:36 PM
Use code like the following in your TOP include.
Note that we have defined screen 500 in the code.
Now in your transaction code for this module pool set this as the openingscreen. Please revert in case of any clarifications.
Code.
=AF---
selection-screen : begin of screen 500 as window.
selection-screen : begin of block abc with frame title text-001.
select-options : s_bukrs for mseg-bukrs no intervals no-extension
obligatory.
parameter : p_postdt like mkpf-budat obligatory.
select-options : s_vendor for mseg-lifnr.
selection-screen : end of block abc.
selection-screen : begin of block def with frame title text-002.
parameter : c_fore radiobutton group g1 default 'X',
c_back radiobutton group g1 .
selection-screen : end of block def.
selection-screen : end of screen 500.
at selection-screen.
if sy-ucomm = 'CRET'.
perform get_data.
endif.