Ansicht
Dokumentation

IHC_005_BADI - Implement BAdI for Calculating Charges in FI

RFUMSV00 - Advance Return for Tax on Sales/Purchases   SUBST_MERGE_LIST - merge external lists to one complete list with #if... logic for R3up  
This documentation is copyright by SAP AG.

In the in-house cash center you can post charges separately to other items. To calculate charges, you have to implement the following business add-in (BAdI) in the FI system of the head office: Returns in Account Statement, Customer Add-In (FIEB_RETURNS_ADDIN).

For the FI system of the head office, you are using at least SAP R/3 Enterprise Core 4.70 (SAP_APPL_470).

1. In Customizing for bank accounting, choose Business Transactions -> Payment Transactions -> Electronic Account Statement -> Business Add-Ins (BAdIs) -> BAdI: Processing Returns.
2. Implement the BAdI in accordance with the BAdI documentation. Note the following special features:
1. Create a class for the BAdI that implements the interface IF_EX_FIEB_RETURN_ADDIN.
2. Implement the method change_return_charges. An example of the coding is shown below.

method if_ex_fieb_returns_addin~change_return_charges .

* Local data
constants:
l_con_charge_text(15) value 'Gebühr:'.

data:
l_start,
l_rest,
l_charge(4),
l_ihc_relevant,

lw_febre type febre,
lw_febvw type febvw,
ls_febko_ext type febkoxt_bf,
ls_febep_ext type febepxt_bf,
ls_febko_int type febkoin_bf,
ls_febep_int type febepin_bf,

lt_febcl type table of febcl.

* Start processing

* Prepare data structure
move-corresponding i_febko to: ls_febko_int, ls_febko_ext.
move-corresponding i_febep to: ls_febep_int, ls_febep_ext.

select single * from febvw
into lw_febvw
where anwnd = i_febko-anwnd and
absnd = i_febko-absnd and
azidt = i_febko-azidt.

if sy-subrc is initial.
move-corresponding lw_febvw to: ls_febko_ext.
endif.

select * into table lt_febcl from febcl
where
kukey = i_febep-kukey and
esnum = i_febep-esnum.

clear l_ihc_relevant.
clear c_return_charges.

* Check if IHC relevant
call function 'BKK_IHB_BASTA_IN_CHECK'
exporting
i_febko_ext = ls_febko_ext
i_febep_ext = ls_febep_ext
i_febko_int = ls_febko_int
i_febep_int = ls_febep_int
importing
e_register_area_2 = l_ihc_relevant
tables
t_febre = t_febre
t_febcl = lt_febcl.

check l_ihc_relevant is not initial.

* Check all reference texts
loop at t_febre into lw_febre.

check lw_febre-vwezw cs l_con_charge_text.

split lw_febre-vwezw at space into l_start l_charge l_rest.
move l_charge to c_return_charges-kwbtr.
if i_febep-epvoz = 'H'.
multiply c_return_charges-kwbtr by -1.
endif.
exit.
endloop.

endmethod.

Fill RESBD Structure from EBP Component Structure   General Material Data  
This documentation is copyright by SAP AG.

Length: 3282 Date: 20240523 Time: 210405     sap01-206 ( 31 ms )