Hallo,
ich bin kein Programmierer. Aber wenn ich mich richtig erinnere, müsste es im Programm RFEBBU10 folgende Stelle sein:
[code=generic]
*&---------------------------------------------------------------------*
*& Form IDENTIFY_CUSTOMER
*&---------------------------------------------------------------------*
FORM identify_customer CHANGING l_stop_search.
IF febep-pablz IS INITIAL. "HP31I
SELECT * FROM knbk WHERE bankn = febep-pakto.
ENDSELECT. "HP31I
ELSE. "HP31I
SELECT * FROM knbk WHERE bankl = febep-pablz
AND bankn = febep-pakto.
ENDSELECT.
ENDIF. "HP31I
IF sy-dbcnt = 1.
l_stop_search = 'X'.
* Debitor eindeutig identifiziert. Versuch auf Kreditor
IF febep-pablz IS INITIAL. "HP31I
SELECT * FROM lfbk WHERE bankn = febep-pakto.
ENDSELECT. "HP31I
ELSE. "HP31I
SELECT * FROM lfbk WHERE bankl = febep-pablz
AND bankn = febep-pakto.
ENDSELECT.
ENDIF. "HP31I
IF sy-dbcnt = 0.
* Nur Debitor mit dieser Bankverbindung
agkon = knbk-kunnr.
agkoa = 'D'.
ELSEIF sy-dbcnt = 1.
* prüfen ob Debitor = Kreditor
SELECT SINGLE * FROM kna1 WHERE kunnr = knbk-kunnr.
IF kna1-lifnr = lfbk-lifnr.
agkon = knbk-kunnr.
agkoa = 'D'.
ENDIF.
ENDIF.
ENDIF.
ENDFORM. " IDENTIFY_CUSTOMER
[/code]
Da einigen unserer Kunden die Funktionalität aufgrund abweichender Zahler und falscher Treffer eher stört, haben die Funktionalität teils per Z-Logik deaktiviert bzw. wir Löschen etwaige Treffer über die Bankverbindung nachträglich wieder.
Beste Grüße
InDieDa
(IT-Berater, Prozess-/Projektmanager)
ich bin kein Programmierer. Aber wenn ich mich richtig erinnere, müsste es im Programm RFEBBU10 folgende Stelle sein:
[code=generic]
*&---------------------------------------------------------------------*
*& Form IDENTIFY_CUSTOMER
*&---------------------------------------------------------------------*
FORM identify_customer CHANGING l_stop_search.
IF febep-pablz IS INITIAL. "HP31I
SELECT * FROM knbk WHERE bankn = febep-pakto.
ENDSELECT. "HP31I
ELSE. "HP31I
SELECT * FROM knbk WHERE bankl = febep-pablz
AND bankn = febep-pakto.
ENDSELECT.
ENDIF. "HP31I
IF sy-dbcnt = 1.
l_stop_search = 'X'.
* Debitor eindeutig identifiziert. Versuch auf Kreditor
IF febep-pablz IS INITIAL. "HP31I
SELECT * FROM lfbk WHERE bankn = febep-pakto.
ENDSELECT. "HP31I
ELSE. "HP31I
SELECT * FROM lfbk WHERE bankl = febep-pablz
AND bankn = febep-pakto.
ENDSELECT.
ENDIF. "HP31I
IF sy-dbcnt = 0.
* Nur Debitor mit dieser Bankverbindung
agkon = knbk-kunnr.
agkoa = 'D'.
ELSEIF sy-dbcnt = 1.
* prüfen ob Debitor = Kreditor
SELECT SINGLE * FROM kna1 WHERE kunnr = knbk-kunnr.
IF kna1-lifnr = lfbk-lifnr.
agkon = knbk-kunnr.
agkoa = 'D'.
ENDIF.
ENDIF.
ENDIF.
ENDFORM. " IDENTIFY_CUSTOMER
[/code]
Da einigen unserer Kunden die Funktionalität aufgrund abweichender Zahler und falscher Treffer eher stört, haben die Funktionalität teils per Z-Logik deaktiviert bzw. wir Löschen etwaige Treffer über die Bankverbindung nachträglich wieder.
Beste Grüße
InDieDa
(IT-Berater, Prozess-/Projektmanager)
Zuletzt bearbeitet am 22.02.17 11:28