TPAF_N.LerDadosArquivo

[alkmista]

Boa tarde a todos

Estava revisando os registros N e achei um errinho na funcao TPAF_N.LerDadosArquivo

Na linha 143, onde está

Self.RegistroN1.RAZAOSOCIAL := Trim(Copy(Linha, 45, 14));

Deveria ser 50 caracteres

Self.RegistroN1.RAZAOSOCIAL := Trim(Copy(Linha, 45, [b]50[/b]));

A geração está ok, somente se alguem for usar a função é que cortaria a Razao Social...

Abracos

Anderson Kovalski

http://sisgel.com