AmorDegrC(Cost: Double; PurchaseDate: DateTime; FirstPeriodEnd: DateTime; Salvage: Double; Period: Integer; Rate: Double; [Basis: Integer = 0]): Double;
Cost. Cost for acquiring an asset. Must be positive.
PurchaseDate. Date of acquiring an asset. Must be less than FirstPeriodEnd.
FirstPeriodEnd. End date of the first period. Must be greater than PurchaseDate.
Salvage. The salvage value at the end of the life of the asset. Must belong to the [0;Cost] interval.
Period. Depreciation period. Must be positive.
Rate. Depreciation interest rate. Must be positive.
Basis. The day calculation method used. Select a value from 0 to 4:
0. Day calculation method - American/360 days (NSAD method). Default value.
1. Day calculation method - Actual/actual.
2. Day calculation method - Actual/360 days.
3. Day calculation method - Actual/365 days.
4. Day calculation method - European 30/360 days.
Optional parameter.
The AmorDegrC method returns the size of depreciation for each period considering depreciation coefficient.
This method is used with the French accounting system.
The method calculates depreciation until the last depreciation period or until the depreciation total value is more than the difference between the original cost and the depreciated cost of an asset.
If product life is between 0 and 1, 1 and 2, 2 and 3, 4 and 5, the method displays an error message.
The following depreciation coefficients are used by this method:
Product life (1/rate) | Depreciation coefficient |
From 3 to 4 years. | 1,5 |
From 5 to 6 years. | 2 |
More than 6 years. | 2,5 |
Add a link to the MathFin system assembly.
Sub UserProc;
Var
r: Double;
Begin
r:= Finance.AmorDegrC(2000, DateTime.ComposeDay(2008,01,01),
DateTime.ComposeDay(2008,08,01), 200, 1, 0.15, 3);
Debug.WriteLine(r);
End Sub UserProc;
After executing the example the console window displays the value of depreciation equal to 586.
See also: