Atributo FNumeroRecibo está sendo zerado ao efetuar consulta de recibo da Gnre

[RP INFO Sistemas]

 O atributo FNumeroRecibo está sendo zerado ao efetuar consulta de recibo da Gnre.

Na classe "TDFeWebService" a qual é base para a classe "TGNREWebService", no método "InicializarServico" está executando o método "Clear" e está zerando o atributo "FNumeroRecibo" e consequentemente o xml enviado dá erro de schema.

Xml está sendo gerado no formato: "<TConsLote_GNRE xmlns="http://www.gnre.pe.gov.br"><ambiente>2</ambiente><numeroRecibo></numeroRecibo></TConsLote_GNRE>", com a tag numeroRecibo sem conteúdo.

Para conseguir emitir a Gnre e consultar seu recibo, tive que comentar a linha 823 (FnumeroRecibo := '';) do método Clear que está no arquivo "Acbr\Fontes\ACBrDFe\ACBrGNRE\ACBrGNREWebServices.pas" para que o Numero do recibo fosse mantido.

Editado 5 Maio, 2020 por RP INFO Desenvolvimento

[Italo Giurizzato Junior]

Boa tarde,

Muito estranho, pois recebi hoje mesmo um XML referente a consulta onde constava o numero do recibo.

Outra coisa o seu fonte deve estar desatualizado pois a que atribui uma string vazia a propriedade FnumeroRecibo é 826 e não 823.

Anexa o fragmento de código que você esta usando para realizar a consulta.

Esse problema também ocorre com o programa exemplo?

[RP INFO Sistemas]

1 hora atrás, Italo Jurisato Junior disse:

Boa tarde,

Muito estranho, pois recebi hoje mesmo um XML referente a consulta onde constava o numero do recibo.

Outra coisa o seu fonte deve estar desatualizado pois a que atribui uma string vazia a propriedade FnumeroRecibo é 826 e não 823.

Anexa o fragmento de código que você esta usando para realizar a consulta.

Esse problema também ocorre com o programa exemplo?

Se eu utilizar o método "AcbrGNre.ConsultarResultadoLote" funciona, mas estou utilizando o método "AcbrGNre.WebServices.Recibo.Executar", pois é o padrão que foi adotado no projeto, a versão que deu o problema é do dia 30/04/2020.

 

As imagens anexadas, são com a última versão do Acbr baixada hoje 05/05/2020 ás 15:05, neste caso não é problema de fonte desatualizado.

Editado 5 Maio, 2020 por RP INFO Desenvolvimento

[Italo Giurizzato Junior]

Tente desta outra forma:

  ACBrGNRE1.WebServices.Retorno.numeroRecibo := aux;
  ACBrGNRE1.WebServices.Retorno.Executar;

Onde aux contem o numero do recibo a ser consultado.

Analisando os fontes do componente notei que esse esta mais completo que o outro.

[RP INFO Sistemas]

49 minutos atrás, Italo Jurisato Junior disse:

Tente desta outra forma:

  ACBrGNRE1.WebServices.Retorno.numeroRecibo := aux;
  ACBrGNRE1.WebServices.Retorno.Executar;

Onde aux contem o numero do recibo a ser consultado.

Analisando os fontes do componente notei que esse esta mais completo que o outro.

Olá, testei com essa classe que orientou, e funcionou perfeitamente.

 

Obrigado pela atenção.

 

Abraço.

 

Editado 5 Maio, 2020 por RP INFO Desenvolvimento

[Italo Giurizzato Junior]

Obrigado por reportar.

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