「レコードの検索」の機能を提供します。指定されたレコード表示名の EntitiyDef オブジェクトを戻します。 このメソッドでは、その表示名を検索するときの EntityDef タイプと EntityDef 名 (オプション) を指定する必要があります。
entDefNames の配列では、複数のレコード タイプでの検索が可能なので、どのレコード タイプが一致したかを見極めるために、戻された EntityDef タイプを確認する必要があります。また、entityDeftype 引数として ANY_ENTITY を使用する場合は、戻されたレコードが、状態あり (REQ_ENTITY) レコードか、状態なし (AUX_ENTITY) レコードかを判別する必要があります。
指定の表示名あるいは DBID を持つエンティティがデータベースに存在している場合は、GetEntityDefOfName と GetEntityDefOfDbId のどちらを呼び出してもかまいません。一度、EntityDef がわかれば、Session オブジェクトの GetEntity メソッドを呼び出して、エンティティを取得することができます。
表示名の代わりにデータベース ID を使用してレコード タイプを要求するには、GetEntityDefOfDbId を使用します。
表示名と一意のキーに関する詳細は、 「レコード タイプ」を参照してください。
VBScript
session.GetEntityDefOfName(display_name, entitydef_names,entitydef_type )
Perl
$session->GetEntityDefOfName(display_name, entitydef_names,entitydef_type);
Visual Basic の場合、文字列の配列を含む Variant。 各文字列には、EntityDef 名が含まれます。
Perl の場合は、文字列の配列への参照。各文字列には、EntityDef 名が含まれます。
EntityDef の名前を使用して、表示名または DbId で識別されるエンティティが検索されます。 EntityDef 名のリストが、指定の順序で繰り返し処理されます。entDefNames 引数に指定された EntityDef 名に無効なものがあると、無効な名前があることを確認したという例外がスローされます。配列値が空で指定された場合、スキーマに定義されているすべての EntityDef タイプが使用されます。そのときの検索順序は、最もよく検出される EntityDef から始めて、最も検出されない EntityDef が最後になります。
Perl
use CQPerlExt; # Build session... # Log in...'Session UserLogon method' # Determine the array of Entity Def Names for searching... eval { $entDefNamesDB = $CQSession->GetEntityDefNames(); }; # Sort the list of entity def names returned from GetEntityDefNames() @entDefNamesDBsorted = sort @$entDefNamesDB; $entDefNamesDBsorted = ¥@entDefNamesDBsorted; # EntityDef Names can be supplied by the user. For example: # @entDefNamesUser = ($ARG{'EDEF1'},$ARG{'EDEF2'},$ARG{'EDEF3'}); # $entDefNamesUser = ¥@entDefNamesUser; # if using user supplied EntityDef Names for searching then # $entDefNames = $entDefNamesUser; # else use all DB EntityDef names for searching: $entDefNames = $entDefNamesDBsorted; # Call CQSession->GetEntityDefOfName()... #my($dName) = substr($ARG{'DATABASE'}.$ARG{'RECORDNAME'}, 5); my($dName) = $ARG{'ID'}; eval { $CQEntityDefOfName = $CQSession->GetEntityDefOfName($dName, $entDefNames, $ARG{'ENTTYPE'}); }; # exception handling goes here... # Get the Entity Def Name of the record... eval { $CQEntityDefName = $CQEntityDefOfName->GetName(); }; # exception handling goes here... # Get entity...