91: --
92: -- The primary key is invalid therefore we must error
93: --
94: close csr_leg_code;
95: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
96: fnd_message.raise_error;
97: end if;
98: hr_utility.set_location(l_proc,30);
99: --
92: -- The primary key is invalid therefore we must error
93: --
94: close csr_leg_code;
95: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
96: fnd_message.raise_error;
97: end if;
98: hr_utility.set_location(l_proc,30);
99: --
100: -- Set the global variables so the values are
151: IF NOT hr_tim_shd.api_updating
152: (p_template_item_id => p_rec.template_item_id
153: ,p_object_version_number => p_rec.object_version_number
154: ) THEN
155: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
156: fnd_message.set_token('PROCEDURE ', l_proc);
157: fnd_message.set_token('STEP ', '5');
158: fnd_message.raise_error;
159: END IF;
152: (p_template_item_id => p_rec.template_item_id
153: ,p_object_version_number => p_rec.object_version_number
154: ) THEN
155: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
156: fnd_message.set_token('PROCEDURE ', l_proc);
157: fnd_message.set_token('STEP ', '5');
158: fnd_message.raise_error;
159: END IF;
160: --
153: ,p_object_version_number => p_rec.object_version_number
154: ) THEN
155: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
156: fnd_message.set_token('PROCEDURE ', l_proc);
157: fnd_message.set_token('STEP ', '5');
158: fnd_message.raise_error;
159: END IF;
160: --
161: IF (nvl(p_rec.form_item_id,hr_api.g_number) <>
154: ) THEN
155: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
156: fnd_message.set_token('PROCEDURE ', l_proc);
157: fnd_message.set_token('STEP ', '5');
158: fnd_message.raise_error;
159: END IF;
160: --
161: IF (nvl(p_rec.form_item_id,hr_api.g_number) <>
162: nvl(hr_tim_shd.g_old_rec.form_item_id,hr_api.g_number)
287: open csr_form_item;
288: fetch csr_form_item into l_item_application_id, l_item_form_id;
289: if csr_form_item%notfound then
290: close csr_form_item;
291: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
292: fnd_message.set_token('PROCEDURE', l_proc);
293: fnd_message.set_token('STEP','10');
294: fnd_message.raise_error;
295: end if;
288: fetch csr_form_item into l_item_application_id, l_item_form_id;
289: if csr_form_item%notfound then
290: close csr_form_item;
291: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
292: fnd_message.set_token('PROCEDURE', l_proc);
293: fnd_message.set_token('STEP','10');
294: fnd_message.raise_error;
295: end if;
296: close csr_form_item;
289: if csr_form_item%notfound then
290: close csr_form_item;
291: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
292: fnd_message.set_token('PROCEDURE', l_proc);
293: fnd_message.set_token('STEP','10');
294: fnd_message.raise_error;
295: end if;
296: close csr_form_item;
297: --
290: close csr_form_item;
291: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
292: fnd_message.set_token('PROCEDURE', l_proc);
293: fnd_message.set_token('STEP','10');
294: fnd_message.raise_error;
295: end if;
296: close csr_form_item;
297: --
298: open csr_form_template;
298: open csr_form_template;
299: fetch csr_form_template into l_template_application_id, l_template_form_id;
300: if csr_form_template%notfound then
301: close csr_form_template;
302: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
303: fnd_message.set_token('PROCEDURE', l_proc);
304: fnd_message.set_token('STEP','20');
305: fnd_message.raise_error;
306: end if;
299: fetch csr_form_template into l_template_application_id, l_template_form_id;
300: if csr_form_template%notfound then
301: close csr_form_template;
302: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
303: fnd_message.set_token('PROCEDURE', l_proc);
304: fnd_message.set_token('STEP','20');
305: fnd_message.raise_error;
306: end if;
307: close csr_form_template;
300: if csr_form_template%notfound then
301: close csr_form_template;
302: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
303: fnd_message.set_token('PROCEDURE', l_proc);
304: fnd_message.set_token('STEP','20');
305: fnd_message.raise_error;
306: end if;
307: close csr_form_template;
308: --
301: close csr_form_template;
302: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
303: fnd_message.set_token('PROCEDURE', l_proc);
304: fnd_message.set_token('STEP','20');
305: fnd_message.raise_error;
306: end if;
307: close csr_form_template;
308: --
309: hr_utility.set_location(l_proc,40);
311: if nvl(l_item_application_id,hr_api.g_number) <>
312: nvl(l_template_application_id,hr_api.g_number)
313: or nvl(l_item_form_id,hr_api.g_number) <>
314: nvl(l_template_form_id,hr_api.g_number) then
315: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
316: fnd_message.set_token('PROCEDURE', l_proc);
317: fnd_message.set_token('STEP','30');
318: fnd_message.raise_error;
319: end if;
312: nvl(l_template_application_id,hr_api.g_number)
313: or nvl(l_item_form_id,hr_api.g_number) <>
314: nvl(l_template_form_id,hr_api.g_number) then
315: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
316: fnd_message.set_token('PROCEDURE', l_proc);
317: fnd_message.set_token('STEP','30');
318: fnd_message.raise_error;
319: end if;
320: --
313: or nvl(l_item_form_id,hr_api.g_number) <>
314: nvl(l_template_form_id,hr_api.g_number) then
315: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
316: fnd_message.set_token('PROCEDURE', l_proc);
317: fnd_message.set_token('STEP','30');
318: fnd_message.raise_error;
319: end if;
320: --
321: end if;
314: nvl(l_template_form_id,hr_api.g_number) then
315: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
316: fnd_message.set_token('PROCEDURE', l_proc);
317: fnd_message.set_token('STEP','30');
318: fnd_message.raise_error;
319: end if;
320: --
321: end if;
322: --
439: open csr_address_segs_exist(l_block);
440: fetch csr_address_segs_exist into l_dummy2;
441: if csr_address_segs_exist%found then
442: close csr_address_segs_exist;
443: fnd_message.set_name('PER','PER_289203_INV_FLEX_SEG_COMB');
444: fnd_message.set_token('FLEX_SEG',l_block||'.'||l_segment);
445: fnd_message.raise_error;
446: else
447: close csr_address_segs_exist;
440: fetch csr_address_segs_exist into l_dummy2;
441: if csr_address_segs_exist%found then
442: close csr_address_segs_exist;
443: fnd_message.set_name('PER','PER_289203_INV_FLEX_SEG_COMB');
444: fnd_message.set_token('FLEX_SEG',l_block||'.'||l_segment);
445: fnd_message.raise_error;
446: else
447: close csr_address_segs_exist;
448: end if;
441: if csr_address_segs_exist%found then
442: close csr_address_segs_exist;
443: fnd_message.set_name('PER','PER_289203_INV_FLEX_SEG_COMB');
444: fnd_message.set_token('FLEX_SEG',l_block||'.'||l_segment);
445: fnd_message.raise_error;
446: else
447: close csr_address_segs_exist;
448: end if;
449: else
488: open csr_segment_on_template(l_block, l_segment);
489: fetch csr_segment_on_template into l_dummy2;
490: if csr_segment_on_template%found then
491: close csr_segment_on_template;
492: fnd_message.set_name('PER','PER_289203_INV_FLEX_SEG_COMB');
493: fnd_message.set_token('FLEX_SEG',l_block||'.'||l_segment);
494: fnd_message.raise_error;
495: else
496: close csr_segment_on_template;
489: fetch csr_segment_on_template into l_dummy2;
490: if csr_segment_on_template%found then
491: close csr_segment_on_template;
492: fnd_message.set_name('PER','PER_289203_INV_FLEX_SEG_COMB');
493: fnd_message.set_token('FLEX_SEG',l_block||'.'||l_segment);
494: fnd_message.raise_error;
495: else
496: close csr_segment_on_template;
497: end if;
490: if csr_segment_on_template%found then
491: close csr_segment_on_template;
492: fnd_message.set_name('PER','PER_289203_INV_FLEX_SEG_COMB');
493: fnd_message.set_token('FLEX_SEG',l_block||'.'||l_segment);
494: fnd_message.raise_error;
495: else
496: close csr_segment_on_template;
497: end if;
498: else