Groups

Description

Devuelve la recopilación de grupos asociados al repositorio de esquemas. 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 Group.

Sintaxis

VBScript

adminSession.Groups 

Perl

$adminSession->GetGroups(); 
Identificador
Description
adminSession
Objeto AdminSession que representa la sesión de acceso al repositorio de esquemas actual.
Valor de retorno
Un objeto Groups que contiene todos los grupos del repositorio de esquemas.

Ejemplo

VBScript

set adminSession = CreateObject("ClearQuest.AdminSession")
adminSession.Logon "admin", "", ""
set groupList = adminSession.Groups
for each groupObj in groupList
   groupName = groupObj.Name
   msgbox groupName
Next 

Perl

use CQPerlExt;

#Create a Rational ClearQuest admin session
$adminSession= CQAdminSession::Build();

#Logon as admin
$adminSession->Logon( "admin", "admin", "" );

#Get the list of groups
$groupList = $adminSession->GetGroups();

#Get the number of groups
$numGroups = $groupList->Count();

#Iterate through the groups
for ( $x=0; $x<$numGroups; $x++ ) {
     #Get the specified item in the collection of groups
     $groupObj = $groupList->Item( $x );
     #Get the name of the group
     $groupName = $groupObj->GetName();
}

CQAdminSession::Unbuild($adminSession); 

Comentarios