53: IF NOT hr_hrc_shd.api_updating
54: (p_hierarchy_id => p_rec.hierarchy_id
55: ,p_object_version_number => p_rec.object_version_number
56: ) THEN
57: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
58: fnd_message.set_token('PROCEDURE ', l_proc);
59: fnd_message.set_token('STEP ', '5');
60: fnd_message.raise_error;
61: END IF;
54: (p_hierarchy_id => p_rec.hierarchy_id
55: ,p_object_version_number => p_rec.object_version_number
56: ) THEN
57: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
58: fnd_message.set_token('PROCEDURE ', l_proc);
59: fnd_message.set_token('STEP ', '5');
60: fnd_message.raise_error;
61: END IF;
62: --
55: ,p_object_version_number => p_rec.object_version_number
56: ) THEN
57: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
58: fnd_message.set_token('PROCEDURE ', l_proc);
59: fnd_message.set_token('STEP ', '5');
60: fnd_message.raise_error;
61: END IF;
62: --
63: if nvl(p_rec.hierarchy_key, hr_api.g_varchar2) <>
56: ) THEN
57: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
58: fnd_message.set_token('PROCEDURE ', l_proc);
59: fnd_message.set_token('STEP ', '5');
60: fnd_message.raise_error;
61: END IF;
62: --
63: if nvl(p_rec.hierarchy_key, hr_api.g_varchar2) <>
64: nvl(hr_hrc_shd.g_old_rec.hierarchy_key,hr_api.g_varchar2
131: FETCH csr_hrc_key into l_found;
132:
133: IF csr_hrc_key%FOUND then
134: CLOSE csr_hrc_key;
135: fnd_message.set_name( 'PER','PER_449913_HRC_HRCHY_KEY_DUP');
136: fnd_message.raise_error;
137: END IF;
138:
139: CLOSE csr_hrc_key;
132:
133: IF csr_hrc_key%FOUND then
134: CLOSE csr_hrc_key;
135: fnd_message.set_name( 'PER','PER_449913_HRC_HRCHY_KEY_DUP');
136: fnd_message.raise_error;
137: END IF;
138:
139: CLOSE csr_hrc_key;
140:
226: If csr_check_null%FOUND then
227: hr_utility.set_location(' Global functional node already exists:'
228: || l_proc,30);
229: close csr_check_null;
230: fnd_message.set_name( 'PER','PER_449915_HRC_GLBL_FUNC_PRES');
231: fnd_message.raise_error;
232: End If;
233:
234: close csr_check_null;
227: hr_utility.set_location(' Global functional node already exists:'
228: || l_proc,30);
229: close csr_check_null;
230: fnd_message.set_name( 'PER','PER_449915_HRC_GLBL_FUNC_PRES');
231: fnd_message.raise_error;
232: End If;
233:
234: close csr_check_null;
235:
243: If csr_hrc_parent_id%NOTFOUND then
244: hr_utility.set_location(' Parent hierarchy does not exist:'
245: || l_proc,50);
246: close csr_hrc_parent_id;
247: fnd_message.set_name( 'PER','PER_449916_HRC_PARNT_ID_ABSNT');
248: fnd_message.raise_error;
249: End If;
250:
251: close csr_hrc_parent_id;
244: hr_utility.set_location(' Parent hierarchy does not exist:'
245: || l_proc,50);
246: close csr_hrc_parent_id;
247: fnd_message.set_name( 'PER','PER_449916_HRC_PARNT_ID_ABSNT');
248: fnd_message.raise_error;
249: End If;
250:
251: close csr_hrc_parent_id;
252:
310: nvl(hr_hrc_shd.g_old_rec.parent_hierarchy_id,hr_api.g_number))
311: then
312: hr_utility.set_location(' Parent hierarchy id of global node updated:'
313: || l_proc,20);
314: fnd_message.set_name( 'PER','PER_449914_HRC_GLBLND_NONUPD');
315: fnd_message.raise_error;
316: end if;
317:
318: hr_utility.set_location(' Leaving:' || l_proc,30);
311: then
312: hr_utility.set_location(' Parent hierarchy id of global node updated:'
313: || l_proc,20);
314: fnd_message.set_name( 'PER','PER_449914_HRC_GLBLND_NONUPD');
315: fnd_message.raise_error;
316: end if;
317:
318: hr_utility.set_location(' Leaving:' || l_proc,30);
319:
390: If csr_cycle_chk%FOUND then
391: hr_utility.set_location(' Update will result in a cyclic hierarchy, aborting'
392: || l_proc,20);
393: close csr_cycle_chk;
394: fnd_message.set_name( 'PER','PER_449087_HRC_UPD_CYCLIC');
395: fnd_message.raise_error;
396: End If;
397:
398: close csr_cycle_chk;
391: hr_utility.set_location(' Update will result in a cyclic hierarchy, aborting'
392: || l_proc,20);
393: close csr_cycle_chk;
394: fnd_message.set_name( 'PER','PER_449087_HRC_UPD_CYCLIC');
395: fnd_message.raise_error;
396: End If;
397:
398: close csr_cycle_chk;
399:
474: fetch csr_hrc_id into l_found;
475:
476: if csr_hrc_id%FOUND then
477: close csr_hrc_id;
478: fnd_message.set_name( 'PER','PER_449917_HRC_HRC_MAIN_EXIST');
479: fnd_message.raise_error;
480: end if;
481:
482: close csr_hrc_id;
475:
476: if csr_hrc_id%FOUND then
477: close csr_hrc_id;
478: fnd_message.set_name( 'PER','PER_449917_HRC_HRC_MAIN_EXIST');
479: fnd_message.raise_error;
480: end if;
481:
482: close csr_hrc_id;
483:
485: fetch csr_hnm_id into l_found;
486:
487: if csr_hnm_id%FOUND then
488: close csr_hnm_id;
489: fnd_message.set_name( 'PER','PER_449918_HRC_HNM_MAIN_EXIST');
490: fnd_message.raise_error;
491: end if;
492:
493: close csr_hnm_id;
486:
487: if csr_hnm_id%FOUND then
488: close csr_hnm_id;
489: fnd_message.set_name( 'PER','PER_449918_HRC_HNM_MAIN_EXIST');
490: fnd_message.raise_error;
491: end if;
492:
493: close csr_hnm_id;
494:
496: fetch csr_htl_id into l_found;
497:
498: if csr_htl_id%FOUND then
499: close csr_htl_id;
500: fnd_message.set_name( 'PER','PER_449919_HRC_HTL_MAIN_EXIST');
501: fnd_message.raise_error;
502: end if;
503:
504: close csr_htl_id;
497:
498: if csr_htl_id%FOUND then
499: close csr_htl_id;
500: fnd_message.set_name( 'PER','PER_449919_HRC_HTL_MAIN_EXIST');
501: fnd_message.raise_error;
502: end if;
503:
504: close csr_htl_id;
505: