현재 데이터베이스의 실제 이름을 설정하거나 리턴합니다. 논리적 이름을 설정한 후에는 다시 변경할 수 없습니다.
이름을 설정하면 Rational® ClearQuest®가 실제 데이터베이스 자체가 아닌 물리적 데이터베이스에 연결할 때 사용하는 정보가 변경됩니다. 서버 이름을 변경하는 경우, 연결 옵션이 새 이름과 일치하는지 확인해야 합니다. 데이터베이스 이름은 Session 오브젝트의 UserLogon 메소드에 대한 매개변수 중 하나입니다.
새 값을 설정해도 ApplyPropertyChanges 메소드를 호출하지 않으면 적용되지 않습니다.
VBScript
database.DatabaseName
database.DatabaseName newDbName
Perl
$database->GetDatabaseName();
$database->SetDatabaseName(newDbName);
VBScript
set sessionObj = CreateObject("CLEARQUEST.SESSION")
' Get the list of databases in the
' MASTR database set.
databases = sessionObj.GetAccessibleDatabases("MASTR","admin","")
' Login to each database successively.
For Each db in databases
dbName = db.GetDatabaseName
sessionObj.UserLogon "admin", "", dbName, AD_PRIVATE_SESSION, ""
' Access the database
' ...
Next
Perl
use CQPerlExt;
#Start a Rational ClearQuest session
$sessionObj = CQSession::Build();
#Get a list of accessible databases
$databases = $sessionObj->GetAccessibleDatabases("MASTR", "admin", "");
$count = $databases->Count();
# Login to each database successively.
for($x=0;$x<$count;$x++){
$db = $databases->Item($x);
$dbName = $db->GetDatabaseName();
# Logon to the database
$sessionObj->UserLogon( "admin", "", $dbName, "" );
#...
}
CQSession::Unbuild($sessionObj);