Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

F4IF_INT_TABLE_VALUE_REQUEST

Former Member
0 Kudos

Hi

i want 2 know what are the parameters we hav 2 pass in this function module???????

and i also want 2 know about DYNP_VALUES_UPDATE ....what is the work of this FM.....

pls help me ...if anybody know the answer...

regards,

AMAYIKA

6 REPLIES 6

Former Member
0 Kudos

http://sapprograms.blogspot.com/2008/04/f4-help-for-month.html

http://sapprograms.blogspot.com/2008/04/f4-help-for-z-table.html

http://sapprograms.blogspot.com/2008/04/f4-help-for-field-with-ztable.html

for another fm..

CALL FUNCTION 'DYNP_VALUES_UPDATE'

EXPORTING

DYNAME = W_DYNAME

DYNUMB = W_DYNUMB

TABLES

DYNPFIELDS = DYNPFIELDS

EXCEPTIONS

INVALID_ABAPWORKAREA = 01

INVALID_DYNPROFIELD = 02

INVALID_DYNPRONAME = 03

INVALID_DYNPRONUMMER = 04

INVALID_REQUEST = 05

NO_FIELDDESCRIPTION = 06

UNDEFIND_ERROR = 07.

Former Member
0 Kudos

Hi Kunu,

DATA : v_return LIKE ddshretval OCCURS 0 WITH HEADER LINE.

SELECT-OPTIONS : s_plant1 FOR

zaw_pol_plan-plant MODIF ID chg NO-EXTENSION NO INTERVALS.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR s_plant1-low .

SELECT werks INTO TABLE i_t001w

FROM t001w.

IF sy-subrc EQ 0.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

retfield = 'WERKS'

dynpprog = ws_repid

dynpnr = sy-dynnr

value_org = 'S'

TABLES

value_tab = i_t001w

return_tab = v_return

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.

ENDIF.

ENDIF.

s_plant1-low = v_return-fieldval.

Former Member
0 Kudos

Hi Kunu,

DATA : v_return LIKE ddshretval OCCURS 0 WITH HEADER LINE.

SELECT-OPTIONS : s_plant1 FOR 
zaw_pol_plan-plant MODIF ID chg NO-EXTENSION NO INTERVALS.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR s_plant1-low .

SELECT werks INTO TABLE i_t001w
FROM t001w.

IF sy-subrc EQ 0.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield = 'WERKS'
dynpprog = ws_repid
dynpnr = sy-dynnr
value_org = 'S'
TABLES
value_tab = i_t001w
return_tab = v_return
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. 
ENDIF.

ENDIF.

s_plant1-low = v_return-fieldval.

Former Member
0 Kudos

Hi,

&----


*& Report ZDE_F4

*&

&----


*&

*&

&----


REPORT ZDE_F4.

selection-screen: begin of block b1.

parameters: vbeln LIKE vbak-vbeln,

p_ernam LIKE vbak-ernam.

selection-screen: end of block b1.

types: begin of ty_vbak,

vbeln LIKE vbak-vbeln,

p_ernam LIKE vbak-ernam,

end of ty_vbak.

data: i_vbak type table of ty_vbak,

w_vbak type ty_vbak.

data: i_dyn type table of DYNPREAD,

w_dyn like line of i_dyn.

at selection-screen on value-request for P_ernam.

w_dyn-fieldname = 'VBELN'.

APPEND W_DYN TO I_DYN.

CALL FUNCTION 'DYNP_VALUES_READ'

EXPORTING

DYNAME = SY-REPID

DYNUMB = SY-DYNNR

TRANSLATE_TO_UPPER = 'X'

  • REQUEST = ' '

  • PERFORM_CONVERSION_EXITS = ' '

  • PERFORM_INPUT_CONVERSION = ' '

  • DETERMINE_LOOP_INDEX = ' '

TABLES

DYNPFIELDS = I_DYN

  • 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 I_DYN INDEX 1 INTO W_DYN.

data: v_DOCU(10) type c.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

EXPORTING

INPUT = W_DYN-FIELDVALUE

IMPORTING

OUTPUT = v_DOCU

.

SELECT VBELN ERNAM FROM VBAK INTO TABLE I_VBAK WHERE VBELN EQ V_DOCU.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

  • DDIC_STRUCTURE = ' '

RETFIELD = 'ERNAM'

  • PVALKEY = ' '

