Всем привет.
Работаю с IB 6.0
Вот какая проблема. Есть два поля (тип Date)
Нужно в зависимости от первого поля, второе увеличивать на 5 лет.
(если например значение первого поля 01.01.2002, то второе автоматом 01.01.2007). На прежней базе(Dialect 1) у меня проходила такая процедура
CREATE PROCEDURE YEAR1(
ADATE DATE)
RETURNS (
RESULT INTEGER)
AS
DECLARE VARIABLE ElapsedDays INTEGER;
DECLARE VARIABLE ElapsedYears INTEGER;
BEGIN
WHILE(CAST(ADate AS VARCHAR(5)) <> "1-JAN") DO
ADate = ADate - 1;
ElapsedDays = ADate -"1.1.1901";
Result = (ElapsedDays *400 /146097)+1901;
END
Она выбирала значение года в строке. Сейчас (Dialect 3) не выходит. Пишет ошибку.Помогите, пожалуйста.