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

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

Как после вызова ХП обратиться к набору данных? [D5, IB5.x]

garry79 ©   (2004-02-07 12:18:00) 

Приветствую всех мастеров! Вот такой вопрос у меня возник - хранимая процедура возвращает нужное мне значение (в соответствующем параметре), все нормально когда значение единственное по запросу, а если возвращает несколько, то ошибка.
Я конечно сделал обработчик искл. ситуаций, но хотелось бы получать набор, и считывать первую запись, а если записей несколько, то выдавать сообщение. Вот код, который у меня сейчас:
with Base1.Proc do
begin
Base1.Proc.StoredProcName := "Get_Tick_Type";
Prepare;
ParamByName("TTP_Date").Value:= TickDate;
ParamByName("TTP_Season_Num").Value:= Combo_Season.value;
ParamByName("TTP_Reis_Name").Value:= Label_Ticket_Reis_Name.value;
try
execProc;
except
ShowMessage("На данную дату приходится несколько периодов!");
end;
if not ParamByName("TTP_Type").isNull then
Result:= ParamByName("TTP_Type").asInteger;
end;

а вот так вот у меня не получилось:

Open;
First;
if RecordCount>1 then
ShowMessage("На данную дату приходится несколько периодов!");

---

Deniz   (2004-02-11 08:00:00) [1]

А что текст ХП секрет?
И вместо
ParamByName("").Value:=
писАть
ParamByName("").AsInteger AsString AsDate и т.д.

---

Johnmen   (2004-02-10 22:53:00) [2]

ParamByName("TTP_Date").AsDateTime:= DateTimeVariable;
а в Эксплорере дату передавал как "17.02.2003" (скорее всего...)

---

garry79   (2004-02-10 19:57:00) [3]

Нифига не получается, такой запрос почему-то не выдает ни одной записи, хотя ошибки тоже не выдает? Это в смысле не только в Дельфях, но и если реальный запрос в SQL Explorer"e прогнать, то то же самое. Может с форматом даты чото, хотя Дельфи TDateTime к Value должна автоматически привести, а в Эксплорере дату передавал как "17/02/2003" например, так же можно вроде...

---

KA_   (2004-02-08 10:36:00) [4]

Попробуй вместо компонента StoredProc использовать обычный запрос типа
SELECT * FROM GET_TICK_TYPE(:PARAM1, :PARAM2, PARAM3)
А дальше как Digitman сказал.

---

garry79   (2004-02-08 10:26:00) [5]

Да чото не получается, на методе Open ругается -
"Error cursor handle",только execProc берет

---

Digitman   (2004-02-07 12:37:00) [6]

Open;
Last; //!!!!
if RecordCount>1 then
ShowMessage("На данную дату приходится несколько периодов!");

---

Наверх