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

[espinete]

¿Alguien sabe por qué el CSV me viene en blanco tras hacer el envío, aunque efectivamente está enviada?

Si la vuelvo a enviar me dice "duplicada" (y aquí sí obtengo el CSV), pero en el primer envío el CSV está en blanco.

Este es el código que uso para el envío:

   try
      result := GetsiiSOAP(true,'',HTTPRIO1).SuministroLRFacturasEmitidas(ASuministroLRFacturasEmitidas);

      for i := low(result.RespuestaLinea) to High(result.RespuestaLinea) do
      begin
          with result.RespuestaLinea[i] do
          begin
              Memo1.lines.add('factura: ' + IDFactura.NumSerieFacturaEmisor + ' ' + IDFactura.NumSerieFacturaEmisorResumenFin + ' ' + IDFactura.FechaExpedicionFacturaEmisor);
              Memo1.lines.add('CSV: ' + CSV);
              if EstadoRegistro <> EstadoRegistroType(0) then
              begin
                  Memo1.lines.add('Error no.: ' + InttoStr(CodigoErrorRegistro));
                  Memo1.lines.add(DescripcionErrorRegistro);
              end;
          end;
      end;
   except
       On E:Exception do
           MessageDlg(E.Message, mtError, [mbOK], 0);
   end;

Y esto es lo que obtengo:

factura: A-451260 06/11/2019
CSV:

[[newtron]]

Empezado por espinete

¿Alguien sabe por qué el CSV me viene en blanco tras hacer el envío, aunque efectivamente está enviada?

Si la vuelvo a enviar me dice "duplicada" (y aquí sí obtengo el CSV), pero en el primer envío el CSV está en blanco.

Este es el código que uso para el envío:

   try
      result := GetsiiSOAP(true,'',HTTPRIO1).SuministroLRFacturasEmitidas(ASuministroLRFacturasEmitidas);

      for i := low(result.RespuestaLinea) to High(result.RespuestaLinea) do
      begin
          with result.RespuestaLinea[i] do
          begin
              Memo1.lines.add('factura: ' + IDFactura.NumSerieFacturaEmisor + ' ' + IDFactura.NumSerieFacturaEmisorResumenFin + ' ' + IDFactura.FechaExpedicionFacturaEmisor);
              Memo1.lines.add('CSV: ' + CSV);
              if EstadoRegistro <> EstadoRegistroType(0) then
              begin
                  Memo1.lines.add('Error no.: ' + InttoStr(CodigoErrorRegistro));
                  Memo1.lines.add(DescripcionErrorRegistro);
              end;
          end;
      end;
   except
       On E:Exception do
           MessageDlg(E.Message, mtError, [mbOK], 0);
   end;

Y esto es lo que obtengo:

factura: A-451260 06/11/2019
CSV:

Y... ¿dónde asignas el valor a la variable CSV?

[espinete]

No es una variable. Pertenece a "result.RespuestaLinea[i]" (está dentro del "with")

Es como si pusiera result.RespuestaLinea[i].CSV, que de hecho también lo he probado por si acaso y también lo recibo en blanco.

[espinete]

Hay otro CSV dentro de "result".

Con result.CSV sí obtengo el CSV.

Con [i]result.RespuestaLinea.CSV me viene en blanco.

¿Será que cuando enviamos SOLO una factura, el CSV que sirve es el result.CSV, pero cuando enviamos varias, hay que usar el de [i]result.RespuestaLinea.CSV, ya que cada factura tendrá el suyo?

[[newtron]]

Empezado por espinete

Hay otro CSV dentro de "result".

Con result.CSV sí obtengo el CSV.

Con [i]result.RespuestaLinea.CSV me viene en blanco.

¿Será que cuando enviamos SOLO una factura, el CSV que sirve es el result.CSV, pero cuando enviamos varias, hay que usar el de [i]result.RespuestaLinea.CSV, ya que cada factura tendrá el suyo?

Afirmativo. Cada factura tiene su CSV aunque no recuerdo si pone el mismo por cada tanda o es distinto.

[didou]

Empezado por espinete

Hay otro CSV dentro de "result".

Con result.CSV sí obtengo el CSV.

Con [i]result.RespuestaLinea.CSV me viene en blanco.

¿Será que cuando enviamos SOLO una factura, el CSV que sirve es el result.CSV, pero cuando enviamos varias, hay que usar el de [i]result.RespuestaLinea.CSV, ya que cada factura tendrá el suyo?

Buenos días, yo tampoco recibo el CSV de cada factura, alguien lo ha conseguido??