[Home] [Help]
PACKAGE BODY: APPS.PER_US_EMPLOYEE_LEG_HOOK
Source
1 PACKAGE BODY PER_US_EMPLOYEE_LEG_HOOK AS
2 /* $Header: perusgenempval.pkb 120.1 2006/01/16 15:06 ssattini noship $ */
3
4 --------------------------------------------------------------------------
5 -- --
6 -- Name : CHECK_NEW_HIRE --
7 -- Type : PROCEDURE --
8 -- Description : Checks for the New Hire Default value --
9 -- --
10 -- Parameters : --
11 -- IN : p_per_information_category VARCHAR2 --
12 -- : p_per_information7 VARCHAR2 --
13 -- OUT : --
14 -- RETURN : N/A --
15 -- --
16 -- Change History : --
17 --------------------------------------------------------------------------
18 -- Rev# Date Userid Description --
19 --------------------------------------------------------------------------
20 -- 1.0 05-Jan-06 SSattini Created this procedure --
21 --------------------------------------------------------------------------
22
23 PROCEDURE CHECK_NEW_HIRE( p_person_id per_all_people_f.person_id%type
24 ,p_per_information7 per_all_people_f.per_information7%type
25 ) IS
26
27 l_per_information7 varchar2(240);
28
29 BEGIN
30 /* hr_utility.trace_on(null,'TESTNEWHIRE'); */
31 hr_utility.trace('p_person_id value: '||to_char(p_person_id));
32 hr_utility.trace('New Hire Status before default value: '||p_per_information7 );
33
34 IF ((p_per_information7 = hr_api.g_varchar2) OR (p_per_information7 is null)) THEN
35
36 hr_utility.trace('p_per_information7 = hr_api.g_varchar2 Satisfied ');
37 hr_utility.trace('New Hire Status before default value: '||p_per_information7 );
38
39 update per_all_people_f
40 set per_information7 = 'INCL'
41 where person_id = p_person_id;
42
43 hr_utility.trace('New Hire Status is Set to default value: INCL ');
44 END IF;
45
46 /* hr_utility.trace_off; */
47 return;
48
49 END CHECK_NEW_HIRE;
50
51 END PER_US_EMPLOYEE_LEG_HOOK;