10-10-2007 2:57 PM
Hi everyone,
I have created a F4 Help on a field and populating the F4 help by selecting the data at selection screen POV.
I want to now select one line from the f4 help and want the value to appear in the Parameters.
Nimisha Gandhi.
10-10-2007 3:06 PM
Hi Nimisha,
Since u say u have created F4 help, u must have used FM F4IF_INT_TABLE_VALUE_REQUEST or anything similar to it.
If u have used FM F4IF_INT_TABLE_VALUE_REQUEST then in the interface of it,
there is Dynprofield. Pass the name of the dynpro field. U will get the choosen value.
Thank you.
10-10-2007 3:01 PM
HI,
If u select the values in F4 Help,it will automatically get displayed in that Parameter Field.
Regards,
Padmam.
10-10-2007 3:04 PM
hi nimisha,
once u get to see all the values through f4 help, jst double click on any one of those values, and it will automatically be updated in your parameter.
this should solve your problem.
reward if useful.
regds,
ritika malhotra
10-10-2007 3:06 PM
Hi Nimisha,
Since u say u have created F4 help, u must have used FM F4IF_INT_TABLE_VALUE_REQUEST or anything similar to it.
If u have used FM F4IF_INT_TABLE_VALUE_REQUEST then in the interface of it,
there is Dynprofield. Pass the name of the dynpro field. U will get the choosen value.
Thank you.
10-10-2007 3:10 PM
Hi,
here a short example:
TABLES: MAKT.
*
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN: COMMENT 01(33) T_MATNR.
PARAMETERS: P_MATNR LIKE MARA-MATNR.
SELECTION-SCREEN: END OF LINE.
*
***********************************************************************
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_MATNR.
*
DATA: BEGIN OF VALUE_TAB OCCURS 0,
MATNR LIKE MAKT-MATNR,
MAKTX LIKE MAKT-MAKTX,
END OF VALUE_TAB.
*
DATA: BEGIN OF RETURN_TAB OCCURS 0.
INCLUDE STRUCTURE DDSHRETVAL.
DATA END OF RETURN_TAB.
*
SELECT MATNR MAKTX FROM MAKT UP TO 15 ROWS
INTO TABLE VALUE_TAB WHERE SPRAS = SY-LANGU.
*
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
RETFIELD = 'MATNR'
WINDOW_TITLE = 'Statusselektion'
VALUE_ORG = 'S' "hierdurch kann die Struktur genommen werden
TABLES
VALUE_TAB = VALUE_TAB
RETURN_TAB = RETURN_TAB
EXCEPTIONS
PARAMETER_ERROR = 1
NO_VALUES_FOUND = 2
OTHERS = 3.
*
IF SY-SUBRC <> 0.
MESSAGE I010 WITH SY-SUBRC.
ELSE.
P_MATNR = RETURN_TAB-FIELDVAL.
ENDIF.
*
***********************************************************************
INITIALIZATION.
*
T_MATNR = 'Material OWN F4:'.
*
Regards, Dieter
10-10-2007 3:22 PM
Hi ,
I tried giving the Dynpro Name also in the function Module but it is not working.
Following is the ABAP COde in the Function Module.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_query.
field_value-fieldname = 'P_QUERY'.
APPEND field_value TO dynpro_values.
CALL FUNCTION 'DYNP_VALUES_READ'
EXPORTING
dyname = sy-cprog
dynumb = sy-dynnr
translate_to_upper = 'X'
REQUEST = ' '
PERFORM_CONVERSION_EXITS = ' '
PERFORM_INPUT_CONVERSION = ' '
DETERMINE_LOOP_INDEX = ' '
START_SEARCH_IN_CURRENT_SCREEN = ' '
START_SEARCH_IN_MAIN_SCREEN = ' '
START_SEARCH_IN_STACKED_SCREEN = ' '
START_SEARCH_ON_SCR_STACKPOS = ' '
SEARCH_OWN_SUBSCREENS_FIRST = ' '
SEARCHPATH_OF_SUBSCREEN_AREAS = ' '
TABLES
dynpfields = dynpro_values
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.
READ TABLE dynpro_values INDEX 1 INTO field_value.
SELECT eltuid FROM rsrparametriza INTO TABLE values_tab . ..
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
DDIC_STRUCTURE = ' '
retfield = 'P_QUERY'
PVALKEY = ' '
dynpprog = sy-cprog
dynpnr = sy-dynnr
DYNPROFIELD = ' '
STEPL = 0
WINDOW_TITLE =
VALUE = ' '
value_org = 'S'
MULTIPLE_CHOICE = ' '
DISPLAY = ' '
CALLBACK_PROGRAM = ' '
CALLBACK_FORM = ' '
MARK_TAB =
IMPORTING
USER_RESET =
TABLES
value_tab = values_tab
FIELD_TAB =
return_tab = return
DYNPFLD_MAPPING =
EXCEPTIONS
PARAMETER_ERROR = 1
NO_VALUES_FOUND = 2
OTHERS = 3
.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ELSE.
p_query = return-fieldval.
ENDIF.
10-10-2007 5:20 PM
Hi,
After you get the value from the user, use te following FM
Data: dynp_values TYPE STANDARD TABLE OF dynpread ,
wa_dynp_values TYPE dynpread.
REFRESH dynp_values.
wa_dynp_values-fieldname = 'P_QUERY'.
wa_dynp_values-fieldvalue = <<ur value>>.
APPEND wa_dynp_values TO dynp_values.
CALL FUNCTION 'DYNP_VALUES_UPDATE'
EXPORTING
dyname = <b>sy-repid</b> --> check this
dynumb = sy-dynnr
TABLES
dynpfields = dynp_values
EXCEPTIONS
OTHERS = 04.