DBA Data[Home] [Help]

APPS.PAY_SSR_BUS dependencies on HR_UTILITY

Line 36: hr_utility.set_location('Entering:'||l_proc, 5);

32: l_api_updating boolean;
33: l_valid varchar2(1);
34: --
35: Begin
36: hr_utility.set_location('Entering:'||l_proc, 5);
37: l_api_updating := pay_ssr_shd.api_updating
38: (p_sub_classification_rule_id => p_sub_classification_rule_id
39: ,p_object_version_number => p_object_version_number
40: );

Line 49: hr_utility.set_location('Leaving:'||l_proc, 10);

45: if p_exclusion_rule_id is not null then
46: open csr_exclusion_rule_id_valid;
47: fetch csr_exclusion_rule_id_valid into l_valid;
48: if csr_exclusion_rule_id_valid%notfound then
49: hr_utility.set_location('Leaving:'||l_proc, 10);
50: close csr_exclusion_rule_id_valid;
51: fnd_message.set_name('PAY', 'PAY_50100_ETM_INVALID_EXC_RULE');
52: fnd_message.raise_error;
53: end if;

Line 57: hr_utility.set_location('Leaving:'||l_proc, 15);

53: end if;
54: close csr_exclusion_rule_id_valid;
55: end if;
56: end if;
57: hr_utility.set_location('Leaving:'||l_proc, 15);
58: end chk_exclusion_rule_id;
59: -- ----------------------------------------------------------------------------
60: -- |------------------------------< chk_delete >------------------------------|
61: -- ----------------------------------------------------------------------------

Line 79: hr_utility.set_location('Entering:'||l_proc, 5);

75: l_error exception;
76: l_exists varchar2(1);
77: --
78: Begin
79: hr_utility.set_location('Entering:'||l_proc, 5);
80: --
81: open csr_core_objects;
82: fetch csr_core_objects into l_exists;
83: if csr_core_objects%found then

Line 84: hr_utility.set_location(' Leaving:'||l_proc, 10);

80: --
81: open csr_core_objects;
82: fetch csr_core_objects into l_exists;
83: if csr_core_objects%found then
84: hr_utility.set_location(' Leaving:'||l_proc, 10);
85: close csr_core_objects;
86: raise l_error;
87: end if;
88: close csr_core_objects;

Line 89: hr_utility.set_location(' Leaving:'||l_proc, 15);

85: close csr_core_objects;
86: raise l_error;
87: end if;
88: close csr_core_objects;
89: hr_utility.set_location(' Leaving:'||l_proc, 15);
90: exception
91: when l_error then
92: fnd_message.set_name('PAY', 'PAY_50111_SSR_INVALID_DELETE');
93: fnd_message.raise_error;

Line 95: hr_utility.set_location(' Leaving:'||l_proc, 20);

91: when l_error then
92: fnd_message.set_name('PAY', 'PAY_50111_SSR_INVALID_DELETE');
93: fnd_message.raise_error;
94: when others then
95: hr_utility.set_location(' Leaving:'||l_proc, 20);
96: raise;
97: End chk_delete;
98: -- ----------------------------------------------------------------------------
99: -- |-----------------------< chk_non_updateable_args >------------------------|

Line 122: hr_utility.set_location('Entering:'||l_proc, 5);

118: l_api_updating boolean;
119: l_disallow varchar2(1);
120: --
121: Begin
122: hr_utility.set_location('Entering:'||l_proc, 5);
123: l_api_updating := pay_ssr_shd.api_updating
124: (p_sub_classification_rule_id => p_rec.sub_classification_rule_id
125: ,p_object_version_number => p_rec.object_version_number
126: );

Line 128: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');

124: (p_sub_classification_rule_id => p_rec.sub_classification_rule_id
125: ,p_object_version_number => p_rec.object_version_number
126: );
127: if not l_api_updating then
128: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
129: hr_utility.set_message_token('PROCEDURE', l_proc);
130: hr_utility.set_message_token('STEP', '10');
131: hr_utility.raise_error;
132: end if;

Line 129: hr_utility.set_message_token('PROCEDURE', l_proc);

