PACKAGE BODY: APPS.PSP_EXTERNAL_EFFORT_LINES_PKG

Source

1 PACKAGE BODY PSP_EXTERNAL_EFFORT_LINES_PKG AS
2 --$Header: PSPHREFB.pls 120.0 2006/02/02 14:27:50 sramacha noship $
3 
4 FUNCTION get_external_effort_line_id
5 ( p_ext_effort_line_user_key IN VARCHAR2)
6     RETURN NUMBER IS
7 
8 l_external_effort_line_id NUMBER;
9 
10 CURSOR ext_eff_cur IS
11 SELECT unique_key_id
12   FROM hr_pump_batch_line_user_keys
13  WHERE user_key_value = p_ext_effort_line_user_key;
14 BEGIN
15     OPEN  ext_eff_cur;
16        FETCH ext_eff_cur INTO l_external_effort_line_id;
17     CLOSE ext_eff_cur;
18 
19  RETURN(l_external_effort_line_id);
20 
21 EXCEPTION
22 WHEN OTHERS THEN
23     hr_data_pump.fail('get_external_effort_line_id '  ,
24                       SQLERRM                 ,
25                       p_ext_effort_line_user_key);
26    RAISE;
27 END get_external_effort_line_id;
28 
29 
30 FUNCTION get_external_effort_ovn
31 ( p_ext_effort_line_user_key IN VARCHAR2)
32     RETURN NUMBER IS
33 
34 l_ovn NUMBER;
35 CURSOR ovn_cur(p_user_key_value IN VARCHAR2) IS
36 SELECT object_version_number
37   FROM psp_external_effort_lines  peel,
38        hr_pump_batch_line_user_keys key
39  WHERE key.user_key_value     = p_user_key_value
40    AND peel.external_effort_line_id = key.unique_key_id ;
41 BEGIN
42     OPEN  ovn_cur(p_ext_effort_line_user_key);
43        FETCH ovn_cur INTO l_ovn;
44     CLOSE ovn_cur;
45     RETURN l_ovn;
46 EXCEPTION
47 WHEN OTHERS THEN
48     hr_data_pump.fail('get_external_ovn' ,
49                       SQLERRM                 ,
50                       p_ext_effort_line_user_key);
51     RAISE;
52 END get_external_effort_ovn;
53 
54 END psp_external_effort_lines_PKG;