mkyx Posted September 28, 2020 Report Share Posted September 28, 2020 Boa tarde, Alguém pode me dizer se tem jeito de tratar os error em tempo de execução para que o programa não páre ou trave? Vocês têm alguma dica? Já tentei errorsys.prg, errsysw.prg e nada. Em ambos os prgs ou trava o pára. Obrigado. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 28, 2020 Report Share Posted September 28, 2020 Depende do erro. .Mas, clickando no Botão: <Retry) -> Retentar, o programa entra, mesmo com erro. Eu faço o seguinte, paro o ERRSYSW.PRG e mando enviar um Email com o ERROR.LOG para o email da empresa em tempo real, assim, quando o cliente pensa em ligar para reclamar, já sabemos onde quebrou e já mandamos a solução, antes que ele ligue. Simples, assim. Espero ter ajudado. Abs. Quote Link to comment Share on other sites More sharing options...
Eroni Posted September 28, 2020 Report Share Posted September 28, 2020 Boa tarde, Pode debugar o próprio errsysw pois pode estar havendo um erro que não é tratado ali. No meu caso, mudei o nome da rotina de erro, se fizer isso tem que chamar no inicio do seu sua função Main(). Se precisar de mais ajuda, estamos ai. Quote Link to comment Share on other sites More sharing options...
giovanyvecchi Posted September 28, 2020 Report Share Posted September 28, 2020 No primeiro PRG de seu sistema antes da função inicial (MAIN()) coloque estas linhas. procedure ErrorLink() return Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 29, 2020 Report Share Posted September 29, 2020 44 minutos atrás, giovanyvecchi disse: No primeiro PRG de seu sistema antes da função inicial (MAIN()) coloque estas linhas. procedure ErrorLink() return Não entendi Giovany, se eu não estou doido, se ele colocar isso antes da função Main() -> Menu Principal, o programa não "sobe", ou to doido? Quote Link to comment Share on other sites More sharing options...
giovanyvecchi Posted September 29, 2020 Report Share Posted September 29, 2020 Tem que compilar com -N Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 29, 2020 Report Share Posted September 29, 2020 Mano... c tá ficando 1/2 kduko, kkkkkk, -N aonde? Dê e a informação completa pelo amor dos nossos filhinhos.... kkkkkkkkkkkk O que essa função vai fazer em caso de erro? Quote Link to comment Share on other sites More sharing options...
giovanyvecchi Posted September 29, 2020 Report Share Posted September 29, 2020 Kapi, Vou explicar o que acontece. As vezes voce tem procedimentos iniciais que podem ocorrer erros e o sistema que chama o procedimento de erro esta chamando ErrorLink() do harbour. Isto porque o modulo Errsysw.prg que esta na lib FiveH.lib não foi chamado conforme a ordem de sequencia dos modulos prgs. Se vc colocar o Errsysw.prg como segundo prg da lista, automaticamente a chamada de procedimentos do erro do harbour (ErrorLink()) será substituido por ErrorSys() do Fivewin. Assim se der um pau no primeiro prg pode ser que o erro não seja chamado (ErrorSys()) Olhe no Source do Fivewin o prg errsysw.prg que voce vai entender. Quote Link to comment Share on other sites More sharing options...
mkyx Posted September 29, 2020 Author Report Share Posted September 29, 2020 coloquei antes do main() e o sistema na rodou porque executou primeiro essa procedure. e não uso compilador harbour, uso o xharbour. Quote Link to comment Share on other sites More sharing options...
giovanyvecchi Posted September 30, 2020 Report Share Posted September 30, 2020 Na sua função principal coloque assim INIT PROCEDURE MAIN() Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 30, 2020 Report Share Posted September 30, 2020 26 minutos atrás, giovanyvecchi disse: Na sua função principal coloque assim INIT PROCEDURE MAIN() NÃO RECOMENDÁVEL, isso pode provocar TRAVAMENTO do seu Programa. Melhor é enviar um EMAIL para seu domínio y listo. Quote Link to comment Share on other sites More sharing options...
mkyx Posted September 30, 2020 Author Report Share Posted September 30, 2020 sem o errsysw.prg funcionou, deu erro e saiu do programa. com o errsysw.prg travou. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.