quinta-feira, 25 de junho de 2009
quinta-feira, 18 de junho de 2009
quarta-feira, 17 de junho de 2009
quinta-feira, 21 de maio de 2009
Mensagem Clarion com Pergunta - Clarion/matos/amarildo
CASE MESSAGE('Você deseja Gerar a página HTML?','Sucesso na geração do Arquivo',ICON:Question,BUTTON:Yes+BUTTON:No,BUTTON:No,1)
OF BUTTON:No
CYCLE
OF BUTTON:Yes
DeleteFile('\amarildo\a.txt')
end
OF BUTTON:No
CYCLE
OF BUTTON:Yes
DeleteFile('\amarildo\a.txt')
end
Line Printer - Aumentar para limitacao caracteres - 21 05 09
hpvBuffer STRING(2048) <- aqui aumenta tamanho 

Correção da limitação de 500 caracter por linha do Lineprint para 2048 caracteres. Esse erro foi verificado devido a remessa dos arquivos contabeis exigir 600 caracteres. Caso alguem passe por isso é só mudar dentro do template para o tamanho que achar necessário.


Correção da limitação de 500 caracter por linha do Lineprint para 2048 caracteres. Esse erro foi verificado devido a remessa dos arquivos contabeis exigir 600 caracteres. Caso alguem passe por isso é só mudar dentro do template para o tamanho que achar necessário.
quarta-feira, 13 de maio de 2009
Clarion - Queue - Pegar Campos (13 05 09)
LOOP
Campo# += 1
Nome" = WHO(ListQueue,Campo#)
if Nome" = '' then
Campo# -= 1
BREAK
END
END
message(Campo#)
Campo# += 1
Nome" = WHO(ListQueue,Campo#)
if Nome" = '' then
Campo# -= 1
BREAK
END
END
message(Campo#)
Assinar:
Postagens (Atom)