Ver Mensaje Individual
  #13  
Antiguo 06-03-2020
manelb manelb is offline
Miembro
 
Registrado: mar 2017
Posts: 280
Reputación: 8
manelb Va por buen camino
De forma muy rápida...

Me he descargado la documentación des de los enlaces que has puesto, he importado el xsd y he generado este pequeño ejemplo:

Metes un memo, un botón y un XMLDocument en un formulario, y en el botón pones lo siguiente:

Código Delphi [-]
var
  factura: IXMLInvoiceType;
  AccountID: IXMLAdditionalAccountIDType_cbc;
  PartyName: IXMLPartyNameType_cac;
begin
  factura:= GetInvoice(XMLDocument1);
  factura.IssueDate.NodeValue:='2011-06-28';
  factura.AccountingSupplierParty.CustomerAssignedAccountID.NodeValue:= '20100113612';

  AccountID:= factura.AccountingSupplierParty.AdditionalAccountID.Add;
  AccountID.nodevalue:='6';

  PartyName:= factura.AccountingSupplierParty.Party.PartyName.Add;
  PartyName.Name.NodeValue:='K&G Laboratorios';


  memoxml.lines.Text:= XMLDocument1.XML.Text;

end;

He cogido como ejemplo la factura que incluye en el documento
"Guia+XML+Boleta+version+2+0.pdf" que he descargado con la documentación.

Espero te sirva para comenzar....

Saludos
Responder Con Cita