
SELECTION-SCREEN BEGIN OF BLOCK b1.
PARAMETERS p_ebeln TYPE ebeln.
SELECTION-SCREEN END OF BLOCK b1.
DATA: ls_data TYPE zdemo_str_dym_logo,
lv_fmname TYPE rs38l_fnam,
ls_cntl_parm TYPE ssfctrlop,
ls_op_options TYPE ssfcompop,
lv_date TYPE sydatum.
SELECT SINGLE ebeln, bedat
FROM ekko
INTO @ls_data
WHERE ebeln = @p_ebeln.
IF ls_data-doc_date <= '20210131'.
ls_data-logo = 'DEMO LOGO 1'.
ELSE.
ls_data-logo = 'DEMO LOGO 2'.
ENDIF.
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
formname = 'ZDEMO_SFM_DYM_LOGO'
IMPORTING
fm_name = lv_fmname
EXCEPTIONS
no_form = 1
no_function_module = 2
OTHERS = 3.
ls_cntl_parm-langu = 'EN'.
ls_cntl_parm-preview = space.
ls_cntl_parm-no_dialog = abap_true.
ls_op_options-tddest = 'LP01'.
ls_op_options-tdnewid = abap_true.
ls_op_options-tdimmed = abap_true.
ls_op_options-tddelete = space.
CALL FUNCTION lv_fmname "'/1BCDWB/SF00000086'
EXPORTING
control_parameters = ls_cntl_parm
output_options = ls_op_options
user_settings = 'X'
e_structure = ls_data
EXCEPTIONS
formatting_error = 1
internal_error = 2
send_error = 3
user_canceled = 4
OTHERS = 5.
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
3 | |
2 | |
2 | |
2 | |
1 | |
1 | |
1 | |
1 | |
1 |