Incluir um Gancho de Campo

Neste exercício, você criará um script de gancho e o incluirá no campo User_ID que incluiu anteriormente no tipo de registro Defect. Ao incluir o campo User_ID, você definiu o tipo de campo como Integer, pois os usuários digitarão um número no campo. Agora você deseja validar que os usuários digitem um número entre 1 e 100.

Para incluir um gancho de campo:

  1. No espaço de trabalho Designer, expanda a pasta Tipos de Registro e a pasta Defeito.
  2. Para abrir a grade Campos, dê um clique duplo em Campos.
  3. Clique na célula da coluna Validação da linha do campo User_ID; clique na seta para baixo e selecione SCRIPTS > BASIC. Na parte superior do editor Script, a opção Campos é definida como User_ID e a opção Tipos de Gancho é definida como FIELD_VALIDATION.
  4. Digite o seguinte código diretamente na linha em que se lê REM End IF:
    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 um usuário digita um número no campo User_ID, o cliente Rational ClearQuest executa este script de gancho da validação. Se o usuário digitar um valor não numérico ou um número que esteja fora do intervalo de 1 e 100, o script de gancho exibirá a mensagem de erro apropriada.

  5. Clique em Ganchos > Compilar para compilar o script. O script deve ser compilado sem erros.
  6. Feche o editor de script.

Feedback