Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

FreeUDFLib [D6, fb 1.5 r]


Келд ©   (2004-03-10 17:48:00) 

Хочу увеличить дату на некоторое число лет.

DECLARE EXTERNAL FUNCTION ADDYEAR
   DATE, <---- думаю тут неправильно указал
   INTEGER
RETURNS DATE BY VALUE
ENTRY_POINT 'AddYear' MODULE_NAME 'FreeUDFLib.dll'

Какой тип надо описать для даты?
SELECT ADDYEAR( T.DATE1, 3)
FROM TABLE T
ругается - Invalid data conversation


Келд   (2004-03-10 18:11:00) [1]

2 Johnmen
я так и делал - но парит когда надо часто такое писать
а трабл был в неправильном обюявлении

DECLARE EXTERNAL FUNCTION ADDYEAR
   DATE,
   INTEGER
RETURNS DATE FREE_IT <----- тута
ENTRY_POINT 'AddYear' MODULE_NAME 'FreeUDFLib.dll'


Johnmen   (2004-03-10 17:56:00) [2]

Всё проще...
SELECT
 CAST(EXTRACT(DAY FROM T.DATE1)||'.'||
 EXTRACT(MONTH FROM T.DATE1)||'.'||
 (EXTRACT(YEAR FROM T.DATE1)+3) AS DATE)
FROM Table T


Наверх

Титульная страница Поиск, карта сайта Написать письмо