Facturas electrónicas [España]

[[newtron]]

Hola a tod@s.


Viendo que este asunto no prosperaba y que necesitaba resolverlo le encargué el proyecto a alguien que sabe más que nosotros y que domina varias herramientas de programación.


Había que resolver dos problemas, primero el de firmar el fichero XML en tiempo de ejecución, cosa que estaba complicada sin componentes externos porque desde Delphi no conocemos a nadie que haya sido capaz de hacerlo así que se ha desarrollado una dll en .NET que hace la función de firmado y que se llama desde el proyecto Delphi. Posteriormente había que hacer la llamada al webservice firmada con el protocolo X.509, cosa que tampoco sabíamos resolver y que tampoco ha sido fácil de desarrollar.


Resumiendo, aquí os adjunto un ejemplo operativo que hace las funciones más habituales de llamadas al webservice de FACE, firma y envía ficheros XML, consulta de facturas, consulta de unidades y alguna cosa más que no he probado porque en principio tampoco voy a necesitar. Por supuesto también se pueden usar sus funciones para solamente firmar un fichero XML para enviarlo por otros medios.



Está compilado en Delphi Berlín e imagino que funcionará igualmente en Tokyo, para que funcione en versiones anteriores posiblemente habría que hacer algunos retoques.



Aunque lo pongo en un LEEME.TXT lo único que hay que hacer es tener instalada y registrada la dll de CAPICOM (no incluida) y posteriormente ejecutar el fichero REGISTER.BAT para registrar la dll que se usa para la firma.


Link para la descarga.



Saludos y que aproveche.

Edito:

Se me olvidaba comentar dos temas:

1º Para poder enviar facturas a FACE hay que estar dado de alta como proveedor. Si quieres usar los wsdl de prueba hay que estar dado de alta por el entorno de pruebas y si quieres usar los de producción hay que darse de alta también en producción. Si no me equivoco, el entorno de pruebas es https://se-face.redsara.es/es/login

2º El programa que adjunto tiene los WSDL del entorno de pruebas, para pasar al de producción solo hay que cambiar en el objeto HTTPRIO el wsdl, puerto y servicio.

[espinete]

Me alegro de que por fin exista una alternativa que no necesite los componentes de SecureBlackBox, que por cierto, han subido de precio desorbitadamente desde que /n software compró Eldos.

Llevo tiempo trabajando con la factura electrónica de varios países (España, México, Costa Rica, Chile, Guatemala...) y estoy intentando crear una aplicación/módulo lo más sencilla y automática posible para que nuestro software de facturación sea compatible con todas ellas, pero me surge una duda.

Actualmente, para España, nuestro software necesita que el usuario (vendedor/emisor) indique manualmente si el destinatario (comprador/receptor) es persona Física o Jurídica, ya que el proceso es diferente (xml o xsig, con envío o sin envío, etc.).

¿No hay forma de saber eso a partir del NIF/CIF del Destinatario de la factura (dato que obviamente ya conocemos) con el fin de automatizarlo más y que no requiera intervención del usuario?

En otros países no es necesario especificarlo (no hay diferencia, ya que la factura se envía a Hacienda siempre), pero tengo entendido que en España solo es obligatorio para las Administraciones Públicas. ¿No hay forma entonces de saber, a partir del NIF/CIF del destinatario, si es una Admón. Pública o no, para en su caso, hacer automáticamente el proceso completo (xsig + enviar).

¿O es que estoy confundido del todo?

[[newtron]]

Empezado por espinete

Me alegro de que por fin exista una alternativa que no necesite los componentes de SecureBlackBox, que por cierto, han subido de precio desorbitadamente desde que /n software compró Eldos.

Llevo tiempo trabajando con la factura electrónica de varios países (España, México, Costa Rica, Chile, Guatemala...) y estoy intentando crear una aplicación/módulo lo más sencilla y automática posible para que nuestro software de facturación sea compatible con todas ellas, pero me surge una duda.

Actualmente, para España, nuestro software necesita que el usuario (vendedor/emisor) indique manualmente si el destinatario (comprador/receptor) es persona Física o Jurídica, ya que el proceso es diferente (xml o xsig, con envío o sin envío, etc.).

¿No hay forma de saber eso a partir del NIF/CIF del Destinatario de la factura (dato que obviamente ya conocemos) con el fin de automatizarlo más y que no requiera intervención del usuario?

En otros países no es necesario especificarlo (no hay diferencia, ya que la factura se envía a Hacienda siempre), pero tengo entendido que en España solo es obligatorio para las Administraciones Públicas. ¿No hay forma entonces de saber, a partir del NIF/CIF del destinatario, si es una Admón. Pública o no, para en su caso, hacer automáticamente el proceso completo (xsig + enviar).

