After I rearrange the code. The code did not get the last value but did the below commitReg2.RESET; commitReg2.SETFILTER("Account No",ImpDetails."Account No"); commitReg2.SETFILTER("Department Code",ImpDetails."Global Dimension 3 Code"); commitReg2.SETFILTER("Budget Name (Accrued Budget)",ImpDetails."Budget Name (Accrued Budget)"); commitReg2.SETRANGE("Property Code",ImpDetails."Budget Dimension 2 Code"); //IF commitReg2.COUNT = 0 THEN BEGIN IF commitReg2.ISEMPTY THEN BEGIN GLBudget.RESET; GLBudget.SETRANGE("G/L Account No.",ImpDetails."Account No"); GLBudget.SETRANGE("Budget Dimension 1 Code",ImpDetails."Global Dimension 3 Code"); //Name: IB, Date: 07/07/2019 GLBudget.SETRANGE("Budget Dimension 2 Code",ImpDetails."Budget Dimension 2 Code"); //Name: IB, Date: 07/07/2019 GLBudget.SETRANGE("Budget Name",ImpDetails."Budget Name (Accrued Budget)"); //Name: IB, Date: 07/22/2019 GLBudget.CALCSUMS(Amount); Commits."Budget Balance" := GLBudget.Amount - ImpDetails."Request Amount"; END instead of this code IF commitReg2.FINDLAST THEN Commits."Budget Balance" := commitReg2."Budget Balance" - ImpDetails."Request Amount";
↧