EntityDef オブジェクトに定義された状態名を戻します。
EntityDef オブジェクトの他の部分と同様に、管理者が Rational® ClearQuest® Designer を使用して定義済み状態を設定します。 これらは、API から直接には設定できません。
VBScript
set sessionObj = GetSession set entityDefObj = sessionObj.GetEntityDef(GetEntityDefName()) If entityDefObj.GetType = AD_REQ_ENTITY Then sessionObj.OutputDebugString "States of record type: " & _ entityDefObj.GetName() ' List the possible states of the record nameList = entityDefObj.GetStateDefNames() For Each stateName in nameList sessionObj.OutputDebugString stateName Next End If
Perl
$sessionObj = $entity->GetSession(); $entityDefObj = $sessionObj->GetEntityDef($entity->GetEntityDefName()); if ($entityDefObj->GetType eq $CQPerlExt::CQ_REQ_ENTITY) { $sessionObj->OutputDebugString("States of record type: ".$entityDefObj->GetName()); # List the possible states of the record $nameList = $entityDefObj->GetStateDefNames(); foreach $stateName (@$nameList) { $sessionObj->OutputDebugString($stateName) } }