ACBrECF

[Juliomar Marchetti]

Estou trabalhando com uma parte do sistema que utiliza Cupom não fiscal

e achei um bug, estou enviando o codigo abaixo para ser corrigido

procedure TACBrECFBematech.AbreNaoFiscal( CPF_CNPJ, Nome, Endereco: String );

begin

  if fs25MFD then

  begin

     AguardaImpressao := True ;

     CPF_CNPJ := TrimRight(CPF_CNPJ) ;

     if CPF_CNPJ <> '' then

     begin

        CPF_CNPJ := padL(CPF_CNPJ,29) ;


        if Nome <> '' then

        begin

           Nome := padL(Nome,30) ;


           if Endereco <> '' then

              Endereco := padL(Endereco,80) ;// está linha estava no lugar de Endereco com o Nome

        end ;

     end ;


     EnviaComando( #77 + CPF_CNPJ + Nome + Endereco , 5 ) ;

  end ;


  { Linhas acrescentadas por Marciano Lizzoni }

  fsNFValor  := 0;

  fsNFCodCNF := '';

  fsTotalizadoresParciais := '' ;

end;

[Daniel Simoes]

Juliomar,

Esses fontes estão bem diferentes da versão atual do SVN.. por favor faça uma atualização.. esse problema já havia sido corrigido a um bom tempo

[Juliomar Marchetti]

Bom dia Daniel

Fui ver a versão dos meus arquivos e estavam corretas, mas mesmo assim apaguei eles e baixei novamente

abrir o arquivo e o erro continua lá na unit ACBrECFBematech.pas

[Daniel Simoes]

Realmente... Achei que você falava do modelo ecfNaofiscal... desculpe-me pela confusão... Já corrigi.. obrigado pelo bug report