20 replies to this topic

[luk2009]

Hola a todos

tengo una tabla llamada ACMSUB y otra tabla llamada ACTIVAS y las dos tienen un campo CSID.

Lo que quiero hacer es que en un trigger BEFORE INSERT en la tabla ACTIVAS verifique si el valor
del campor en_prueba de la tabla ACMSUB es =1 y si es asi le de el valor 'COMPLETADA' al campo COMPLETA de la tabla ACTIVAS, caso contrario que le de el valor 'PENDIENTE'.

Actualmente tengo un trigger que le da el valor pendiente a todos los registros nuevos de la tabla activa, pero quiero modificarlo para que haga lo que indique anteriormente. Este es el que tengo ahora:

sql

CREATE OR ALTER TRIGGER ACTIVAS_BI0 FOR ACTIVAS
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
NEW.completa=('PENDIENTE');
END
^
 
 
SET TERM ; ^

Este lo hice con ibexpert.

[egostar]

Algo así  ¿no?

sql

CREATE OR ALTER TRIGGER ACTIVAS_BI0 FOR ACTIVAS
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
  IF (NEW.en_prueba = 1) THEN
      NEW.completa=('COMPLETADA');
  ELSE NEW.completa=('PENDIENTE');
END

Salud OS

[luk2009]

Gracias egostar por responder.

En activas no se inserta ningun valor a en_prueba, ya que este campo pertenece a otra tabla(acmsub)
solo necesito saber como poner algo como:

sql

SELECT en_prueba FROM acmsub INNER JOIN activas ON acmsub.csid=activas.csid

asignarle este valor de en prueba a una variable y crear el if sobre ella.

[eduarcol]

Desde un trigger no se puede ejecutar un Select, deberas hacerlo desde un SP

[Wilson]

Desde un trigger no se puede ejecutar un Select, deberas hacerlo desde un SP

????? si se puede amigo Eduardo.

No se si entendí, si el campo CSID es único en la tabla ACMSUB  entonces  ensaya con esto.

sql

SET TERM ^ ;
 
CREATE OR ALTER TRIGGER activas_bi0 FOR activas
ACTIVE BEFORE INSERT POSITION 0
AS
DECLARE variable vEn_Prueba INTEGER;
BEGIN
SELECT en_prueba FROM ACMSUB
WHERE CSID = NEW.CSID
INTO :vEn_Prueba;
  IF (vEn_Prueba = 1) THEN
    NEW.COMPLETA = 'COMPLETADA'
    ELSE
    NEW.COMPLETA = 'PENDIENTE';
END
^
 
 
SET TERM ; ^

[Rolphy Reyes]

Saludos.

Efectivamente, como indica Wilson es la manera correcta de hacer lo que andas buscando.

Ahora bien, debes de tener en cuenta de que ese Select solo te devuelva una fila (registro) porque en caso contrario Firebird se quejara y te mandara un error de Multiple rows.....

[luk2009]

Gracias por responder

me da el siguiente error al compilar el trigger

Invalid token.
Dynamic SQL Error.
SQL error code = -104.
Token unknown - line 11, column 5.
ELSE.

[Rolphy Reyes]

Saludos.

Antes del ELSE lleva punto y coma la sentencia.

sql

NEW.COMPLETA = 'COMPLETADA';

[luk2009]

Gracias Rolphy ya me habia dado cuenta.
Funciona bien, pero me crea un conflicto con otro proceso. Lo que necesito ahora es hacer un update al campo completa con el valor 'COMPLETADA' si  el campo en_prueba de acmsub es =1. Me imagino que sera en un after insert. 

Como debo escribir la sentencia para hacer el update a ese campo

[Rolphy Reyes]

Saludos.

Creo que si te crea un conflicto con otro proceso deberías de pensar en unificar ambos procesos en un SP y dada las condiciones adecuadas para cada proceso se dispare esa parte del código.

En cuanto a como realizar el UPDATE es el mismo proceso salvo en que cambias la sentencias NEW por el UPDATE.  Debes de tener pendiente si tienes algún trigger B/A UPDATE para que no te cree más conflicto.

