이 그룹이 등록되어 있는 데이터베이스 콜렉션을 리턴합니다. 이는 읽기 전용 특성입니다. 즉, 볼 수는 있으나 설정할 수는 없습니다.
리턴된 콜렉션의 각 요소는 Database 오브젝트입니다.
VBScript
group.SubscribedDatabases
Perl
$group->GetSubscribedDatabases();
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";
}
$groupObj = $adminsession->GetGroup("group3");
$dblist = $groupObj->GetSubscribedDatabases();
$numdbs = $dblist->Count();
print $numdbs;
CQAdminSession::Unbuild($adminsession);