フックを起動させたイベントのタイプを戻します。これは読み取り専用のプロパティです。表示できますが設定できません。
VBScript
eventObject.EventType
Perl
$eventObject->EventType();
VBScript
Dim eventType
eventType = param.EventType
if eventType = AD_BUTTON_CLICK Then
SetFieldValue "KeyCustomer", "Company A"
elseif eventType = AD_CONTEXMENU_ITEM_SELECTION Then
SetFieldValue "KeyCustomer", "Company B"
end if
Perl
my $eventType;
$eventType = $param->EventType();
if ($eventType == $CQPerlExt::CQ_BUTTON_CLICK) {
$entity->SetFieldValue("KeyCustomer", "Company A");
} else {
if ($eventType == $CQPerlExt::CQ_CONTEXMENU_ITEM_SELECTION) {
$entity->SetFieldValue("KeyCustomer", "Company B");
}
}