¿O es que estoy confundido del todo?

Bueno, yo la verdad es que hasta ahora solo la estoy usando para la administración pública así que no se me ha dado ese problema. Pero bueno, siempre puedes pedir los datos que necesites en la ficha del cliente, ¿no?


Saludos

[manelb]

Empezado por espinete

Actualmente, para España, nuestro software necesita que el usuario (vendedor/emisor) indique manualmente si el destinatario (comprador/receptor) es persona Física o Jurídica, ya que el proceso es diferente (xml o xsig, con envío o sin envío, etc.).

¿No hay forma de saber eso a partir del NIF/CIF del Destinatario de la factura (dato que obviamente ya conocemos) con el fin de automatizarlo más y que no requiera intervención del usuario?

No te sirve con esto??


Saludos

[espinete]

Cierto, eso serviría para diferenciar entre persona física y jurídica, pero no para las Administraciones Públicas (que requiere xsig + envío a face).

¿Cómo saber si el destinatario de la factura es una Admón. Pública y, a partir del CIF, obtener el Órgano Gestor, Unidad Tramitadora y Oficina Contable?

El WSDL tiene varias funciones para obtener las Administraciones y sus órganos, y otra función para obtener todos los NIFs existentes en el directorio DIR3 de administraciones adheridas, PERO ninguna de esas funciones devuelve todos los datos necesarios (Dirección, Población, Provincia, País, etc.) de cada unidad, porque creo que son obligatorios.

Eso me obliga a tener que crear una base de datos enorme que el cliente tendrá que rellenar, o bien solicitar esos datos para introducción manual cada vez que el usuario envíe una factura a una Administración. Lo veo demasiado tedioso, aunque funcione y las facturas a administraciones públicas sean "pocas", pero hoy en día creo que esto se puede automatizar muchísimo más.

[elguille]

Empezado por newtron

Hola a tod@s.


Viendo que este asunto no prosperaba y que necesitaba resolverlo le encargué el proyecto a alguien que sabe más que nosotros y que domina varias herramientas de programación.


Había que resolver dos problemas, primero el de firmar el fichero XML en tiempo de ejecución, cosa que estaba complicada sin componentes externos porque desde Delphi no conocemos a nadie que haya sido capaz de hacerlo así que se ha desarrollado una dll en .NET que hace la función de firmado y que se llama desde el proyecto Delphi. Posteriormente había que hacer la llamada al webservice firmada con el protocolo X.509, cosa que tampoco sabíamos resolver y que tampoco ha sido fácil de desarrollar.


Resumiendo, aquí os adjunto un ejemplo operativo que hace las funciones más habituales de llamadas al webservice de FACE, firma y envía ficheros XML, consulta de facturas, consulta de unidades y alguna cosa más que no he probado porque en principio tampoco voy a necesitar. Por supuesto también se pueden usar sus funciones para solamente firmar un fichero XML para enviarlo por otros medios.



Está compilado en Delphi Berlín e imagino que funcionará igualmente en Tokyo, para que funcione en versiones anteriores posiblemente habría que hacer algunos retoques.



Aunque lo pongo en un LEEME.TXT lo único que hay que hacer es tener instalada y registrada la dll de CAPICOM (no incluida) y posteriormente ejecutar el fichero REGISTER.BAT para registrar la dll que se usa para la firma.


Link para la descarga.



Saludos y que aproveche.

Edito:

Se me olvidaba comentar dos temas:

1º Para poder enviar facturas a FACE hay que estar dado de alta como proveedor. Si quieres usar los wsdl de prueba hay que estar dado de alta por el entorno de pruebas y si quieres usar los de producción hay que darse de alta también en producción. Si no me equivoco, el entorno de pruebas es https://se-face.redsara.es/es/login

2º El programa que adjunto tiene los WSDL del entorno de pruebas, para pasar al de producción solo hay que cambiar en el objeto HTTPRIO el wsdl, puerto y servicio.

Gracias Newtron por el codigo. Trasteando con el he enviado sin problemas una factura a la webservice de pruebas, pero para poderla emplear necesitaria poder añadir el PDF correspondiente a la imagen fisica de la factura, mirando el WDSL he añadido el siguiente codigo al enviar la factura

Código Delphi [-]
  
  miarr:arrayofanexofile;
  miarr1:anexofile;

if ficheropdf<>'' then
  begin
    MIARR1:=anexofile.create;
    miarr1.mime:='application/pdf';
    MIARR1.nombre:=extractfilename(ficheropdf);
    MIARR1.anexo:=tfile.ReadAllText(ficheropdf);
    SetLength(miarr, Length(miarr)+1);
    miarr[0]:=miarr1;
    SenderEnviarFactura.anexos  := miarr;
  end;

