この演習では、フック スクリプトを作成し、前に Defect レコード タイプに追加した [User_ID] フィールドに作成したフック スクリプトを追加します。[User_ID] フィールドを追加した場合、 ユーザーはこのフィールドに数値を入力するため、フィールド タイプを Integer で定義します。 次に、ユーザーが 1 から 100 までの間の数字を入力したことを確認する必要があります。
フィールド フックを追加するには、以下のステップを実行します。
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
ユーザーが [User_ID] フィールドに数値を入力すると、Rational ClearQuest クライアントはこの確認フック スクリプトを実行します。ユーザーが非数値、 あるいは 1 から 100 までの範囲外の数値を入力した場合、フック スクリプトは該当するエラー メッセージを 表示します。