В данном случае настройка ON ERROR - не нужна. Просто явно запускаешь обработку ошибки


Дело в том, что FoxPro запоминает последнюю ошибку и сколько бы безошибочных команд не было выполнено после команды с ошибкой, но все-равно, по AERROR() можно получить последнее (по времени) сообщение об ошибке.

Молодой Я ВладимирМВ данном случае настройка ON ERROR - не нужна. Просто явно запускаешь обработку ошибки

Да, это я сообразил, но когда я думаю о том, что далее в проге будет несколько сотен SQLEXEC-ов и после каждого придется писать IF .... do pr_ErrorDetail, то мне становится нехорошо.
А для этого обычно пишут собственные процедуры или методы класса. Команда SQLExec() имеет всего 3 параметра. Вот и передавай в свою процедуру эти 3 параметра, а в самой процедуре добавь обработчика ошибок. Хотя, ведь все-равно надо будет обработать возвращаемое значение: твоей ли функции или SQLExec()...

Молодой ЯКроме того, при попытке вставки дублирующей записи в уникальное поле, например, вылетает окно сообщения о нарушении целосности. Как его погасить? Дело в том, что эти сообщения выскакивают в неудобном и непонятном для Юзера виде и их хотелось бы заменить...
Если речь SQL-сервере к которому ты обращаешся через SQLExec(), то ничего выскакивать не будет. А если о родной базе данных FoxPro, то надо редактировать не сами данные напрямую, а буфер таблиц.

Сброс буфера в исходные таблицы осуществляется по команде TableUpdate() и в этом случае никаких сообщений об ошибках не возникает. Просто TableUpdate() вернет .F. и далее ты уже анализируешь по AERROR() в чем причина ошибки и выдаешь пользователям отредактированную версию.

Это потому, что ты сделал настройку прямо противоположную тому, что нужно:

Вместо

SQLSETPROP(0, "DispWarnings", .T.)

Сделай

SQLSETPROP(0, "DispWarnings", .F.)

После подавления сообщения об ошибке таким образом SQLExec() просто вернет -1, а разбор полетов по AERROR()