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

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

Как в переменную загнать значение IB генератора [D5, IB6.x]

Борис ©   (2002-12-16 16:22:00) 

Здравствуйте!

Как, зная имя генератора, получить его значение в переменную?

---

Борис   (2002-12-16 16:36:00) [1]

Всем большое спасибо!

---

Борис   (2002-12-16 16:35:00) [2]

Все получилось в IBSQL

---

FreeLancer   (2002-12-16 16:31:00) [3]

> Query.SQL := "select gen_id(<Generator_Name>, 1) RecNo from
> rdb$database";
> Query.ExecQuery;
> <Variable_Name> := Query.FieldByName("RecNo").AsInteger;


Гн. Prooksius ©! Что ж вы все товарища обманываете. Уже во второй ветке. ExecQuery не вернет ему значения. Это для действий над набором данных. Будем видеть ругань про курсор :-)

---

FreeLancer   (2002-12-16 16:28:00) [4]


SQL
...
DECLARE VARIABLE gen_value INTEGER;
...
gen_value = GEN_ID(GENERATOR_NAME, 1);

Типа так?

---

Prooksius   (2002-12-16 16:27:00) [5]

Query.SQL := "select gen_id(<Generator_Name>, 1) RecNo from rdb$database";
Query.ExecQuery;
<Variable_Name> := Query.FieldByName("RecNo").AsInteger;

---

Наверх