Cita:
Empezado por newtron
Germán.
Cómo accedes a ese XML sin hacer el envío porque yo lo saco desde el evento "OnBeforeExecute" del componente HTTPRIO pero claro, si no se hace el envío porque no tenemos todavía las direcciones no llega a ese evento. Todo esto se me ocurre porque hará falta generar la huella de cada factura y no sé cómo aislar el nodo de cada factura para generar la huella.
|
Si llega al evento si en la URL colocas lo que sea que sea diferente a vacío.
Luego falla por URL, pero al evento llega.
Código modificado a partir de lo que puso un compañero (perdón que no recuerdo quien) mensajes atrás:
Código Delphi
[-]procedure TForm3.HTTPRIO1BeforeExecute(const MethodName: string; SOAPRequest: TStream);
var
sTmp: TStringList;
nFile: string;
begin
sTmp := TStringList.Create;
try
SOAPRequest.Position := 0;
sTmp.LoadFromStream(SOAPRequest);
nFile := ExtractFilePath(Application.ExeName) + 'VeriFactu_PeticionEnviada.xml';
sTmp.SaveToFile(nFile);
Memo1.Lines.LoadFromFile(nFile);
finally
FreeAndNil(sTmp);
end;
end;
Y en el fichero generado por SOAP, modifica esta variable y le asignas cualquier valor( que actualmente está a cadena vacía)...
Código Delphi
[-]
defURL = 'me_la_he_inventado_';