Demo con código Verifactu.dll para (delphi 7)

[valdusio]

Empezado por DarkDudae

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]

Empezado por valdusio

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]

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]

Empezado por seccion_31

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]

Empezado por seccion_31

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

Slds !

Probado y sin "mensajitos".

Muchas Gracias

[seccion_31]

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:

      // 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

    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]

Empezado por seccion_31

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:

      // 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

    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¡¡¡

[ramherfer]

Empezado por seccion_31

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]

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.

[DarkDudae]

Gracias compañero. Como siempre, si necesitas que te eche una mano con algo, no dudes en comentármelo.