powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Ошибка в триггере?
3 сообщений из 3, страница 1 из 1
Ошибка в триггере?
    #33578529
332_john
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
В статьях об ошибках Хеннинга описаны 2 процедуры генерируемые REFERENTIAL Integrity "RiDElete" и RiUpdate и якобы код генерации надо потом вручную менять строчку "llRetVal=pnerror=0"
Кто нибудь рассматривал этот вопрос у меня никаких проблем целостности не наблюдается, а он утверждает что возможны какие-то случаи анамального изменения в child таблицах?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
PROCEDURE RIDELETE()
 LOCAL llRetVal
 
 llRetVal = .T.
 IF (ISRLOCKED() AND !DELETED()) OR !RLOCK()
   llRetVal=.F.
   ELSE
     IF !DELETED()
       DELETE
       IF CURSORGETPROP('BUFFERING') >  1 
         =TABLEUPDATE()
       ENDIF
 *     llRetVal=pnerror= 0 
   ENDIF not already deleted
 ENDIF
 *В следущей строке перемещено
 llRetVal = pnerror =  0 
 UNLOCK RECORD (RECNO())
RETURN llRetVal
...
Рейтинг: 0 / 0
Ошибка в триггере?
    #33578639
kdanylo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Предварительно стоит установка:
Код: plaintext
1.
ON ERROR pnerror = Error()
???????

Ну значит перехват любой ошибки которая возможна при удалении записей из дочерней таблицы.
...
Рейтинг: 0 / 0
Ошибка в триггере?
    #33578643
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hi 332_john!

Видимо у тебя никогда не возникает ошибок в ходе исполнения этих процедур :)
Если же возникнет ошибка (например из-за того что запись заблокирована, а
интервал REPROCESS недостаточен для того чтобы дождаться снятия блокировки,
или того хуже - сбой в самом dbf или в индексе или ещё какая непредвиденная
беда), то надо сигнализировать триггеру, чтобы он возвращал .F. - для того и
прописан тот код.

Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Ошибка в триггере?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]