[Home] [Help]
3432: direction varchar2(8); -- Event direction (receive/raise/send)
3433: evtname varchar2(240); -- Event name (for raise)
3434: evtkey varchar2(2000); -- Event key (for raise)
3435: msgdata clob; -- Message contents as clob (for raise)
3436: evtmsg wf_event_t; -- Event message (for send)
3437: attr varchar2(4000); -- Attrs for event override (for send)
3438: priority number; -- Event priority (for send)
3439: atsign pls_integer; -- Used to parse agent@system
3440: outagent wf_agent_t; -- Out agent override (send)
3520: --raised we just ignore it.
3521: if (wf_core.error_name ='WFENG_ACTIVITY_ATTR') then
3522: --we will initialise the event here so that the
3523: --parameterlist is usable down the line
3524: wf_event_t.initialize(evtmsg);
3525: --clear the error stack
3526: wf_core.clear;
3527: else
3528: --Any other error raise it
3597:
3598:
3599:
3600: -- Raise event
3601: Wf_Event.Raise(
3602: p_event_name => evtname,
3603: p_event_key => evtkey,
3604: p_event_data => msgdata,
3605: p_parameters => parameterlist);
3791: end if;
3792: -- End 2294745
3793:
3794: -- Send event
3795: Wf_Event.Send(p_event => evtmsg);
3796:
3797: if (wf_core.Translate('WF_INSTALL')='EMBEDDED') then
3798: ECX_ERRORLOG.Outbound_Log (p_event => evtmsg);
3799: end if;
3802: begin
3803: WF_ENGINE.SetItemAttrText(itemtype, itemkey,
3804: WF_ENGINE.GetActivityAttrText(itemtype, itemkey, actid,
3805: '#WF_EVT_MSGID'),
3806: rawtohex(WF_EVENT.g_msgID));
3807:
3808: exception
3809: when others then
3810: if (WF_CORE.error_name = 'WFENG_ACTIVITY_ATTR') then