Jump to content

Assista click.png tectoy.png

C6 chamada_c6.png botao.png

Erro ao Gerar arquivo - Registro C175 Valor de ALIQ_PIS


igornunes
Go to solution Solved by EMBarbosa,
  • Este tópico foi criado há 1198 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

Ao usar o seguinte comando: 

ACBrSPEDPisCofins1.SaveFileTXT;

Está dando um erro "Erro ao converter", tentei buscar o problema e está no arquivo "ACBrEPCBloco_C_Class" na linha 1198 onde passa:

 image.png.f1c1509d276c2165b0d95e1bdbf34e8e.png

Eu estou passando o valor 0,65 nesse campo, só que essa função VLFill está tentando converter esse valor para inteiro por isso gera a exception, como segue na imagem :

image.thumb.png.1abc2ad6b08b2da2085043f276fabcad.png

E isso pode acontecer nos outros campos desse registro também, se eu passar algum valor que não seja um inteiro, o que pode ser feito para corrigir isso?

 

 

Link to comment
Share on other sites

  • Consultores
  • Solution

Seu código não está de acordo com o que está com o SVN. Esse try..except foi adicionado por vocês.

Veja o código atual:

function TACBrTXTClass.VLFill(Value: Variant;
                             Size: Integer;
                             Decimal: Integer;
                             Caracter: Char;
                             const Mascara: String): String;
var
AExt: Extended;
begin
  // Se o parametro Value = Null ou não foi preenchido será retornado '|'
  if VarIsNull(Value) or VarIsEmpty(Value) then
  begin
     Result := FDelimitador;
     Exit;
  end;

  // Checa se é um valor numérico
  if not VarIsNumeric(Value) then
     raise EACBrTXTClassErro.Create( ACBrStr('Parâmetro "Value" não possui um valor numérico.'));

  AExt := Value;

  Result := LFill(AExt, Size, Decimal, False, Caracter, Mascara);
end; 

 

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link to comment
Share on other sites

  • Administradores

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.

  • Like 1
Consultora SAC ACBr

Juliana Tamizou
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link to comment
Share on other sites

  • Este tópico foi criado há 1198 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.