LDAP 인증을 갖는 Rational 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);