PACKAGE BODY: APPS.PER_HU_CREATE_EMPLOYEE

Source

1 package body PER_HU_CREATE_EMPLOYEE as
2 /* $Header: pehuempp.pkb 120.3.12010000.2 2009/07/15 14:24:11 parusia ship $ */
3 g_package   VARCHAR2(30) := 'PER_HU_CREATE_EMPLOYEE.';
4 
5 PROCEDURE create_hu_employee (p_last_name           VARCHAR2
6                               ,p_first_name          VARCHAR2
7                               ,p_national_identifier VARCHAR2
8                               ,p_per_information1    VARCHAR2
9                               ,p_per_information2    VARCHAR2
10                               ) is
11 
12 l_proc                  VARCHAR2(72) := g_package||'CREATE_HU_EMPLOYEE';
13 
14 BEGIN
15 
16 
17        hr_api.mandatory_arg_error
18            (p_api_name         => l_proc,
19             p_argument         => hr_general.decode_lookup('HU_FORM_LABELS','FIRST_NAME'),
20             p_argument_value   => p_first_name
21            );
22         /*hr_api.mandatory_arg_error
23            (p_api_name         => l_proc,
24             p_argument         => hr_general.decode_lookup('HU_FORM_LABELS','TAX_ID_NO'),
25             p_argument_value   => p_per_information2
26            );*/
27         /*hr_api.mandatory_arg_error
28            (p_api_name         => l_proc,
29             p_argument         => hr_general.decode_lookup('HU_FORM_LABELS','MOTHERS_MAIDEN_NAME'),
30             p_argument_value   => p_per_information1
31            );*/
32   --
33   -- Added for GSI Bug 5472781
34   --
35   IF hr_utility.chk_product_install('Oracle Human Resources', 'HU') THEN
36     --
37         -- Bug 8605683
38 	-- Suppress checking national identifier if the person is getting created
39 	-- using global deployments (transfer of a person from one BG to another)
40         if    per_per_bus.g_global_transfer_in_process is null
41 	   or per_per_bus.g_global_transfer_in_process = false then
42 		IF fnd_profile.value('PER_NATIONAL_IDENTIFIER_VALIDATION') in ('ERROR','WARN') THEN
43 		        hr_api.mandatory_arg_error
44 		           (p_api_name         => l_proc,
45 		            p_argument         => hr_general.decode_lookup('HU_FORM_LABELS','SS_CODE'),
46 		            p_argument_value   => p_national_identifier
47 		           );
48 		END IF;
49         end if ;
50 
51        IF  length(p_last_name)>40 THEN
52          hr_utility.set_message(800, 'HR_289712_UTF8_LENGTH_EXCEEDED');
53          hr_utility.set_message_token('COLUMN_NAME',hr_general.decode_lookup('HU_FORM_LABELS','LAST_NAME'));
54          hr_utility.set_message_token('COLUMN_VALUE',p_last_name);
55          hr_utility.set_message_token('MAX_LENGTH','40');
56          hr_utility.raise_error;
57        END IF;
58 
59        IF  length(p_first_name)>40 THEN
60          hr_utility.set_message(800, 'HR_289712_UTF8_LENGTH_EXCEEDED');
61          hr_utility.set_message_token('COLUMN_NAME',hr_general.decode_lookup('HU_FORM_LABELS','FIRST_NAME'));
62          hr_utility.set_message_token('COLUMN_VALUE',p_first_name);
63          hr_utility.set_message_token('MAX_LENGTH','40');
64          hr_utility.raise_error;
65        END IF;
66   END IF;
67 END create_hu_employee;
68 
69 END PER_HU_CREATE_EMPLOYEE;