TBillYield(Settlement: DateTime, Maturity: DateTime, Price: Double): Double;
TBillYield(Settlement: System.DateTime, Maturity: System.DateTime, Price: double): double;
Settlement. Дата расчета за казначейский вексель;
Maturity. Срок погашения для казначейского векселя;
Price. Цена казначейского векселя на 100 руб. номинальной стоимости.
Метод TBillYield возвращает доход по казначейскому векселю.
Значение параметра Settlement должно быть меньше значения параметра Maturity.
Значение параметра Price должно быть положительным.
Метод вычисляется следующим образом:
,
где:
DSM. Количество дней от даты расчета Settlement до даты погашения Maturity, вычисленное на основе 360-дневного года.
Для выполнения примера добавьте ссылку на системную сборку MathFin.
Sub UserProc;
Var
r: Double;
Begin
r := Finance.TBillYield(DateTime.ComposeDay(2007,01,01), DateTime.ComposeDay(2008,09,01), 87.79);
Debug.WriteLine(r);
End Sub UserProc;
Imports Prognoz.Platform.Interop.MathFin;
…
Public Shared Sub Main(Params: StartParams);
Var
r: double;
Finance: FinanceClass = New FinanceClass();
DateTime1, DateTime2: System.DateTime;
Begin
DateTime1 := New DateTime(2007,01,01);
DateTime2 := New DateTime(2008,09,01);
r := Finance.TBillYield(DateTime1, DateTime2, 87.79);
System.Diagnostics.Debug.WriteLine(r);
End Sub;
В результате выполнения примера в окно консоли будет выведен доход, равный 0,0834.
См. также: