Here's how we modified the lockbox functionality:
We had a format from the bank which was close to BAI2 but not quite the SAP BAI2
On txn OBAY, we created a new entry called 'OBAI'.
We modified RFEBLB00 like so:
at selection-screen on formt.
if formt ne 'BAI'
*{ INSERT CDSK906195 1
and formt ne 'OBAI'
*} INSERT
and formt ne 'BAI2'.
message i634. "45a
endif.
in start-of-selection:
case formt.
when 'BAI '.
perform process_bai_file(rfeblb20).
when 'BAI2'.
perform process_bai_file(rfeblb20).
*{ INSERT CDSK906195 1
when 'OBAI'.
perform process_bai_file(zrfeblb20).
*} INSERT
when others.
message e637.
endcase.
So you can see, we needed a new copy of RFEBLB20, but we only needed to modify the following subroutines to make our Lockbox format fit the SAP BAI2:
FINISH_PREV_CHECK
NEW_CHECK
OVERFLOW_RECORD
PROCESS_BAI_FILE
I just called the RFEBLB20 subroutines whenever they were needed. They in turn called the customer exits, so no issue.
e.g.
case ident.
when '5'.
------- new batch -
clear w_skip_rec.
if flb05-dh002 = '800' "ACH entries
or flb05-dh002 = '900'. "Wires
w_skip_rec = 'X'.
add 1 to w_flb09_sub_rec.
endif.
if febko-azidt+0(7) ne flb05-dh004
or febko-azidt+8(6) ne flb05-dh005.
if w_skip_rec is initial.
perform finish_prev_check.
perform finish_prev_lockbox(rfeblb20).
perform new_lockbox(rfeblb20).
endif.
endif.
Maybe you can do something similar?
Bluesky
