Desencadenamiento de una tarea con el estado de destino

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.

Nota: Este enganche de notificación de acción utiliza una acción de base. Una acción de base es una acción que se lleva a cabo con todas las acciones. Una acción de base es adecuada si se desea que se lance un enganche con más de una acción, por ejemplo, como un enganche de notificación de correo electrónico que se lanza con todas las acciones.

VBScript

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 

Perl

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í)

} 


Comentarios