Cita:
Empezado por Neftali [Germán.Estévez]
El problema con el que me he topado yo es que falta la URL del servicio.
Cuando se importa el WSDL, en la función principal hay estos datos:
Código Delphi [-]
function GetsfSOAP(UseWSDL: Boolean; Addr: string; HTTPRIO: THTTPRIO): sfSOAP;
const
defWSDL = 'https://prewww2.aeat.es/static_files/common/internet/dep/aplicaciones/es/aeat/tikeV1.0/cont/ws/SistemaFacturacion.wsdl';
defURL = 'xxxxxxxxxx'; <==================================
defSvc = 'sfService';
defPrt = 'SistemaFacturacion';
var
RIO: THTTPRIO;
begin
Result := nil;
if (Addr = '') then
begin
¿Se me escapa algo o nos quedamos aquí parados?
|
En lo que a pruebas "reales" de envío se trata, me temo que sí.
Yo lo que estoy es generando el xml en el evento HTTPRIO1BeforeExecute para ver lo que estoy enviando y ahi es donde me temo que falta el famoso <cabecera>
Código:
procedure TForm2.HTTPRIO1BeforeExecute(const MethodName: string;
SOAPRequest: TStream);
var
sTmp : TStringList;
nFile : string;
begin
sTmp:=TStringList.Create;
SOAPRequest.Position := 0;
sTmp.LoadFromStream(SOAPRequest);
nFile := ExtractFilePath(Application.ExeName) + 'VeriFactu_PeticionEnviada.xml';
sTmp.SaveToFile(nFile);
WebBrowser1.Navigate(nFile);
//sTmp.SaveToStream(SOAPRequest);
// blaa blaa...
end;
Código:
<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<SOAP-ENV:Body>
<AltaFactuSistemaFacturacion xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroLR.xsd">
<RegistroAltaFacturas>
<RegistroFacturacion>
...
</RegistroFacturacion>
<DatosControl>
<Huella xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd">HUella</Huella>
<TipoHash xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd">01</TipoHash>
<Incidencia xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd">N</Incidencia>
</DatosControl>
</RegistroAltaFacturas>
</AltaFactuSistemaFacturacion>
</SOAP-ENV:Body>
</SOAP-ENV:Envelope>