Skip to Content
0
Former Member
Feb 19, 2009 at 10:14 AM

I have used F4IF_FIELD_VALUE_REQUEST function module.but i am not getting t

1474 Views

Hi friends,

I have 2 screen fields EQUNR & EQKTX.i have attached custom help to EQUNR.when i select value from f4 help then i want corresponding value from search help should get populated in the EQKTX field.

I have used F4IF_FIELD_VALUE_REQUEST function module.but i am not getting the result.

DATA: lt_return_tab TYPE TABLE OF ddshretval.

DATA: lw_return_tab TYPE ddshretval.

DATA: lv_equnr LIKE eqkt-equnr,

lv_eqktx LIKE eqkt-eqktx.

CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'

EXPORTING

tabname = 'EQKT'

fieldname = 'EQUNR'

searchhelp = 'Z_EQKT'

  • SHLPPARAM = ' '

dynpprog = sy-repid

dynpnr = sy-dynnr

dynprofield = 'GW_SCREEN-WPTXT'

  • STEPL = 0

  • VALUE = ' '

  • MULTIPLE_CHOICE = 'X'

  • DISPLAY = ' '

  • SUPPRESS_RECORDLIST = ' '

  • CALLBACK_PROGRAM = ' '

  • CALLBACK_FORM = ' '

  • SELECTION_SCREEN = ' '

  • IMPORTING

  • USER_RESET =

TABLES

return_tab = lt_return_tab

  • EXCEPTIONS

  • FIELD_NOT_FOUND = 1

  • NO_HELP_FOR_FIELD = 2

  • INCONSISTENT_HELP = 3

  • NO_VALUES_FOUND = 4

  • OTHERS = 5

.

IF sy-subrc = 0.

READ TABLE lt_return_tab INTO lw_return_tab INDEX 1.

IF sy-subrc = 0.

  • MOVE lw_return_tab-fieldval TO lv_equnr.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

EXPORTING

input = lw_return_tab-fieldval

IMPORTING

output = lv_equnr.

SELECT SINGLE eqktx

INTO lv_eqktx

FROM eqkt

WHERE equnr = lv_equnr AND

spras = sy-langu.

IF sy-subrc = 0.

gw_screen-wptxt = lv_eqktx.

gw_screen-equnr = lv_equnr.

ENDIF.

ENDIF.

ENDIF.

Please provide the solution.