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

[inyu]

Empezado por mpino

Este es el mismo error que recibo yo.

A mi ese error me salía ayer cuando actualicé el WS a la versión 0.6 (yo hago la comunicación via service reference) y fué porque al actualizar se cargó una línea del App.Config dónde tenia puesto el certificado en el binding. En lugar de:

 <bindings>
        <basicHttpBinding>
          <binding name="siiBinding">
            <security mode="Transport">
              <transport clientCredentialType="Certificate" />
            </security>
          </binding>
        </basicHttpBinding>
      </bindings>

Se habia cambiado sólo a :

 <bindings>
        <basicHttpBinding>
          <binding name="siiBinding">
            <security mode="Transport">          
            </security>
          </binding>
        </basicHttpBinding>
      </bindings>

Mirad que no sea lo mismo.

[mpino]

Empezado por inyu

A mi ese error me salía ayer cuando actualicé el WS a la versión 0.6 (yo hago la comunicación via service reference) y fué porque al actualizar se cargó una línea del App.Config dónde tenia puesto el certificado en el binding. En lugar de:

 <bindings>
        <basicHttpBinding>
          <binding name="siiBinding">
            <security mode="Transport">
              <transport clientCredentialType="Certificate" />
            </security>
          </binding>
        </basicHttpBinding>
      </bindings>

Se habia cambiado sólo a :

 <bindings>
        <basicHttpBinding>
          <binding name="siiBinding">
            <security mode="Transport">          
            </security>
          </binding>
        </basicHttpBinding>
      </bindings>

Mirad que no sea lo mismo.

Muchisimas gracias por la pista. Efectivamente le falta el certificado en el transporte. Ahora funciona todo perfectamente.

Un saludo
mpino

[dimony]

Hola a tod@s, estoy intentando hacer la parte referente a la consulta de fras. expedidas y este es mi código:

Código Delphi [-]
function suministra_informacion: string;
var
  v_register: integer;

  certificado:String;

  // Libro registro de facturas emitidas //
  AConsultaLRFacturasEmitidas:ConsultaLRFacturasEmitidas;
  ARespuestaConsultaLRFacturasEmitidas:RespuestaConsultaLRFacturasEmitidas;
  AResultadoConsulta:ResultadoConsultaType;
  a :string;
  i:LongInt;

begin

  if main.lista_certificados.itemindex<0 then
    begin
    exit;
    end;

  certificado := numero_certificado(main.lista_certificados.text);
  if(certificado = '') then
    begin
    ShowMessage('No encuento el certificado');
    Exit;
    end;



  datos.Data.LibrosRegistros.First;
  v_register := 1;
  while v_register <= datos.Data.LibrosRegistros.RecordCount do
    begin

    //Si quitamos esta linea nos pedira el certificado a la hora de enviar la factura.
    Data.HTTPRIO1.HTTPWebNode.ClientCertificate.SerialNum := certificado;

    try

      AConsultaLRFacturasEmitidas := ConsultaLRFacturasEmitidas.Create;

      AConsultaLRFacturasEmitidas.Cabecera := CabeceraConsultaSii.Create;
      AConsultaLRFacturasEmitidas.Cabecera.IDVersionSii:=VersionSiiType(0);
      AConsultaLRFacturasEmitidas.Cabecera.titular := PersonaFisicaJuridicaUnicaESType.Create;
      AConsultaLRFacturasEmitidas.Cabecera.Titular.NombreRazon:= main.g_name;  // NOMBRE DEL PRESENTADOR (CUALQUIERA VALE)
      AConsultaLRFacturasEmitidas.Cabecera.Titular.NIF:= main.g_nif;     // CIF del PRESENTADOR (DEBE COINCIDIR CON EL CERTIFICADO SELECCIONADO)

      AConsultaLRFacturasEmitidas.FiltroConsulta := LRFiltroEmitidasType.Create;
      AConsultaLRFacturasEmitidas.FiltroConsulta.PeriodoImpositivo := PeriodoImpositivo.Create;
      AConsultaLRFacturasEmitidas.FiltroConsulta.PeriodoImpositivo.Ejercicio := formatdatetime('yyyy',data.LibrosRegistros.FieldByName('FechaExpedicionFacturaEmisor').AsDateTime);
      AConsultaLRFacturasEmitidas.FiltroConsulta.PeriodoImpositivo.Periodo := TipoPeriodoType(1);

      AConsultaLRFacturasEmitidas.FiltroConsulta.ClavePaginacion := IDFacturaExpedidaBCType.Create;
      AConsultaLRFacturasEmitidas.FiltroConsulta.ClavePaginacion.IDEmisorFactura := IDEmisorFactura3.Create;
      AConsultaLRFacturasEmitidas.FiltroConsulta.ClavePaginacion.IDEmisorFactura.NIF := main.g_nif;
      AConsultaLRFacturasEmitidas.FiltroConsulta.ClavePaginacion.NumSerieFacturaEmisor := data.LibrosRegistros.FieldByName('NumeroFacturaEmisor').AsString;
      AConsultaLRFacturasEmitidas.FiltroConsulta.ClavePaginacion.FechaExpedicionFacturaEmisor := data.LibrosRegistros.FieldByName('FechaExpedicionFacturaEmisor').asstring;

      try
        ARespuestaConsultaLRFacturasEmitidas := GetsiiSOAP(true,'',data.HTTPRIO1).ConsultaLRFacturasEmitidas(AConsultaLRFacturasEmitidas);

        for i := low(ARespuestaConsultaLRFacturasEmitidas.RegistroRespuestaConsultaLRFacturasEmitidas) to High(ARespuestaConsultaLRFacturasEmitidas.RegistroRespuestaConsultaLRFacturasEmitidas) do
          begin
          with ARespuestaConsultaLRFacturasEmitidas.RegistroRespuestaConsultaLRFacturasEmitidas[i] do
            begin
            AResultadoConsulta := ARespuestaConsultaLRFacturasEmitidas.ResultadoConsulta;

            if aresultadoconsulta = ResultadoConsultaType(1) then
              showmessage('hola')
            else
              showmessage('adios')
            end;
          end;
      except
        On E:Exception do
          //El proceso de envio dio error
          MessageDlg(E.Message, mtError, [mbOK], 0);
      end;
    finally
      AConsultaLRFacturasEmitidas.Free;
      ARespuestaConsultaLRFacturasEmitidas.Free;
    end;


    datos.Data.LibrosRegistros.Next;
    v_register := v_register + 1;
  end;


