‎2006 Mar 21 8:38 AM
Hi Experts,
Presently I am using the function module
'POPUP_WITH_TABLE_DISPLAY'.
Where I am able to find two buttons, choose and cancel.
But as per the req. I need to put a button 'Find',
This button will be used to find the particular record.
What is the possible way of doing it.
Thanks in Advance,
Irfan Hussain
‎2006 Mar 21 8:43 AM
Hi irfan,
1. the best thing would be to POPUP
using ALV functionality.
2. like this
(the parameters in BOLD make it POPUP)
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
it_fieldcat = alvfc
<b> i_screen_start_column = 10
i_screen_start_line = 10
i_screen_end_column = 20
i_screen_end_line = 20</b>
TABLES
t_outtab = itab
EXCEPTIONS
program_error = 1
OTHERS = 2.
3. To get a taste of it,
just copy paste in new program.
REPORT abc.
TYPE-POOLS : slis.
*----
Data
DATA : BEGIN OF itab OCCURS 0.
INCLUDE STRUCTURE t001.
DATA : END OF itab.
DATA : alvfc TYPE slis_t_fieldcat_alv.
*----
Select
SELECT * FROM t001 INTO TABLE itab.
*------- Field Catalogue
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
EXPORTING
i_program_name = sy-repid
i_internal_tabname = 'ITAB'
i_inclname = sy-repid
CHANGING
ct_fieldcat = alvfc
EXCEPTIONS
inconsistent_interface = 1
program_error = 2
OTHERS = 3.
*----
Display
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
it_fieldcat = alvfc
i_screen_start_column = 10
i_screen_start_line = 10
i_screen_end_column = 20
i_screen_end_line = 20
TABLES
t_outtab = itab
EXCEPTIONS
program_error = 1
OTHERS = 2.
regards,
amit m.
‎2006 Mar 21 9:02 AM
Hi Amit,
This is my module pool program.
I have tried with it but, it is not working in module pool.
Can you just suggest the alternative method method.
Regards,
Irfan Hussain
‎2006 Mar 21 8:48 AM
&----
*& Report ZSN_F4TEST *
*& *
&----
*& *
*& *
&----
REPORT ZSN_F4TEST .
data: begin of it_vbak occurs 0,
vbeln like vbak-vbeln,
kunnr like vbak-kunnr,
end of it_vbak.
parameters: vbeln type char10.
at selection-screen on value-request for vbeln.
*--Select to get the sales orders pertaining to a customer.
Select vbeln kunnr
from vbak
into table it_vbak.
call function 'F4IF_INT_TABLE_VALUE_REQUEST'
exporting
DDIC_STRUCTURE = ' '
retfield = 'VBELN'
PVALKEY = ' '
DYNPPROG = sy-repid
DYNPNR = '1000'
DYNPROFIELD = 'VBELN'
STEPL = 0
WINDOW_TITLE =
VALUE = ' '
VALUE_ORG = 'S'
MULTIPLE_CHOICE = ' '
DISPLAY = ' '
CALLBACK_PROGRAM = ' '
CALLBACK_FORM = ' '
MARK_TAB =
IMPORTING
USER_RESET =
tables
value_tab = IT_VBAK
FIELD_TAB =
RETURN_TAB =
DYNPFLD_MAPPING =
EXCEPTIONS
PARAMETER_ERROR = 1
NO_VALUES_FOUND = 2
OTHERS = 3
.
if sy-subrc <> 0.
message i000(zz) with
'No values found'.
endif.
‎2006 Mar 21 8:50 AM
Hi ,
U can use FM 'F4IF_INT_TABLE_VALUE_REQUEST' Which is having filtering and finding buttons along with select and cancel buttons.