In questo esercizio, verrà creato uno script hook e verrà aggiunto al campo User_ID precedentemente aggiunto al tipo di record Difetto. Quando è stato aggiunto il campo User_ID, è stato definito il relativo tipo di campo come Numero intero perché gli utenti immetteranno un numero nel campo. Si desidera che gli utenti immettano un numero tra 1 e 100.
Per aggiungere un hook campo:
Dim value_info Set value_info = GetFieldValue (fieldname) If Not IsNumeric(value_info.GetValue) Then user_number_Validation = "Must be an integer between 1 and 100" ElseIf (value_info.GetValue < 1) or (value_info.GetValue > 100) Then user_number_Validation = "Must be between 1 and 100" End if
Quando un utente immette un numero nel campo User_ID, il client Rational ClearQuest esegue questo script hook di convalida. Se l'utente immette un valore non numerico, o un numero non compreso nell'intervallo tra 1 e 100, lo script hook visualizza il messaggio di errore appropriato.