Hi,
The code is also update the output fields.
SCARR is global .
Screen: Attached
Some code:
364. *----------------------------------------------------------------------*
365. MODULE f4_carrid_1 INPUT.
366. PERFORM f4_carrid_1 .
367. ENDMODULE. "f4_carrid_1 INPUT
368. *----------------------------------------------------------------------*
369. FORM f4_carrid_1 .
370.
371. DATA: it_value TYPE TABLE OF scarr .
372.
373. SELECT * INTO TABLE it_value FROM scarr .
374.
375. DATA: it_return TYPE TABLE OF ddshretval .
376.
377. CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
378. EXPORTING
379. retfield = 'CARRID'
380. value_org = 'S'
381. TABLES
382. value_tab = it_value
383. return_tab = it_return
384. EXCEPTIONS
385. parameter_error = 1
386. no_values_found = 2
387. OTHERS = 3.
388.
389. FIELD-SYMBOLS: <st_return> LIKE LINE OF it_return .
390.
391. READ TABLE it_return ASSIGNING <st_return> INDEX 1 .
392.
393. CHECK sy-subrc EQ 0 .
394.
395. scarr-carrid = <st_return>-fieldval .
396.
397. FIELD-SYMBOLS: <st_value> LIKE LINE OF it_value .
398.
399. READ TABLE it_value ASSIGNING <st_value>
400. WITH KEY
401. carrid = scarr-carrid .
402.
403. DATA: it_dynfields TYPE TABLE OF dynpread .
404. DATA: st_dynfields LIKE LINE OF it_dynfields .
405. FIELD-SYMBOLS: <st_dynfields> LIKE LINE OF it_dynfields .
406.
407. st_dynfields-fieldname = 'SCARR-CARRNAME'.
408. st_dynfields-fieldvalue = <st_value>-carrname .
409. APPEND st_dynfields TO it_dynfields.
410. st_dynfields-fieldname = 'SCARR-CURRCODE'.
411. st_dynfields-fieldvalue = <st_value>-currcode .
412. APPEND st_dynfields TO it_dynfields.
413.
414. CALL FUNCTION 'DYNP_VALUES_UPDATE'
415. EXPORTING
416. dyname = sy-cprog
417. dynumb = sy-dynnr
418. TABLES
419. dynpfields = it_dynfields
420. EXCEPTIONS
421. invalid_abapworkarea = 1
422. invalid_dynprofield = 2
423. invalid_dynproname = 3
424. invalid_dynpronummer = 4
425. invalid_request = 5
426. no_fielddescription = 6
427. undefind_error = 7
428. OTHERS = 8.
429.
430. ENDFORM. "F4_CARRID
Regards.