GetDatabaseSetName

설명

이 데이터베이스가 멤버인 데이터베이스 세트 이름을 리턴합니다.

이 메소드를 사용하여 해당 데이터베이스의 데이터베이스 세트 이름을 가져올 수 있습니다. 이 이름을 Session 오브젝트의 GetAccessibleDatabases 메소드에 전달하여 데이터베이스 세트에 있는 사용자 데이터베이스 목록을 가져올 수 있습니다.

주: 기본적으로 시스템에는 하나의 데이터베이스 세트만이 있습니다. 이 메소드에서 리턴되는 이름 대신 빈 문자열("")을 사용하여 기본 데이터베이스 세트를 참조할 수 있습니다.

구문

VBScript

dbDesc.GetDatabaseSetName 

Perl

$dbDesc->GetDatabaseSetName(); 
ID
설명
dbDesc
설치된 데이터베이스 중 하나에 대한 정보를 포함하는 DatabaseDesc 오브젝트.
Return value
데이터베이스 세트의 이름을 포함하는 문자열.

예제

VBScript

다음 예제에 Visual Basic 애플리케이션으로부터 데이터베이스에 로그온하는 방법이 나와 있습니다.

set sessionObj = CreateObject("CLEARQUEST.SESSION") 

' Login to each database successively. 
databases = sessionObj.GetAccessibleDatabases("MASTR","","")
For Each db in databases 
   If Not db.GetIsMaster Then 
      dbSetName = db.GetDatabaseSetName 
      dbName = db.GetDatabaseName 
      ' Logon to the database 
      sessionObj.UserLogon "tom", "gh36ak3", dbName,
          AD_PRIVATE_SESSION, dbSetName 
   End If 
   ' ... 
Next

Perl

use CQPerlExt;
#Start a Rational ClearQuest session
$sessionObj = CQSession::Build();

#Get a list of accessible database description objects

$databases = $sessionObj->GetAccessibleDatabases("MASTR", "", "");

#Get the number of databases

$count = $databases->Count();

#Foreach accessible database that is not the master database, login as 

#user "tom" with password "gh36ak3"

for($x=0;$x<$count;$x++){

   $db = $databases->Item($x);

   if (! $db->GetIsMaster() ) {

      #Get the database set of which this database is a member

      $dbSetName = $db->GetDatabaseSetName();

      #Get the database name from the description object

      $dbName = $db->GetDatabaseName();

      # Logon to the database 

      $sessionObj->UserLogon( "tom", "gh36ak3", $dbName, $dbSetName );

   }

#...

}

CQSession::Unbuild($sessionObj);

피드백