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.
...
REPEAT
Existing Code
OldReservEntry.TESTFIELD("Item No.",SalesLine."No.");
OldReservEntry.TESTFIELD("Variant Code",SalesLine."Variant Code");
OldReservEntry.TESTFIELD("Location Code",SalesLine."Location Code");
// Delete the following lines.
IF CheckApplFromItemEntry THEN BEGIN
OldReservEntry.TESTFIELD("Appl.-from Item Entry");
CreateReservEntry.SetApplyFromEntryNo(OldReservEntry."Appl.-from Item Entry");
// End of the deleted lines.
END;
TransferQty := CreateReservEntry.TransferReservEntry(DATABASE::"Item Journal Line",
ItemJnlLine."Entry Type",ItemJnlLine."Journal Template Name",
ItemJnlLine."Journal Batch Name",0,ItemJnlLine."Line No.",
...
...
REPEAT
OldReservEntry.TESTFIELD("Item No.",SalesLine."No.");
OldReservEntry.TESTFIELD("Variant Code",SalesLine."Variant Code");
OldReservEntry.TESTFIELD("Location Code",SalesLine."Location Code");
// Add the following lines.
IF CheckApplFromItemEntry AND
(OldReservEntry."Item Tracking" <> OldReservEntry."Item Tracking"::None) THEN BEGIN
OldReservEntry.TESTFIELD("Appl.-from Item Entry");
CreateReservEntry.SetApplyFromEntryNo(OldReservEntry."Appl.-from Item Entry");
//End of the added lines.
END;
TransferQty := CreateReservEntry.TransferReservEntry(DATABASE::"Item Journal Line",
ItemJnlLine."Entry Type",ItemJnlLine."Journal Template Name",
ItemJnlLine."Journal Batch Name",0,ItemJnlLine."Line No.",
...