pero al hacerlo recibo el error "Se encontró un carácter no valido en el contenido del texto", imagino que tengo que codificar de alguna manera el texto resultante de tfile.ReadAllText(ficheropdf); ¿alguien sabe cómo se haría?
Gracias

[[newtron]]

Guille.


Me alegro de que te haya servido el código. Sobre el tema del problema que tienes la verdad es que no sabría decirte pero si te puedo comentar que tuvimos bastantes problemas con la codificación de los "strings" que se enviaban y al final funcionó codificando con UTF8Encode(...), no sé si los tiros en este caso irán por ahí.


Saludos

Edito: Si das con la solución compártelo por favor por si alguno lo necesitamos.

[elguille]

Empezado por newtron

Guille.


Me alegro de que te haya servido el código. Sobre el tema del problema que tienes la verdad es que no sabría decirte pero si te puedo comentar que tuvimos bastantes problemas con la codificación de los "strings" que se enviaban y al final funcionó codificando con UTF8Encode(...), no sé si los tiros en este caso irán por ahí.


Saludos

Edito: Si das con la solución compártelo por favor por si alguno lo necesitamos.

Ya me fije con los comentarios que habiais hecho muchas pruebas. Lo que comentas y varias cosas mas ya las habia probado y no se me ocurre que empaquetado es el que quieren, en fin haré mas pruebas a ver si me viene alguna idea.

Gracias y saludos

[[Al González]]

Empezado por newtron

[...]firmar el fichero XML en tiempo de ejecución, cosa que estaba complicada sin componentes externos porque desde Delphi no conocemos a nadie que haya sido capaz de hacerlo[...]

Y una vez que Embarcadero o algún programador lo consiga con código 100% en Delphi, será la noticia de la década.

[elguille]

Código Delphi [-]
var
  miarr:arrayofanexofile;
  miarr1:anexofile;

  if edit1.Text<>'' then
  begin
    MIARR1:=anexofile.create;
    miarr1.mime:='application/pdf';
    MIARR1.nombre:=utf8encode(extractfilename(EDIT1.Text));
    MIARR1.anexo:=Encode64(tfile.ReadAllText(edit1.Text),tetUTF8);
    SetLength(miarr, Length(miarr)+1);
    miarr[0]:=miarr1;
    SenderEnviarFactura.anexos  := miarr;
  end;

A falta de hacer una prueba real este es el codigo correcto para añadir un pdf de imagen de la factura.

[[newtron]]

Empezado por elguille

Código Delphi [-]var miarr:arrayofanexofile; miarr1:anexofile; if edit1.Text<>'' then begin MIARR1:=anexofile.create; miarr1.mime:='application/pdf'; MIARR1.nombre:=utf8encode(extractfilename(EDIT1.Text)); MIARR1.anexo:=Encode64(tfile.ReadAllText(edit1.Text),tetUTF8); SetLength(miarr, Length(miarr)+1); miarr[0]:=miarr1; SenderEnviarFactura.anexos := miarr; end;

A falta de hacer una prueba real este es el codigo correcto para añadir un pdf de imagen de la factura.

muchas gracias por la info, el que primero lo pruebe que lo confirme.


Saludos

[Virman]

Buenos días,
Tengo que realizar un programa que consulte el estado de las facturas pero sin certificado. En la web de FACE he visto que rellenando unos campos se permite realizar la consulta de facturas.

Entiendo que podría usar el programa que habéis aportado para realizar estas consultas, verdad?

Muchas gracias!

[[newtron]]

Empezado por Virman

Buenos días,
Tengo que realizar un programa que consulte el estado de las facturas pero sin certificado. En la web de FACE he visto que rellenando unos campos se permite realizar la consulta de facturas.

Entiendo que podría usar el programa que habéis aportado para realizar estas consultas, verdad?

Muchas gracias!

Dudo que puedas consultar las facturas sin tener que introducir el certificado.

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

Empezado por Virman

Tengo que realizar un programa que consulte el estado de las facturas pero sin certificado. En la web de FACE he visto que rellenando unos campos se permite realizar la consulta de facturas.

Tendrías quue acalarar qué sistema quieres utilizar. Hay varios.
Habría que ver si se puede enviar información de registro a la web utilizando las Indy o similares.

Empezado por Virman

Entiendo que podría usar el programa que habéis aportado para realizar estas consultas, verdad?

No se de qué programa hablas. Está en este hilo.
¿Puedes dar un link al programa? No sigo con mucho detalle este hilo.

Empezado por newtron

Dudo que puedas consultar las facturas sin tener que introducir el certificado.

Si se puede. Hay varios sistemas de consulta:

[nincillo]

Empezado por newtron

Hola a tod@s.


