Форум: "Базы";
Текущий архив: 2004.03.09;
Скачать: [xml.tar.bz2];
Вниз
Как после вызова ХП обратиться к набору данных? Найти похожие ветки
← →
garry79 (2004-02-07 12:18) [0]Приветствую всех мастеров! Вот такой вопрос у меня возник - хранимая процедура возвращает нужное мне значение (в соответствующем параметре), все нормально когда значение единственное по запросу, а если возвращает несколько, то ошибка.
Я конечно сделал обработчик искл. ситуаций, но хотелось бы получать набор, и считывать первую запись, а если записей несколько, то выдавать сообщение. Вот код, который у меня сейчас:
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("На данную дату приходится несколько периодов!");
← →
Digitman (2004-02-07 12:37) [1]Open;
Last; //!!!!
if RecordCount>1 then
ShowMessage("На данную дату приходится несколько периодов!");
← →
garry79 (2004-02-08 10:26) [2]Да чото не получается, на методе Open ругается -
"Error cursor handle", только execProc берет
← →
KA_ (2004-02-08 10:36) [3]Попробуй вместо компонента StoredProc использовать обычный запрос типа
SELECT * FROM GET_TICK_TYPE(:PARAM1, :PARAM2, PARAM3)
А дальше как Digitman сказал.
← →
garry79 (2004-02-10 19:57) [4]Нифига не получается, такой запрос почему-то не выдает ни одной записи, хотя ошибки тоже не выдает? Это в смысле не только в Дельфях, но и если реальный запрос в SQL Explorer"e прогнать, то то же самое. Может с форматом даты чото, хотя Дельфи TDateTime к Value должна автоматически привести, а в Эксплорере дату передавал как "17/02/2003" например, так же можно вроде...
← →
Johnmen (2004-02-10 22:53) [5]ParamByName("TTP_Date").AsDateTime:= DateTimeVariable;
а в Эксплорере дату передавал как "17.02.2003" (скорее всего...)
← →
Deniz (2004-02-11 08:00) [6]А что текст ХП секрет?
И вместо
ParamByName("").Value:=
писАть
ParamByName("").AsInteger AsString AsDate и т.д.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2004.03.09;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c
