Ley antifraude 2021 (VERIFACTU) - Programas informáticos

[seccion_31]

gracias

a mi no me entra en el beforeExecute; (tengo un showmessage), cuando ejecuta, me dice: invalid url XXX (como dices, no tiene la ruta, ok), que viene en SistemaFacturacionSOAPv12, en defURL.

tengo los siguientes valores en HTTPRIO:

Código Delphi [-]
Port: SistemaFacturacionPruebas
Service: sfService
tag: 0
URL:
WSDLLocation: (una ruta wl archoivo xsd)

Código Delphi [-]
procedure TForm2.HTTPRIO1BeforeExecute(const MethodName: string;
  SOAPRequest: TStream);
var
  ss:TFileStream;
begin
        showmessage('hola');
        ss:=TFileStream.Create( 'c:\copiar\1v.xml' , fmCreate);
        ss.CopyFrom(SOAPRequest, SOAPRequest.size);
        ss.Free;
end;

Voy a seguir comprobando a ver que puede ser.

[keno_71]

Lo tengo así,

en el beforeExecute:

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;

en el fichero de SistemaFActuracion:

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 = 'https://www.me_la_he_inventado_.com';
defSvc = 'sfService';
defPrt = 'SistemaFacturacion';

saludos

[seccion_31]

perfecto, cambiando la defURL por la tuya:

https://www.me_la_he_inventado_.com


si dejamos el xxx no hace mencion si quiera de enviar.

muchas gracias