topic Re: F4 Help in Application Development and Automation Discussions

F4 Help

Former Member — Wed, 10 Oct 2007 13:57:02 GMT

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.

Re: F4 Help

Former Member — Wed, 10 Oct 2007 14:01:11 GMT

HI,

If u select the values in F4 Help,it will automatically get displayed in that Parameter Field.

Regards,

Padmam.

Re: F4 Help

Former Member — Wed, 10 Oct 2007 14:04:36 GMT

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

Re: F4 Help

Former Member — Wed, 10 Oct 2007 14:06:40 GMT

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.

Re: F4 Help

Former Member — Wed, 10 Oct 2007 14:10:43 GMT

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

Re: F4 Help

Former Member — Wed, 10 Oct 2007 14:22:46 GMT

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.

Re: F4 Help

Former Member — Wed, 10 Oct 2007 16:20:14 GMT

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.