*************************** SET PATH TO DATA ;HELP SET PROCEDURE TO FUNCTION1 On ERROR DO SEE_ERROR ** the see_error method executes ************************ Function see_error If ERROR () = 2005 DO FORM bad_data_warning *RETURN else = MESSAGEBOX("Erro: " + STR (ERROR()) + ". Contact support cursos@acrisoft.com.br" ) Endif ON ERROR