Ver Mensaje Individual
  #1  
Antiguo 16-12-2010
Avatar de richy08
richy08 richy08 is offline
Miembro
 
Registrado: may 2007
Ubicación: Bucerias, Nayarit Mexico
Posts: 529
Reputación: 17
richy08 Va por buen camino
como crear archivo .xml para cfd

buenas noches compañeros he leido y leido, y veo codigos y mas codigos pero nada con el que pueda basarme para crear .xml ya cree mi cfdv2.pas pero creo funciones que no veo como utilizarlas vi un codigo con el cual podias insertar, eliminar nodos, pero era ya un .xml con datos, lo cual para la factura electronica no me serviria de ahi nacen estas cuestiones

1.- el archivo .xml debe de ser un archivo en blanco??

2.- como puedo posicionarme en un nodo para editar su cadena??

3.- y como uso el .xlst para saber si el .xml generado es correcto

esto es el codigo con el que he empezado a explorar los .xml desde delphi


Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  Cliente, Nodo: IXMLNode;
begin
  XMLDocument1.LoadFromFile( ExtractFilePath( Application.ExeName ) + 'EjemploFactura.xml' );
  XMLDocument1.Active := True;
  Cliente := XMLDocument1.DocumentElement.AddChild( 'Cliente' );
  Cliente.Attributes['id'] := '3';
  Nodo := Cliente.AddChild( 'nombre' );
  Nodo.Text := 'PABLO PALAZON ALCOLEA';
  Nodo := Cliente.AddChild( 'nif' );
  Nodo.Text := '79469163E';
  Nodo := Cliente.AddChild( 'saldopte' );
  Nodo.Text := '0.00';
  Nodo := Cliente.AddChild( 'diaspago' );
  Nodo.Text := '15';
  XMLDocument1.SaveToFile( ExtractFilePath( Application.ExeName ) + 'clientes3.xml' );
end;
gracias por cualquier comentario
Responder Con Cita