В функцию интерпретатора SelectSql() добавлен параметр DisInnerException,запрещающий внутреннюю обработку ошибок при выполнении запроса.

Стандартно,при возниковении ошибки в функции SelectSql(), на экран выдается текст ошибки и возвращается пустой набор данных с полем DUMMY.

При задании DisInnerException = True, ошибка будет передана в программу интерпретатора и может быть перехвачена конструкцией try except end

 

Пример:

Local tbl

try

  tbl:=Selectsql("select from R09",ReflisPath, ~DisInnerException:=.t.)

except

  Message("Произошла ошибка при выполнении запроса."+Chr(13)+"Тип ошибки:"+_ErrType+Chr(13)+"Текст ошибки: "+_ErrString)

end

CloseTable(tbl)