Facturas electrónicas [España]

[elguille]

Espinete, ¿lo has conseguido? ¿Puedes ilustrarnos?

Gracias

[espinete]

Hola!

Pues sí, creo que lo tengo todo, a falta de probar en modo producción.
Esta semana ha habido varios cortes del servicio (avisan por email cuando tienen previsto uno), pero conseguí hacer pruebas para enviar una factura, consultar el estado de una factura, obtener el listado de organismos disponibles, anular una factura, etc.

Mañana intentaré poner algunos ejemplos, pero ahora mismo tengo este a mano: Consultar Administraciones:

Código Delphi [-]
procedure TfrmMain.Button3Click(Sender: TObject);
var
    answ : ConsultarAdministracionesResponse;
    htpr: THTTPRIO;
    sphdr: TSOAPHEADER;
    WS: FacturaSSPPWebServiceProxyPort;
    UnidadDir : UnidadDir3;
    i:integer;
begin
    if comboCertificate.ItemIndex=-1 then
    begin
      showmessage('Debe seleccionar primero un certificado en el desplegable.');
      exit;
    end;
    
    Listbox1.items.clear;

        //Creamos los headers, necesarios para la petición SOAP
        sphdr := TSOAPHEADER.create;

        // Creo el HTTP, que utilizaré como vehículo
        htpr := THTTPRIO.create(Self);

        //Aquí trabajamos con el propio httprio, donde podemos poner cabeceras, asignar eventos, etc...

        htpr.SOAPHeaders.Send(sphdr);
        htpr.OnBeforeExecute := HTTPRIO1BeforeExecute;

        // Al crear la instancia del WS, le asigno el httprio que he creado y he manipulado...
        WS:= GetFacturaSSPPWebServiceProxyPort(FALSE, '', htpr);
        try
            answ := WS.consultarAdministraciones;
        except
            on e:exception do showmessage(e.Message);
        end;

        if answ.resultado.codigo='0' then
        begin
            UnidadDir := UnidadDir3.Create;
            for i:=0 to length(answ.administraciones)-1 do
            begin
                UnidadDir := answ.administraciones[i];
                begin
                    listbox1.items.append(UnidadDir.codigo + ' - ' + UnidadDir.nombre )
                end;
            end;
            UnidadDir.Free;
        end;
end;

El evento HTTPRIO1BeforeExecute creo recordar que ya lo publiqué en otro post más arriba.
Cuando tenga más tiempo editaré el post original añadiendo todas las funciones.

[[newtron]]

Hola.

¿Qué pasó al final con este tema?

Saludos

[Ñuño Martínez]

Iba a ponerte un enlace, pero creo que ya has encontrado el hilo tú mismo.

[[newtron]]

Empezado por Ñuño Martínez

Iba a ponerte un enlace, pero creo que ya has encontrado el hilo tú mismo.

¿Qué hilo?

[Ñuño Martínez]

Empezado por newtron

¿Qué hilo?

Este, ¿no?

[[newtron]]

Empezado por Ñuño Martínez

Este, ¿no?

Qué va. el hilo ese está relacionado con el llamado SII (Suministro inmediato de información) y yo preguntaba por el envío de facturas electrónicas por webservice.

Bueno... algo tienen en común, usan webservices.

[bey23]

Hola!

Actualmente estoy buscando información sobre FACe, cómo subir las facturas automáticamente, y visto lo visto hay poquísima documentación sobre esto o ejemplos.

Me he leído de pe a pa todo este hilo, y por cierto, sois unos máquinas!!

Sólo quería preguntar si ahora mismo conseguisteis completar el proceso, crear el XML firmado y subirlo automáticamente, y si está en algún sitio ese proyecto o ejemplos del mismo...

Lo siento si es un tema que ya estaba cerrado, pero la verdad es que me urge y este es el único foro que de verdad se lo ha estado currando.

Muchas gracias a todos!!

[manelb]

Nosotros hemos ido atacando el proyecto por fases.
Ahora generamos el xml de la factura y lo firmamos, pero tenemos pendiente el envío directo a FACE.

Supongo que en unas semanas como mucho volveremos al proyecto y debe servirnos como experiencia el trabajo realizado con el SII.

Si queréis podemos mantener este hilo para ir compartiendo avances o, si a los moderadores les parece mejor, crear un hilo nuevo.

Saludo

[[newtron]]

Espinete en su último post comentaba que lo había conseguido y que pondría unos ejemplos pero al final ahí se quedó la cosa.

Saludos

[[newtron]]

Buenas a tod@s.

Voy a intentar ponerme con este tema.

¿Alguien ha avanzado algo con respecto a lo que ya hay por aquí?

Saludos

[[newtron]]

Hola de nuevo.

Estoy empeñado en sacar este tema adelante. Dándole vueltas, la documentación que hay en la web de face es erronea, las direcciones de las wsdl son incorrectas y no funcionan.

Rebuscando por internet he encontrado este documento que si parece que es correcto y tiene bastante más información que el que se puede descargar de la web de face, por si a alguien le interesa.

Yo por mi parte estoy haciendo pruebas con los últimos trozos de código que se pusieron aquí pero no consigo gran cosa. En principio el fichero XML no hay gran problema para crearlo y el tema de la firma electrónica se puede resolver usando el programa autofirma con lo que solo quedaría hacer la llamada al webservice que es donde estoy atascado.

Ahora yo pregunto... ¿hay alguien más en la actualidad interesado en este tema? ¿alguien que sepa de webservice que pueda echar una mano?

Gracias y un saludo