125: ,p_object_version_number => p_rec.object_version_number
126: );
127: if not l_api_updating then
128: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
129: hr_utility.set_message_token('PROCEDURE', l_proc);
130: hr_utility.set_message_token('STEP', '10');
131: hr_utility.raise_error;
132: end if;
133: --

Line 130: hr_utility.set_message_token('STEP', '10');

126: );
127: if not l_api_updating then
128: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
129: hr_utility.set_message_token('PROCEDURE', l_proc);
130: hr_utility.set_message_token('STEP', '10');
131: hr_utility.raise_error;
132: end if;
133: --
134: hr_utility.set_location(l_proc, 15);

Line 131: hr_utility.raise_error;

127: if not l_api_updating then
128: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
129: hr_utility.set_message_token('PROCEDURE', l_proc);
130: hr_utility.set_message_token('STEP', '10');
131: hr_utility.raise_error;
132: end if;
133: --
134: hr_utility.set_location(l_proc, 15);
135: --

Line 134: hr_utility.set_location(l_proc, 15);

130: hr_utility.set_message_token('STEP', '10');
131: hr_utility.raise_error;
132: end if;
133: --
134: hr_utility.set_location(l_proc, 15);
135: --
136: -- Check that the update is actually allowed.
137: --
138: open csr_disallow_update;

Line 141: hr_utility.set_location(l_proc, 20);

137: --
138: open csr_disallow_update;
139: fetch csr_disallow_update into l_disallow;
140: if csr_disallow_update%found then
141: hr_utility.set_location(l_proc, 20);
142: close csr_disallow_update;
143: fnd_message.set_name('PAY', 'PAY_50109_SSR_CORE_ROW_EXISTS');
144: fnd_message.raise_error;
145: end if;

Line 153: hr_utility.set_location(l_proc, 20);

149: --
150: if nvl(p_rec.element_type_id, hr_api.g_number) <>
151: nvl(pay_ssr_shd.g_old_rec.element_type_id, hr_api.g_number)
152: then
153: hr_utility.set_location(l_proc, 20);
154: l_argument := 'p_element_type_id';
155: raise l_error;
156: end if;
157: hr_utility.set_location(' Leaving:'||l_proc, 25);

Line 157: hr_utility.set_location(' Leaving:'||l_proc, 25);

153: hr_utility.set_location(l_proc, 20);
154: l_argument := 'p_element_type_id';
155: raise l_error;
156: end if;
157: hr_utility.set_location(' Leaving:'||l_proc, 25);
158: exception
159: when l_error then
160: hr_utility.set_location('Leaving:'||l_proc, 30);
161: hr_api.argument_changed_error

Line 160: hr_utility.set_location('Leaving:'||l_proc, 30);

156: end if;
157: hr_utility.set_location(' Leaving:'||l_proc, 25);
158: exception
159: when l_error then
160: hr_utility.set_location('Leaving:'||l_proc, 30);
161: hr_api.argument_changed_error
162: (p_api_name => l_proc
163: ,p_argument => l_argument);
164: when others then

Line 165: hr_utility.set_location('Leaving:'||l_proc, 35);

161: hr_api.argument_changed_error
162: (p_api_name => l_proc
163: ,p_argument => l_argument);
164: when others then
165: hr_utility.set_location('Leaving:'||l_proc, 35);
166: raise;
167: End chk_non_updateable_args;
168: -- ----------------------------------------------------------------------------
169: -- |--------------------------< chk_element_type_id >-------------------------|

Line 186: hr_utility.set_location('Entering:'||l_proc, 5);

182: l_proc varchar2(72) := g_package||'chk_element_type_id';
183: l_exists varchar2(1);
184: --
185: Begin
186: hr_utility.set_location('Entering:'||l_proc, 5);
187: --
188: -- Check that the element type is not null.
189: --
190: hr_api.mandatory_arg_error

Line 201: hr_utility.set_location(' Leaving:'||l_proc, 10);

197: --
198: open csr_element_type_exists;
199: fetch csr_element_type_exists into l_exists;
200: if csr_element_type_exists%notfound then
201: hr_utility.set_location(' Leaving:'||l_proc, 10);
202: close csr_element_type_exists;
203: fnd_message.set_name('PAY', 'PAY_50095_ETM_INVALID_ELE_TYPE');
204: fnd_message.raise_error;
205: end if;

