16: BEGIN
17: --
18: -- Added for GSI Bug 5472781
19: --
20: IF hr_utility.chk_product_install('Oracle Human Resources', 'RU') THEN
21: --
22: IF p_org_info_type_code='RU_COMPANY_INFORMATION' THEN
23: l_status := hr_ru_utility.validate_tax_no(p_org_information2);
24: IF l_status = 0 THEN
21: --
22: IF p_org_info_type_code='RU_COMPANY_INFORMATION' THEN
23: l_status := hr_ru_utility.validate_tax_no(p_org_information2);
24: IF l_status = 0 THEN
25: hr_utility.set_message (800, 'HR_RU_INVALID_ORG_INN');
26: hr_utility.raise_error;
27: END IF;
28: l_status := hr_ru_utility.validate_ogrn(p_org_information12);
29: IF l_status = 0 THEN
22: IF p_org_info_type_code='RU_COMPANY_INFORMATION' THEN
23: l_status := hr_ru_utility.validate_tax_no(p_org_information2);
24: IF l_status = 0 THEN
25: hr_utility.set_message (800, 'HR_RU_INVALID_ORG_INN');
26: hr_utility.raise_error;
27: END IF;
28: l_status := hr_ru_utility.validate_ogrn(p_org_information12);
29: IF l_status = 0 THEN
30: hr_utility.set_message (800, 'HR_RU_INVALID_OGRN_NO');
26: hr_utility.raise_error;
27: END IF;
28: l_status := hr_ru_utility.validate_ogrn(p_org_information12);
29: IF l_status = 0 THEN
30: hr_utility.set_message (800, 'HR_RU_INVALID_OGRN_NO');
31: hr_utility.raise_error;
32: END IF;
33: l_status := hr_ru_utility.validate_org_spifn(p_org_information4);
34: IF l_status = 0 THEN
27: END IF;
28: l_status := hr_ru_utility.validate_ogrn(p_org_information12);
29: IF l_status = 0 THEN
30: hr_utility.set_message (800, 'HR_RU_INVALID_OGRN_NO');
31: hr_utility.raise_error;
32: END IF;
33: l_status := hr_ru_utility.validate_org_spifn(p_org_information4);
34: IF l_status = 0 THEN
35: hr_utility.set_message (800, 'HR_RU_INVALID_PENSION_NO');
31: hr_utility.raise_error;
32: END IF;
33: l_status := hr_ru_utility.validate_org_spifn(p_org_information4);
34: IF l_status = 0 THEN
35: hr_utility.set_message (800, 'HR_RU_INVALID_PENSION_NO');
36: hr_utility.raise_error;
37: END IF;
38: l_status := hr_ru_utility.validate_kpp(p_org_information3);
39: IF l_status = 0 THEN
32: END IF;
33: l_status := hr_ru_utility.validate_org_spifn(p_org_information4);
34: IF l_status = 0 THEN
35: hr_utility.set_message (800, 'HR_RU_INVALID_PENSION_NO');
36: hr_utility.raise_error;
37: END IF;
38: l_status := hr_ru_utility.validate_kpp(p_org_information3);
39: IF l_status = 0 THEN
40: hr_utility.set_message (800, 'HR_RU_INVALID_KPP_NO');
36: hr_utility.raise_error;
37: END IF;
38: l_status := hr_ru_utility.validate_kpp(p_org_information3);
39: IF l_status = 0 THEN
40: hr_utility.set_message (800, 'HR_RU_INVALID_KPP_NO');
41: hr_utility.raise_error;
42: END IF;
43: l_status := hr_ru_utility.validate_si(p_org_information5);
44: IF l_status = 0 THEN
37: END IF;
38: l_status := hr_ru_utility.validate_kpp(p_org_information3);
39: IF l_status = 0 THEN
40: hr_utility.set_message (800, 'HR_RU_INVALID_KPP_NO');
41: hr_utility.raise_error;
42: END IF;
43: l_status := hr_ru_utility.validate_si(p_org_information5);
44: IF l_status = 0 THEN
45: hr_utility.set_message (800, 'HR_RU_INVALID_SI_NO');
41: hr_utility.raise_error;
42: END IF;
43: l_status := hr_ru_utility.validate_si(p_org_information5);
44: IF l_status = 0 THEN
45: hr_utility.set_message (800, 'HR_RU_INVALID_SI_NO');
46: hr_utility.raise_error;
47: END IF;
48: l_status := hr_ru_utility.validate_okogu(p_org_information8);
49: IF l_status = 0 THEN
42: END IF;
43: l_status := hr_ru_utility.validate_si(p_org_information5);
44: IF l_status = 0 THEN
45: hr_utility.set_message (800, 'HR_RU_INVALID_SI_NO');
46: hr_utility.raise_error;
47: END IF;
48: l_status := hr_ru_utility.validate_okogu(p_org_information8);
49: IF l_status = 0 THEN
50: hr_utility.set_message (800, 'HR_RU_INVALID_OKOGU_CODE');
46: hr_utility.raise_error;
47: END IF;
48: l_status := hr_ru_utility.validate_okogu(p_org_information8);
49: IF l_status = 0 THEN
50: hr_utility.set_message (800, 'HR_RU_INVALID_OKOGU_CODE');
51: hr_utility.raise_error;
52: END IF;
53: l_status := hr_ru_utility.validate_okpo(p_org_information7);
54: IF l_status = 0 THEN
47: END IF;
48: l_status := hr_ru_utility.validate_okogu(p_org_information8);
49: IF l_status = 0 THEN
50: hr_utility.set_message (800, 'HR_RU_INVALID_OKOGU_CODE');
51: hr_utility.raise_error;
52: END IF;
53: l_status := hr_ru_utility.validate_okpo(p_org_information7);
54: IF l_status = 0 THEN
55: hr_utility.set_message (800, 'HR_RU_INVALID_OKPO_CODE');
51: hr_utility.raise_error;
52: END IF;
53: l_status := hr_ru_utility.validate_okpo(p_org_information7);
54: IF l_status = 0 THEN
55: hr_utility.set_message (800, 'HR_RU_INVALID_OKPO_CODE');
56: hr_utility.raise_error;
57: END IF;
58: ELSIF p_org_info_type_code = 'RU_COMPANY_ACTIVITY_TYPES' THEN
59: l_status := hr_ru_utility.validate_okved(p_org_information1);
52: END IF;
53: l_status := hr_ru_utility.validate_okpo(p_org_information7);
54: IF l_status = 0 THEN
55: hr_utility.set_message (800, 'HR_RU_INVALID_OKPO_CODE');
56: hr_utility.raise_error;
57: END IF;
58: ELSIF p_org_info_type_code = 'RU_COMPANY_ACTIVITY_TYPES' THEN
59: l_status := hr_ru_utility.validate_okved(p_org_information1);
60: IF l_status = 0 THEN
57: END IF;
58: ELSIF p_org_info_type_code = 'RU_COMPANY_ACTIVITY_TYPES' THEN
59: l_status := hr_ru_utility.validate_okved(p_org_information1);
60: IF l_status = 0 THEN
61: hr_utility.set_message (800, 'HR_RU_INVALID_OKVED_CODE');
62: hr_utility.raise_error;
63: END IF;
64: END IF;
65: END IF;
58: ELSIF p_org_info_type_code = 'RU_COMPANY_ACTIVITY_TYPES' THEN
59: l_status := hr_ru_utility.validate_okved(p_org_information1);
60: IF l_status = 0 THEN
61: hr_utility.set_message (800, 'HR_RU_INVALID_OKVED_CODE');
62: hr_utility.raise_error;
63: END IF;
64: END IF;
65: END IF;
66: END CREATE_RU_ORG_INFO;
85: BEGIN
86: --
87: -- Added for GSI Bug 5472781
88: --
89: IF hr_utility.chk_product_install('Oracle Human Resources', 'RU') THEN
90: --
91: OPEN csr_org_id;
92: FETCH csr_org_id into l_org_id;
93: CLOSE csr_org_id;
94: IF p_org_info_type_code='RU_COMPANY_INFORMATION' THEN
95: IF p_org_information2 <> hr_api.g_varchar2 THEN
96: l_status := hr_ru_utility.validate_tax_no(p_org_information2);
97: IF l_status = 0 THEN
98: hr_utility.set_message (800, 'HR_RU_INVALID_ORG_INN');
99: hr_utility.raise_error;
100: END IF;
101: END IF;
102: IF p_org_information12 <> hr_api.g_varchar2
95: IF p_org_information2 <> hr_api.g_varchar2 THEN
96: l_status := hr_ru_utility.validate_tax_no(p_org_information2);
97: IF l_status = 0 THEN
98: hr_utility.set_message (800, 'HR_RU_INVALID_ORG_INN');
99: hr_utility.raise_error;
100: END IF;
101: END IF;
102: IF p_org_information12 <> hr_api.g_varchar2
103: THEN
102: IF p_org_information12 <> hr_api.g_varchar2
103: THEN
104: l_status := hr_ru_utility.validate_ogrn(p_org_information12);
105: IF l_status = 0 THEN
106: hr_utility.set_message (800, 'HR_RU_INVALID_OGRN_NO');
107: hr_utility.raise_error;
108: END IF;
109: END IF;
110: IF p_org_information3 <> hr_api.g_varchar2 THEN
103: THEN
104: l_status := hr_ru_utility.validate_ogrn(p_org_information12);
105: IF l_status = 0 THEN
106: hr_utility.set_message (800, 'HR_RU_INVALID_OGRN_NO');
107: hr_utility.raise_error;
108: END IF;
109: END IF;
110: IF p_org_information3 <> hr_api.g_varchar2 THEN
111: l_status := hr_ru_utility.validate_kpp(p_org_information3);
109: END IF;
110: IF p_org_information3 <> hr_api.g_varchar2 THEN
111: l_status := hr_ru_utility.validate_kpp(p_org_information3);
112: IF l_status = 0 THEN
113: hr_utility.set_message (800, 'HR_RU_INVALID_KPP_NO');
114: hr_utility.raise_error;
115: END IF;
116: END IF;
117: IF p_org_information5 <> hr_api.g_varchar2 THEN
110: IF p_org_information3 <> hr_api.g_varchar2 THEN
111: l_status := hr_ru_utility.validate_kpp(p_org_information3);
112: IF l_status = 0 THEN
113: hr_utility.set_message (800, 'HR_RU_INVALID_KPP_NO');
114: hr_utility.raise_error;
115: END IF;
116: END IF;
117: IF p_org_information5 <> hr_api.g_varchar2 THEN
118: l_status := hr_ru_utility.validate_si(p_org_information5);
116: END IF;
117: IF p_org_information5 <> hr_api.g_varchar2 THEN
118: l_status := hr_ru_utility.validate_si(p_org_information5);
119: IF l_status = 0 THEN
120: hr_utility.set_message (800, 'HR_RU_INVALID_SI_NO');
121: hr_utility.raise_error;
122: END IF;
123: END IF;
124: IF p_org_information8 <> hr_api.g_varchar2 THEN
117: IF p_org_information5 <> hr_api.g_varchar2 THEN
118: l_status := hr_ru_utility.validate_si(p_org_information5);
119: IF l_status = 0 THEN
120: hr_utility.set_message (800, 'HR_RU_INVALID_SI_NO');
121: hr_utility.raise_error;
122: END IF;
123: END IF;
124: IF p_org_information8 <> hr_api.g_varchar2 THEN
125: l_status := hr_ru_utility.validate_okogu(p_org_information8);
123: END IF;
124: IF p_org_information8 <> hr_api.g_varchar2 THEN
125: l_status := hr_ru_utility.validate_okogu(p_org_information8);
126: IF l_status = 0 THEN
127: hr_utility.set_message (800, 'HR_RU_INVALID_OKOGU_CODE');
128: hr_utility.raise_error;
129: END IF;
130: END IF;
131: IF p_org_information7 <> hr_api.g_varchar2 THEN
124: IF p_org_information8 <> hr_api.g_varchar2 THEN
125: l_status := hr_ru_utility.validate_okogu(p_org_information8);
126: IF l_status = 0 THEN
127: hr_utility.set_message (800, 'HR_RU_INVALID_OKOGU_CODE');
128: hr_utility.raise_error;
129: END IF;
130: END IF;
131: IF p_org_information7 <> hr_api.g_varchar2 THEN
132: l_status := hr_ru_utility.validate_okpo(p_org_information7);
130: END IF;
131: IF p_org_information7 <> hr_api.g_varchar2 THEN
132: l_status := hr_ru_utility.validate_okpo(p_org_information7);
133: IF l_status = 0 THEN
134: hr_utility.set_message (800, 'HR_RU_INVALID_OKPO_CODE');
135: hr_utility.raise_error;
136: END IF;
137: END IF;
138: IF p_org_information4 <> hr_api.g_varchar2 THEN
131: IF p_org_information7 <> hr_api.g_varchar2 THEN
132: l_status := hr_ru_utility.validate_okpo(p_org_information7);
133: IF l_status = 0 THEN
134: hr_utility.set_message (800, 'HR_RU_INVALID_OKPO_CODE');
135: hr_utility.raise_error;
136: END IF;
137: END IF;
138: IF p_org_information4 <> hr_api.g_varchar2 THEN
139: l_status := hr_ru_utility.validate_org_spifn(p_org_information4);
137: END IF;
138: IF p_org_information4 <> hr_api.g_varchar2 THEN
139: l_status := hr_ru_utility.validate_org_spifn(p_org_information4);
140: IF l_status = 0 THEN
141: hr_utility.set_message (800, 'HR_RU_INVALID_PENSION_NO');
142: hr_utility.raise_error;
143: END IF;
144: END IF;
145: ELSIF p_org_info_type_code = 'RU_COMPANY_ACTIVITY_TYPES' THEN
138: IF p_org_information4 <> hr_api.g_varchar2 THEN
139: l_status := hr_ru_utility.validate_org_spifn(p_org_information4);
140: IF l_status = 0 THEN
141: hr_utility.set_message (800, 'HR_RU_INVALID_PENSION_NO');
142: hr_utility.raise_error;
143: END IF;
144: END IF;
145: ELSIF p_org_info_type_code = 'RU_COMPANY_ACTIVITY_TYPES' THEN
146: IF p_org_information1 <> hr_api.g_varchar2 THEN
145: ELSIF p_org_info_type_code = 'RU_COMPANY_ACTIVITY_TYPES' THEN
146: IF p_org_information1 <> hr_api.g_varchar2 THEN
147: l_status := hr_ru_utility.validate_okved(p_org_information1);
148: IF l_status = 0 THEN
149: hr_utility.set_message (800, 'HR_RU_INVALID_OKVED_CODE');
150: hr_utility.raise_error;
151: END IF;
152: END IF;
153: END IF;
146: IF p_org_information1 <> hr_api.g_varchar2 THEN
147: l_status := hr_ru_utility.validate_okved(p_org_information1);
148: IF l_status = 0 THEN
149: hr_utility.set_message (800, 'HR_RU_INVALID_OKVED_CODE');
150: hr_utility.raise_error;
151: END IF;
152: END IF;
153: END IF;
154: END IF;