このページを共有

# 例：ユーザ・グループを基にしたフィールドの変更

この例では、不具合を入力するユーザのユーザ・グループに合わせて、フィールド値を変更する方法を例示します。

この例では、ユーザ定義フィールド［BG_USER_01］は、不具合を検出したユーザが発見方法を入力できる検出モード・フィールドであるとします。取り得る値は、`公式テスト、非公式テスト、BTW` です。

例では、`QATester` グループに属さないユーザが不具合をオープンすると、検出モード・フィールドの値が `BTW` に設定されます。`QATester` グループに属すユーザが不具合をオープンすると、標準設定値の「`公式テスト`」が設定されます。

イベント・プロシージャ `Bug_New` にコードを追加して、不具合が追加されたときにトリガされるようにします。

    Sub Bug_New
            On Error Resume Next
            If not User.IsInGroup("QATester") then
                Bug_Fields("BG_USER_01").Value = "BTW"
            Else
                Bug_Fields("BG_USER_01").Value = "Formal testing"
            End If
            PrintError "Bug_New"
            On Error GoTo 0
    End Sub

https://admhelp.microfocus.com ALM 8942
検索結果の改善のヒント... ALM ヘルプセンター ALM ヘルプセンター ALM ヘルプ 17.0 すべてローカル・ヘルプセンターの表示オンライン・ヘルプセンターの表示戻るブラウザ履歴で元に戻る進むブラウザ履歴で前に進む検索の強調表示を解除次のトピック次のトピックに移動前のトピック前のトピックに移動現在のトピックを印刷バージョン: