1 Package hr_leaving_reason_mig AUTHID CURRENT_USER as
2 /* $Header: pelearea.pkh 115.2 2002/12/06 11:14:42 pkakar noship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |-------------------------< UPDATE_LEAVING_REASON >------------------------|
6 -- ----------------------------------------------------------------------------
7 -- {Start Of Comments}
8 --
9 -- Description:
10 -- This is provided to update the leaving reason. It takes two input values
11 -- one is the existing leaving reason, and the other is the seeded leaving
12 -- reason. Once that is done, the existing leaving reason is updated in the
13 -- hr_lookups table, and the end_date will be set to sysdate, and the
14 -- enabled flag will be set to 'N'.
15 --
16 -- In Parameters:
17 -- Name Reqd Type Description
18 -- p_existing_leaving_reason Yes Varchar2 cust.code for leaving_reason
19 -- p_seeded_leaving_reason Yes Varchar2 seeded code
20 --
21 -- Post Success:
22 -- N/A
23 --
24 -- Post Failure:
25 -- The package does not update a leaving_reason and raises an error.
26 --
27 -- Access Status:
28 -- Public.
29 --
30 -- {End Of Comments}
31 --
32 procedure leave_reas_mig
33 (ERRBUF out nocopy varchar2
34 ,RETCODE out nocopy number
35 ,p_existing_leaving_reason in varchar2
36 ,p_seeded_leaving_reason in varchar2
37 ,p_date in varchar2
38 );
39 end hr_leaving_reason_mig;