PACKAGE BODY: APPS.EDW_HR_REC_ACT_PKG

Source

1 PACKAGE BODY edw_hr_rec_act_pkg AS
2 /* $Header: hriekrec.pkb 120.0 2005/05/29 07:12:30 appldev noship $ */
3 
4 FUNCTION recruitment_activity_fk( p_recruitment_activity_id IN NUMBER)
5 			     RETURN VARCHAR2 IS
6 
7   l_recruitment_activity_pk VARCHAR2(400);
8 
9   cursor recruitment_activity_cur is
10   select recruitment_activity_pk
11   from edw_hr_rec_act_fkv
12   where p_recruitment_activity_id = recruitment_activity_id;
13 
14 BEGIN
15 
16   OPEN recruitment_activity_cur;
17   FETCH recruitment_activity_cur INTO l_recruitment_activity_pk;
18   CLOSE recruitment_activity_cur;
19 
20   RETURN NVL(l_recruitment_activity_pk, 'NA_EDW');
21 
22 EXCEPTION when others then
23 
24   if recruitment_activity_cur%ISOPEN then
25     CLOSE recruitment_activity_cur;
26   end if;
27 
28   RETURN NVL(l_recruitment_activity_pk, 'NA_EDW');
29 
30 END recruitment_activity_fk;
31 
32 END edw_hr_rec_act_pkg;