‎2007 Apr 27 9:28 AM
Hi, i'm using F4IF_START_VALUE_REQUEST to show my match-code but once i select an item, this item is not transfered to the field of my dynpro.
Here's the code
MODULE SHOW_MATCH_CODE INPUT.
TYPE-POOLS: SHLP.
DATA: l_shlp type shlp_descr_t,
l_return_values like ddshretval occurs 0 with header line.
DATA: l_values_dynpro type standard table of dynpread,
l_wa_values_dynpro type dynpread.
DATA: interface like ddshiface OCCURS 0 WITH HEADER LINE,
l_prog_name like sy-repid.
l_prog_name = sy-repid.
l_wa_values_dynpro-fieldname = 'P0002-GBDEP'.
append l_wa_values_dynpro to l_values_dynpro.
CALL FUNCTION 'DYNP_VALUES_READ'
EXPORTING
DYNAME = l_prog_name
DYNUMB = sy-dynnr
TRANSLATE_TO_UPPER = ' '
REQUEST = ' '
PERFORM_CONVERSION_EXITS = ' '
PERFORM_INPUT_CONVERSION = ' '
DETERMINE_LOOP_INDEX = ' '
TABLES
DYNPFIELDS = l_values_dynpro
EXCEPTIONS
INVALID_ABAPWORKAREA = 1
INVALID_DYNPROFIELD = 2
INVALID_DYNPRONAME = 3
INVALID_DYNPRONUMMER = 4
INVALID_REQUEST = 5
NO_FIELDDESCRIPTION = 6
INVALID_PARAMETER = 7
UNDEFIND_ERROR = 8
DOUBLE_CONVERSION = 9
STEPL_NOT_FOUND = 10
OTHERS = 11
.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
clear: l_wa_values_dynpro.
read table l_values_dynpro into l_wa_values_dynpro index 1.
interface-shlpfield = 'GBDEP'.
interface-value = l_wa_values_dynpro-fieldvalue.
APPEND interface.
*
*AT SELECTION-SCREEN on VALUE-REQUEST FOR ppp.
call function 'F4IF_GET_SHLP_DESCR'
exporting
shlpname = 'Z22_HR_PA_MT_POB'
importing
shlp = l_shlp.
l_shlp-interface[] = interface[].
Process standard searchhelp
call function 'F4IF_START_VALUE_REQUEST'
exporting
shlp = l_shlp
tables
return_values = l_return_values.
ENDMODULE. " SHOW_MATCH_CODE INPUT
‎2007 Apr 27 9:35 AM
hi
good
Please check below sample codes from program REXPDSEL.
...
call function 'F4IF_GET_SHLP_DESCR'
exporting
shlpname = 'PRPM'
shlptype = 'SH'
importing
shlp = g_shlp_descr_t.
loop at g_shlp_descr_t-interface into
gwa_shlp_descr_t_interface.
if gwa_shlp_descr_t_interface = 'POSID'.
gwa_shlp_descr_t_interface-valfield = 'X'.
modify g_shlp_descr_t-interface from
gwa_shlp_descr_t_interface.
endif.
endloop.
call function 'F4IF_START_VALUE_REQUEST'
exporting
shlp = g_shlp_descr_t
maxrecords = 500
multisel = 'X'
tables
return_values = gt_return_tab.
thanks
mrutyun^