XML contendo tag errada não é validado

[Thaís Caliman]

Olá,

Possuo um xml que está com erro em uma das tags (a tag aparece como <!>) mas é carregado mesmo assim.

Há como fazer a validação no componente? Se não, há algum outro jeito para validar?

 

Obrigada

[Sérgio Assunção]

Agora, Thaís Caliman disse:

Olá,

Possuo um xml que está com erro em uma das tags (a tag aparece como <!>) mas é carregado mesmo assim.

Há como fazer a validação no componente? Se não, há algum outro jeito para validar?

 

Obrigada

Anexe o XML para vermos qual a tag que não esta recebendo nenhum valor.

[Thaís Caliman]

Segue o XML com erro

AD35181216588577000104590000871670051011415090.xml

[Sérgio Assunção]

17 minutos atrás, Thaís Caliman disse:

Segue o XML com erro

AD35181216588577000104590000871670051011415090.xml

Esse XML foi gerado pelo componente ACBrSAT ?

[Thaís Caliman]

4 minutos atrás, Sérgio Assunção disse:

Esse XML foi gerado pelo componente ACBrSAT ?

Então, não sabemos como foi gerado.

Editado 24 Dezembro, 2018 por Thaís Caliman

[Sérgio Assunção]

Agora, Thaís Caliman disse:

Foi sim

Faça o teste usando o SATTeste.exe e veja se acontece o mesmo.

[Thaís Caliman]

Muito Obrigada Sérgio, mas como percebemos que ela esta passando, criamos uma rotina para verificar o schema do xml pos xds, assim ela mostra que o xml esta com erro.

 

[Sérgio Assunção]

Agora, Thaís Caliman disse:

Muito Obrigada Sérgio, mas como percebemos que ela esta passando, criamos uma rotina para verificar o schema do xml pos xds, assim ela mostra que o xml esta com erro.

 

No SATTeste é possivel fazer essa validação com base nos schemas.

[Daniel Simoes]

Veja um exemplo de verificação de Assinatura e Schema, usando o ACBrSAT... (extraído do projeto SATTeste)

procedure TForm1.MenuItem22Click(Sender: TObject);
var
  Erro: String;
begin
  ACBrSAT1.SSL.SSLXmlSignLib := xsLibXml2;
  ACBrSAT1.SSL.SSLCryptLib := cryOpenSSL;

  ACBrSAT1.Config.ArqSchema := edSchemaVendaSAT.Text;
  PageControl1.ActivePageIndex := 0;

  if ACBrSAT1.SSL.VerificarAssinatura(ACBrSAT1.CFe.AsXMLString, Erro, 'infCFe') then
    mLog.Lines.Add('OK: Assinatura do XML retornado pelo SAT é válida')
  else
  begin
    mLog.Lines.Add('ERRO: Assinatura do XML retornado pelo SAT, é inválida: ');
    mLog.Lines.Add(Erro);
  end;

  if ACBrSAT1.ValidarDadosVenda( mRecebido.Text, Erro ) then
    mLog.Lines.Add('OK: XML Recebido do SAT, validado com sucesso, contra o Schema: '+ACBrSAT1.Config.ArqSchema)
  else
  begin
    mLog.Lines.Add('ERRO: Erro na Validação de Schema, do XML Recebido do SAT.');
    mLog.Lines.Add(Erro);
  end;
end;  

 

[Daniel Simoes]