Programa gerado pelo Gaspro e convertido

[prmuller]

Amigos, boa tarde!

Converti um sistema gerado pelo Graspro para Harbour 3.2 usando a ferramenta disponibilzada pelo mestre Toledo e sempre funcionou bem
Agora, após algumas algumas alterações e do nada, as consultas não abrem e, se tento entrar, o sistema cai
Aguém teria uma luz?

Grato, Paulo Muller

[Jairo Maia]

Olá Paulo,

É bem possível que tem algum erro nas alterações que foram feitas. Vc alterou o arquivo ERRORSYS do GAS? Mesmo abrindo pelo prompt não aparece o erro no prompt?

[prmuller]

Oi Jairo, obrigado por responder
É muito estranho isso Meu errosys é o original do Gas e não fiz alterei nada dele. Esse problema está acontecendo em todas as consultas.

Sds,

[Jairo Maia]

Paulo, ai fica muito difícil tentar ajudar se você não consegue saber em que parte ocorre o erro, ou o que provoca o erro.

Sugiro o seguinte:
1-Em sua rotina de consultas, fazer paradas usando Hb_Alert(), numerando por exemplo a partir de Hb_Alert("1");
2-Você tem que identificar em que fase está ocorrendo o erro.

Identificando onde ocorre, talvez você mesmo acaba solucionando, mas qualquer coisa poste aqui...

Nota: Sugeri via alert porque não sei usar e não uso o debug.

[JoséQuintas]

Tem um plano B que cheguei a postar por aqui:

A minha errorsys, e uma alteração pra usá-la sem alterar a errorsys "original".

Vai acabar mostrando erro da errorsys, se existir.....

[prmuller]

Jairo, obrigado a vc e ao mestre Quintas pelas respostas.
Resolvi o problema gerando os fontes novamente e recompilando.

Valeu!

[JoséQuintas]

Tudo bem que resolveu, mas seria interessante ter visto o erro pra não cometer o mesmo erro de novo.
O que falei da errorsys era isto.

https://pctoledo.org/forum/viewto ... ys#p124761

Código: Selecionar todos

   PUBLIC OldHandler
   OldHandler := ErrorBlock()
   ErrorBlock( { | e | JoseQuintasError( e ), Eval( OldHandler, e ) } )

Apenas inserir uma errorsys intermediária da errorsys que usa hoje.
O resultado é registrar os erros, sem anular a errorsys do gaspro.

[prmuller]

Vou fazer isso e posto o resultado

Valeu!

[bcm]

Boa tarde a todos

Estou com o seguinte problema:

Quando eu emito um relatório ele imprime uma folha em branco apos a impressão, eu ja tirei o comando eject mas não adiantou de nada.
Poderiam me ajudar?

[JoséQuintas]

Faltam detalhes.
Isso começou quando?
Como faz a impressão?
Tá usando Harbour ou XHarbour?
Usou um tópico sobre Gaspro. Tem mesmo a ver com o uso de Gaspro?