-
Notifications
You must be signed in to change notification settings - Fork 0
/
FM_MOdifyZTable
26 lines (21 loc) · 859 Bytes
/
FM_MOdifyZTable
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
FUNCTION zfm_ext_addr_modify.
*"----------------------------------------------------------------------
*"*"Функциональный модуль обновления:
*"
*"*"Локальный интерфейс:
*" IMPORTING
*" VALUE(IV_ADDRESS_GUID) TYPE BU_ADDRESS_GUID_BAPI
*" VALUE(IS_EXT_ADDRESS) TYPE ZST_CRMT_BUPA_IL_ADDRESS
*" VALUE(IV_WITH_COMMIT) TYPE ABAP_BOOL DEFAULT 'X'
*"----------------------------------------------------------------------
DATA: ls_ext_adrc TYPE ztd_address_ext.
CHECK: iv_address_guid IS NOT INITIAL.
MOVE-CORRESPONDING is_ext_address TO ls_ext_adrc.
ls_ext_adrc-address_guid = iv_address_guid.
MODIFY ztd_address_ext FROM ls_ext_adrc.
IF sy-subrc = 0 AND iv_with_commit = abap_true.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
wait = 'X'.
ENDIF.
ENDFUNCTION.