Geração XML - Erro estrutura do arquivo - importação/processamento manual portal GNRE

[gutembergscosta]

Olá,

Face a obrigatoriedade da versão 2.0, aconteceu um caso onde precisei gerar o arquivo XML - ACBrGNRE1.Guias.Items[0].GravarXML('arquivo.xml') - e submeter a importação/processamento no portal, ocorre que a função que gera o XML do componente  não está inserindo as tags de cabeçalho exigidas na composição do arquivo. O componente gera tag a partir de <TDadosGNRE versao="2.00">, contudo, se faz necessário  as tags negritadas abaixo, sem elas o a importação/processamento do arquivo gerar erro.

<?xml version="1.0" encoding="UTF-8"?>
<TLote_GNRE versao="2.00" xmlns="http://www.gnre.pe.gov.br">
  <guias>

    <TDadosGNRE versao="2.00">

    </TDadosGNRE>

  </guias>
</TLote_GNRE>

 

    

[Rafael Dias]

Estas tags ai não são da guia e sim do lote que vai no envelope SOAP, isso so é gerado quando ocorre o envio.

Então o componente esta gerando corretamente os dados do xml da GUIA, o problema que tu quer os dados do lote o que so ocorre no envio.

[gutembergscosta]

19 horas atrás, Rafael Dias disse:

Estas tags ai não são da guia e sim do lote que vai no envelope SOAP, isso so é gerado quando ocorre o envio.

Então o componente esta gerando corretamente os dados do xml da GUIA, o problema que tu quer os dados do lote o que so ocorre no envio.

Está certo sua colocação utilizando o WebService, contudo, porém pra fazer upload do XML de forma manual no portal para processamento esse XML também precisa ter essas TAGS , caso contrário gera erro e não processa o lote.

[Rafael Dias]

Então você precisa montar na mão isso, o componente so gera o lote na hora do envio.

[gutembergscosta]

20 horas atrás, Rafael Dias disse:

Então você precisa montar na mão isso, o componente so gera o lote na hora do envio.

Já estou inserindo as tags manualmente , mas na função ACBrGNRE1.Guias.Items[0].GerarXML, 

Nesse caso seria apenas acrescentar as TAGS na função que faz a geração do XML : function TGNREW.GerarXml2: boolean;

<?xml version="1.0" encoding="UTF-8"?>
<TLote_GNRE versao="2.00" xmlns="http://www.gnre.pe.gov.br">
  <guias>

...

antes de  Gerador.wGrupo('TDadosGNRE versao="2.00"');

 

function TGNREW.GerarXml2: boolean;
var
  i  : Integer;
  Doc: string;
  LValorGNRE : Currency;
begin
  LValorGNRE := 0;
  
  Gerador.ListaDeAlertas.Clear;
  Gerador.ArquivoFormatoXML := '';

  Gerador.wGrupo('TDadosGNRE versao="2.00"');
//  Gerador.wGrupo('TDadosGNRE');

[Rafael Dias]

Não pois ficaria errado a geração da guia, esta função é para gerar Guia e não lote de guias, isso não será feito.

[gutembergscosta]

Em 14/08/2021 at 12:59, Rafael Dias disse:

Não pois ficaria errado a geração da guia, esta função é para gerar Guia e não lote de guias, isso não será feito.

A intenção é apresentar essa ocorrência, quando se trata de gerar lote para upload manual, muitas vezes o webserve está fora do ar, e só nos resta gerar um arquivo de lote e submetar ao portal, e ao gravar o XML sem enviar, essas tags estão ausentes. Alguém pode passar por esse problema.

Obrigado

[Juliana Tamizou]

Bom dia.

Obrigado por informar, oque o Rafael quis lhe explicar é que o componente não foi projetado para atender a esta situação, devido a isto não seria interessante de nossa parte alterar, mas caso vc tenha alguma ideia que mantenha tudo funcionando em ambos os casos, ficaremos felizes em analisar sua possível contribuição ao projeto,

Att.

[gutembergscosta]

6 minutos atrás, Juliana Tamizou disse:

Bom dia.

Obrigado por informar, oque o Rafael quis lhe explicar é que o componente não foi projetado para atender a esta situação, devido a isto não seria interessante de nossa parte alterar, mas caso vc tenha alguma ideia que mantenha tudo funcionando em ambos os casos, ficaremos felizes em analisar sua possível contribuição ao projeto,

Att.

Tranquilo. 

A ideia era se possível ter uma função por exemplo GerarLoteXML que contemplasse essas tags, assim poderia atender esse critério também.

Obrigado pela atenção.

[Juliana Tamizou]

Boa tarde,

Caso consiga implementar esta função, sem quebrar o funcionamento atual, ficaremos felizes em analisar.

Att.