DBA Data[Home] [Help]

PACKAGE BODY: APPS.PER_AU_DATA_PUMP

Source


1 package body per_au_data_pump as
2 /* $Header: hraudpmf.pkb 120.0 2005/05/30 22:54:36 appldev noship $
3    Name        Date         Version      Bug               Text
4 ------------------------------------------------------------------
5   apunekar    01-MAY-2001     115.0     1620646         Created
6 
7 */
8 function get_legal_employer_id
9 (p_legal_employer_name in varchar2,
10  p_business_group_id   in number)
11  return varchar2 is
12  l_legal_employer_id number;
13 
14 begin
15 
16   select hou.organization_id
17   into l_legal_employer_id
18   from hr_organization_information hoi, hr_organization_units hou
19   where hoi.organization_id = hou.organization_id
20   and hou.business_group_id = p_business_group_id
21   and hoi.org_information_context = 'AU_LEGAL_EMPLOYER'
22   and hoi.org_information3 = p_legal_employer_name;
23   return to_char(l_legal_employer_id);
24 exception
25   when others then
26     hr_data_pump.fail('get_legal_employer_id', sqlerrm,
27                        p_legal_employer_name, p_business_group_id);
28     raise;
29 
30 end get_legal_employer_id;
31 end per_au_data_pump ;