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
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
210 | REPORT Z15_026 [1] | sapjoy | 2007.09.13 | 2205 |
209 | REPORT Z13_015 [2] | sapjoy | 2007.09.13 | 2373 |
208 | REPORT Z07_032 | sapjoy | 2007.09.13 | 2195 |
207 | Report Z07_025 | sapjoy | 2007.09.13 | 2175 |
206 | REPORT z04_009 [1] | sapjoy | 2007.09.12 | 2201 |
205 | REPORT Z15_041 | sapjoy | 2007.07.31 | 2454 |
204 | REPORT Z14_002 | sapjoy | 2007.07.30 | 2185 |
» | module f4_CARRID input | sapjoy | 2007.07.21 | 2369 |
202 | REPORT z08_001 | sapjoy | 2007.06.15 | 2210 |
201 | REPORT Z05_006 | sapjoy | 2007.06.11 | 2196 |
200 | REPORT z05_028 | sapjoy | 2007.05.29 | 2276 |
199 | REPORT Z05_026 [2] | sapjoy | 2007.05.28 | 2428 |
198 | REPORT Z05_025 | sapjoy | 2007.05.28 | 2564 |
197 | Include Z_SHARED_AREA | sapjoy | 2007.05.28 | 2528 |
196 | REPORT Z05_022 | sapjoy | 2007.05.28 | 2136 |
195 | REPORT Z05_021 | sapjoy | 2007.05.28 | 2087 |
194 | REPORT Z05_011 | sapjoy | 2007.05.28 | 2066 |
193 | REPORT Z05_011 | sapjoy | 2007.05.28 | 2159 |
192 | REPORT Z05_010 [1] | sapjoy | 2007.05.28 | 2122 |
191 | REPORT Z05_009 [2] | sapjoy | 2007.05.28 | 2149 |