Gaspro funçoes poe_no_log e ve_log

[prmuller]

Boa noite a todos!
Algum dos amigos sabe o porquê da hotkey Ctrl+Insert estar retornando a msg "Não foi possível abrir o arquivo"?
Aparentemente os comandos de implementação estão nos respectivos prgs nas posições corretas.
Teria alguma coisa a ver com o fato da função ser adicionada bem depois dos sistema compilado várias vezes?

Antecipadamente grato,

Paulo Müller

[prmuller]

Bom dia amigos!
Quanto à mensagem referida no post acima, o problema era que não criava o arq_log.
Editei, salvei e coloquei os atributos (shr) e voltou a abrir, porém, sem gravar nada.
Continuo pesquisando e, se descobrir alguma coisa, posto novamente.

Sds,
Paulo Müller

[LDOSISTEMAS]

Boa tarde, não sei se conseguiu resolver seu problema, se não segue a solução que encontrei.
no arquivo gasp4hb.prg localize as funções abaixo e altere o seu conteúdo de acordo com o exemplo

Código: Selecionar todos

procedure setrhs(arquivo)
return SetFAttr(arquivo,123)
*****************************************************************************
procedure fileattrib(arquivo)
local vgarquivo
vgarquivo=FOPEN(arquivo)
fclose(arquivo)
retu vgarquivo

**********************************************************
procedure rwrite(arquivo)
return SetFAttr(arquivo,0)


**********************************************************
procedure ronly(arquivo)
return SetFAttr(arquivo,1)

LAURO DE OLIVEIRA
LDO-SISTEMAS
www.ldosistemas.com.br

[prmuller]

Lauro, bom dia!

Obrigado pelo retorno.
Modifiquei, no gasp40hb.prg as funções conforme seu exemplo e, realmente, passou a gravar, porém de forma que não dá para se ler (segue o print da tela). Faltou alguma coisa?

Sds,

Paulo Muller

[LDOSISTEMAS]

Paulo
Fez alguma mudança no MONTA_LINHB ?

[prmuller]

Lauro, boa tarde!

Não, não fiz mudança alguma na monta_linhahb do gasp40hb.prg.
Baixei novamente o arquivo e recompilei para testar, mas, continua ilegível.

Sds,
Paulo Muller