Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Proyecto SIF/Veri*Factu/Ley Antifraude > SDK Componente Verifactu para Delphi 7+ - Subforo Avisos/consultas
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 31-10-2025
starlet starlet is offline
Miembro
NULL
 
Registrado: sep 2012
Posts: 31
Poder: 0
starlet Va por buen camino
Buenas:

Tal y como te indica seccion31, es un array que vas cargando con los datos número_ticket_serie de F2 (o como lo tengas en tu programa) y la fecha de los tickets que agrupes en esa F3.

Código:
TRegistroFactura.nsustituye:=1;
TRegistroFactura.sustituyeTicketF3[0].NumSerieTicket:='ticket a sustituir';
TRegistroFactura.sustituyeTicketF3[0].fechaTicket   :='fecha ticket a sustituir'
Tendrá tantos elementos como facturas/tickets F2 añadas, hasta un máximo de 60 y añadir los datos del cliente para esa F3.

Saludos,
Responder Con Cita
  #2  
Antiguo 31-10-2025
starlet starlet is offline
Miembro
NULL
 
Registrado: sep 2012
Posts: 31
Poder: 0
starlet Va por buen camino
Aclaro con más información el uso en el componente:

Flujo Completo del Proceso

1. EMISIÓN DE TICKETS F2 (sin identificar cliente)
├─ T-2025-001: 60€ (10/01/2025)
├─ T-2025-002: 40€ (15/01/2025)
└─ T-2025-003: 50€ (20/01/2025)

2. CLIENTE SOLICITA FACTURA COMPLETA

3. CREAR FACTURA F3
├─ Número nuevo: F-2025-100
├─ Cliente identificado: PEPITO PEREZ PEREZ (12345678A)
├─ Total: 150€ (suma de los 3 tickets)
└─ Sustituye: T-2025-001, T-2025-002, T-2025-003

4. ENVÍO A AEAT
└─ Se registra F3 con referencia a los 3 tickets

5. RESULTADO
├─ F3 enviada y aceptada
└─ Tickets F2 quedan sustituidos (no anulados)

---
XML Generado (Simplificado y como EJEMPLO)
Código:
  <RegistroFacturacion>
    <TipoFactura>F3</TipoFactura>
    <NumSerieFactura>F-2025-100</NumSerieFactura>
    <FechaExpedicion>31-01-2025</FechaExpedicion>

    <!-- CLIENTE IDENTIFICADO -->
    <Destinatarios>
      <NIF>12345678A</NIF>
      <Nombre>PEPITO PEREZ PEREZ</Nombre>
    </Destinatarios>

    <!-- IMPORTES TOTALES -->
    <ImporteTotal>150.00</ImporteTotal>
    <BaseImponible>123.97</BaseImponible>
    <CuotaIVA>26.03</CuotaIVA>

    <!-- FACTURAS SUSTITUIDAS -->
    <FacturasSustituidas>
      <<IDFacturaSustituida>>
        <IDEmisorFactura>B123456789</IDEmisorFactura>
        <NumSerieFactura>T-2024-001</NumSerieFactura>
        <FechaExpedicionFactura>10-01-2025</FechaExpedicionFactura>
      </IDFacturaSustituida>
      <IDFacturaSustituida>
        <IDEmisorFactura>B123456789</IDEmisorFactura>
        <NumSerieFactura>T-2024-002</NumSerieFactura>
        <FechaExpedicionFactura>15-01-2025</FechaExpedicionFactura>
      </IDFacturaSustituida>
      <IDFacturaSustituida>
        <IDEmisorFactura>B123456789</IDEmisorFactura>
        <NumSerieFactura>T-2024-003</NumSerieFactura>
        <FechaExpedicionFactura>20-01-2025</FechaExpedicionFactura>
      </IDFacturaSustituida>
    </FacturasSustituidas>
  </RegistroFacturacion>
---
PUNTOS IMPORTANTES

1. Detección Automática de F3

El componente detecta automáticamente que es F3 cuando:
if factura.nSustituye > 0 then
// Cambia TipoFactura a F3 automáticamente

