PACKAGE BODY: APPS.PER_RU_DATA_PUMP

Source

1 PACKAGE BODY per_ru_data_pump AS
2 /* $Header: hrrudpmf.pkb 120.0 2005/05/31 02:35:02 appldev noship $ */
3    FUNCTION get_employer_id (
4       p_employer_name       IN   VARCHAR2,
5       p_business_group_id   IN   NUMBER,
6       p_effective_date      IN   DATE,
7       p_language_code       IN   VARCHAR2 DEFAULT NULL
8    )
9       RETURN VARCHAR2
10    IS
11       l_employer_id     NUMBER;
12       l_language_code   VARCHAR2 (2);
13    BEGIN
14       SELECT NVL (p_language_code, 'US')
15         INTO l_language_code
16         FROM DUAL;
17 
18       l_employer_id :=
19          hr_pump_get.get_organization_id (p_employer_name,
20                                           p_business_group_id,
21                                           p_effective_date,
22                                           l_language_code
23                                          );
24       RETURN TO_CHAR (l_employer_id);
25    EXCEPTION
26       WHEN OTHERS
27       THEN
28          hr_data_pump.fail ('get_employer_id',
29                             SQLERRM,
30                             p_employer_name,
31                             p_business_group_id,
32                             p_effective_date,
33                             l_language_code
34                            );
35          RAISE;
36    END get_employer_id;
37 END per_ru_data_pump;