
Getoldvalue Gx Ev1
Publicado por Marco Ricord (30 intervenciones) el 16/07/2014 21:08:01
No se como lograr utilizar los valores de las variables de un GetOldValue() 
La transacción la hize tipo Business Component porque estuve investigando y me dice que se utiliza para usar GetOldValue de la base de datos.
Transacción:
TestingTrn
Evento:
Event AfterTrn
If &Mode = TrnMode.Update
ProcTesting1.Call(TestingTrnId,TestingTrnName,TestingTrnEmail,TestingTrnDescripcion)
EndIf
EndEvent
ProcTesting1: Commit on exit : NO
For Each
where TestingTrnId = &TestingTrnId
If TestingTrnEmail <> &OldTestingTrnEmail or TestingTrnName <> &OldTestingTrnName
TestingTrnName = &TestingTrnName
TestingTrnEmail = &TestingTrnEmail
TestingTrnDescripcion = &TestingTrnDescripcion
ProcTestingMail1.Call(TestingTrnId,TestingTrnName,TestingTrnDescripcion,&OldTestingTrnName,&OldTestingTrnEmail)
EndIf
EndFor
Commit
Rules de ProcTesting1:
parm(in:&TestingTrnId,in:&TestingTrnName,in:&TestingTrnEmail,in:&TestingTrnDescripcion);
&OldTestingTrnEmail = &TestingTrn.TestingTrnEmail.GetOldValue();
&OldTestingTrnName = &TestingTrn.TestingTrnName.GetOldValue();
ProcTestingMail1 es un procedimiento que envía un correo utilizando los valores &OldTestingTrnName y &OldTestingTrnEmail.
No me esta funcionando!! quiero ayuda urgente!!!!!
Si falta alguna información haganmela saber para resolver esto.

La transacción la hize tipo Business Component porque estuve investigando y me dice que se utiliza para usar GetOldValue de la base de datos.
Transacción:
TestingTrn
Evento:
Event AfterTrn
If &Mode = TrnMode.Update
ProcTesting1.Call(TestingTrnId,TestingTrnName,TestingTrnEmail,TestingTrnDescripcion)
EndIf
EndEvent
ProcTesting1: Commit on exit : NO
For Each
where TestingTrnId = &TestingTrnId
If TestingTrnEmail <> &OldTestingTrnEmail or TestingTrnName <> &OldTestingTrnName
TestingTrnName = &TestingTrnName
TestingTrnEmail = &TestingTrnEmail
TestingTrnDescripcion = &TestingTrnDescripcion
ProcTestingMail1.Call(TestingTrnId,TestingTrnName,TestingTrnDescripcion,&OldTestingTrnName,&OldTestingTrnEmail)
EndIf
EndFor
Commit
Rules de ProcTesting1:
parm(in:&TestingTrnId,in:&TestingTrnName,in:&TestingTrnEmail,in:&TestingTrnDescripcion);
&OldTestingTrnEmail = &TestingTrn.TestingTrnEmail.GetOldValue();
&OldTestingTrnName = &TestingTrn.TestingTrnName.GetOldValue();
ProcTestingMail1 es un procedimiento que envía un correo utilizando los valores &OldTestingTrnName y &OldTestingTrnEmail.
No me esta funcionando!! quiero ayuda urgente!!!!!

Valora esta pregunta


0