To implement this hotfix, you must have a developer license.
You do not have to have rights to the data stores unless you have to perform data repair.
To resolve this problem, change the code of the Data Item Number 1 in the From Giro Journal report (11206) as follows:
...
END;
END;
// Delete the following line.
OnPostDataItem=BEGIN
// End of the line.
IF Method = Method::"By Due Date" THEN BEGIN
CLEAR(TotAmount);
Window.OPEN('@1@@@@@@@@@@@@@@@@@@@@@@@@@');
...
...
END;
END;
// Add the following lines.
OnPostDataItem=VAR
GenJnlPostLine@1070001 : Codeunit 12;
BEGIN
// End of the lines.
IF Method = Method::"By Due Date" THEN BEGIN
CLEAR(TotAmount);
Window.OPEN('@1@@@@@@@@@@@@@@@@@@@@@@@@@');
...
...
GenJnlLine.Description := STRSUBSTNO(BA005,"Document Type","Document No.");
GenJnlLine.VALIDATE("Currency Code","Currency Code");
CALCFIELDS("Remaining Amount");
// Delete the following line.
GenJnlLine.VALIDATE(Amount,-"Remaining Amount");
// End of the line.
GenJnlLine.VALIDATE("Applies-to Doc. Type","Document Type");
GenJnlLine.VALIDATE("Applies-to Doc. No.","Document No.");
GenJnlLine.VALIDATE("Code for Bank of Sweden","Code for Bank of Sweden");
...
...
GenJnlLine.Description := STRSUBSTNO(BA005,"Document Type","Document No.");
GenJnlLine.VALIDATE("Currency Code","Currency Code");
CALCFIELDS("Remaining Amount");
// Add the following lines.
IF GenJnlPostLine.CheckCalcPmtDiscGenJnlVend(GenJnlLine,VendLedgerEntry,0,FALSE) THEN
GenJnlLine.VALIDATE(Amount,-("Remaining Amount" - "Remaining Pmt. Disc. Possible"))
ELSE
GenJnlLine.VALIDATE(Amount,-"Remaining Amount");
// End of the lines.
GenJnlLine.VALIDATE("Applies-to Doc. Type","Document Type");
GenJnlLine.VALIDATE("Applies-to Doc. No.","Document No.");
GenJnlLine.VALIDATE("Code for Bank of Sweden","Code for Bank of Sweden");
...