GetInstalledDbSets

Descrizione

(Solo Perl) Per Visual Basic, consultare GetInstalledMasters.

Restituisce l'elenco delle serie di database registrati.

Il valore restituito è un riferimento a un array. I valori restituiti di GetInstalledDbSets e GetInstalledMasterDbs contengono sempre lo stesso numero di stringhe. Il contenuto di entrambi viene ordinato in modo che ciascun repository di schemi (database principale) elencato in GetInstalledMasterDbs appartenga alla serie di database nello stesso indice in GetInstalledDbSets

Sintassi

Perl

$session->GetInstalledDbSets(); 
Identificativo
Descrizione
session
L'oggetto Session che rappresenta la sessione di accesso al database corrente.
Valore di ritorno
Restituisce un riferimento a un array di stringhe per le serie di database.

Esempi

Perl

# This program runs in the context of an
# external program (not from within a hook)...

use CQPerlExt;

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

# Get the list of master databases and dbsets installed on this
# machine; note that both functions return references to
# arrays...
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); 

Feedback