Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 2900 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

Boa tarde,

Estou com problema de conversão de dados durante a impressão das guias do GNRe, me parece que desta vez é no campo NumDocOrigem, mas estou vendo que o problema está com a função RemoverZeros.

Poderiam me ajudar por favor a resolver esse problema?

Segue imagem e arquivo txt da guia gerada e autorizada onde ocorre o problema.

 

GNRe Erro 1.png

858100000005579902911607860100000007036852902000-gnre.txt

Link para o comentário
Compartilhar em outros sites

  • Moderadores
22 minutos atrás, Marcelo Calvi Belanga disse:

Juliomar, fiz o update, instalai novamente, mas não mudou em nada.

o código acima continua igual?

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • Membros Pro

No caso da emissão de guia para o Acre ele imprimiu sem erro de conversão, então não sei mais o que ocorre, pois eu acreditava que o erro estava na conversão do NumDocOrigem, vou testando estado a estado e informando novidades, mas se tiver alguma dica para consertar o mesmo.

Porém com informações complementares automática no caso do pagamento apenas no banco do brasil, que acredito que seja uma regra do estado e na separação com caracteres estranhos como se segue:

Guia Acre.png

858200000007058000751601920000012205162336554008-gnre.txt

Link para o comentário
Compartilhar em outros sites

  • Membros Pro

Boa tarde @Juliomar Marchetti, estou testando emissão para Alagoas, o GNRE é emitido normalmente, porém ocorre o erro na tentativa de impressão na mesma função de RemoverZeros do mesmo campo NumDocOrigem. É executado aproximadamente o while da função umas 18 vezes, somente após isso apresenta o erro.

Infelizmente não estou conseguindo anexar arquivo algum, pois, esta retornando a seguinte mensagem:  "Você só tem permissão para fazer o uploade de 2mb", mas o arquivo tem apenas 215k.

Consegue me ajudar de alguma forma? Estou ainda me acostumando com os componente e forma de desenvolvimento e ainda não consegui arrumar uma solução.

Desde já agradeço pela compreensão.

Obrigado.

Link para o comentário
Compartilhar em outros sites

  • Moderadores
13 minutos atrás, Marcelo Calvi Belanga disse:

Boa tarde @Juliomar Marchetti, estou testando emissão para Alagoas, o GNRE é emitido normalmente, porém ocorre o erro na tentativa de impressão na mesma função de RemoverZeros do mesmo campo NumDocOrigem. É executado aproximadamente o while da função umas 18 vezes, somente após isso apresenta o erro.

Infelizmente não estou conseguindo anexar arquivo algum, pois, esta retornando a seguinte mensagem:  "Você só tem permissão para fazer o uploade de 2mb", mas o arquivo tem apenas 215k.

Consegue me ajudar de alguma forma? Estou ainda me acostumando com os componente e forma de desenvolvimento e ainda não consegui arrumar uma solução.

Desde já agradeço pela compreensão.

Obrigado.

Boa tarde!

vá em seu profile e exclua alguns anexos que dai pode ser anexado!

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • 2 semanas depois ...
  • Consultores
Em 05/04/2016 at 16:43, Marcelo Calvi Belanga disse:

Ainda está tendo esse problema? Em caso positivo, qual o valor da variável Str dentro da função RemoberZeros?

[]'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 para o comentário
Compartilhar em outros sites

  • Membros Pro

Bom dia @EMBarbosa, continuo sim, inclusive nesse momento estou finalizando os testes de todos os estados para voltar nesse caso e tentar resolver.

Quando ocorre o erro o valor inicial da variável Str está '000000000000000000', e o erro ocorre após remover o último zero.

Fazendo os teste percebi que mesmo enviando o lote com a informação <c04_docOrigem>318</c04_docOrigem>, em alguns casos o retorno do campo é '000000000000000000', acabei de ter um retorno interessante.... Enviei um lote para Pernambuco contento duas GNRE uma 100102 e outra 100129, no retorno a 100102 voltou com o documento origem e a 100129 voltou com zeros....

Uso Delphi 7 e Fortes.

Segue os anexos.

858400000000029003061610070101201606403964795000-gnre.txt

858400000000058003061614070101201606403964787008.xml

858400000000058003061614070101201606403964787008-gnre.txt

1613364064-pro-rec.xml

858400000000029003061610070101201606403964795000.xml

Link para o comentário
Compartilhar em outros sites

  • Consultores

Então acho que ficou mais fácil corrigir. Poderia fazer o seguinte teste? Subistitua o código pelo seguinte:


  function RemoverZeros(Str: string): string;
  begin
    while (Trim(Str) <> '') and (Str[1] = '0') do
      Str := Copy(Str, 2, Length(Str));

    Result := Trim(Str);
  end;

E verifique se corrige o problema.

[]'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 para o comentário
Compartilhar em outros sites

  • Moderadores
Agora, Marcelo Calvi Belanga disse:

Boa tarde @Juliomar Marchetti, a maneira mais fácil de recompilar os componentes é usando o acbr install? 

Sim!

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
5 horas atrás, EMBarbosa disse:

Então acho que ficou mais fácil corrigir. Poderia fazer o seguinte teste? Subistitua o código pelo seguinte:



  function RemoverZeros(Str: string): string;
  begin
    while (Trim(Str) <> '') and (Str[1] = '0') do
      Str := Copy(Str, 2, Length(Str));

    Result := Trim(Str);
  end;

E verifique se corrige o problema.

Fiz a alteração, compilei e funcionou perfeitamente.

Todas as guias onde o numero de retorno do  c04_docOrigem é '000000000000000000' imprime normalmente.

Obrigado pela ajuda.

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

  • Consultores

Já está no SVN. Obrigado.

19 horas atrás, Marcelo Calvi Belanga disse:

Fiz a alteração, compilei e funcionou perfeitamente.

Todas as guias onde o numero de retorno do  c04_docOrigem é '000000000000000000' imprime normalmente.

Obrigado pela ajuda.

 

  • Curtir 1

[]'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 para o comentário
Compartilhar em outros sites

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.