DatabaseName

Descripción

Establece o devuelve el nombre físico de la base de datos actual.

El establecimiento del nombre cambia la información que utiliza Rational ClearQuest para conectar a la base de datos física, no la base de datos real en sí misma.

Nota: El establecimiento de un nuevo valor no entra en vigor hasta que se llama al método ApplyPropertyChanges.

Sintaxis

VBScript

database.DatabaseName 
database.DatabaseName nuevoNombreDb 

Perl

$database->GetDatabaseName(); 
$database->SetDatabaseName(nuevoNombreDb); 
Identificador
Descripción
database
Un objeto Database.
nuevoNombreDb
Un valor String que contiene el nuevo nombre físico de la base de datos, incluida toda la información de vía de acceso asociada (por ejemplo, "C:\temp\NuevaDb.mdb").
Valor de retorno
Un valor String que contiene el nombre físico actual de la base de datos, incluida toda la información de vía de acceso asociada.

Ejemplos

VBScript

set sessionObj = CreateObject("CLEARQUEST.SESSION") 



' Obtener la lista de bases de datos del 

' conjunto de bases de datos MASTR.

databases = sessionObj.GetAccessibleDatabases("MASTR","admin","")

' Iniciar la sesión en cada base de datos sucesivamente.

For Each db in databases 

   dbName = db.GetDatabaseName 

   sessionObj.UserLogon "admin", "", dbName, AD_PRIVATE_SESSION, "" 

' Acceder a la base de datos 

   ' ... 

Next 

Perl

use CQPerlExt;

#Iniciar una sesión de Rational ClearQuest

$sessionObj = CQSession::Build();

#Obtener una lista de bases de datos a las que se puede acceder

$databases = $sessionObj->GetAccessibleDatabases("MASTR", "admin", "");

$count = $databases->Count();



# Iniciar la sesión en cada base de datos sucesivamente. 

for($x=0;$x<$count;$x++){

   $db = $databases->Item($x);

   $dbName = $db->GetDatabaseName();

   # Iniciar la sesión en la base de datos 

   $sessionObj->UserLogon( "admin", "", $dbName, "" );

   #...

   }

CQSession::Unbuild($sessionObj); 


Comentarios