DYNPPROG = SY-REPID

DYNPNR = SY-DYNNR

DYNPROFIELD = 'P_ERNAM'

  • STEPL = 0

  • WINDOW_TITLE =

  • VALUE = ' '

VALUE_ORG = 'S'

  • MULTIPLE_CHOICE = ' '

  • DISPLAY = ' '

  • CALLBACK_PROGRAM = ' '

  • CALLBACK_FORM = ' '

  • MARK_TAB =

  • IMPORTING

  • USER_RESET =

TABLES

VALUE_TAB = I_VBAK

  • FIELD_TAB =

  • RETURN_TAB =

  • 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.

ENDIF.

I think it is useful for you.

Reward points if useful.

Thanks & regards

Deepika

Former Member
0 Kudos

Hi,

The sample code is,

CLEAR wa_dynpread.

wa_dynpread-fieldname = 'ZCAN_HDR-PLANT'.

APPEND wa_dynpread TO it_dynpread.

CALL FUNCTION 'DYNP_VALUES_READ'

EXPORTING

dyname = sy-repid

dynumb = sy-dynnr

  • TRANSLATE_TO_UPPER = ' '

  • request = 'A'

  • 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 = it_dynpread

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 wa_dynpread.

READ TABLE it_dynpread INTO wa_dynpread WITH KEY fieldname = 'ZCAN_HDR-PLANT'.

IF sy-subrc = 0.

SELECT hawb_bl_no plant exbond_no doc_type cha_agent

FROM zcan_cha INTO TABLE it_hawb

WHERE plant = wa_dynpread-fieldvalue.

ENDIF.

REFRESH it_dynpread.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

  • DDIC_STRUCTURE = ' '

retfield = 'HAWB_BL_NO'

  • PVALKEY = ' '

dynpprog = sy-cprog

dynpnr = sy-dynnr

dynprofield = 'ZCAN_HDR-HAWB_BL_NO'

  • STEPL = 0

  • WINDOW_TITLE =

  • VALUE = ' '

value_org = 'S'

  • MULTIPLE_CHOICE = ' '

  • DISPLAY = ' '

  • CALLBACK_PROGRAM = ' '

  • CALLBACK_FORM = ' '

  • MARK_TAB =

  • IMPORTING

  • USER_RESET =

TABLES

value_tab = it_hawb

  • FIELD_TAB =

  • RETURN_TAB =

  • 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.

ENDIF.

The FM DYNP_VALUES_UPDATE is used to Change screen field contents w/o PBO.

You can use this function module to reset selected help processor field contents in the corresponding screen fields

Example

data: dyname like d020s-prog value 'TESTPROG',

dynumb like d020-dnum value '100'.

data: begin of dynpfields occurs 3.

include structure dynpread.

data: end of dynpfields.

move 'TABNAME' to dynpfields-fieldname.

move 'Testtable' to dynpfields-fieldvalue.

append dynpfields.

move 'FIELDNAME' to dynpfields-fieldname.

move 'Testfield' to dynpfields-fieldvalue.

append dynpfields.

call function 'DYNP_VALUES_UPDATE'

exporting

dyname = dyname

dynumb = dynumb

tables

dynpfields = dynpfields

exceptions

invalid_abapworkarea = 01

invalid_dynprofield = 02

invalid_dynproname = 03

invalid_dynpronummer = 04

invalid_request = 05

no_fielddescription = 06

undefind_error = 07.

sivasatyaprasad_yerra
Active Contributor
0 Kudos

Hi,

  
call function 'F4IF_INT_TABLE_VALUE_REQUEST'
    exporting
      retfield        = 'COLUMN_NAME' " column name to be displayed in F4
      dynpprog        = sy-repid
      dynpnr          = sy-dynnr
      dynprofield     = ''
      value_org       = 'S'
    tables
      value_tab       = it_table "internal table which contains the values to be displayed
      field_tab       = field_tab " Fields which needs to be displayed
      return_tab      = return_tab " Fields which needs to returned for selected row
      dynpfld_mapping = dynpfld_mapping " field mappings  from it_table and field_tab
    exceptions
      parameter_error = 1
      no_values_found = 2
      others          = 3.

*DYNP_VALUES_UPDATE * is to be used to update any structure value other than input help strcuture field.

Regards,

Siva.

Edited by: Siva Satya Prasad Yerra on Jun 16, 2008 4:01 PM