[Event Request] Codeunit 5611 Calculate Normal Depreciation - OnBeforeExitCalcSLAmountByDeprYears

[muratkarabek]

Hi,

We need an event to manipulate exit value for depreciation years in CalcSLAmount method of codeunit 5611 as described below:

LOCAL [IntegrationEvent] OnBeforeExitCalcSLAmountByDeprYears(FA : Record "Fixed Asset";FADeprBook : Record "FA Depreciation Book";UntilDate : Date;BookValue : Decimal;DeprBasis : Decimal;DeprYears : Decimal;NumberOfDays : Integer;DaysInFiscalYear : Integer

LOCAL CalcSLAmount() : Decimal
...
...
IF DeprYears > 0 THEN BEGIN
  RemainingLife :=
    (DeprYears * DaysInFiscalYear) -
    DepreciationCalc.DeprDays(
      DeprStartingDate,DepreciationCalc.Yesterday(FirstDeprDate,Year365Days),Year365Days);
  IF RemainingLife < 1 THEN
    EXIT(-BookValue);

  // ***** publisher call begins here *****
  IsHandled := FALSE; 
  OnBeforeExitCalcSLAmountByDeprYears(FA,FADeprBook,UntilDate,BookValue,DeprBasis,DeprYears,NumberOfDays,DaysInFiscalYear,ExitValue,IsHandled);
  IF IsHandled THEN
    EXIT(ExitValue);
  // ***** publisher call ends here *****

  EXIT(-(BookValue + SalvageValue - MinusBookValue) * NumberOfDays / RemainingLife);
END;
EXIT(0);

Thanks in advance!