Ejecución de una consulta sobre más de un tipo de registro

IBM Rational ClearQuest le permite crear una consulta que recupera datos de más de un tipo de registro. Una consulta de varios tipos obtiene datos de todos los tipos de registro que pertenecen a una familia de tipos de registro determinada. Aquí se muestran algunos posibles ejemplos de familias de tipos de registro:

Para obtener más información sobre las familias de tipos de registro, busque la entrada referente a familias de tipos de registro en el índice sobre Administración de ClearQuest.

En este fragmento de código de una aplicación externa se presupone que:

VBScript

Dim qryDef ' un objeto QueryDef

Dim resultSet ' un objeto Resultset

Dim familyEntDef ' un objeto EntityDef

Dim families ' un valor Variant

Dim session ' un objeto Session

Dim i ' un valor String



' Insertar código aquí para obtener el objeto Session e iniciar la sesión
' en la base de datos

families = session.GetEntityDefFamilyNames

If IsArray(families) Then

    Debug.Print UBound(families)

    For i = 0 To UBound(families)

         ' Do something with families(i)  

    Next i

    Set qryDef = session.BuildQuery(families(0))

    qryDef.BuildField ("Description")

    Set resultSet = session.BuildResultSet(qryDef)

End If 

Perl

# Insertar código aquí para obtener el objeto Session e iniciar la sesión
# en la base de datos

$families = $session->GetEntityDefFamilyNames();

foreach $familyName in (@$families)  {

   print ($familyName);

}

if ($qryDef = $session->BuildQuery(@$families[0]))  {

   # do something;

} 

$qryDef->BuildField("Description");

$resultSet = $session->BuildResultSet($qryDef);

if ($resultSet->IsMultiType())   {

   # do something;

}

$familyEntDef = $session->GetEntityDefFamily(@$families[0]);

if ($familyEntDef->IsFamily())  {

   # do something;

} 


Comentarios