Memowrit

[jelias]

Olá amigos,

Estou fazendo algumas modificações nas minhas rotinas de emissão de NF-e e como faço uso do ACBRPlus, estou gerando o TXT da seguinte forma:

Código: Selecionar todos

LOCAL cCHR:=CHR(13)+CHR(10)
cLine := 'NFE.CriarEnviarNFE("'+cCHR
cLine += "[infNFe]"+cCHR     
cLine += "versao=3.10"+cCHR 
.
.
.
cLine += ["]+",1,1,,,,,1)"+cCHR
MEMOWRIT( cArquivo, cLine )

O que está acontecendo é que no final do arquivo está saindo um caracter especial conforme arquivo TXT abaixo.

Código: Selecionar todos

.
.
.
[DUPLICATA001]
Numero=000043
DataVencimento=13/08/2015
Valor=210.00
[DadosAdicionais]
Complemento=Carga No:0000000001 No. Pedido:000027 RCA:003;Condicao de Pagamento: 30/  /  /   /   /  ;Nome Fantasia: 
",1,1,,,,,1)

Alguém sabe me dizer porque este caracter está sendo gerado?

Saudações,

Júlio.

[Jairo Maia]

Olá Júlio,

Esse é o caractere Chr( 26 ), que indica fim de arquivo em OEM. Altere a função MemoWrit() para Hb_MemoWrit().