PACKAGE BODY: APPS.WF_UTIL

Source

1 package body WF_UTIL as
2 /* $Header: WFUTILB.pls 120.4 2005/10/28 11:18:29 dlam ship $ */
3 --------------------------------------------------------------------------
4 /*
5 ** call_me_later - <described in WFUTILS.pls>
6 */
7 PROCEDURE call_me_later(p_callback   in varchar2,
8                         p_when       in date,
9                         p_parameters in wf_parameter_list_t default null) is
10 begin
11   wf_event.raise(p_event_name => 'oracle.apps.wf.callback.delay',
12                  p_event_key  => p_callback,
13                  p_event_data => null,
14                  p_parameters => p_parameters,
15                  p_send_date  => p_when);
16 end;
17 ---------------------------------------------------------------------------
18 /*
19 ** call_me_later_rf - <described in WFUTILS.pls>
20 */
21 FUNCTION call_me_later_rf(p_subscription_guid in raw,
22                           p_event in out nocopy wf_event_t) return varchar2
23 is
24   my_callback  varchar2(256)        := p_event.getEventKey();
25   my_parms     wf_parameter_list_t  := p_event.GetParameterList();
26 begin
27   execute immediate 'begin '||my_callback||'(:v1); end;' using in my_parms;
28   return 'SUCCESS';
29 end;
30 ---------------------------------------------------------------------------
31 end WF_UTIL;