España: Normativa sancionadora sistemas informáticos

[Julio Cepeda]

Ya me funciona y me devuelve lo mismo que el ejemplo de la AEAT.
He hecho alguna modificación y ya devuelve bien. De nuevo gracias Carlos.

Code: Select all | Expand

 Function Main()
 
 LOCAL cCadena

 local cNIF, ;
       cNumSerieFacturaEmisor, ;
       dFechaExpedicionFactura, ;
       cTipoFactura, ;
       nCuotaTotal, ;
       nImporteTotal, ;
       cHuellaRegistroAnterior, ;
       cFechaHoraHusoGenRegistro
 
   cNIF             := "IDEmisorFactura=" + "89890001K"
   cNumSerieFacturaEmisor   := "&NumSerieFactura=" + "12345678/G33"
   dFechaExpedicionFactura      := "&FechaExpedicionFactura=" + "01-01-2024"
   cTipoFactura         := "&TipoFactura=" + "F1"
   nCuotaTotal          := "&CuotaTotal=" + "12.35"
   nImporteTotal        := "&ImporteTotal=" + "123.45"
   cHuellaRegistroAnterior      := "&Huella=" + ""
   cFechaHoraHusoGenRegistro    := "&FechaHoraHusoGenRegistro=" + "2024-01-01T19:20:30+01:00"
 
 cCadena := hb_VerifactuHuella( cNIF, ;
                                cNumSerieFacturaEmisor, ;
                            dFechaExpedicionFactura, ;
                            cTipoFactura, ;
                            nCuotaTotal, ;
                            nImporteTotal, ;
                            cHuellaRegistroAnterior, ;
                            cFechaHoraHusoGenRegistro )
                            
 MsgInfo( cCadena, "cCadena devuelta" )

 Return NIL

 Function hb_VerifactuHuella( cNIF, ;
                              cNumSerieFacturaEmisor, ;
                              dFechaExpedicionFactura, ;
                              cTipoFactura, ;
                              nCuotaTotal, ;
                              nImporteTotal, ;
                              cHuellaRegistroAnterior, ;
                              cFechaHoraHusoGenRegistro )

 local c := ""
 local h := {=>}
 Local cHuella := ""

 h['Nif']                      := cNIF
 h['NumSerieFacturaEmisor']    := cNumSerieFacturaEmisor
 h['FechaExpedicionFactura']   := dFechaExpedicionFactura 
 h['TipoFactura']              := cTipoFactura
 h['CuotaTotal']               := nCuotaTotal
 h['ImporteTotal']             := nImporteTotal
 h['HuellaRegistroAnterior']   := cHuellaRegistroAnterior
 h['FechaHoraHusoGenRegistro'] := cFechaHoraHusoGenRegistro

 hb_heval( h, {|k,v,i| c += v} )        //    | key, value, index |

 c := hb_StrToUTF8( c )     // Si se quita no varía resultado.

 cHuella := ( hb_sha256( c ) )

 cHuella := Upper( cHuella )

 Return ( cHuella )
 

Ahora veré cómo pasar _ de la factura.

[Garbi]

Hola Carlos,
Sigo intentando seguir tu codigo, pero se me hace muy pesado porque tengo la cabeza en otras cosas, solo tenemos malas noticias los afectados por la Dana, por los menos con los que hablo yo.

Solo por curiosidad, ¿estos de AEAT sacaran el programa ese que dicen que será gratuito para usar el verifactu pronto para los que hagan pocas facturas al año?
¿No se les ocurrirá poder importar facturas desde un fichero plano o fichero excel para enviar la,s factura,s?

Hoy se lo he comentado al dueño del horno donde voy a comprar el almuerzo y solo tiene un par de cajas registradoras y me ha puesto una cara, que casi le hago una foto.

[paquitohm]

Me pareciera a mi que la existencia de una interfaz para envio de datos no resolveria la parte gruesa consistente en: Preparar datos y recoger respuesta y en funcion de ella corregir y reenviar, si necesario

[Garbi]

¿Alguien tiene el código más avanzado y que pueda compartir?

No tengo tanto tiempo para ir haciendo muchas pruebas. No veáis como estamos de trabajo ayudando a la empresas afectadas por la Dana a salir adelante, con ordenadores antiguos, no tienen dinero para nuevos y poniendo al menos un ordenador para que puedan trabajar.
Si hay muchas ayudas pero no las pagan aún y la gente tiene que facturar y comer. Esto va todo muy lento.

Agradecería cualquier ayuda. En la firma esta mi email por si queréis poneros en contacto conmigo directamente.

Nota.- Paquito te he enviado un email y como no he tenido respuesta estoy un poco preocupado. ¿Estas bien?

[FiveWiDi]

De momento estoy con Verifactu On-line, por tanto los requerimientos no deberían afectarme.

En cuanto a las consultas, cuando lo tenga más rodado me plantearé abordar las consultas; con la experiencia de Verifactu On-line será más fácil abordarlas.

De momento estoy contento con las pruebas que llevo, genero, envío y capturo la respuesta.

Lo que si que hay un tema del que no era muy consciente.

Hasta ahora un 'administrativo' tenía las facturas con errores en papel/pdf, ahora tendrá unas respuestas de Verifactu que le dirán "has hecho algo mal, esto y lo otro", y deberá saber como resolverlas.

