Imposta o restituisce il nome fisico del database corrente.
L'impostazione del nome modifica le informazioni che Rational ClearQuest utilizza per collegarsi al database fisico, non il database effettivo.
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);