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.
…
PaymLedgEntry3.RESET;
PaymLedgEntry3.SETCURRENTKEY("DTA-Type","Payment No.","Payment Date","Day Entry No.");
PaymLedgEntry3.SETRANGE("DTA-Type",PaymLedgEntry3."DTA-Type"::Exterior);
PaymLedgEntry3.SETRANGE("Payment Date",GenJnlTotal."Posting Date");
IF PaymLedgEntry3.FINDLAST AND (PaymLine."Payment No."<>PaymNo) THEN
"Day No." := PaymLedgEntry3."Day Entry No." + 1
ELSE
"Day No." := 1;
PaymLedgEntryL.RESET;
IF PaymLedgEntryL.FINDLAST THEN;
…
…
PaymLedgEntry3.RESET;
PaymLedgEntry3.SETCURRENTKEY("DTA-Type","Payment No.","Payment Date","Day Entry No.");
PaymLedgEntry3.SETRANGE("DTA-Type",PaymLedgEntry3."DTA-Type"::Exterior);
PaymLedgEntry3.SETRANGE("Payment Date",GenJnlTotal."Posting Date");
IF PaymLedgEntry3.FINDLAST AND (PaymLedgEntry3."Payment No." <> PaymNo) THEN
"Day No." := PaymLedgEntry3."Day Entry No." + 1
ELSE
"Day No." := 1;
PaymLedgEntryL.RESET;
IF PaymLedgEntryL.FINDLAST THEN;
…