Скачать: CL | DM;

2000 Вернуть сообщение об ошибке   Найти похожие ветки 

← →
KAA ©   (2002-07-03 21:12) [0]

Из одной хранимой процедуры вызываются другие, одна за другой. В одной из вызываемых процедур произошла ошибка и выскочило сообщение об ошибке. Если основная процедура будет запущена из под Queryanalyzer, то будет выдано сообщение об ошибке. Но если эту процедуру запустить из клиентского приложения (в частности приложение написано на Delphi 5) под конструкцией try .. except, туда сообщение об ошибке уже не приходит.
Что делать?

---

← →
TSV ©   (2002-07-04 10:36) [1]

Ну, примерно так:

CREATE PROCEDURE dbo.Proc1
AS BEGIN
...
execute Proc2
if @@ERROR <> 0
begin
RAISERROR("Ошибка выполнения процедуры [proc2]", 16, 10) WITH SETERROR
RETURN -1
end

...
END

---

← →
TSV ©   (2002-07-04 10:38) [2]

В общем-то принцип тот же самый - "отрейзить" ошибку на более верхний уровень...

---

← →
KAA ©   (2002-07-04 10:52) [3]

Хотелось бы разобраться с причиной. В одних случаях ошибка попадает клиенту, в других нет.

---

← →
TSV ©   (2002-07-04 11:51) [4]

Обрати внимание на опцию WITH SETERROR .

Также недавно в форуме проскакивало, что если идет работа с ADO, то нужно в цикле просмотреть свойство Errors или что-то в этом роде...

---

← →
KAA ©   (2002-07-04 12:05) [5]

так а что конкретно WITH SETERROR делает?

А название той ветви не помните?

---

← →
Alex-A ©   (2002-07-04 14:53) [6]

WITH SETERROR устанавливает значение гловальной переменной @@ERROR в код ошибки, независимо от уровня "серьезности" этой ошибки

А вопрос про который упомянул TSV задавал я, там речь шла немного о другом, но этот способ тебе тоже поможет после вызова процедуры в цикле посмотри свойство Errors у ADOConnection - там все ошибки и обнаружишь если по try ... except не получилось.

---

← →
KAA ©   (2002-07-04 20:29) [7]

В вызываемой процедуре выполняется команда INSERT. Если до этого инсерта сделать RAISERROR, ошибка вернется в клиентское приложение. Если после инсерта, то уже не возвращается.

---

← →
TSV ©   (2002-07-04 21:08) [8]

Сразу после Insert:

if @@ERROR <> 0
begin
RAISERROR("Ошибка.", 16, 10) WITH SETERROR
RETURN -1
end

---

← →
Alex-A ©   (2002-07-05 07:33) [9]

2TSV
Не-а, не получиться так, я уже пробовал!

---

← →
KAA ©   (2002-07-05 09:22) [10]

В INSERT нет никакой ошибки, он отрабатывает правильно и добавляет запись. Просто если я перед ним просто вызову RAISERROR, он вернется клиенту, если после, то уже не вернется.
Ошибка - это не обязательно системная ошибка, я генерю ошибки, например, если данные переданные в процедуру оказались неправильные.

---

← →
TSV ©   (2002-07-05 10:32) [11]

Ну так по логике вещей сначала данные проверяют, а уж потом, если они правильные, применяет их в БД. А если неправильные, генерят ошибку...

---

← →
KAA ©   (2002-07-05 10:46) [12]

Есть самостоятельные процедуры, в начале которых есть все необходимые проверки. Крайне неохота дублировать их в вызывающей процедуре.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.008 c