2. Importes en la F3

- Los importes de la F3 deben ser la suma de los tickets sustituidos
- Los conceptos pueden ser nuevos/agrupados (no necesariamente los mismos)
- Los IVAs se calculan sobre el total

3. Encadenamiento

- La F3 se encadena con la última factura enviada como cualquier otra factura (no con los tickets)
- Los tickets F2 no se anulan, solo se sustituyen

Yo no uso la multisustiutución por características de mis clientes. Yo solo sustituyo una F2 en cada F3 y no varias F2 en cada F3.

Espero que ayude a los que tengan dudas.
Responder Con Cita
  #3  
Antiguo 02-11-2025
Avatar de seccion_31
seccion_31 seccion_31 is offline
Miembro
 
Registrado: ene 2017
Posts: 472
Poder: 10
seccion_31 Va por buen camino
La version 5.8 incluira un ejemplo en la Demo de como crear una factura F3.

El ejemplo, busca los tickets en la AEAT (porque no los tiene identificados en la BD XML que guarda), los recupera como digo de la AEAT, y permite seleccionarlos para crear una F3 agrupandolos.

En principio esta semana la enviare a publicacion, con este y algun cambio mas.

Saludos !
Responder Con Cita
  #4  
Antiguo 06-11-2025
Isaac_uni Isaac_uni is offline
Registrado
 
Registrado: jul 2025
Posts: 9
Poder: 0
Isaac_uni Va por buen camino
Hola buenas
Estoy muy agredecido Seccion_31 por haber creado la dll para verifactu, no sabia por donde pillar este tema.

Tengo un problema y no se a quien recurrir, estoy Implementado el proceso en el proyecto que tengo de los tikets no me funciona al momento iniciar la comprobación me da un error.
Me pasa en 2 sitios pero me parece que comparte causa.
El primero es aqui
if veriFactuD7.VerifactuActivo then
formmenu.unistatusBar1.panels[1].Text:='AEAT Activa'
else
formmenu.unistatusBar1.panels[1].Text:='AEAT Inactiva';
En VerifactuActivo me da error aqui
result:=VerificarServicioSOAP( maxSessions+1, VERIFACTUACTIVOPING );

el error es
Project kioslib.exe raised exception class $C000000FD with message 'stack overflow at 0x5658327f'
me parece que esta intentando acceder a algun sitio o algo que no esta generado, pero no logro localizarlo.

cualquier cosa que se os ocurra la pruebo,
Gracias
Responder Con Cita
  #5  
Antiguo 06-11-2025
Avatar de seccion_31
seccion_31 seccion_31 is offline
Miembro
 
Registrado: ene 2017
Posts: 472
Poder: 10
seccion_31 Va por buen camino
Aumenta el stacksize de tu aplicación al máximo.

Y nos cuentas
Responder Con Cita
  #6  
Antiguo 07-11-2025
Isaac_uni Isaac_uni is offline
Registrado
 
Registrado: jul 2025
Posts: 9
Poder: 0
Isaac_uni Va por buen camino
Cita:
Empezado por seccion_31 Ver Mensaje
Aumenta el stacksize de tu aplicación al máximo.

Y nos cuentas
Muchas Gracias.
Funciono perfectamente, llevaba un par de días que no sabia que era, ahora continuare adaptando mi programa.
Gracias de nuevo
Responder Con Cita
  #7  
Antiguo 07-11-2025
Avatar de DarkDudae
DarkDudae DarkDudae is offline
Miembro
 
Registrado: abr 2006
Posts: 177
Poder: 21
DarkDudae Va por buen camino
Yo llevo enviando F3 de varios tickets(F2) desde la 5.6 o 5.7 si no recuerdo mal sin problemas.
__________________
El recuerdo es la prisión en la que el alma sueña pasado, cuando no vive el presente, ni quiere un futuro.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Imprimir tikets con Epson TM-U220 Freddy Silva Impresión 12 22-04-2013 16:51:04


La franja horaria es GMT +2. Ahora son las 04:16:25.


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
Copyright 1996-2007 Club Delphi