Para aplicar alguna lógica condicional, puede determinar el estado de destino del registro que está experimentando, actualmente, una acción. A continuación, se incluyen algunos ejemplos:
El enganche de notificación de acción siguiente obtiene el estado de destino y envía un correo electrónico si se va a cerrar el registro actual.
Sub Defect_Notification(actionname, actiontype)
Dim cqSes ' un objeto Session
Dim entDef ' un objeto EntityDef
Dim actionname ' String
Dim actiontype ' Long
' action = test_base
set cqSes = GetSession
' NOTA: También se puede tener lógica condicional basada en
' la acción actual
set entDef = cqSes.GetEntityDef(GetEntityDefName)
if entDef.GetActionDestStateName(actionName) = "Closed" then
' poner el código de mensaje de notificación de envío aquí
end if
End Sub
sub Defect_Notification {
my($actionName, $actiontype) = @_;
# $actionName as string scalar
# $actiontype as long scalar
# action is test_base
$actionName = $entity->GetActionName();
# NOTA: También se puede tener lógica condicional basada en
# la acción actual
# Se puede utilizar la variable $session que proporciona Rational
ClearQuest.
$entDef = session->GetEntityDef($entitiy->GetEntityDefName());
if ($entDef->GetActionDestStateName($actionName) eq "Closed")
{# poner el código de mensaje de notificación de envío aquí)
}