Triggers

Hola.

Alguien preguntó acerca de la utilidad de los Triggers en el grupo de vb. Lo
referí aquí, pero para darle una idea, le describí el siguiente ejemplo:

"Supón que tienes una tabla de artículos (A) y una de detalles de
movimientos
para esos artículos (D).

Se quiere:
1.- Que las existencias de los articulos en la tabla (A) sólo puedan
variar a consecuencia del registro de un movimiento.
2.- Que el registro de un movimiento actualice automáticamente la
existencia de las tablas de productos.

discúlpame por no utilizar la sintaxis de ningun SGBD, pero no se ninguna lo
suficientemente bien (me gusta que mis aplicaciones trabajen con cualquiera)
de manera que describo los procedimientos en seudocódigo:

Defines un Trigger para el UPDATE de la tabla A:
Si Nuevo.Existencia <> Original.Existencia THEN
Si varTriggerDetalles = Falso
Rechazar el Cambio y Dar Error
De Lo Contrario
varTriggerDetalles = Falso
Fin Si
Fin Si

y defines un Trigger para el INSERT de la tabla D:
varTriggerDetalles = VERDADERO
Ejecutar UPDATE A SET Existencia = Existencia + D.Entradas - D.Salidas"

pero me quedé con la curiosidad de cómo se escribiría eso mismo en Transact
(además que no entiendo como se pueden definir variables persistentes (el
"varTriggerDetalles" que se setea en el INSERT y se lee en el UPDATE).

Claro que podría revisar los BOL y consultar algunos ejemplos, pero para
Uds., viejos zorros de Transact, debe ser un paseo escribir los dos ejemplos
con la sintaxis debida, y ando un poco flojo estos días.

Gracias de antemano

Salud!

Leonardo
[MVP Visual Basic]
[Maicrosoft LVP - MOP Certified]
leonardo<arroba>mvps<punto>org