GetInstalledDbSets

Descripción

(Sólo Perl) Para Visual Basic, consulte GetInstalledMasters.

Devuelve la lista de conjuntos de bases de datos registrados.

El valor devuelto es una referencia de matriz. Los valores devueltos de GetInstalledDbSets y GetInstalledMasterDbs siempre contienen el mismo número de series. El contenido de ambos se ordena de modo que cada depósito de esquemas (base de datos maestra) listada en GetInstalledMasterDbs pertenece al conjunto de bases de datos del mismo índice en GetInstalledDbSets

Sintaxis

Perl

$session->GetInstalledDbSets(); 
Identificador
Descripción
session
El objeto Session que representa la sesión de acceso a la base de datos actual.
Valor de retorno
Devuelve una referencia a una matriz de series para los conjuntos de bases de datos.

Ejemplos

Perl

# Este
programa se ejecuta en el contexto de un
# programa externo (no desde un enganche)...

use CQPerlExt;

# Crear el objeto Session...
$Session = CQSession::Build()
or die "Couldn't create the ClearQuest 'session' object.\n";

# Obtener la lista de bases de datos maestras y conjuntos de bases de datos de
# esta máquina; se debe tener en cuenta que ambas funciones devuelven referencias a
# matrices...
my($MasterDBsREF) = $Session->GetInstalledMasterDbs();
my(@MasterDBs) = @$MasterDBsREF;
my($DbSetsREF) = $Session->GetInstalledDbSets();
my(@DbSets) = @$DbSetsREF;
my($N) = $#MasterDBs;

printf ("There are %d DbSet(s) installed on this machine.\n", ($N+1));

for (my($i)=0; $i <= $N; $i++) {
print "DbSet #" . $i . ": " .
" DbSet=" . $DbSets[$i] .
" MasterDB=" . $MasterDBs[$i] .
"\n";
}

CQSession::Unbuild($Session); 


Comentarios