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

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

Проблема при создании процедуры на Interbase SQL [IB6.x, Firebird 0.9.4]

--Reporter-- ©   (2002-01-27 21:20:00) 

Скрипт:

SET TERM ^;

CREATE PROCEDURE MK_DB_WITHOUT_GRADUATE AS
DECLARE VARIABLE ID INTEGER;
BEGIN
FOR SELECT ID FROM GRADUATE
WHERE UPPER(TRANSFER) <> "D"
INTO :ID
DO
BEGIN
ID = 5; /*что угодно ставлю*/
ID = 6; /*выпадает ошибка */
END;
END^

SET TERM ;^

commit;


Ошибка:
Dynamic SQL Error
SQL error code = -104
Token unknown - line 11, char 6
;


Что я делаю не так? ПОМОГИТЕ!!!!!!!!!!!!!!!!

---

--Reporter--   (2002-01-27 23:38:00) [1]

СПАСИБО!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Сообщение об ошибке указывало куда то не туда и это меня сбило с толку...

ТЕПЕРЬ ВСЕ РАБОТАЕТ!!!!!!!!!!!!!!!!!!!!!!

---

kaif   (2002-01-27 23:09:00) [2]

Убери точку с запятой после блока BEGIN...END
-----------------
BEGIN
FOR SELECT ID FROM GRADUATE
WHERE UPPER(TRANSFER) <> "D"
INTO :ID
DO
BEGIN
ID = 5; /*что угодно ставлю*/
ID = 6; /*выпадает ошибка */
END; <--- здесь нельзя ставить точку с запятой
END^
------------------
В IB блоки BEGIN..END не заканчиваются запятыми, в отличие от Pascal.

---

Наверх