Cita:
Empezado por keys
Yo sólo te puedo decir que la AEAT y el resto de haciendas funciona correctamente. No tengo ninguno a canarias.
|
Acabo de probar de importar el WSDL del estado desde delphi con estos dos
https://www.agenciatributaria.es/sta...ctEmitidas.xml
https://www2.agenciatributaria.gob.e...oEmitidas.wsdl
y da el mismo error en ambos "Error sending fata: (12175) Error de seguridad"
¿a vosotros no os pasa?
Haciendo pruebas veo que en mi aplicativo para el estado
Si hago la llamada
GetsiiSOAP(false, '', HTTPRIO1).SuministroLRFacturasEmitidas(ASuministroLRFacturasEmitidas);
Funciona pero
GetsiiSOAP(true, '', HTTPRIO1).SuministroLRFacturasEmitidas(ASuministroLRFacturasEmitidas);
da el error anterior, y creo recordar que cuando hice las pruebas las dos llamadas eran correctas. ¿puede ser que hayan puesto algun tipo de seguridad para los wsdl que no funcione en delphi ? En el navegador no hay ningun problema.
Código Delphi
[-]function GetsiiSOAP(UseWSDL: boolean; Addr: string; HTTPRIO: THTTPRIO): siiSOAP;
const
defWSDL = 'https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroEmitidas.wsdl';
defURL = 'https://www1.agenciatributaria.gob.es/wlpl/SSII-FACT/ws/fe/SiiFactFEV1SOAP';
defSvc = 'siiService';
defPrt = 'SuministroFactEmitidas';
var
RIO: THTTPRIO;
begin
Result := nil;
if (Addr = '') then
begin
if UseWSDL then
Addr := defWSDL
else
Addr := defURL;
end;
if HTTPRIO = nil then
RIO := THTTPRIO.Create(nil)
else
RIO := HTTPRIO;
try
Result := (RIO as siiSOAP);
if UseWSDL then
begin
RIO.WSDLLocation := Addr;
RIO.Service := defSvc;
RIO.Port := defPrt;
end
else
RIO.URL := Addr;
finally
if (Result = nil) and (HTTPRIO = nil) then
RIO.Free;
end;
end;