[Home] [Help]
PACKAGE BODY: APPS.PER_HU_ORG_INFO
Source
1 PACKAGE BODY PER_HU_ORG_INFO AS
2 /* $Header: pehuorgp.pkb 120.1 2006/09/21 08:51:52 mgettins noship $ */
3
4 PROCEDURE CREATE_HU_ORG_INFO(p_org_info_type_code VARCHAR2
5 ,p_org_information3 VARCHAR2
6 ,p_org_information4 VARCHAR2
7 ,p_org_information5 VARCHAR2
8 ) is
9 l_check NUMBER;
10 BEGIN
11 --
12 -- Added for GSI Bug 5472781
13 --
14 IF hr_utility.chk_product_install('Oracle Human Resources', 'HU') THEN
15 --
16 IF p_org_info_type_code='HU_COMPANY_INFORMATION_DETAILS' THEN
17 hr_hu_utility.validate_ss_no(p_org_information3);
18 hr_hu_utility.validate_tax_no(p_org_information4);
19 hr_hu_utility.validate_cs_no(p_org_information4,p_org_information5);
20 END IF;
21 --
22 END IF;
23
24 END CREATE_HU_ORG_INFO;
25 -------------------------
26
27 PROCEDURE UPDATE_HU_ORG_INFO(p_org_information_id NUMBER
28 ,p_org_info_type_code VARCHAR2
29 ,p_org_information3 VARCHAR2
30 ,p_org_information4 VARCHAR2
31 ,p_org_information5 VARCHAR2
32 ) is
33
34 CURSOR get_information4 (p_org_information_id NUMBER) is
35 SELECT org_information4 from hr_organization_information
36 where ORG_INFORMATION_CONTEXT='HU_COMPANY_INFORMATION_DETAILS'
37 and org_information_id= p_org_information_id;
38
39 CURSOR get_information5 (p_org_information_id NUMBER) is
40 SELECT org_information5 from hr_organization_information
41 where ORG_INFORMATION_CONTEXT='HU_COMPANY_INFORMATION_DETAILS'
42 and org_information_id= p_org_information_id;
43
44 l_check NUMBER;
45 l_information5 hr_organization_information.org_information5%TYPE;
46 l_information4 hr_organization_information.org_information4%TYPE;
47 BEGIN
48 --
49 -- Added for GSI Bug 5472781
50 --
51 IF hr_utility.chk_product_install('Oracle Human Resources', 'HU') THEN
52 --
53 IF p_org_info_type_code = 'HU_COMPANY_INFORMATION_DETAILS' THEN
54
55 IF p_org_information3 <> hr_api.g_varchar2 THEN
56 hr_hu_utility.validate_ss_no(p_org_information3);
57 END IF;
58
59 IF p_org_information4 <> hr_api.g_varchar2 and p_org_information5 = hr_api.g_varchar2 THEN
60 hr_hu_utility.validate_tax_no(p_org_information4);
61 OPEN get_information5(p_org_information_id);
62 FETCH get_information5 INTO l_information5;
63 CLOSE get_information5;
64 hr_hu_utility.validate_cs_no(p_org_information4,l_information5);
65
66 END IF;
67
68 IF p_org_information5 <> hr_api.g_varchar2 and p_org_information4 = hr_api.g_varchar2 THEN
69 OPEN get_information4(p_org_information_id);
70 FETCH get_information4 INTO l_information4;
71 CLOSE get_information4;
72 hr_hu_utility.validate_cs_no(l_information4,p_org_information5);
73 END IF;
74
75 IF p_org_information5 <> hr_api.g_varchar2 and p_org_information4 <> hr_api.g_varchar2 THEN
76 hr_hu_utility.validate_tax_no(p_org_information4);
77 hr_hu_utility.validate_cs_no(p_org_information4,p_org_information5);
78 END IF;
79 END IF;
80 --
81 END IF;
82 END UPDATE_HU_ORG_INFO;
83
84 -------------------------
85
86 END PER_HU_ORG_INFO;