AllSubscribedDatabases

설명

사용자에게 액세스 권한이 있는 데이터베이스 콜렉션을 리턴합니다. 이 데이터베이스 목록에는 그룹 멤버 및 그룹 등록을 통해 존재할 수 있는 간접 등록이 포함되어 있습니다(즉, 사용자가 명시적으로 등록되어 있지 않은 데이터베이스).

이는 읽기 전용 특성입니다. 즉, 볼 수는 있으나 설정할 수는 없습니다.

리턴된 콜렉션의 각 요소는 Database 오브젝트입니다. 빈 콜렉션을 리턴하거나 콜렉션에 요소가 없는 경우, 사용자는 모든 데이터베이스에 신청됩니다.

구문

VBScript

user.AllSubscribedDatabases 

Perl

$user->GetAllSubscribedDatabases(); 
ID
설명
user
User 오브젝트입니다.
Return value
사용자가 등록되는 데이터베이스뿐만 아니라 사용자가 액세스할 수 있는 데이터베이스가 포함된 Databases 콜렉션 오브젝트입니다.

예제

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); 

피드백