PACKAGE BODY: APPS.PER_NZ_DATA_PUMP

Source

1 package body per_nz_data_pump as
2 /* $Header: hrnzdpmf.pkb 120.1 2005/12/22 03:53:37 abhjain noship $
3    Name        Date         Version      Bug               Text
4 ------------------------------------------------------------------
5   apunekar    01-MAY-2001     115.0     1620642    CreatedMapping Function
6   abhjain     22-dec-2005     115.1     4901666    Added function get_run_type_id
7                                                    and added dbdrv
8 
9 */
10 
11 function get_registered_employer_id
12 (p_employer_ird_number in varchar2,
13  p_business_group_id   in number)
14  return varchar2  is
15  l_registered_employer_id number;
16 
17 begin
18 
19   select hoi.organization_id
20   into l_registered_employer_id
21   from hr_organization_information hoi, hr_organization_units hou
22   where hoi.organization_id = hou.organization_id
23   and hou.business_group_id = p_business_group_id
24   and hoi.org_information_context = 'NZ_IRD_EMPLOYER'
25   and hoi.org_information1 = p_employer_ird_number;
26   return to_char(l_registered_employer_id);
27 exception
28   when others then
29     hr_data_pump.fail('get_registered_employer_id', sqlerrm,
30                        p_employer_ird_number, p_business_group_id);
31     raise;
32 
33 end get_registered_employer_id;
34 
35 
36 FUNCTION get_run_type_id
37 RETURN NUMBER  IS
38 
39   l_run_type_id NUMBER;
40 
41 BEGIN
42 
43   RETURN l_run_type_id;
44 
45 END get_run_type_id;
46 
47 end per_nz_data_pump ;