130: --
131: -- Check that survey_name is not null. Error if it is.
132: --
133: if p_survey_name is null then
134: fnd_message.set_name('PER','PER_50331_PSS_MAND_SURV_NAME');
135: fnd_message.raise_error;
136: end if;
137: --
138: hr_utility.set_location('Entering:'||l_proc, 10);
131: -- Check that survey_name is not null. Error if it is.
132: --
133: if p_survey_name is null then
134: fnd_message.set_name('PER','PER_50331_PSS_MAND_SURV_NAME');
135: fnd_message.raise_error;
136: end if;
137: --
138: hr_utility.set_location('Entering:'||l_proc, 10);
139: --
139: --
140: -- Check that survey_company_code is not null. Error if it is.
141: --
142: if p_survey_company_code is null then
143: fnd_message.set_name('PER','PER_50332_PSS_MAND_SURV_COMP');
144: fnd_message.raise_error;
145: end if;
146: --
147: hr_utility.set_location('Entering:'||l_proc, 15);
140: -- Check that survey_company_code is not null. Error if it is.
141: --
142: if p_survey_company_code is null then
143: fnd_message.set_name('PER','PER_50332_PSS_MAND_SURV_COMP');
144: fnd_message.raise_error;
145: end if;
146: --
147: hr_utility.set_location('Entering:'||l_proc, 15);
148: --
273: ,p_lookup_type => 'SURVEY_COMPANY'
274: ,p_lookup_code => p_survey_company_code
275: ) then
276: -- Error: Invalid Survey Company
277: fnd_message.set_name('PER', 'PER_50333_PSS_INV_SURV_COMP');
278: fnd_message.raise_error;
279: end if;
280: -- code change ended for bug5439193 by amigarg
281: --
274: ,p_lookup_code => p_survey_company_code
275: ) then
276: -- Error: Invalid Survey Company
277: fnd_message.set_name('PER', 'PER_50333_PSS_INV_SURV_COMP');
278: fnd_message.raise_error;
279: end if;
280: -- code change ended for bug5439193 by amigarg
281: --
282: hr_utility.set_location(l_proc, 30);
328: --
329: -- Check that identifier is not null.
330: --
331: if p_identifier is null then
332: fnd_message.set_name('PER','PER_50334_PSS_MAND_IDENTIFIER');
333: fnd_message.raise_error;
334: end if;
335: --
336: hr_utility.set_location('Leaving:'||l_proc, 20);
329: -- Check that identifier is not null.
330: --
331: if p_identifier is null then
332: fnd_message.set_name('PER','PER_50334_PSS_MAND_IDENTIFIER');
333: fnd_message.raise_error;
334: end if;
335: --
336: hr_utility.set_location('Leaving:'||l_proc, 20);
337: --
392: --
393: -- Check that currency_code is not null
394: --
395: if p_currency_code is null then
396: fnd_message.set_name('PER','PER_50335_PSS_MAND_CURRENCY');
397: fnd_message.raise_error;
398: end if;
399: --
400: hr_utility.set_location(l_proc, 17);
393: -- Check that currency_code is not null
394: --
395: if p_currency_code is null then
396: fnd_message.set_name('PER','PER_50335_PSS_MAND_CURRENCY');
397: fnd_message.raise_error;
398: end if;
399: --
400: hr_utility.set_location(l_proc, 17);
401: --
424: if csr_currency_exists%notfound then
425: --
426: -- Error: Invalid Currency
427: --
428: fnd_message.set_name('PER', 'PER_50336_PSS_INV_CURRENCY');
429: --
430: fnd_message.raise_error;
431: --
432: end if;
426: -- Error: Invalid Currency
427: --
428: fnd_message.set_name('PER', 'PER_50336_PSS_INV_CURRENCY');
429: --
430: fnd_message.raise_error;
431: --
432: end if;
433: --
434: hr_utility.set_location(l_proc, 30);
495: --
496: -- Check that survey_type_code is not null.
497: --
498: if p_survey_type_code is null then
499: fnd_message.set_name('PER', 'PER_50337_PSS_MAND_SURV_TYPE');
500: fnd_message.raise_error;
501: end if;
502: --
503: hr_utility.set_location('Entering:'|| l_proc, 15);
496: -- Check that survey_type_code is not null.
497: --
498: if p_survey_type_code is null then
499: fnd_message.set_name('PER', 'PER_50337_PSS_MAND_SURV_TYPE');
500: fnd_message.raise_error;
501: end if;
502: --
503: hr_utility.set_location('Entering:'|| l_proc, 15);
504: --
525: ,p_lookup_type => 'PAY_BASIS'
526: ,p_lookup_code => p_survey_type_code
527: ) then
528: -- Error: Invalid Survey TYPE
529: fnd_message.set_name('PER', 'PER_50338_PSS_INV_SURV_TYPE');
530: fnd_message.raise_error;
531: end if;
532: --
533: hr_utility.set_location(l_proc, 30);
526: ,p_lookup_code => p_survey_type_code
527: ) then
528: -- Error: Invalid Survey TYPE
529: fnd_message.set_name('PER', 'PER_50338_PSS_INV_SURV_TYPE');
530: fnd_message.raise_error;
531: end if;
532: --
533: hr_utility.set_location(l_proc, 30);
534: --
590: if csr_survey_line_exists%found then
591: --
592: close csr_survey_line_exists;
593: --
594: fnd_message.set_name('PER','PER_50339_PSS_INV_DEL');
595: fnd_message.raise_error;
596: --
597: end if;
598: --
591: --
592: close csr_survey_line_exists;
593: --
594: fnd_message.set_name('PER','PER_50339_PSS_INV_DEL');
595: fnd_message.raise_error;
596: --
597: end if;
598: --
599: close csr_survey_line_exists;