Ir para conteúdo
  • Cadastre-se

dev botao

Erro ao gerar Gnre na impressao


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

Recommended Posts

Bom dia , Juliomar
estou usando : ACBrGNREGuiaRL1. , antes de postar sempre pesquiso
Eu tinha anexado a imagem do erro mas não apareceu vou tentar aqui novamente.

Observação do teste que fiz no Demo:
1-Gero gnre  e envia  (da erro ao imprimir )
2-Consulto lote recibo (da guia de resposta vem XML da guia )
3-Eu salvo como TXT a resposta que seria o XML da guia (salvo manualmente , copio para TXT e salvo no disco)
4-Clico no imprimir Guia, imprime normalmente.

***diretamente quando clico gerar e enviar da erro segue imagem .


Obrigado

Gnre.png

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
Em 18/04/2016 at 08:37, walter faria disse:

Bom dia , Juliomar
estou usando : ACBrGNREGuiaRL1. , antes de postar sempre pesquiso
Eu tinha anexado a imagem do erro mas não apareceu vou tentar aqui novamente.

Observação do teste que fiz no Demo:
1-Gero gnre  e envia  (da erro ao imprimir )
2-Consulto lote recibo (da guia de resposta vem XML da guia )
3-Eu salvo como TXT a resposta que seria o XML da guia (salvo manualmente , copio para TXT e salvo no disco)
4-Clico no imprimir Guia, imprime normalmente.

***diretamente quando clico gerar e enviar da erro segue imagem .


Obrigado

Gnre.png

Na propriedade para enviar, se você perceber pode colocar .... enviar (false), desta forma não tentar imprimir automaticamente não gerando o erro informado.

Desta forma pode imprimir manualmente depois do retorno.

Link para o comentário
Compartilhar em outros sites

  • Membros Pro

Provavelmente relacionado ao Fortes, mas como é possível desativar a impressão na geração usando ACBrGNRE.Enviar(False), e imprimir posteriormente carregando o XML, não vejo a necessidade urgente de solução.
Por isso que eu também não tentei debugar ainda.

Conseguiu resolver dessa forma @walter faria?

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
9 horas atrás, walter faria disse:

Boa noite, desculpa a demora na resposta
Obrigado pela ajuda , após envia sem o comando de imprimir , como posso carregar XML ?
Obrigado

Bom dia Walter,

Na verdade eu errei ao citar o XML, na verdade você carrega o TXT gerado automaticamente após o recebimento do processamento e envia para impressão.

Eu faço dessa forma:

ACBrGNRE.GuiasRetorno.Clear;
ACBrGNRE.GuiasRetorno.LoadFromFile(DM_Principal.ACBrGNRE.Configuracoes.Arquivos.PathArqTXT + '\' +
                                                tbl_NFeGNRE_RepNumerica.Value + '-gnre.txt');
ACBrGNRE.GuiasRetorno.Imprimir;

A representação numérica eu salvo no meu banco após o processamento da GNRE para posterior impressão.

Espero ter ajudado.

Link para o comentário
Compartilhar em outros sites

Bom dia,

Como contorno do erro você pode enviar a Guia passando o parâmetro imprimir como falso, após o envio você carrega a propriedade ACBrGNRE.GuiasRetorno com o retorno que obteve ao enviar a Guia e imprimir:

ACBrGNRE.Enviar(False);

ACBrGNRE.GuiasRetorno.Clear;
ACBrGNRE.GuiasRetorno.LoadFromString(ACBrGNRE.WebServices.Retorno.GNRERetorno.resultado);
ACBrGNRE.GuiasRetorno.Imprimir;

 

Esse problema ocorre porque ao passar o parâmetro como true, o componente não alimenta automaticamente o "GuiasRetorno". 

Como ele está vazio, a procedure TACBrGNREGuiaRL.ImprimirGuia(GNRE: TGNRERetorno) não chama a procedure CarregaDados para criar os campos do ClientDataSet/TBufDataSet, ocasionando o erro.

Segue o trecho do código:

      if Assigned(ACBrGNRE) then
      begin
        for i := 0 to TACBrGNRE(ACBrGNRE).GuiasRetorno.Count - 1 do
        begin
          frACBrGNREFortes.GNRE := TACBrGNRE(ACBrGNRE).GuiasRetorno.Items.GNRE;
          frACBrGNREFortes.CarregaDados;
        end;
      end

Editado por Siagri Sistemas
  • Curtir 1
Link para o comentário
Compartilhar em outros sites

  • Membros Pro
3 horas atrás, walter faria disse:

Marcelo, bom dia

Como posso pegar esta representacao numerica quando envio GNRE.

Obrigado 

ACBrGNRE.WebServices.Retorno.GNRERetorno.resGuia[0].RepresentacaoNumerica

Faço dessa forma, para que o usuário possa imprimir novamente a guia em outro momento.

Link para o comentário
Compartilhar em outros sites

  • Moderadores

No caso esse código é de sua aplicação e não do ACBr!

mas o teu caso é que não verifica se o arquivo existe antes de mandar gravar ele no banco! o xml

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

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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.