SII -Nuevo sistema de la Agencia Tributaria española de envío de datos vía Webservice

[antoine0]

Empezado por antoine0

Si la única información que tienes del cliente es su DNI español, yo lo pondría con IDType 04, pasaporte, para evitar posible confusión.

Me equivoque aquí. Tiene que ir con IDType 03 pasaporte. Espero no he confundido a nadie.

[dimony]

Hasta ahora no había tenido que desarrollar la parte de cobros / pagos de facturas suministradas previamente. Tengo un cliente el cual a su vez un proveedor que le emite facturas acogidas al criterio de caja y me ha reclamado esta opción. Parar ello me he dispuesto a hacer tal como hice con el resto de wsdl, importar a través "Component - Import WSDL".


En el asistente le dejo los parámetros por defecto y selecciono el WDSL(el último) que tengo almacenado en el ordenador.


Cual es mi sorpresa que no lo importa correctamente, no se que parámetros tengo que seleccionar o seguramente lo que realmente pasa es que no tengo ni puta idea.

unit SuministroCobrosEmitidas;
interface
uses Soap.InvokeRegistry, Soap.SOAPHTTPClient, System.Types, Soap.XSBuiltIns;
type

  // ************************************************************************ //
  // The following types, referred to in the WSDL document are not being represented
  // in this file. They are either aliases[@] of other types represented or were referred
  // to but never[!] declared in the document. The types from the latter category
  // typically map to predefined/known XML or Embarcadero types; however, they could also
  // indicate incorrect WSDL documents that failed to declare or import a schema type.
  // ************************************************************************ //
  // !:ConsultaCobros  - "https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/ConsultaLR.xsd"[Lit][]
  // !:RespuestaConsultaCobros - "https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/RespuestaConsultaLR.xsd"[Lit][]
  // !:SuministroLRCobrosEmitidas - "https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroLR.xsd"[Lit][]
  // !:RespuestaLRCobrosEmitidas - "https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/RespuestaSuministro.xsd"[Lit][]


  // ************************************************************************ //
  // Namespace : https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroCobrosEmitidas.wsdl
  // transport : http://schemas.xmlsoap.org/soap/http
  // style     : document
  // use       : literal
  // binding   : siiBinding
  // service   : siiService
  // port      : SuministroCobrosEmitidas
  // URL       : https://www1.agenciatributaria.gob.es/wlpl/SSII-FACT/ws/fe/SiiFactCOBV1SOAP
  // ************************************************************************ //
  siiSOAP = interface(IInvokable)
  ['{9EF60891-5E4C-9812-57C2-1284CE15ECC8}']

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  SuministroLRCobrosEmitidas(const SuministroLRCobrosEmitidas: SuministroLRCobrosEmitidas): RespuestaLRCobrosEmitidas; stdcall;

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  ConsultaLRCobrosEmitidas(const ConsultaCobrosEmitidas: ConsultaCobros): RespuestaConsultaCobros; stdcall;
  end;

function GetsiiSOAP(UseWSDL: Boolean=System.False; Addr: string=''; HTTPRIO: THTTPRIO = nil): siiSOAP;


implementation
  uses System.SysUtils;

function GetsiiSOAP(UseWSDL: Boolean; Addr: string; HTTPRIO: THTTPRIO): siiSOAP;
const
  defWSDL = 'O:\contadoc\herramientas_externas\d4sii\Win32\Debug\SuministroCobrosEmitidas.wsdl';
  defURL  = 'https://www1.agenciatributaria.gob.es/wlpl/SSII-FACT/ws/fe/SiiFactCOBV1SOAP';
  defSvc  = 'siiService';
  defPrt  = 'SuministroCobrosEmitidas';
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;
initialization
  { siiSOAP }
  InvRegistry.RegisterInterface(TypeInfo(siiSOAP), 'https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroCobrosEmitidas.wsdl', 'UTF-8');
  InvRegistry.RegisterDefaultSOAPAction(TypeInfo(siiSOAP), '');
  InvRegistry.RegisterInvokeOptions(TypeInfo(siiSOAP), ioDocument);
  InvRegistry.RegisterInvokeOptions(TypeInfo(siiSOAP), ioLiteral);

end.

[dcc32 Error] SuministroCobrosEmitidas.pas(48): E2003 Undeclared identifier: 'SuministroLRCobrosEmitidas'
[dcc32 Error] SuministroCobrosEmitidas.pas(48): E2003 Undeclared identifier: 'RespuestaLRCobrosEmitidas'
[dcc32 Error] SuministroCobrosEmitidas.pas(53): E2003 Undeclared identifier: 'ConsultaCobros'
[dcc32 Error] SuministroCobrosEmitidas.pas(53): E2003 Undeclared identifier: 'RespuestaConsultaCobros'
[dcc32 Fatal Error] D4SII.dpr(18): F2063 Could not compile used unit 'SuministroCobrosEmitidas.pas'
Failed

¿Alguien me podría aclarar el tema por favor o echarme un cable please?

[keys]

Yo creo que no te has descargado todos los xsd necesarios.

No solo vale con el wsdl, tienes que descargarte todos los xsd y que estén en la misma carpeta.

Si no puedes dime y te pongo toda la unit.

[dimony]

Empezado por keys

Yo creo que no te has descargado todos los xsd necesarios.

No solo vale con el wsdl, tienes que descargarte todos los xsd y que estén en la misma carpeta.

Si no puedes dime y te pongo toda la unit.

Lo he intentado, ha hecho mas cosas pero sigue indicando



Undeclare indentifier 'SuministroLRCobrosEmitidas.


Si me haces el favor pasame el unit please.

[Neftali [Germán.Estévez]]

Empezado por dimony

¿Alguien me podría aclarar el tema por favor o echarme un cable please?

¿Qué versión estás utilizando?

Yo he importado desde la 11.3 este WSDL:
https://www2.agenciatributaria.gob.e...sEmitidas.wsdl


Y sin tener nada más descargado me genera un archivo más completo.
Te lo adjunto por si te sirve (la importación es con los parámetros por defecto).

[dimony]

Gracias Neftali, me ha ido de lujo, compila correctamente.


Me podrías pasar pagos también, por favor.


Utilizo XE6 y nada de nada lo importo con todos los WSDL, XSD, XML que da la AEAT y nada de nada. Me estoy volviendo loco.

Si me hacéis el favor de pasarme el .pas

[Neftali [Germán.Estévez]]

Empezado por dimony

Me podrías pasar pagos también, por favor.
Utilizo XE6 y nada de nada lo importo con todos los WSDL, XSD, XML que da la AEAT y nada de nada. Me estoy volviendo loco.

Si me pasas la URL del WSDL, como la de arriba te lo importo sin problemas.

[dimony]

Empezado por Neftali [Germán.Estévez]

Si me pasas la URL del WSDL, como la de arriba te lo importo sin problemas.

Aquí va:

https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroPagosRecibidas.wsdl

Muchas gracias.

[Neftali [Germán.Estévez]]

Ahí va de vuelta...