LDAP 認証が指定された ClearQuest® ユーザー アカウントを作成します。新規ユーザー アカウント AuthenticationMode を LDAP_AUTHENTICATION として設定します。
CreateUserLDAPAuthenticated メソッドは、LDAP 属性値を LDAP ユーザー アカウントから ClearQuest ユーザー プロファイル フィールドにコピーして、LDAP ユーザー名を Rational ClearQuest ユーザー名にマップします。
CQ_LOGIN_NAME がマッピング フィールドとして構成されている場合 (installutil setcqldapmap サブコマンドを使用して、LDAP と ClearQuest ユーザー アカウントとの相関に使用する Rational ClearQuest ユーザー プロファイル フィールドを指定)、CQ_user_name パラメータは LDAP_login_name と同一か、または NULL 文字列に設定されている必要があります。
VBScript
adminSession.CreateUserLDAPAuthenticated(LDAP_login_name, CQ_user_name)
Perl
$adminSession->CreateUserLDAPAuthenticated(LDAP_login_name, CQ_user_name);
VBScript
' Create a Rational ClearQuest admin session set adminSession = CreateObject("ClearQuest.AdminSession") ' Logon as admin adminSession.Logon "admin", "admin", "" ' Create an LDAP authenticated user Dim cquser2 ' a user object Dim ldap_login Dim cq_username Dim mode ' the user authentication mode ldap_login = "myusername@us.ibm.com" cq_username = "myusername" StdOut "Creating LDAP authenticated user " & ldap_name & vbCrLf Set cquser2 = admin_session.CreateUserLDAPAuthenticated(ldap_login, cq_username) ' verify the user authentication mode: StdOut "Getting authentication mode for user " & cquser2.name & vbCrLf mode = cquser2.GetAuthenticationMode StdOut "user mode: " & CStr(mode) & vbCrLf
Perl
use CQPerlExt; # Create a Rational ClearQuest admin session $adminSession= CQAdminSession::Build(); #Logon as admin $adminSession->Logon( "admin", "admin", "" ); my $ldap_login = "myusername@us.ibm.com"; my $cq_username = "myusername"; my $newUserObj; $newUserObj = $adminSession->CreateUserLDAPAuthenticated($ldap_login, $cq_username); # ... CQAdminSession::Unbuild($adminSession);