51: open csr_leg_code;
52: fetch csr_leg_code into l_legislation_code;
53: if csr_leg_code%notfound then
54: close csr_leg_code;
55: fnd_message.set_name('PER','PER_52479_SSM_INVL_SSM_ID');
56: fnd_message.raise_error;
57: end if;
58: hr_utility.set_location('Entering:'||l_proc, 7);
59: close csr_leg_code;
52: fetch csr_leg_code into l_legislation_code;
53: if csr_leg_code%notfound then
54: close csr_leg_code;
55: fnd_message.set_name('PER','PER_52479_SSM_INVL_SSM_ID');
56: fnd_message.raise_error;
57: end if;
58: hr_utility.set_location('Entering:'||l_proc, 7);
59: close csr_leg_code;
60: g_salary_survey_mapping_id := p_salary_survey_mapping_id;
289: --
290: If not l_api_updating and p_salary_survey_line_id is null then
291: -- Mandatory column is null
292: --
293: fnd_message.set_name('PER','PER_52478_SSM_LINE_ID_NULL');
294: fnd_message.raise_error;
295: --
296: Elsif not l_api_updating and p_salary_survey_line_id is not null then
297: --
290: If not l_api_updating and p_salary_survey_line_id is null then
291: -- Mandatory column is null
292: --
293: fnd_message.set_name('PER','PER_52478_SSM_LINE_ID_NULL');
294: fnd_message.raise_error;
295: --
296: Elsif not l_api_updating and p_salary_survey_line_id is not null then
297: --
298: -- check If salary_survey_line_id value exists in
420: --
421: hr_utility.set_location(l_proc,8);
422: --
423: -- Trying to update parent_id or parent_table_name.
424: fnd_message.set_name('PER','PER_52480_SSM_NON_UPD_FIELD');
425: fnd_message.raise_error;
426: Elsif not l_api_updating then
427: --
428: hr_utility.set_location(l_proc,9);
421: hr_utility.set_location(l_proc,8);
422: --
423: -- Trying to update parent_id or parent_table_name.
424: fnd_message.set_name('PER','PER_52480_SSM_NON_UPD_FIELD');
425: fnd_message.raise_error;
426: Elsif not l_api_updating then
427: --
428: hr_utility.set_location(l_proc,9);
429: --
429: --
430: If p_parent_id is null then
431: --
432: hr_utility.set_location(l_proc,15);
433: fnd_message.set_name('PER','PER_52481_SSM_NO_PARENT_ID');
434: fnd_message.raise_error;
435: Elsif p_parent_table_name is null then
436: --
437: hr_utility.set_location(l_proc,20);
430: If p_parent_id is null then
431: --
432: hr_utility.set_location(l_proc,15);
433: fnd_message.set_name('PER','PER_52481_SSM_NO_PARENT_ID');
434: fnd_message.raise_error;
435: Elsif p_parent_table_name is null then
436: --
437: hr_utility.set_location(l_proc,20);
438: --
435: Elsif p_parent_table_name is null then
436: --
437: hr_utility.set_location(l_proc,20);
438: --
439: fnd_message.set_name('PER','PER_52482_SSM_NO_PRNT_TBL_NAME');
440: fnd_message.raise_error;
441: Else
442: --
443: hr_utility.set_location(l_proc,25);
436: --
437: hr_utility.set_location(l_proc,20);
438: --
439: fnd_message.set_name('PER','PER_52482_SSM_NO_PRNT_TBL_NAME');
440: fnd_message.raise_error;
441: Else
442: --
443: hr_utility.set_location(l_proc,25);
444: --
456: --
457: -- raise error as FK does not relate to PK in per_jobs
458: -- table.
459: --
460: fnd_message.set_name('PER','PER_52483_SSM_INVL_JOB_ID');
461: fnd_message.raise_error;
462: Elsif l_business_group_id <> p_business_group_id then
463: --
464: hr_utility.set_location(l_proc,40);
457: -- raise error as FK does not relate to PK in per_jobs
458: -- table.
459: --
460: fnd_message.set_name('PER','PER_52483_SSM_INVL_JOB_ID');
461: fnd_message.raise_error;
462: Elsif l_business_group_id <> p_business_group_id then
463: --
464: hr_utility.set_location(l_proc,40);
465: close csr_chk_job_id_exists;
462: Elsif l_business_group_id <> p_business_group_id then
463: --
464: hr_utility.set_location(l_proc,40);
465: close csr_chk_job_id_exists;
466: fnd_message.set_name('PER','PER_52484_SSM_INVL_JOB_BG');
467: fnd_message.raise_error;
468: --
469: Elsif (p_ssl_start_date > l_parent_end_date) or
470: (p_ssl_end_date < l_parent_start_date) then
463: --
464: hr_utility.set_location(l_proc,40);
465: close csr_chk_job_id_exists;
466: fnd_message.set_name('PER','PER_52484_SSM_INVL_JOB_BG');
467: fnd_message.raise_error;
468: --
469: Elsif (p_ssl_start_date > l_parent_end_date) or
470: (p_ssl_end_date < l_parent_start_date) then
471: --
470: (p_ssl_end_date < l_parent_start_date) then
471: --
472: hr_utility.set_location(l_proc,42);
473: close csr_chk_job_id_exists;
474: fnd_message.set_name('PER','PER_52485_SSM_JOB_DATE_INVL');
475: fnd_message.raise_error;
476: Else
477: --
478: hr_utility.set_location(l_proc,45);
471: --
472: hr_utility.set_location(l_proc,42);
473: close csr_chk_job_id_exists;
474: fnd_message.set_name('PER','PER_52485_SSM_JOB_DATE_INVL');
475: fnd_message.raise_error;
476: Else
477: --
478: hr_utility.set_location(l_proc,45);
479: --
495: --
496: -- raise error as FK does not relate to PK in per_jobs
497: -- table.
498: --
499: fnd_message.set_name('PER','PER_52486_SSM_INVL_POS_ID');
500: fnd_message.raise_error;
501: Elsif l_business_group_id <> p_business_group_id then
502: --
503: hr_utility.set_location(l_proc,60);
496: -- raise error as FK does not relate to PK in per_jobs
497: -- table.
498: --
499: fnd_message.set_name('PER','PER_52486_SSM_INVL_POS_ID');
500: fnd_message.raise_error;
501: Elsif l_business_group_id <> p_business_group_id then
502: --
503: hr_utility.set_location(l_proc,60);
504: --
502: --
503: hr_utility.set_location(l_proc,60);
504: --
505: close csr_chk_position_id_exists;
506: fnd_message.set_name('PER','PER_52487_SSM_INVL_POS_BG');
507: fnd_message.raise_error;
508: --
509: Elsif (p_ssl_start_date > nvl(l_parent_end_date,hr_api.g_eot)) or
510: (nvl(p_ssl_end_date,hr_api.g_eot)< l_parent_start_date) then
503: hr_utility.set_location(l_proc,60);
504: --
505: close csr_chk_position_id_exists;
506: fnd_message.set_name('PER','PER_52487_SSM_INVL_POS_BG');
507: fnd_message.raise_error;
508: --
509: Elsif (p_ssl_start_date > nvl(l_parent_end_date,hr_api.g_eot)) or
510: (nvl(p_ssl_end_date,hr_api.g_eot)< l_parent_start_date) then
511:
515: hr_utility.set_location('SSL end '||to_char(p_ssl_end_date,'DD-MON-YYYY'),62);
516: hr_utility.set_location('parent start '||to_char(l_parent_start_date,'DD-MON-YYYY'),62);
517: hr_utility.set_location('parent end '||to_char(l_parent_end_date,'DD-MON-YYYY'),62);
518: close csr_chk_position_id_exists;
519: fnd_message.set_name('PER','PER_52488_SSM_POS_DATE_INVL');
520: fnd_message.raise_error;
521: Else
522: --
523: hr_utility.set_location(l_proc,65);
516: hr_utility.set_location('parent start '||to_char(l_parent_start_date,'DD-MON-YYYY'),62);
517: hr_utility.set_location('parent end '||to_char(l_parent_end_date,'DD-MON-YYYY'),62);
518: close csr_chk_position_id_exists;
519: fnd_message.set_name('PER','PER_52488_SSM_POS_DATE_INVL');
520: fnd_message.raise_error;
521: Else
522: --
523: hr_utility.set_location(l_proc,65);
524: --
539: --
540: -- raise error as FK does not relate to PK in per_jobs
541: -- table.
542: --
543: fnd_message.set_name('PER','PER_SSM_INVL_ASG_ID');
544: fnd_message.raise_error;
545: Elsif l_business_group_id <> p_business_group_id then
546: --
547: hr_utility.set_location(l_proc,60);
540: -- raise error as FK does not relate to PK in per_jobs
541: -- table.
542: --
543: fnd_message.set_name('PER','PER_SSM_INVL_ASG_ID');
544: fnd_message.raise_error;
545: Elsif l_business_group_id <> p_business_group_id then
546: --
547: hr_utility.set_location(l_proc,60);
548: --
546: --
547: hr_utility.set_location(l_proc,60);
548: --
549: close csr_chk_assignment_id_exists;
550: fnd_message.set_name('PER','PER_SSM_INVL_ASG_BG');
551: fnd_message.raise_error;
552: --
553: Elsif (p_ssl_start_date > nvl(l_parent_end_date,hr_api.g_eot)) or
554: (nvl(p_ssl_end_date,hr_api.g_eot)< l_parent_start_date) then
547: hr_utility.set_location(l_proc,60);
548: --
549: close csr_chk_assignment_id_exists;
550: fnd_message.set_name('PER','PER_SSM_INVL_ASG_BG');
551: fnd_message.raise_error;
552: --
553: Elsif (p_ssl_start_date > nvl(l_parent_end_date,hr_api.g_eot)) or
554: (nvl(p_ssl_end_date,hr_api.g_eot)< l_parent_start_date) then
555:
559: hr_utility.set_location('SSL end '||to_char(p_ssl_end_date,'DD-MON-YYYY'),62);
560: hr_utility.set_location('parent start '||to_char(l_parent_start_date,'DD-MON-YYYY'),62);
561: hr_utility.set_location('parent end '||to_char(l_parent_end_date,'DD-MON-YYYY'),62);
562: close csr_chk_position_id_exists;
563: fnd_message.set_name('PER','PER_SSM_ASG_DATE_INVL');
564: fnd_message.raise_error;
565: Else
566: --
567: hr_utility.set_location(l_proc,65);
560: hr_utility.set_location('parent start '||to_char(l_parent_start_date,'DD-MON-YYYY'),62);
561: hr_utility.set_location('parent end '||to_char(l_parent_end_date,'DD-MON-YYYY'),62);
562: close csr_chk_position_id_exists;
563: fnd_message.set_name('PER','PER_SSM_ASG_DATE_INVL');
564: fnd_message.raise_error;
565: Else
566: --
567: hr_utility.set_location(l_proc,65);
568: --
573: --
574: hr_utility.set_location(l_proc,70);
575: --
576: -- Invalid parent_table_name.
577: fnd_message.set_name('PER','PER_52489_SSM_INVL_TBL_NAME');
578: fnd_message.raise_error;
579: End If;
580: End If;
581: End If;
574: hr_utility.set_location(l_proc,70);
575: --
576: -- Invalid parent_table_name.
577: fnd_message.set_name('PER','PER_52489_SSM_INVL_TBL_NAME');
578: fnd_message.raise_error;
579: End If;
580: End If;
581: End If;
582: --
745: Elsif l_loc_date_to < p_ssl_start_date then
746: --
747: close csr_chk_location_exists;
748: --
749: fnd_message.set_name('PER','PER_52490_SSM_LOC_DATE_INVL');
750: fnd_message.raise_error;
751: --
752: Else
753: --
746: --
747: close csr_chk_location_exists;
748: --
749: fnd_message.set_name('PER','PER_52490_SSM_LOC_DATE_INVL');
750: fnd_message.raise_error;
751: --
752: Else
753: --
754: hr_utility.set_location('Entering:'||l_proc,7);
846: -- Elsif l_business_group_id <> p_business_group_id then
847: Elsif l_business_group_id <> l_bg then
848: close csr_chk_grade_exists;
849: --
850: fnd_message.set_name('PER','PER_52491_SSM_INVL_GRD_BG');
851: fnd_message.raise_error;
852: Elsif (p_ssl_start_date > nvl(l_grade_date_to,hr_api.g_eot)
853: or nvl(p_ssl_end_date,hr_api.g_eot) < l_grade_date_from) then
854:
847: Elsif l_business_group_id <> l_bg then
848: close csr_chk_grade_exists;
849: --
850: fnd_message.set_name('PER','PER_52491_SSM_INVL_GRD_BG');
851: fnd_message.raise_error;
852: Elsif (p_ssl_start_date > nvl(l_grade_date_to,hr_api.g_eot)
853: or nvl(p_ssl_end_date,hr_api.g_eot) < l_grade_date_from) then
854:
855: close csr_chk_grade_exists;
853: or nvl(p_ssl_end_date,hr_api.g_eot) < l_grade_date_from) then
854:
855: close csr_chk_grade_exists;
856: --
857: fnd_message.set_name('PER','PER_52492_SSM_GRD_DATE_INVL');
858: fnd_message.raise_error;
859: --
860: Else
861: close csr_chk_grade_exists;
854:
855: close csr_chk_grade_exists;
856: --
857: fnd_message.set_name('PER','PER_52492_SSM_GRD_DATE_INVL');
858: fnd_message.raise_error;
859: --
860: Else
861: close csr_chk_grade_exists;
862: End If;
953: Elsif l_business_group_id <> l_bg then
954: hr_utility.set_location(l_proc,30);
955: close csr_chk_company_org;
956: --
957: fnd_message.set_name('PER','PER_52493_SSM_INVL_ORG_BG');
958: fnd_message.raise_error;
959: Elsif p_ssl_end_date < l_org_date_from
960: or p_ssl_start_date > l_org_date_to then
961: hr_utility.set_location(l_proc,32);
954: hr_utility.set_location(l_proc,30);
955: close csr_chk_company_org;
956: --
957: fnd_message.set_name('PER','PER_52493_SSM_INVL_ORG_BG');
958: fnd_message.raise_error;
959: Elsif p_ssl_end_date < l_org_date_from
960: or p_ssl_start_date > l_org_date_to then
961: hr_utility.set_location(l_proc,32);
962: close csr_chk_company_org;
960: or p_ssl_start_date > l_org_date_to then
961: hr_utility.set_location(l_proc,32);
962: close csr_chk_company_org;
963: --
964: fnd_message.set_name('PER','PER_52494_SSM_ORG_DATE_INVL');
965: fnd_message.raise_error;
966: --
967: Else
968: hr_utility.set_location(l_proc,35);
961: hr_utility.set_location(l_proc,32);
962: close csr_chk_company_org;
963: --
964: fnd_message.set_name('PER','PER_52494_SSM_ORG_DATE_INVL');
965: fnd_message.raise_error;
966: --
967: Else
968: hr_utility.set_location(l_proc,35);
969: close csr_chk_company_org;
1032: -- raise error as FK does not relate to PK in hr_all_organization_units
1033: -- table.
1034: --
1035: -- per_ssm_shd.constraint_error('PER_SALARY_SURVEY_MAPPINGS_FK');
1036: fnd_message.set_name('PER','PER_52495_SSM_AGE_DATE_INVL');
1037: fnd_message.raise_error;
1038: --
1039: Else
1040: close csr_chk_company_age_exists;
1033: -- table.
1034: --
1035: -- per_ssm_shd.constraint_error('PER_SALARY_SURVEY_MAPPINGS_FK');
1036: fnd_message.set_name('PER','PER_52495_SSM_AGE_DATE_INVL');
1037: fnd_message.raise_error;
1038: --
1039: Else
1040: close csr_chk_company_age_exists;
1041: End If;
1090: ,p_argument => 'effective_date'
1091: ,p_argument_value => l_effective_date
1092: );
1093: Else
1094: fnd_message.set_name('PER','PER_52496_SSM_EFF_DATE_NULL');
1095: fnd_message.raise_error;
1096: End If;
1097: --
1098: hr_utility.set_location('Leaving:'||l_proc,10);
1091: ,p_argument_value => l_effective_date
1092: );
1093: Else
1094: fnd_message.set_name('PER','PER_52496_SSM_EFF_DATE_NULL');
1095: fnd_message.raise_error;
1096: End If;
1097: --
1098: hr_utility.set_location('Leaving:'||l_proc,10);
1099: --