Devuelve la recopilación de bases de datos a las que el usuario tiene acceso. Esta lista de bases de datos incluye suscripciones indirectas que pueden existir mediante pertenencia a grupo y suscripciones de grupo (es decir, bases de datos a las que el usuario no está suscrito explícitamente).
Es una propiedad de sólo lectura; se puede visualizar, pero no se puede establecer.
Cada elemento de la recopilación devuelta es un objeto Database. Si devuelve una recopilación vacía o la recopilación no tiene elementos, significa que el usuario está suscrito a todas las bases de datos.
VBScript
user.AllSubscribedDatabases
Perl
$user->GetAllSubscribedDatabases();
Perl
use CQPerlExt;
$adminsession = CQAdminSession::Build();
$adminsession->Logon("admin", "", "2003.06.00");
if (defined($adminsession->Logon("admin", "", "2003.06.00"))) {
print "Error: Not logged into ClearQuest.. please log in \n";
}
$userObj = $adminsession->GetUser("admin");
$dblist = $userObj->GetAllSubscribedDatabases();
$numdbs = $dblist->Count();
print $numdbs;
CQAdminSession::Unbuild($adminsession);