Заметки консультанта

Шамрай Александр Владимирович

Как создать запрос внутри хука?

Posted by Шамрай Александр на Апрель 20, 2009

<< Перейти в раздел “ClearQuest FAQ”

Ниже показан пример выбора всех запросов типа «Defect«, которые не находятся в состоянии «Closed»

sub GetListFromQuery
{
my $name_entity = «Defect»;
my $operator;

my $session = $entity->GetSession();
my $queryDef = $session->BuildQuery( $name_entity );

# выбираем поля
$queryDef->BuildField( $name_field );
# устанавливаем фильтр
$operator = $queryDef->BuildFilterOperator( $CQPerlExt::CQ_BOOL_OP_AND );
$operator->BuildFilter( «State», $CQPerlExt::CQ_COMP_OP_NOT_IN, [ «Closed» ] );

# выполняем
my $resultSet = $session->BuildResultSet( $queryDef );
$resultSet->Execute();

# Добавляем выбранные значения в список
while ( $resultSet->MoveNext() == $CQPerlExt::CQ_SUCCESS )
{
push( @$choices, $resultSet->GetColumnValue( 1 ) );
}

$choices = sort( @choices );
return $choices;
}

Реклама

Добавить комментарий

Заполните поля или щелкните по значку, чтобы оставить свой комментарий:

Логотип WordPress.com

Для комментария используется ваша учётная запись WordPress.com. Выход / Изменить )

Фотография Twitter

Для комментария используется ваша учётная запись Twitter. Выход / Изменить )

Фотография Facebook

Для комментария используется ваша учётная запись Facebook. Выход / Изменить )

Google+ photo

Для комментария используется ваша учётная запись Google+. Выход / Изменить )

Connecting to %s

 
%d такие блоггеры, как: