1
Good morning, I’m trying to send a note, but it’s catching up with the following message:
Content for element Serv is incomplete According to the DTD/Schema. Expecting: vServ.
the part where I create the 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;
Could you help me in what is missing? I have sought in several places a solution and I have not succeeded