module f4_CARRID input.
DATA: l_form TYPE sy-xform
VALUE 'F4_PRUEFLOS_CALLBACK_FORM',
l_fname LIKE dynpread-fieldname.
DATA: lt_return TYPE STANDARD TABLE OF ddshretval WITH HEADER LINE,
scr_field LIKE dynpread OCCURS 0 WITH HEADER LINE.
CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'
EXPORTING
tabname = 'SFLIGHT'
fieldname = 'CARRID'
* searchhelp = 'ZH_SFLIGHT'
* shlpparam = 'CARRID'
dynpprog = sy-repid
dynpnr = sy-dynnr
* dynprofield = 'S_100-CARRID'
callback_program = sy-repid
* callback_form = l_form
TABLES
return_tab = lt_return[]
EXCEPTIONS
OTHERS = 99.
IF NOT sy-subrc IS INITIAL.
ENDIF.
REFRESH: scr_field.
LOOP AT lt_return.
CONCATENATE 'S_100-' lt_return-fieldname INTO l_fname.
scr_field-fieldname = l_fname.
scr_field-fieldvalue = lt_return-fieldval.
APPEND scr_field.
ENDLOOP.
CALL FUNCTION 'DYNP_VALUES_UPDATE'
EXPORTING
dyname = sy-cprog
dynumb = sy-dynnr
TABLES
dynpfields = scr_field.
.
IF sy-subrc <> 0.
ENDIF.
endmodule. " f4_CARRID INPUT
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
471 | REPORT Z05_006 | sapjoy | 2007.06.11 | 2196 |
470 | REPORT z08_001 | sapjoy | 2007.06.15 | 2210 |
» | module f4_CARRID input | sapjoy | 2007.07.21 | 2369 |
468 | REPORT Z14_002 | sapjoy | 2007.07.30 | 2185 |
467 | REPORT Z15_041 | sapjoy | 2007.07.31 | 2454 |
466 | REPORT z04_009 [1] | sapjoy | 2007.09.12 | 2201 |
465 | Report Z07_025 | sapjoy | 2007.09.13 | 2176 |
464 | REPORT Z07_032 | sapjoy | 2007.09.13 | 2195 |
463 | REPORT Z13_015 [2] | sapjoy | 2007.09.13 | 2373 |
462 | REPORT Z15_026 [1] | sapjoy | 2007.09.13 | 2205 |
461 | method GETSFLIGHT [2] | sapjoy | 2007.10.23 | 2224 |
460 | method DISPLAY_LIST . [2] | sapjoy | 2007.10.28 | 2341 |
459 | REPORT Z09_12 [1] | sapjoy | 2007.11.14 | 2262 |
458 | REPORT Z10_004 [1] | sapjoy | 2007.11.20 | 2251 |
457 | REPORT Z13_020 [2] | sapjoy | 2007.11.29 | 2482 |
456 | Report Z15_047 [3] | sapjoy | 2007.12.05 | 2798 |
455 | MODULE create_dropdown_box | sapjoy | 2007.12.12 | 2397 |
454 | MODULE creat_listbox [4] | sapjoy | 2007.12.12 | 2411 |
453 | REPORT Z03_009 [1] | sapjoy | 2008.04.14 | 2418 |
452 | REPORT Z03_019 [4] | sapjoy | 2008.04.14 | 2148 |