PACKAGE BODY: APPS.PAY_HK_RULES

Source

1 package body pay_hk_rules as
2 /* $Header: pyhkrule.pkb 115.1 2002/12/02 10:39:47 srrajago ship $ */
3 /*
4    Copyright (c) Oracle Corporation 2000. All rights reserved
5 --
6    Name        : pay_hk_rules
7 --
8    Change List
9    -----------
10    Date         Name        Vers   Description
11    -----------  ----------  -----  -------------------------------------------
12    08-Nov-2000  jbailie     115.0  Created.
13    02-Dec-2002  srrajago    115.1  Included 'nocopy' option in the 'in out' parameter of the procedure get_source_context,
14                                    dbdrv,checkfile commands.
15 */
16 --
17 --
18    procedure get_source_context(p_asg_act_id number,
19                                 p_ee_id number,
20                                 p_source_id in out nocopy number)
21    is
22 
23    cursor csr_get_source is
24    select fnd_number.canonical_to_number(target.ENTRY_INFORMATION1)
25    from pay_element_entries_f target
26        ,pay_assignment_actions paa
27        ,pay_payroll_actions ppa
28    where ppa.payroll_action_id = paa.payroll_action_id
29    and   target.element_entry_id = p_ee_id
30    and   target.assignment_id = paa.assignment_id
31    and   ppa.effective_date between target.effective_start_date
32                                 and target.effective_end_date
33    and   paa.assignment_action_id = p_asg_act_id;
34 
35    begin
36 
37 
38    open csr_get_source;
39    fetch csr_get_source into p_source_id;
40    close csr_get_source;
41 
42 --
43    end get_source_context;
44 
45 end pay_hk_rules;