Привет.
Как вернуть резалт сет для вычисляемых значений в Pervasive 10 SQL?
Использую приблизительно такой код

create procedure GetEmployeeRates(:EmplID integer, :DateFrom DateTime, :DateTo DateTime, :pClass VarChar(6))
returns
(
EmployeeId integer,
RateType varchar(6),
RateDate Datetime,
Rate double
);
begin
Declare :d DateTime;
SET :d = :DateFrom;
Declare :rate double =0;

DECLARE cur1 CURSOR
FOR select :EmplID as EmployeeId,
'Reg' as RateType,
:d as RateDate,
:rate as Rate FOR UPDATE;
Open cur1;

--WHILE (:d <= :DateTo) DO
SET :rate = getEmplRateReg1(:EmplID, :d, :pClass, 0);
--select :EmplID as EmployeeId,
--'Reg' as RateType,
--:d as RateDate,
--:rate as Rate;
--insert into cur1 (EmployeeId, RateType, RateDate, Rate)
--values (:EmplID, 'Reg', :d, :rate);

SET :d = :d + 1;
--END WHILE;
Close cur1;
end;

Тут много чего закоментарено, потому что много чего пробовал. Не получается. Ошибки во время выполнения. Курсор не открыт и вторая Invalid cursor state.
Вкратце, нужно для диапазона дней вычислить значения getEmplRateReg1 и вернуть как 4-колоночный резалт сет.
Что подправить в коде?
Спасибо.