From 4b438166f406d2b9da5204150ac6ae94c1420105 Mon Sep 17 00:00:00 2001 From: Dusan Jakovljevic Date: Thu, 13 Aug 2026 00:36:34 +0200 Subject: [PATCH 1/2] Add check to skip report processing if Warehouse Entry table is empty --- .../Counting/Journal/CalculateInventory.Report.al | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/src/Layers/W1/BaseApp/Inventory/Counting/Journal/CalculateInventory.Report.al b/src/Layers/W1/BaseApp/Inventory/Counting/Journal/CalculateInventory.Report.al index 59da2b66070..cdb1a06f37d 100644 --- a/src/Layers/W1/BaseApp/Inventory/Counting/Journal/CalculateInventory.Report.al +++ b/src/Layers/W1/BaseApp/Inventory/Counting/Journal/CalculateInventory.Report.al @@ -138,6 +138,9 @@ report 790 "Calculate Inventory" trigger OnPreDataItem() begin + if WarehouseEntryTableIsCompletelyEmpty then + CurrReport.Break(); // Skip if Warehouse Entry table has no records at all (checked once in Item.OnPreDataItem). + if not "Item Ledger Entry".IsEmpty() then CurrReport.Break(); // Skip if item has any record in Item Ledger Entry. end; @@ -206,6 +209,7 @@ report 790 "Calculate Inventory" var ItemJnlTemplate: Record "Item Journal Template"; ItemJnlBatch: Record "Item Journal Batch"; + WarehouseEntryToCheck: Record "Warehouse Entry"; begin if PostingDate = 0D then Error(Text000); @@ -235,6 +239,8 @@ report 790 "Calculate Inventory" if not SkipDim then SelectedDim.GetSelectedDim(UserId, 3, REPORT::"Calculate Inventory", '', TempSelectedDim); + WarehouseEntryTableIsCompletelyEmpty := WarehouseEntryToCheck.IsEmpty(); + TempQuantityOnHandBuffer.Reset(); TempQuantityOnHandBuffer.DeleteAll(); @@ -362,6 +368,7 @@ report 790 "Calculate Inventory" ZeroQtySave: Boolean; AdjustPosQty: Boolean; DocumentNoInputMandatory: Boolean; + WarehouseEntryTableIsCompletelyEmpty: Boolean; PosQty: Decimal; NegQty: Decimal; ItemNotOnInventoryErr: Label 'Items Not on Inventory.'; From df53f2cd5e65b570496690131d349fb83dfd65fe Mon Sep 17 00:00:00 2001 From: Dusan Jakovljevic Date: Thu, 13 Aug 2026 00:40:27 +0200 Subject: [PATCH 2/2] Layers --- .../Counting/Journal/CalculateInventory.Report.al | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/src/Layers/RU/BaseApp/Inventory/Counting/Journal/CalculateInventory.Report.al b/src/Layers/RU/BaseApp/Inventory/Counting/Journal/CalculateInventory.Report.al index 902f4ad7351..a5596793adf 100644 --- a/src/Layers/RU/BaseApp/Inventory/Counting/Journal/CalculateInventory.Report.al +++ b/src/Layers/RU/BaseApp/Inventory/Counting/Journal/CalculateInventory.Report.al @@ -138,6 +138,9 @@ report 790 "Calculate Inventory" trigger OnPreDataItem() begin + if WarehouseEntryTableIsCompletelyEmpty then + CurrReport.Break(); // Skip if Warehouse Entry table has no records at all (checked once in Item.OnPreDataItem). + if not "Item Ledger Entry".IsEmpty() then CurrReport.Break(); // Skip if item has any record in Item Ledger Entry. end; @@ -206,6 +209,7 @@ report 790 "Calculate Inventory" var ItemJnlTemplate: Record "Item Journal Template"; ItemJnlBatch: Record "Item Journal Batch"; + WarehouseEntryToCheck: Record "Warehouse Entry"; begin if PostingDate = 0D then Error(Text000); @@ -235,6 +239,8 @@ report 790 "Calculate Inventory" if not SkipDim then SelectedDim.GetSelectedDim(UserId, 3, REPORT::"Calculate Inventory", '', TempSelectedDim); + WarehouseEntryTableIsCompletelyEmpty := WarehouseEntryToCheck.IsEmpty(); + TempQuantityOnHandBuffer.Reset(); TempQuantityOnHandBuffer.DeleteAll(); @@ -362,6 +368,7 @@ report 790 "Calculate Inventory" ZeroQtySave: Boolean; AdjustPosQty: Boolean; DocumentNoInputMandatory: Boolean; + WarehouseEntryTableIsCompletelyEmpty: Boolean; PosQty: Decimal; NegQty: Decimal; ItemNotOnInventoryErr: Label 'Items Not on Inventory.';