Viendo que este asunto no prosperaba y que necesitaba resolverlo le encargué el proyecto a alguien que sabe más que nosotros y que domina varias herramientas de programación.


Había que resolver dos problemas, primero el de firmar el fichero XML en tiempo de ejecución, cosa que estaba complicada sin componentes externos porque desde Delphi no conocemos a nadie que haya sido capaz de hacerlo así que se ha desarrollado una dll en .NET que hace la función de firmado y que se llama desde el proyecto Delphi. Posteriormente había que hacer la llamada al webservice firmada con el protocolo X.509, cosa que tampoco sabíamos resolver y que tampoco ha sido fácil de desarrollar.


Resumiendo, aquí os adjunto un ejemplo operativo que hace las funciones más habituales de llamadas al webservice de FACE, firma y envía ficheros XML, consulta de facturas, consulta de unidades y alguna cosa más que no he probado porque en principio tampoco voy a necesitar. Por supuesto también se pueden usar sus funciones para solamente firmar un fichero XML para enviarlo por otros medios.



Está compilado en Delphi Berlín e imagino que funcionará igualmente en Tokyo, para que funcione en versiones anteriores posiblemente habría que hacer algunos retoques.



Aunque lo pongo en un LEEME.TXT lo único que hay que hacer es tener instalada y registrada la dll de CAPICOM (no incluida) y posteriormente ejecutar el fichero REGISTER.BAT para registrar la dll que se usa para la firma.


Link para la descarga.



Saludos y que aproveche.

Edito:

Se me olvidaba comentar dos temas:

1º Para poder enviar facturas a FACE hay que estar dado de alta como proveedor. Si quieres usar los wsdl de prueba hay que estar dado de alta por el entorno de pruebas y si quieres usar los de producción hay que darse de alta también en producción. Si no me equivoco, el entorno de pruebas es https://se-face.redsara.es/es/login

2º El programa que adjunto tiene los WSDL del entorno de pruebas, para pasar al de producción solo hay que cambiar en el objeto HTTPRIO el wsdl, puerto y servicio.

Hola.

Estoy intentando poner en marcha el intercambio de información con la sede electrónica de Facturae utilizando D2007 y poco a poco, partiendo del ejemplo que compartió en su momento newtron (muchas gracias por hacerlo) voy consiguiendo hacer casi "todo".

Actualmente, si las peticiones las hago utilizando los certificados instalados en el sistema, la petición se envía y la respuesta se recibe. Sin embargo, si la petición la intento hacer utilizando un certificado que está en fichero del disco duro, la petición no se llega a lanzar ya que me salta el siguiente error: 'wsu' es un espacio de nombres sin declarar. Línea 2, posición 327.

Si la contraseña que pongo no es la correcta, me salta el mensaje de que no es correcta, con lo cual el chequeo de la contraseña lo hace correctamente, pero cuando luego "entiendo" que intenta montar el Xml, algún problema problema hay.

Entonces me he conseguido montar en entorno de pruebas con una versión de delphi más moderna para probar el ejemplo tal cual se publicó en su momento, y me he encontrado que presenta el mismo problema. Al firmar con el certificado del sistema lo hace correctamente, pero si se intenta firmar con el certificado en fichero, sale el mismo mensaje de error.

A ver si alquilen me puede "iluminar".

Gracias y un saludo.

[nuevo1234]

Verifactu y facturae son dos cosas diferentes? Tienen alguna relación?
Perdón por mi desconocimiento. Pero con tantas novedades me pierdo

[ermendalenda]

Empezado por nuevo1234

Verifactu y facturae son dos cosas diferentes? Tienen alguna relación?
Perdón por mi desconocimiento. Pero con tantas novedad, de foema similar al siis me pierdo

Sí, son diferentes , Verifactu es una normativa que te obliga a generar unos ficheros xmls que puedes enviarlo a la aeat (como el sii) o conservarlos firmados ante posibles requerimientos de la aeat.
La factura electronica es el intercambio de facturas entre un proveedor y un cliente, también esttructurada.
Relación habrá si un cliente te pide una factura electrónica, seguramente hebras que ponerle el código generado con verifactu en algún campo de la factura electrónica.

[[newtron]]

Hola a tod@s.

Por si a alguien le sirve, aquí tenéis un buen resumen del tema de la facturación electrónica con plazos concretos de entrada en vigor.

Saludos.

[keys]

Gracias.

Me hace gracia lo siguiente :

Para ello, las soluciones tecnológicas y plataformas ofrecidas por empresas
proveedoras de facturación electrónica, deberán garantizar la gratuidad de las
mismas.

Con un par.

[[newtron]]

Pues si, la verdad es que no me cuadra mucho ese párrafo. Quiero entender que al cliente que solicite una factura electrónica a su proveedor no se le cobre por emitirsela.

Saludos.