изменение значения поля в OnDelete

[usach]

Мне нужно в onDelete определить возможно ли удаление записи, и если нет, то поставить значение поля Blocking в TRUE.

как это сделать?

PHP код:

Blocking:=TRUE;
или
MODIFYALL(Blocking, TRUE);
 ....
ERROR("...."); 


не получается.

[Sharky]

Я думаю надо сделать так:


IF (Нельзя Уалить) THEN BEGIN
Blocking := TRUE;
MODIFY;
COMMIT;
Error('Удаление Невозможно')
END;

[Polar]

Потому что ERROR откатывает все изменения.

Если уж очень надо то закрывай транзакцию перед ERROR.

Blocking:=TRUE;
или
MODIFYALL(Blocking, TRUE);
....
COMMIT;
ERROR("....");


Но это глупый код. Мой тебе совет узнать для чего это нужно и сделать по-другому.

[Polar]

Sharky, первый нах?

[Sharky]

Палюбому ...

[usach]

Цитата:

Изначально опубликовано Polar
Потому что ERROR откатывает все изменения.

Если уж очень надо то закрывай транзакцию перед ERROR.

Blocking:=TRUE;
или
MODIFYALL(Blocking, TRUE);
....
COMMIT;
ERROR("....");


Но это глупый код. Мой тебе совет узнать для чего это нужно и сделать по-другому.

Почему глупый?
Мне нужно прверять есть ли ссылка на запись из Таблицы1 в Таблице2, если да, то удаление нневоозможно.

[Polar]

дело в том что если до этой проверки ты что-то менял в базе данных то изменения останутся.
Если у тебя будет какая-нибудь не простая процедура, то половина изменений сохранится а другая откатится. Вот будет весело потом.
А если ты еще и не один программишь, то какой-нибудь коллега у себя сделает
в коде таблица.Delete(true) и вспоминать тебя будет очень долго.

Не приучай себя к такому коду. мой тебе искренний совет.

[usach]

Цитата:

Сообщение от Polar

дело в том что если до этой проверки ты что-то менял в базе данных то изменения останутся.
Если у тебя будет какая-нибудь не простая процедура, то половина изменений сохранится а другая откатится. Вот будет весело потом.
А если ты еще и не один программишь, то какой-нибудь коллега у себя сделает
в коде таблица.Delete(true) и вспоминать тебя будет очень долго.

Не приучай себя к такому коду. мой тебе искренний совет.

Несовсем понял, но.... а как посоветуешь сделать тогда?

[Polar]

Цитата:

Сообщение от usach

Несовсем понял, но.... а как посоветуешь сделать тогда?

Зачем поля модифицировать? Можно же и без модификаций узнать можно удалять или нет.
короче, COMMIT - опасная вещь. Все равно что гасить тараканов вакуумными бомбами высокой плотности.