end;

El xml se envia correctamente y devuelve respuesta correctamente (SINDATOS), pero a la hora de gestionarlo a través de la variable AResultadoConsulta, no se gestionarlo.
Quiero decir como controlo con AresultadoConsulta si devuelve CONDATOS o SINDATOS. No logro hacerlo.
Gracias.

[Virman]

Saludos! Alguno sabe donde se almacena la información de cuadre? En la página de hacienda aparece, pero en el objeto devuelto por el WS, de tipo RespuestaLRFEmitidasType, no encuentro esta información. Alguno sabe si se puede obtener esa información de cuadre?

Otra consulta, acabo de enviar una factura de importe total 1,importe exenta 1, base imponible 9, cuota repercutida 21 y tipo impositivo 21% y la ha aceptado, será que ahora con la nueva versión del WS no hace cálculos de las cantidades?

Gracias!

[Nasca]

Empezado por Virman

Otra consulta, acabo de enviar una factura de importe total 1,importe exenta 1, base imponible 9, cuota repercutida 21 y tipo impositivo 21% y la ha aceptado, será que ahora con la nueva versión del WS no hace cálculos de las cantidades?

A mi me ha pasado lo mismo. Por error remití datos incorrectos y se los tragó.
Yo creo que por ahora no valida la mayoría de los campos. Aunque ten en cuenta que la responsabilidad de enviar los datos correctos siempre será del comunicador. Lo que supone que por flexibilidad no validen datos.
Y en este caso tendrían que devolver un tipo "Aceptado con avisos" y no creo que lo implementen.

[Virman]

Empezado por Nasca

A mi me ha pasado lo mismo. Por error remití datos incorrectos y se los tragó.
Yo creo que por ahora no valida la mayoría de los campos. Aunque ten en cuenta que la responsabilidad de enviar los datos correctos siempre será del comunicador. Lo que supone que por flexibilidad no validen datos.
Y en este caso tendrían que devolver un tipo "Aceptado con avisos" y no creo que lo implementen.

El caso es que con el antiguo WS si recibí errores de Base Imponible Incorrecta. Yo creo que dentro de unos días tendremos un bonito WS nuevo.

[[newtron]]

Empezado por Virman

El caso es que con el antiguo WS si recibí errores de Base Imponible Incorrecta. Yo creo que dentro de unos días tendremos un bonito WS nuevo.

Lo dudo, si mal no recuerdo el campo del total de la factura ahora no es obligatorio informarlo.