Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Envío de registros y sus respuestas (https://www.clubdelphi.com/foros/forumdisplay.php?f=66)
-   -   Demo con código Verifactu.dll para (delphi 7) (https://www.clubdelphi.com/foros/showthread.php?t=97004)

seccion_31 05-08-2025 22:07:09

A nivel de consulta no será tanto problema

A nivel de declaración si.

seccion_31 06-08-2025 07:20:37

ya esta resuelto !

ahora ya se puede consultar un periodo, SIN especificar fechas de expedicion.

Mañana enviare para publicacion la version 4.8 (si no surge otra cosa)

Si quereis incluir otra funcionalidad, ahora es buen momento.

Saludos !

DarkDudae 06-08-2025 09:45:11

Cita:

Empezado por seccion_31 (Mensaje 566934)
ya esta resuelto !

ahora ya se puede consultar un periodo, SIN especificar fechas de expedicion.

Mañana enviare para publicacion la version 4.8 (si no surge otra cosa)

Si quereis incluir otra funcionalidad, ahora es buen momento.

Saludos !

Gracias nuevamente compañero.

Respecto al tema fechas, y a fin de que el componente sea más polivalente, igual sería una buena idea que si la fecha de inicio y fin de la consulta coinciden con el primer y último día del mes consultado, se lance la búsqueda por período a nivel interno. De esta forma no haría falta diferenciar cuándo consultamos un período y cuando un rango de fechas a la hora de lanzar la consulta. Siempre se haría con los mismos parámetros.

Respecto a peticiones, ahora mismo no se me ocurre ninguna, aunque ando buscando alguna forma gratuita y legal de consultar los datos fiscales de una empresa introduciendo únicamente su NIF. He visto softwares que tienen esta característica (supongo que pagarán alguna API de las empresas que ofrecen estos servicios como eInforma), pero algo así ayudaría muchísimo al tema de prevenir datos fiscales incorrectos que desemboquen en rechazos por parte de la AEAT, además de facilitarle la vida al usuario. No sé si alguien más del foro podría ayudarnos en este punto...

valdusio 06-08-2025 10:46:08

Cita:

Empezado por seccion_31 (Mensaje 566934)
ya esta resuelto !

ahora ya se puede consultar un periodo, SIN especificar fechas de expedicion.

Mañana enviare para publicacion la version 4.8 (si no surge otra cosa)

Si quereis incluir otra funcionalidad, ahora es buen momento.

Saludos !

De nuevo muchas gracias por el gran aporte.
Cuando generas un XML de anulación de factura, aparecen dos mensajes referente a la huella. No se como desactivarlos.
Se ve que lo pusistes para probar y se te olvidó desactivarlos.
Muchas Gracias.

seccion_31 06-08-2025 11:03:20

Cita:

Empezado por valdusio (Mensaje 566936)
De nuevo muchas gracias por el gran aporte.
Cuando generas un XML de anulación de factura, aparecen dos mensajes referente a la huella. No se como desactivarlos.
Se ve que lo pusistes para probar y se te olvidó desactivarlos.
Muchas Gracias.

Ya esta retirado el aviso, (que verguenza), ahi se me escapó el showmessage

Saludos !

seccion_31 06-08-2025 19:42:28

ya he pasado a neftali la 4.8 para que la suba al ftp:


Saludos !

Neftali [Germán.Estévez] 07-08-2025 08:52:56

Ya está subida al FTP.
https://terawiki.clubdelphi.com/Otro...%20Delphi%207/

Gracias.

Matorral 07-08-2025 08:58:21

Millón de gracias compañeiro.

starlet 07-08-2025 11:51:29

Increible trabajo!!!

Mil gracias.

valdusio 08-08-2025 11:49:31

Cita:

Empezado por seccion_31 (Mensaje 566938)
Ya esta retirado el aviso, (que verguenza), ahi se me escapó el showmessage

Saludos !

Buenos días,
siento ser pesado, pero he puesto la ultima versión (4.8) y me continúan saliendo los mensajes.

Muchas gracias por el magnifico trabajo que estás haciendo.

DarkDudae 08-08-2025 12:47:39

Cita:

Empezado por valdusio (Mensaje 566984)
Buenos días,
siento ser pesado, pero he puesto la ultima versión (4.8) y me continúan saliendo los mensajes.

Muchas gracias por el magnifico trabajo que estás haciendo.

Yo aún no la he probado, pero recuerda que tienes que copiar la dll nueva a la carpeta de tu programa y a las carpetas de SysWow64 o System32 (dependiendo)

valdusio 08-08-2025 13:10:01

Cita:

Empezado por DarkDudae (Mensaje 566986)
Yo aún no la he probado, pero recuerda que tienes que copiar la dll nueva a la carpeta de tu programa y a las carpetas de SysWow64 o System32 (dependiendo)

Es lo que he hecho,
pero creo que el problemas está en que la DLL está compilada antes (06/08/2025 08:07) que la modificación de uVerifactuFuncs.pas. (06/082025 11:02).
A mi me da error si intento compilar la DLL

seccion_31 08-08-2025 13:45:35

Cita:

Empezado por valdusio (Mensaje 566987)
Es lo que he hecho,
pero creo que el problemas está en que la DLL está compilada antes (06/08/2025 08:07) que la modificación de uVerifactuFuncs.pas. (06/082025 11:02).
A mi me da error si intento compilar la DLL

He revisado y Ya No hay un solo showmessage dentro de la unidad de la DLL.

la DLL se encuentra en la carpeta del programa DEMO con fecha del 6/08 hora 8 de la mañana

Probare mas tarde.

Saludos !

seccion_31 08-08-2025 19:51:17

Efectivamente, Salia el mensaje de marras, al eliminar, con la demo.

he recompilado la DLL y ya no sale. Algo debí hacer mal en el ultimo momento.

Ya esta enviada para su publicacion, espero que la coloquen encima de la que hay. 4.8

He vuelto a borrar usando la demo y ha funcionado bien.

Saludos !

disculpas.

seccion_31 09-08-2025 11:27:44

Cita:

Empezado por seccion_31 (Mensaje 566995)
Efectivamente, Salia el mensaje de marras, al eliminar, con la demo.

he recompilado la DLL y ya no sale. Algo debí hacer mal en el ultimo momento.

Ya esta enviada para su publicacion, espero que la coloquen encima de la que hay. 4.8

He vuelto a borrar usando la demo y ha funcionado bien.

Saludos !

disculpas.

Ya está subido
Podéis descargarlo a ver qué tal
4.8

Slds !

valdusio 09-08-2025 11:42:27

Cita:

Empezado por seccion_31 (Mensaje 566999)
Ya está subido
Podéis descargarlo a ver qué tal
4.8

Slds !

Probado y sin "mensajitos".

Muchas Gracias

seccion_31 11-08-2025 10:52:50

Buenos dias !

La version 5.0 sera una version temprana (que llamo fase 1 de 3 ) que permitirá obtener archivos en formato facturaE de las facturas enviadas:

Código:

      // generamos facturasE, preparacion de los eventos:

      VeriFactuD7.OnFacturaEData:=onDatosFacturaE;                        // evento que permite indicar datos generales
      VeriFactuD7.OnFacturaELineas:=onLineasFacturaE;                    // permite indicar linea a linea de la factura
      VeriFactuD7.OnFacturaECompleta:=onCompletaFacturaE;              // factura completa !

      VeriFactuD7.generaFacturaE( xmlFacturaE );                            //  generamos en la ruta donde iran los archivos

      // Fin !
      VeriFactuD7.final( LogFile );                                          // Liberamos la sesion

Código:

    procedure onDatosFacturaE( Sender: TObject; numSerieFactura:string; indice:integer; facturaEData:TFacturaEData; var procesa:boolean);
    procedure onLineasFacturaE( Sender: TObject; numSerieFactura:string; indice:integer; facturaELinea:TInvoiceLine; var sigue:boolean);
    procedure onCompletaFacturaE( Sender: TObject; numSerieFactura:string; indice:integer; filename:string);

La version 6, permitira generar ademas en formato UBL.

Saludos !

Matorral 11-08-2025 11:40:57

Cita:

Empezado por seccion_31 (Mensaje 567015)
Buenos dias !

La version 5.0 sera una version temprana (que llamo fase 1 de 3 ) que permitirá obtener archivos en formato facturaE de las facturas enviadas:

Código:

      // generamos facturasE, preparacion de los eventos:

      VeriFactuD7.OnFacturaEData:=onDatosFacturaE;                        // evento que permite indicar datos generales
      VeriFactuD7.OnFacturaELineas:=onLineasFacturaE;                    // permite indicar linea a linea de la factura
      VeriFactuD7.OnFacturaECompleta:=onCompletaFacturaE;              // factura completa !

      VeriFactuD7.generaFacturaE( xmlFacturaE );                            //  generamos en la ruta donde iran los archivos

      // Fin !
      VeriFactuD7.final( LogFile );                                          // Liberamos la sesion

Código:

    procedure onDatosFacturaE( Sender: TObject; numSerieFactura:string; indice:integer; facturaEData:TFacturaEData; var procesa:boolean);
    procedure onLineasFacturaE( Sender: TObject; numSerieFactura:string; indice:integer; facturaELinea:TInvoiceLine; var sigue:boolean);
    procedure onCompletaFacturaE( Sender: TObject; numSerieFactura:string; indice:integer; filename:string);

La version 6, permitira generar ademas en formato UBL.

Saludos !


Impresionante¡¡¡ :cool::cool:
:D

ramherfer 11-08-2025 23:19:21

Cita:

Empezado por seccion_31 (Mensaje 566999)
Ya está subido
Podéis descargarlo a ver qué tal
4.8

Slds !

Por muchas gracias que te de, o paellas que disfrutaramos (tu por supuesto invitado) jamás estaría pagado el trabajo que has hecho y gracias al cual muchos hemos sobrevivido a esta (con perdon...) mierda en mayusculas.
Confié en el proyecto desde el principio, ya que aportaba un rayo de claridad y esperanza con esa bendita hoja excel. Y no me equivoque ¡¡GRACIAS!!

rafa1963 12-08-2025 10:24:31

Me uno a tu parecer compañero ramherfer, y estoy mil veces agradecido a todos vosotros por vuestro apoyo, y por la inmejorable labor que habéis realizado entre todos.
Un millón de Gracias ya habéis hecho posible el salir a delante de este traspié
tan grande.


La franja horaria es GMT +2. Ahora son las 12:46:59.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi