Página 1 de 1

Problemas com Errorsys.prg no clipper 5.3

Enviado: 20 Abr 2005 12:19
por binho_fasa
Pessoal, migrei meu sistema do clipper 5.2e para clipper 5.3b (REV 338) e estou tendo problemas agora com o errorsys.prg. Eu tenho uma lib que contém o arquivo ERRORSYS.PRG mas qdo. ocorre um erro, é chamada a função ERRORSYS original e não a contida na lib. Se coloco no .PRG principal uma chamada a função contida na lib (Errorblock(<função da lib>)) , ai funciona. Não tenho esse problema com o clipper 5.2.
Alguém tem alguma dica?

[]´s

Enviado: 20 Abr 2005 15:35
por Toledo
Binho_fasa,

Acho que não existe uma outra maneira, você tem que criar no seu programa uma procedure chamada ERRORSYS.

Exemplo:

Código: Selecionar todos

PROC ERRORSYS()
ERRORBLOCK({|erro| SUAFUNCAO(erro)})
RETU
Abraços,