FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Trigger no funciona
Saludos,
Cuando uso Firebird por comandos sí me funciona el trigger, pero cuando lo uso con Delphi en el DBGrid me da un error de campo no lleno y tengo que escribir el numero de incremento a mano. ¿Alguien sabe por qué ocurre esto? Si hacen falta más explicaciones me lo decis. |
#2
|
||||
|
||||
Hacen falta más explicaciones.
|
#3
|
||||
|
||||
Hola
Bueno adivinando la situacion creo que lo que pasa es que mediante un trigger asignas la clave primaria a la tabla. El campo del lado de la aplicacion tiene la propiedad required en true. Para evitar ese error cambialo a false. Pero debes hacer un refresh despues de grabar para poder leer la clave que se asigno. Espero que sea lo que necesitabas. Saludos |
#4
|
||||
|
||||
Hola Caminante. He ido al Form y no he encontrado la propiedad Required ni en el DBGrid ni en sus columnas. Tal vez deberías decirme dónde está o si voy descaminado. Por otro lado, basado en tu idea, hallé en el componente TIBQuery una propiedad GenaratorField que usé colocando el nombre del GENERATOR. También contiene una prop. llamada ForceRefresh. La puse a True...
Pero al meter un nuevo dato en el DBGrid sigue saliendo el error: "Field 'num' must have a value". ¿Alguna otra sugerencia? Gracias por el esfuerzo. Bulc Última edición por bulc fecha: 04-01-2014 a las 14:05:04. Razón: Acabar la contestación a Caminante. |
#5
|
||||
|
||||
Hola Bulc.
Mi sugerencia es tal y como te indica Casimiro es que nos des más datos de dónde se produce el problema y que lo puede proiducir. En tu explicación no se acaba de entender bien lo que te sucede, tu intentas explicarte al máximo pero tienes la ventaja de que ves en cada momento lo que sucede, nosotros no. Comentas algo de un dbgrid, recuerda que un dbgrid no es más que la representación ordenada de los datos de una tabla o consultao sea que si realizas cualquier acción en este grid, realmente estas trabajando en los datasets, post, append, cancel, update, etc. Pon algo de código, (si es que este no es un secreto de estado), bueno bromas aparte intenta colocarnos la sentencia que te da el error y seguro que recibirás la respuesta adecuada. Saludos Josep |
#6
|
||||
|
||||
Cita:
!Es que no hay código apenas! Sólo hemos hecho la conexión. Usamos IBDataBase, IBTransaction, IBQuery, IBProvider, ClientDataSet, TDataSource y DBGrid. La conexión es correcta. Hemos creado la DBase por código en el prompt de la aplicación en modo de comandos ISQL de Firebird (Antiguo DOS command). La Base tiene una tabla. En ella hay cuatro campos el primero NUM es numérico; es clave primaria, not null. Luego hemos creado un generator y un trigger para que se autoincremente el camp NUM. Hemos hecho un insert y funciona el Trigger perfectamente. Sólo hay una tabla con un registro y este lleva un 1 en NUM. El TDBGrid tiene una barra TDBNavigator. Pues bien, escribimos un dato nuevo para el registro nº 2 (el primero se ve en el Grid) del DBGrid. Al guardar el dato con el TDBNavigator, surge el error de "No hay valor para columna NUM". Entonces colocamos un botón con el código necesario para que el ClientDataSet guarde los datos. Usamos Post y ApplyUpdates, lo normal. Pues bien, si se coloca un 2 en el campo NUM del DBGrid los datos se guardan sin problema, pero si se deja ese campo en blanco (a la espera de que el Trigger) haga su trabajo, entonces salta el error de nuevo. O sea, hay un error si se deja NUM en blanco. Bueno, lo he intentado. Puedo poner el código pero repito solo tiene un botón de Guardar y un DBNavigator asociado al DBGrid. El código del generator y del trigger funcionan correctamente. Dime si hay algo que pueda ponerte más y te lo pongo. Gracias. Bulc |
#7
|
||||
|
||||
Cita:
Saludos |
#8
|
||||
|
||||
He hallado esa prop. en el ClientDataSet (CDS). Cargué los campos y elegí NUM. Asigné a la prop. AutoGenerateValue :=arAutoInc y la prop. Required to False. Pero sigue sin funcionar. Mi pregunta es, ¿el CDS efectúa autoincrementos por su cuenta, si usar ningún Trigger?
es que además el comp. IBQuery (que uso) también activa Generators mediante la prop. GeneratorField, etc. ¿Debo efectuar el Refresh antes del Post, mediante código? Saludos y gracias. Bulc |
#9
|
||||
|
||||
Hola,
Respecto a la función, básicamente es la ejecución de una query que te devuelva el valor de esta select SELECT GEN_ID( generador,1) FROM RDB$DATABASE Pones un parámetro que sea el nombre del generador, y te vale para todos. Como ya te decía anteriormente, en el caso de los tclientdatasets hay que hacerlo así. En el evento beforepost asignas el valor al campo pk ( num en tu caso ) y solucionado el problema. Saludos Pd: no estoy escribiendo desde el portátil, o sea, que no tengo el código para pegarlo. A ver sí me acuerdo y te lo paso.
__________________
Cuando los grillos cantan, es que es de noche - viejo proverbio chino - |
#10
|
||||
|
||||
Hola,
Esta es la función que te vale para cualquier generador
La llamo de la siguiente manera
Todas las tablas tienen los campos USUARIOALTA, LOGA, USUARIOMODIF y LOGM para saber quién ha dado de alta el registro y quién es el último que lo ha modificado Espero que te sirva de ayuda. Un saludo
__________________
Cuando los grillos cantan, es que es de noche - viejo proverbio chino - |
#11
|
||||
|
||||
Cita:
|
#12
|
||||
|
||||
Pero qué sentencia sql usas en cada caso y qué parámetros, etc.
|
#13
|
||||
|
||||
Pues no uso ni uno ni otro. Estoy en un DBGrid en el que introduzco nuevos datos. Y luego le doy a guardar del DBNavigator.
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
esta function no me funciona en XE2 y si funciona en D6 | darkbits | Varios | 1 | 06-11-2012 17:00:45 |
IP de la PC en Trigger | noelia89 | Firebird e Interbase | 5 | 04-09-2012 17:03:41 |
Trigger en Firebird no funciona | payo7 | SQL | 2 | 06-11-2011 00:19:24 |
funciona bien en windows 7 64b pero en XP no funciona | ASAPLTDA | Varios | 5 | 06-05-2011 16:24:50 |
Un trigger que dispara un procedimiento que dispara un trigger... | sitrico | Firebird e Interbase | 5 | 04-06-2007 22:05:13 |
|