[luk2009]

Me dices ponerlo asi:

sql

CREATE TRIGGER activas_ai0 FOR activas
active after INSERT POSITION 0
AS
DECLARE variable vEn_Prueba INTEGER;
BEGIN
SELECT en_prueba FROM ACMSUB
WHERE CSID = NEW.CSID
INTO :vEn_Prueba;
  IF (vEn_Prueba = 1) THEN
    UPDATE.COMPLETA = 'COMPLETADA';
    ELSE
    UPDATE.COMPLETA = 'PENDIENTE';
END

Me da el siguiente error:

Invalid token.
Dynamic SQL Error.
SQL error code = -104.
Token unknown - line 10, column 11.
.

[Rolphy Reyes]

Saludos.

No amigo, no me exprese claramente.

Me refiero a la sintaxis del UPDATE:

sql

UPDATE TABLA
SET CAMPO = VALOR
WHERE CAMPO = CONDICION

[Wilson]

Luciano deberías aclarar en que proceso y en que tabla te encuentras cuando quieres actualizar la tabla "Actvas".

[luk2009]

Si lo hago asi:

sql

CREATE TRIGGER activas_ai0 FOR activas
active after INSERT POSITION 0
AS
DECLARE variable vEn_Prueba INTEGER;
BEGIN
SELECT en_prueba FROM ACMSUB
WHERE CSID = NEW.CSID
INTO :vEn_Prueba;
  IF (vEn_Prueba = 1) THEN
  UPDATE ACTIVAS
   SET COMPLETA='COMPLETADA';
 
END

me da este error:

This operation is not defined for system tables.
unsuccessful metadata update.
DEFINE TRIGGER failed.
attempt to store duplicate value (visible to active transactions) in unique index "RDB$INDEX_8".

[Marc]

Hola.

Este último error creo que te lo da porqué ya tienes otro Trigger con este mismo nombre.

Saludos.

[luk2009]

Gracias Marc tienes razon, le cambie el nombre y se compilo bien

[Rolphy Reyes]

Saludos.

Look2009, creo que debes de sentarte a revisar bien el proceso que tienes montado para que le puedas hacer esa nueva adaptación que quieres.

Esa ultima sentencia que pusiste sobre el Update, te actualizara la tabla completa sin discriminación alguna.

Como te había dicho, revisa el proceso completo para ver si es posible ponerlo dentro de un SP.

Suerte!

[luk2009]

Tienes razon Rolphy, voy a revisar bien el asunto. Nunca he utilizado store procedure. Puedes darme una idea de por donde comienzo?

Gracias de todos modos

[Wilson]

Para no dar palos de ciego, insisto en que nos aclares en que momento y en que proceso estás cunado quieres realizar la actualización de la tabla "activas"?.

Posible respuesta:

- Insertando un registro en "Activas"?

[Wilson]

Para no dar palos de ciego, insisto en que nos aclares en que momento y en que proceso estás cunado quieres realizar la actualización de la tabla "activas"?.

Posible respuesta:

- Insertando un registro en "Activas"?

Prosigo, si es a la hora de insertar un nuevo registro en la tabla "Activas"  y dices que si lo colocas en BEFORE UPDATE te causa conflictos, entonces con esto sería suficiente:

sql

SET TERM ^ ;
 
CREATE OR ALTER TRIGGER activas_bi0 FOR activas
ACTIVE AFTER INSERT POSITION 0 
AS
DECLARE variable vEn_Prueba INTEGER;
BEGIN
SELECT en_prueba FROM ACMSUB
WHERE CSID = NEW.CSID
INTO :vEn_Prueba;
  IF (vEn_Prueba = 1) THEN
    NEW.COMPLETA = 'COMPLETADA';
    ELSE
    NEW.COMPLETA = 'PENDIENTE';
END
^
 
 
SET TERM ; ^

Si estás procesando otra tabla, o en una situación distinta hazlo saber.