Esempio di hook di valore campo modificato

Utilizzare hook di valore modificato per sincronizzare i campi o effettuare altre attività dopo aver modificato il valore in un campo.

Nel seguente esempio, l'hook verifica il nome del sistema operativo memorizzato nel campo corrente. A seconda del sistema operativo, l'hook assegna un numero di versione al campo OS_version. Se il campo corrente non è ancora stato impostato e quindi non contiene il nome del sistema operativo, questo hook non imposta il numero di versione corrispondente.

VBScript

Sub OS_type_ValueChanged(fieldname)

    ' fieldname As String

    value = GetFieldValue(fieldname).GetValue()


     If value = "solaris" Then

       SetFieldValue "OS_version", "7.x"

     ElseIf value = "windows" Then

       SetFieldValue "OS_version", "95"

     ElseIf value = "hpux" Then

       SetFieldValue "OS_version", "10.x"

     End If

End Sub 

Perl

sub OS_type_ValueChanged  {

    my($fieldname) = @_;

    my($value);

    $value = $entity->GetFieldValue($fieldname)->GetValue();

    if ($value eq "solaris")  {

      $entity->SetFieldValue("OS_version", "7.x");

    } elsif ($value eq "windows")  {

      $entity->SetFieldValue("OS_version", "95");

    } elsif ($value eq "hpux")  {

      $entity->SetFieldValue("OS_version",  "10.x");

    }

} 

Feedback