Bom dia, estou tentando enviar uma nota, mas esta travando com a mensagem a seguir:
Content for element serv is incomplete according to the DTD/Schema. Expecting: vServ.
a parte em que crio a tag
Qi.First;
while not Qi.Eof do
begin
AServico := Servico.ItemServico.New;
AServico.CodServ := IntToStr(Qi.GetInteger('mpsd_codprodserv'));
AServico.Descricao := Qi.GetString('Mpsd_DescProdServ');
AServico.Quantidade := Qi.GetFloat('Qtde');
AServico.ValorUnitario := Qi.GetFloat('Mpsd_VlrUnit');
Qi.Next;
end;
Poderiam me auxiliar no que esta faltando? busquei em varios lugares uma solução e não tive sucesso