Ayuda con apertura de Caja

[cristian22]

Empezado por Neftali

¿Ese error no será de la inserción en la otra tabla?
Ejecuta "paso a paso" ese código y a ver cual es la línea real donde falla.

Hola ya realize la comprobacion primero me tira un error en el if

Código Delphi [-]
if fModulo.qCaja.FieldByName('estado_caja').AsInteger=0 then

probe sacando el if para ver que pasaba y luego salio error en el insert

Código Delphi [-]
 fModulo.qCaja.Insert;