Boa tarde,
O XML gerado utilizando o novo componente XMLDOCUMENT esta gerando a tag </valePed> mesmo quando não existe informação.
Verifiquei os fontes e cheguei na function abaixo na unit ACBrMDFe.XmlWriter, na linha "Result.AppendChild(Gerar_ValePedagio);", não esta validando se a classe tem informação.
Não verifiquei outras units e também não sei se é esse o problema.
function TMDFeXmlWriter.Gerar_infANTT: TACBrXmlNode;
var
nodeArray: TACBrXmlNodeArray;
i: integer;
begin
Result := FDocument.CreateElement('infANTT');
Result.AppendChild(AddNode(tcStr, '#02', 'RNTRC', 8, 8, 0,
OnlyNumber(MDFe.Rodo.infANTT.RNTRC), DSC_RNTRC));
nodeArray := Gerar_InfCIOT;
for i := 0 to MDFe.rodo.infANTT.infCIOT.Count - 1 do
begin
Result.AppendChild(nodeArray[i]);
end;
Result.AppendChild(Gerar_ValePedagio);
nodeArray := Gerar_InfContratante;
for i := 0 to MDFe.rodo.infANTT.infContratante.Count - 1 do
begin
Result.AppendChild(nodeArray[i]);
end;
nodeArray := Gerar_InfPag;
for i := 0 to MDFe.rodo.infANTT.infPag.Count - 1 do
begin
Result.AppendChild(nodeArray[i]);
end;
end;