Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.26;
Скачать: CL | DM;

Вниз

Обработка ошибки хранимой процедуры   Найти похожие ветки 

 
explorer ©   (2003-05-28 13:16) [0]

Мастера!
Есть, к примеру, хранимая процедура:

CREATE PROCEDURE dbo.PROCCloseDay
@ERR int output AS

BEGIN tran CloseDay

Update Days set PrDay=1, CloseDay=getdate()
where PrDay=0


if(@@error!=0) begin
rollback tran CloseDay
select @ERR=1
end
else begin
select @ERR=0
commit tran CloseDay
end
GO

Не получается, программно при возникновении ошибки выдать свое сообщение:

with StoredProcCloseDay do
begin
Close;
Prepare;
ExecProc;

if (ParamByName("@ERR").AsInteger = 1) then
begin
MessageDlg("!!!",mtError, [mbOk], 0);
Close;
end
else begin
MessageDlg("УУУУУ",mtInformation, [mbOk], 0);
Close;
end;
end;
Выдается только стандартное сообщение об ошибки(к примеру нет поля и т.д.)! Подскажите где копать?


 
Explorer ©   (2003-05-29 06:55) [1]

Что, ни кто с этим не сталкивался?


 
АлексейК   (2003-05-29 08:30) [2]

IF (@@ERROR=0
BEGIN
RAISERROR("Мое сообщение", 11, 1) если нужно
COMMIT TRAN
END
ELSE
BEGIN
ROLLBACK TRAN
RAISERROR("Мое сообщение", 11, 1)
END

try
componet_dostupa.[open][execute];
except
on E:[Exception][EOleExecption]...
MessageDlg("УУУУУ"+E.Message,mtInformation, [mbOk], 0);
end


 
Explorer ©   (2003-05-29 10:15) [3]

Спасибо!



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

Текущий архив: 2003.06.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.047 c
3-83981
sergei12r
2003-05-30 06:50
2003.06.26
помогите нужно пекинуть данные с dbase на parabox


1-84195
JS
2003-06-12 11:50
2003.06.26
Выбор директории


3-84037
olevar_y
2003-06-02 05:54
2003.06.26
Как встроить Case_Insensetive в SQL запрос Like


4-84828
fifo
2003-04-22 18:12
2003.06.26
Как кликнуть левой кнопкой мышки по чужому окну?


14-84520
Soft
2003-06-06 13:09
2003.06.26
Вы готовы осознать Будущее?