Line 207: hr_utility.set_location(' Leaving:'||l_proc, 15);

203: fnd_message.set_name('PAY', 'PAY_50095_ETM_INVALID_ELE_TYPE');
204: fnd_message.raise_error;
205: end if;
206: close csr_element_type_exists;
207: hr_utility.set_location(' Leaving:'||l_proc, 15);
208: End chk_element_type_id;
209: -- ----------------------------------------------------------------------------
210: -- |------------------------< chk_ele_classification >------------------------|
211: -- ----------------------------------------------------------------------------

Line 233: hr_utility.set_location('Entering:'||l_proc, 5);

229: l_api_updating boolean;
230: l_exists varchar2(1);
231: --
232: Begin
233: hr_utility.set_location('Entering:'||l_proc, 5);
234: l_api_updating := pay_ssr_shd.api_updating
235: (p_sub_classification_rule_id => p_sub_classification_rule_id
236: ,p_object_version_number => p_object_version_number
237: );

Line 256: hr_utility.set_location(' Leaving:'||l_proc, 10);

252: --
253: open csr_sub_classi_rule_exists;
254: fetch csr_sub_classi_rule_exists into l_exists;
255: if csr_sub_classi_rule_exists%found then
256: hr_utility.set_location(' Leaving:'||l_proc, 10);
257: close csr_sub_classi_rule_exists;
258: fnd_message.set_name('PAY', 'PAY_50110_SSR_RULE_EXISTS');
259: fnd_message.raise_error;
260: end if;

Line 263: hr_utility.set_location(' Leaving:'||l_proc, 25);

259: fnd_message.raise_error;
260: end if;
261: close csr_sub_classi_rule_exists;
262: end if;
263: hr_utility.set_location(' Leaving:'||l_proc, 25);
264: End chk_ele_classification;
265: -- ----------------------------------------------------------------------------
266: -- |---------------------------< insert_validate >----------------------------|
267: -- ----------------------------------------------------------------------------

Line 273: hr_utility.set_location('Entering:'||l_proc, 5);

269: --
270: l_proc varchar2(72) := g_package||'insert_validate';
271: --
272: Begin
273: hr_utility.set_location('Entering:'||l_proc, 5);
274: --
275: -- Call all supporting business operations
276: --
277: chk_element_type_id(p_rec.element_type_id);

Line 293: hr_utility.set_location(' Leaving:'||l_proc, 10);

289: ,p_sub_classification_rule_id => p_rec.sub_classification_rule_id
290: ,p_object_version_number => p_rec.object_version_number
291: );
292: --
293: hr_utility.set_location(' Leaving:'||l_proc, 10);
294: End insert_validate;
295: --
296: -- ----------------------------------------------------------------------------
297: -- |---------------------------< update_validate >----------------------------|

Line 304: hr_utility.set_location('Entering:'||l_proc, 5);

300: --
301: l_proc varchar2(72) := g_package||'update_validate';
302: --
303: Begin
304: hr_utility.set_location('Entering:'||l_proc, 5);
305: --
306: -- Call all supporting business operations
307: --
308: chk_non_updateable_args(p_rec);

Line 324: hr_utility.set_location(' Leaving:'||l_proc, 10);

320: ,p_sub_classification_rule_id => p_rec.sub_classification_rule_id
321: ,p_object_version_number => p_rec.object_version_number
322: );
323: --
324: hr_utility.set_location(' Leaving:'||l_proc, 10);
325: End update_validate;
326: --
327: -- ----------------------------------------------------------------------------
328: -- |---------------------------< delete_validate >----------------------------|

Line 335: hr_utility.set_location('Entering:'||l_proc, 5);

331: --
332: l_proc varchar2(72) := g_package||'delete_validate';
333: --
334: Begin
335: hr_utility.set_location('Entering:'||l_proc, 5);
336: --
337: -- Call all supporting business operations
338: --
339: chk_delete(p_rec.sub_classification_rule_id);

Line 341: hr_utility.set_location(' Leaving:'||l_proc, 10);

337: -- Call all supporting business operations
338: --
339: chk_delete(p_rec.sub_classification_rule_id);
340: --
341: hr_utility.set_location(' Leaving:'||l_proc, 10);
342: End delete_validate;
343: --
344: end pay_ssr_bus;