120: IF NOT irc_rtm_shd.api_updating
121: (p_rec_team_member_id => p_rec.rec_team_member_id
122: ,p_object_version_number => p_rec.object_version_number
123: ) THEN
124: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
125: fnd_message.set_token('PROCEDURE ', l_proc);
126: fnd_message.set_token('STEP ', '5');
127: fnd_message.raise_error;
128: END IF;
121: (p_rec_team_member_id => p_rec.rec_team_member_id
122: ,p_object_version_number => p_rec.object_version_number
123: ) THEN
124: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
125: fnd_message.set_token('PROCEDURE ', l_proc);
126: fnd_message.set_token('STEP ', '5');
127: fnd_message.raise_error;
128: END IF;
129: --
122: ,p_object_version_number => p_rec.object_version_number
123: ) THEN
124: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
125: fnd_message.set_token('PROCEDURE ', l_proc);
126: fnd_message.set_token('STEP ', '5');
127: fnd_message.raise_error;
128: END IF;
129: --
130: -- Add checks to ensure non-updateable args have
123: ) THEN
124: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
125: fnd_message.set_token('PROCEDURE ', l_proc);
126: fnd_message.set_token('STEP ', '5');
127: fnd_message.raise_error;
128: END IF;
129: --
130: -- Add checks to ensure non-updateable args have
131: -- not been updated.
219: fetch l_person into l_party_id;
220: if l_person%notfound
221: then
222: close l_person;
223: fnd_message.set_name('PER','IRC_412157_PARTY_PERS_MISMTCH');
224: fnd_message.raise_error;
225: else
226: close l_person;
227: --check if the person is an employee
220: if l_person%notfound
221: then
222: close l_person;
223: fnd_message.set_name('PER','IRC_412157_PARTY_PERS_MISMTCH');
224: fnd_message.raise_error;
225: else
226: close l_person;
227: --check if the person is an employee
228: open csr_system_person_type;
230: hr_utility.set_location(l_proc, 20);
231: if csr_system_person_type%notfound then
232: close csr_system_person_type;
233: hr_utility.set_location(l_proc, 30);
234: fnd_message.set_name('PER','IRC_412034_RTM_INV_EMP');
235: hr_multi_message.add
236: (p_associated_column1 => 'IRC_REC_TEAM_MEMBERS.PERSON_ID'
237: );
238: else
241: end if;
242: --
243: if p_party_id is not null then
244: if p_party_id<>l_party_id then
245: fnd_message.set_name('PER','IRC_412033_RTM_INV_PARTY_ID');
246: fnd_message.raise_error;
247: end if;
248: else
249: p_party_id:=l_party_id;
242: --
243: if p_party_id is not null then
244: if p_party_id<>l_party_id then
245: fnd_message.set_name('PER','IRC_412033_RTM_INV_PARTY_ID');
246: fnd_message.raise_error;
247: end if;
248: else
249: p_party_id:=l_party_id;
250: end if;
330: fetch csr_vacancy_id into l_vacancy_id;
331: hr_utility.set_location(l_proc, 30);
332: if csr_vacancy_id%notfound then
333: close csr_vacancy_id;
334: fnd_message.set_name('PER','IRC_412032_RTM_INV_VACANCY_ID');
335: fnd_message.raise_error;
336: end if;
337: close csr_vacancy_id;
338: hr_utility.set_location(' Leaving:'||l_proc,35);
331: hr_utility.set_location(l_proc, 30);
332: if csr_vacancy_id%notfound then
333: close csr_vacancy_id;
334: fnd_message.set_name('PER','IRC_412032_RTM_INV_VACANCY_ID');
335: fnd_message.raise_error;
336: end if;
337: close csr_vacancy_id;
338: hr_utility.set_location(' Leaving:'||l_proc,35);
339: --
423: fetch csr_job_id into l_job_id;
424: hr_utility.set_location(l_proc, 40);
425: if csr_job_id%notfound then
426: close csr_job_id;
427: fnd_message.set_name('PER','IRC_412037_RTM_INV_JOB_ID');
428: fnd_message.raise_error;
429: end if;
430: close csr_job_id;
431: end if;
424: hr_utility.set_location(l_proc, 40);
425: if csr_job_id%notfound then
426: close csr_job_id;
427: fnd_message.set_name('PER','IRC_412037_RTM_INV_JOB_ID');
428: fnd_message.raise_error;
429: end if;
430: close csr_job_id;
431: end if;
432: end if;
519: fetch csr_job_id_job_group_id into l_job_id_job_group_id;
520: hr_utility.set_location(l_proc, 30);
521: if csr_job_id_job_group_id%notfound then
522: close csr_job_id_job_group_id;
523: fnd_message.set_name('PER','IRC_412041_RTM_INV_JOB_GRP_ID');
524: fnd_message.raise_error;
525: end if;
526: close csr_job_id_job_group_id;
527: end if;
520: hr_utility.set_location(l_proc, 30);
521: if csr_job_id_job_group_id%notfound then
522: close csr_job_id_job_group_id;
523: fnd_message.set_name('PER','IRC_412041_RTM_INV_JOB_GRP_ID');
524: fnd_message.raise_error;
525: end if;
526: close csr_job_id_job_group_id;
527: end if;
528: end if;
598: -- Check that the end date is not before the start date.
599: --
600: hr_utility.set_location(l_proc, 40);
601: if(nvl(p_start_date,hr_api.g_sot) > nvl(p_end_date,hr_api.g_eot)) then
602: fnd_message.set_name('PER','IRC_412038_RTM_INV_ST_END_DATE');
603: fnd_message.raise_error;
604: end if;
605: --
606: end if;
599: --
600: hr_utility.set_location(l_proc, 40);
601: if(nvl(p_start_date,hr_api.g_sot) > nvl(p_end_date,hr_api.g_eot)) then
602: fnd_message.set_name('PER','IRC_412038_RTM_INV_ST_END_DATE');
603: fnd_message.raise_error;
604: end if;
605: --
606: end if;
607: end if;
681: ,p_update_allowed
682: );
683: hr_utility.set_location(l_proc, 40);
684: if (l_var = true) then
685: fnd_message.set_name('PER','IRC_412039_RTM_INV_UPD_ALLOWED');
686: fnd_message.raise_error;
687: end if;
688: end if;
689: --
682: );
683: hr_utility.set_location(l_proc, 40);
684: if (l_var = true) then
685: fnd_message.set_name('PER','IRC_412039_RTM_INV_UPD_ALLOWED');
686: fnd_message.raise_error;
687: end if;
688: end if;
689: --
690: end if;
762: ,p_delete_allowed
763: );
764: hr_utility.set_location(l_proc, 40);
765: if (l_var = true) then
766: fnd_message.set_name('PER','IRC_412040_RTM_INV_DEL_ALLOWED');
767: fnd_message.raise_error;
768: end if;
769: end if;
770: end if;
763: );
764: hr_utility.set_location(l_proc, 40);
765: if (l_var = true) then
766: fnd_message.set_name('PER','IRC_412040_RTM_INV_DEL_ALLOWED');
767: fnd_message.raise_error;
768: end if;
769: end if;
770: end if;
771: hr_utility.set_location(' Leaving:'||l_proc,45);
837: hr_utility.set_location(l_proc, 20);
838: if csr_rec_team_member%found then
839: close csr_rec_team_member;
840: hr_utility.set_location(l_proc, 30);
841: fnd_message.set_name('PER','IRC_412120_DUP_REC_TEAM_MEMBER');
842: fnd_message.raise_error;
843: end if;
844: close csr_rec_team_member;
845: end if;
838: if csr_rec_team_member%found then
839: close csr_rec_team_member;
840: hr_utility.set_location(l_proc, 30);
841: fnd_message.set_name('PER','IRC_412120_DUP_REC_TEAM_MEMBER');
842: fnd_message.raise_error;
843: end if;
844: close csr_rec_team_member;
845: end if;
846: --