From 59968d036e33c5def833c6912ebc9ef1ac7917d6 Mon Sep 17 00:00:00 2001 From: Bert Verbeek Date: Thu, 5 Sep 2024 10:55:05 +0200 Subject: [PATCH 1/2] Added a commit for each table. --- businessCentral/app/src/ClearTrackedDeletions.Codeunit.al | 2 ++ 1 file changed, 2 insertions(+) diff --git a/businessCentral/app/src/ClearTrackedDeletions.Codeunit.al b/businessCentral/app/src/ClearTrackedDeletions.Codeunit.al index a36d3ba..fb1dbab 100644 --- a/businessCentral/app/src/ClearTrackedDeletions.Codeunit.al +++ b/businessCentral/app/src/ClearTrackedDeletions.Codeunit.al @@ -32,6 +32,8 @@ codeunit 82573 "ADLSE Clear Tracked Deletions" ADLSEDeletedRecord.DeleteAll(); ADLSETableLastTimestamp.SaveDeletedLastEntryNo(ADLSETable."Table ID", 0); + + Commit(); //Because of very large number of records, we commit after each table. until ADLSETable.Next() = 0; Message(TrackedDeletedRecordsRemovedMsg); end; From bd894ceb3285d9557dbaa886d3922b1c19c0a043 Mon Sep 17 00:00:00 2001 From: Bert Verbeek Date: Mon, 18 Nov 2024 15:48:27 +0100 Subject: [PATCH 2/2] Fix typo in commit comment for clarity on record handling --- businessCentral/app/src/ClearTrackedDeletions.Codeunit.al | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/businessCentral/app/src/ClearTrackedDeletions.Codeunit.al b/businessCentral/app/src/ClearTrackedDeletions.Codeunit.al index c096f79..e1c2d2a 100644 --- a/businessCentral/app/src/ClearTrackedDeletions.Codeunit.al +++ b/businessCentral/app/src/ClearTrackedDeletions.Codeunit.al @@ -35,7 +35,7 @@ codeunit 82573 "ADLSE Clear Tracked Deletions" ADLSETableLastTimestamp.SaveDeletedLastEntryNo(ADLSETable."Table ID", 0); - Commit(); //Because of very large number of records, we commit after each table. + Commit(); //Because of very large numbers of records, we commit after each table. until ADLSETable.Next() = 0; Message(TrackedDeletedRecordsRemovedMsg); end;