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

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

Создание триггера в InterBase=проблема [D6, IB6.x]


bobr12 ©   (2002-07-30 12:06:00) 

Пытаюсь создать триггер для занесения в ключевой столбец уникальных значений (так как InterBase не поддерживает автоинкрементные поля). Делаю следующие действия (как в книжке)
1. Создаю таблицу:
CREATE TABLE GRUPPA
(
CODE INTEGER NOT NULL,
GRUPPA VARCHAR(10) NOT NULL,
PRIMARY KEY (CODE)
);

2.Создаю генерератор:
CREATE GENERATOR GENGRUPPA;
SET GENERATOR GENGRUPPA TO 1;
Все идет нормально - генератор и таблица создаются

3.Пытаюсь Cоздать Триггер
CREATE TRIGGER CodeGruppa FOR GRUPPA
ACTIVE
BEFORE INSERT
AS
BEGIN
NEW.Code=GEN_ID(GenGruppa,1);
END
И начинается ругань: Unexpected end of command. В чем же здесь проблема? - Все повторяю как в книжке написано.


3JIA9I CyKA   (2002-07-30 12:08:00) [1]


SET TERM ^;

CREATE TRIGGER CodeGruppa FOR GRUPPA
ACTIVE
BEFORE INSERT
AS
BEGIN
NEW.Code=GEN_ID(GenGruppa,1);
END

SET TERM ;^


Наверх

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