PACKAGE BODY: APPS.PER_PQH_WF

Source

1 Package Body per_pqh_wf as
2 /* $Header: perpqhwf.pkb 115.0 2002/06/21 22:46:42 scnair noship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |                     Private Global Definitions                           |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package  varchar2(33)	:= '  per_pqh_wf.';  -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |-------------------------< my_callbackable_routine >----------------------|
12 -- ----------------------------------------------------------------------------
13 
14 procedure my_callbackable_routine(my_parms in wf_parameter_list_t) is
15 mykey   varchar2(100);
16 begin
17         mykey := wf_event.getValueForParameter('USERKEY', my_parms);
18         per_pqh_shr.my_synch_routine(mykey);
19 end my_callbackable_routine;
20 -- ----------------------------------------------------------------------------
21 -- |-------------------------< callbackable_routine >----------------------|
22 -- ----------------------------------------------------------------------------
23 --
24 procedure callbackable_routine(my_parms in wf_parameter_list_t) is
25 mykey   varchar2(100);
26 begin
27         mykey := wf_event.getValueForParameter('USERKEY', my_parms);
28         hr_psf_shd.my_synch_routine(mykey);
29 end callbackable_routine;
30 --
31 end per_pqh_wf;