Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Системные сообщения / 2 сообщений из 2, страница 1 из 1
23.12.2003, 10:44
    #32360455
Stiva
Stiva
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Системные сообщения
Привет!
У меня в базе данных созданы все отношения между таблицами, создана целостность данных, все отрабатывает нормально, но вот как бы мне вместо системных сообщений типа "trigger failed" написать свое, т.е их перехватить. В хранимой процедуре я что-то не мог найти подобное. Как мне решить эту проблему, чтобы пользователь не пугался слов на иностранном языке?
Спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.12.2003, 13:15
    #32360753
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Системные сообщения
Triiger Filed - соответсвует ошибке с кодом 1539

Если ты использовал стандартные триггера, генерируемые собственно FoxPro, то в этом случае в теле триггера автоматически создается глобальный массив с именем gaErrors, в котором и сохраняется код ошибки приведший к отказу триггера.

Если процесс сохранения заключается в сбросе буфеизированных данных, то команда TableUpdate() не генерит никакого сообщения об ошибке, а просто сообщает смогла или не смогла она выполнить сброс. В этом случае поможет анализ ошибки по AERROR(), например:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
IF TableUpdate(.T.,.T.)=.F.
	LOCAL laError( 1 )
	=AERROR(laError)
	IF laError[ 1 ]= 1539  AND gaErrors[ 1 , 1 ]> 0 
		MessageBox( "В теле триггера произошла ошибка № " +;
		LTRIM(STR(gaErrors[ 1 , 1 ]))+chr( 13 )+gaErrors[ 1 , 2 ])
	ENDIF
ENDIF
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Системные сообщения / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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