oValFunc.GetAnyCurrency

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
aleks1232321
Постоянный гость
Сообщения: 86
Зарегистрирован: 28 апр 2005, 12:15
Откуда: Москва

oValFunc.GetAnyCurrency

Сообщение aleks1232321 »

Коллеги, возникла необходимость перекомпилировать один интерфейс. Наткнулся на такую ошибку
Ошибка: Нет такой функции,поля или метода, или неверный контекст использования:OVALFUNC.GETANYCURRENCY

GetAnyCurrency1 := oValFunc.GetAnyCurrency
ValSrc,SumSrc,myDate,targval);

Вот кусок кода, где это используется
//-------------- функции блокировки записи
//Перевод в валюту и обратно для дебитора
Function GetAnyCurrency1(var ValSrc : comp;
var SumSrc : double;
var targval : comp) : Double;
begin
myDate := GetMyDate;
GetAnyCurrency1 := oValFunc.GetAnyCurrency(ValSrc,SumSrc,myDate,targval);

Никак не могу разобраться, что это за функция такая oValFunc и как с ней бороться. Помогите
Max_Fin
На пенсии
Сообщения: 797
Зарегистрирован: 29 мар 2005, 17:49
Откуда: г. Тюмень
Контактная информация:

Сообщение Max_Fin »

Это объектнй интерфейс работы с переобразованием валют.
В частности GetAnyCurrency переобразует значение SumSrc, выраженное в валюте ValSrc, в значение, выраженное валютой targval, на дату myDate.

oValFunc описан в glovars.inc

Код: Выделить всё

oValFunc : ValFuncs;
При компиляции в проекте необходимо подключение данного файла.
Ну и начичие VALFUNC.VIH в котором описаны методы ОИ.
Жду выхода Вселенная 2.12!
aleks1232321
Постоянный гость
Сообщения: 86
Зарегистрирован: 28 апр 2005, 12:15
Откуда: Москва

Сообщение aleks1232321 »

Спасибо
Ответить