Muchas gracias Víctor,

Seguimos.

[paquitohm]

Hasta ahora un 'administrativo' tenía las facturas con errores en papel/pdf, ahora tendrá unas respuestas de Verifactu que le dirán "has hecho algo mal, esto y lo otro", y deberá saber como resolverlas.

Sí y a nosotros nos dejaban más o menos "en paz".

Pero desde el momento en que todo esto es nuevo para todos, aunque los desarrolladores ya llegamos con la cartilla aprendida, desde el momento en que no sólo es un administrativo sino varios, desde el momento en que ese administrativo se va de vacaciones EN AGOSTO y lo sustituye uno que nunca ha facturado o al menos no lo han dejado "enseñado", y el mayor: Desde el momento en que ahora todas las incidencias y sus soluciones deben estar "regladas"...

Pues ahora todo eso se nos va a venir encima. La cuestión no es "cuanto trabajo para nosotros" sino, todo eso ¿ Por lo mismo ?

[FiveWiDi]

Sí y a nosotros nos dejaban más o menos "en paz".

Pero desde el momento en que todo esto es nuevo para todos, aunque los desarrolladores ya llegamos con la cartilla aprendida, desde el momento en que no sólo es un administrativo sino varios, desde el momento en que ese administrativo se va de vacaciones EN AGOSTO y lo sustituye uno que nunca ha facturado o al menos no lo han dejado "enseñado", y el mayor: Desde el momento en que ahora todas las incidencias y sus soluciones deben estar "regladas"...

Pues ahora todo eso se nos va a venir encima. La cuestión no es "cuanto trabajo para nosotros" sino, todo eso ¿ Por lo mismo ?

Yo por lo pronto para mi solución que es la que conozco, voy a redactar un PDF en donde según el error (lo capturo tal cual viene de Verifactu y el usuario podrá ver en pantalla), indicaré "Debe hacer esto y lo otro" y que en la pantalla "Debe pulsar este botón y este otro".

Por ejemplo para un error de 'SERVER' sólo permitiré y le indicaré que "Debe seleccionar el XML y pulsar el botón enviar."
Por ejemplo para un error de 'CLIENT' deberá indicarme el error que ha recibido (teóricamente es un problema/error técnico mío), lo miro/soluciono, y le permitiré generar de nuevo el XML e indicaré que "Debe seleccionar el XML y pulsar el botón enviar."
Por ejemplo para un error de "Sin conexión a Internet" sólo permitiré y le indicaré que consiga Internet y después "Debe seleccionar el XML y pulsar el botón enviar."
Por ejemplo para un error "desconocido" (usen una firma caducada y me cuentan [vaya tela con Verifactu]), "Revisar la vigencia de la firma digital."... Y si no llamar al técnico (yo, que le voy a hacer?).

Y así para los errores a nivel de registro, lo mismo "Haz esto y luego lo otro".

Verifactu es más de lo que pensaba; debe ir acompañado de documentación si queremos dormir y ser dueños de nuestro tiempo. Deberemos educar al usuario.

Por cierto, espero dejarlo funcionando en Semana Santa (y si puedo ya en la facturación de febrero) contra el entorno de pruebas, y sin prisas todos podremos aprender "que es esto", "que hace", "que sucede", "como se arregla".


Seguimos.

[paquitohm]

Por ejemplo para un error "desconocido" (usen una firma caducada y me cuentan [vaya tela con Verifactu]), "Revisar la vigencia de la firma digital."... Y si no llamar al técnico (yo, que le voy a hacer?).

De momento sólo en la factura-e le muestro la caducidad de la firma digital. No es suficiente, supongo, porque se acostumbran a verlo: Lo siguiente que haré será que cuando falte un mes, el letrero sea rojo o algo así y cuando falte una semana le sacaré una mano de Mickey que le toque el ojo al usuario

[paquitohm]

Fivewidi,

Una pregunta:
¿ Contemplaras/ contemplas en tu SIF la anulación de facturas ? ¿ Cómo lo compaginas con los listados de IVA y otros listados de ventas ?

Salu2

[FiveWiDi]

¿ Contemplaras/ contemplas en tu SIF la anulación de facturas ? ¿ Cómo lo compaginas con los listados de IVA y otros listados de ventas ?

Perdona el retraso, no vi el mensaje.

Si y no.

No permitiré la anulación de facturas; y sólo permitiré facturas "rectificativas por DIFERENCIA", no por sustitución.

Por un motivo muy simple. Ponérselo fácil al usuario (y a mi de carambola, más tranquilo y menos explicaciones de como funciona la contabilidad con la facturación).

Si quiere repasar/sumar facturas y listados de IVA y demás, aplicando este criterio deberá tener en cuenta TODAS las facturas (así no hay dudas de que esta si y esta no), pues ninguna ha sido substituida por una "rectificativa de substitución" y ninguna ha sido anulada.

Si quiere anular una factura, que haga una "rectificativa por diferencia" por el mismo importe que la 'errónea' pero de importes con signo contrario (normalmente negativo).

Creo que es legal lo que pretendo, quizás no debe ser ortodoxo pero creo que es más sencillo para todos.

Seguimos.

[paquitohm]

Gracias por tu explicación.
Así lo tengo yo hasta ahora y así quisiera mantenerlo (SII/ TBAI)