29: l_legislation_code varchar2(150);
30: --
31: begin
32: --
33: hr_utility.set_location('Entering:'|| l_proc, 10);
34: --
35: -- Ensure that all the mandatory parameter are not null
36: --
37: hr_api.mandatory_arg_error
40: ,p_argument_value => p_pending_data_id
41: );
42: --
43: --
44: hr_utility.set_location(' Leaving:'|| l_proc, 20);
45: --
46: end set_security_group_id;
47: --
48: -- ---------------------------------------------------------------------------
60: l_proc varchar2(72) := g_package||'return_legislation_code';
61: --
62: Begin
63: --
64: hr_utility.set_location('Entering:'|| l_proc, 10);
65: --
66: -- Ensure that all the mandatory parameter are not null
67: --
68: hr_api.mandatory_arg_error
70: ,p_argument => 'pending_data_id'
71: ,p_argument_value => p_pending_data_id
72: );
73: --
74: hr_utility.set_location(' Leaving:'|| l_proc, 40);
75: return l_legislation_code;
76: end return_legislation_code;
77: --
78: -- ----------------------------------------------------------------------------
109: --
110: l_proc varchar2(72) := g_package || 'chk_ddf';
111: --
112: begin
113: hr_utility.set_location('Entering:'||l_proc,10);
114: --
115: if ((p_rec.pending_data_id is not null) and (
116: nvl(irc_ipd_shd.g_old_rec.per_information_category, hr_api.g_varchar2) <>
117: nvl(p_rec.per_information_category, hr_api.g_varchar2) or
248: ,p_attribute30_value => p_rec.per_information30
249: );
250: end if;
251: --
252: hr_utility.set_location(' Leaving:'||l_proc,20);
253: end chk_ddf;
254: --
255: -- ----------------------------------------------------------------------------
256: -- |-----------------------< chk_non_updateable_args >------------------------|
376: and date_from <= p_creation_date;
377: --
378: Begin
379: --
380: hr_utility.set_location(' Entering:'||l_proc,10);
381: --
382: hr_api.mandatory_arg_error
383: (p_api_name => l_proc
384: ,p_argument => 'creation date'
388: -- Check if the vacancy id is valid on creation date.
389: --
390: open csr_vacancy_id;
391: fetch csr_vacancy_id into l_num;
392: hr_utility.set_location(l_proc,20);
393: if csr_vacancy_id%notfound then
394: close csr_vacancy_id;
395: hr_utility.set_message(800,'IRC_412015_BAD_VACANCY_ID');
396: hr_utility.raise_error;
391: fetch csr_vacancy_id into l_num;
392: hr_utility.set_location(l_proc,20);
393: if csr_vacancy_id%notfound then
394: close csr_vacancy_id;
395: hr_utility.set_message(800,'IRC_412015_BAD_VACANCY_ID');
396: hr_utility.raise_error;
397: end if;
398: close csr_vacancy_id;
399: hr_utility.set_location(l_proc,30);
392: hr_utility.set_location(l_proc,20);
393: if csr_vacancy_id%notfound then
394: close csr_vacancy_id;
395: hr_utility.set_message(800,'IRC_412015_BAD_VACANCY_ID');
396: hr_utility.raise_error;
397: end if;
398: close csr_vacancy_id;
399: hr_utility.set_location(l_proc,30);
400: --
395: hr_utility.set_message(800,'IRC_412015_BAD_VACANCY_ID');
396: hr_utility.raise_error;
397: end if;
398: close csr_vacancy_id;
399: hr_utility.set_location(l_proc,30);
400: --
401: exception
402: when app_exception.application_exception then
403: if hr_multi_message.exception_add
403: if hr_multi_message.exception_add
404: (p_associated_column1 =>
405: 'IRC_PENDING_DATA.VACANCY_ID'
406: ) then
407: hr_utility.set_location(' Leaving:'||l_proc,50);
408: raise;
409: end if;
410: --
411: hr_utility.set_location(' Leaving:'||l_proc,60);
407: hr_utility.set_location(' Leaving:'||l_proc,50);
408: raise;
409: end if;
410: --
411: hr_utility.set_location(' Leaving:'||l_proc,60);
412: End chk_vacancy_id;
413: --
414: -- ----------------------------------------------------------------------------
415: -- |-------------------< chk_job_already_apld_for >--------------------|
450: and upper(email_address) = upper(p_email_address);
451: --
452: Begin
453: --
454: hr_utility.set_location(' Entering:'||l_proc,10);
455: --
456: if hr_multi_message.no_exclusive_error(
457: p_check_column1 => 'IRC_PENDING_DATA.VACANCY_ID'
458: ) then
458: ) then
459: --
460: open csr_job;
461: fetch csr_job into l_num;
462: hr_utility.set_location(l_proc,20);
463: if csr_job%found then
464: close csr_job;
465: hr_utility.set_message(800,'IRC_APL_ALREADY_APPLIED');
466: hr_utility.raise_error;
461: fetch csr_job into l_num;
462: hr_utility.set_location(l_proc,20);
463: if csr_job%found then
464: close csr_job;
465: hr_utility.set_message(800,'IRC_APL_ALREADY_APPLIED');
466: hr_utility.raise_error;
467: end if;
468: close csr_job;
469: end if;
462: hr_utility.set_location(l_proc,20);
463: if csr_job%found then
464: close csr_job;
465: hr_utility.set_message(800,'IRC_APL_ALREADY_APPLIED');
466: hr_utility.raise_error;
467: end if;
468: close csr_job;
469: end if;
470: --
473: if hr_multi_message.exception_add
474: (p_associated_column1 => 'IRC_PENDING_DATA.VACANCY_ID'
475: ,p_associated_column2 => 'IRC_PENDING_DATA.EMAIL_ADDRESS'
476: ) then
477: hr_utility.set_location(' Leaving:'||l_proc,30);
478: raise;
479: end if;
480: --
481: hr_utility.set_location(' Leaving:'||l_proc,40);
477: hr_utility.set_location(' Leaving:'||l_proc,30);
478: raise;
479: end if;
480: --
481: hr_utility.set_location(' Leaving:'||l_proc,40);
482: End chk_job_already_apld_for;
483: --
484: -- ----------------------------------------------------------------------------
485: -- |---------------------------< chk_sex >----------------------------|
516: l_api_updating boolean;
517: l_proc varchar2(72) := g_package||'chk_sex';
518: --
519: Begin
520: hr_utility.set_location('Entering:'||l_proc,10);
521: --
522: hr_api.mandatory_arg_error
523: (p_api_name => l_proc
524: ,p_argument => 'creation date'
538: --
539: --Check if sex is set
540: --
541: if p_sex is not null then
542: hr_utility.set_location('Entering:'||l_proc,20);
543: --
544: --Check if the sex exists in hr_lookups
545: --
546: if hr_api.not_exists_in_hr_lookups
547: (p_effective_date => p_creation_date
548: ,p_lookup_type => 'SEX'
549: ,p_lookup_code => p_sex
550: ) then
551: hr_utility.set_message(800,'HR_7511_PER_SEX_INVALID');
552: hr_utility.raise_error;
553: end if;
554: end if;
555: end if;
548: ,p_lookup_type => 'SEX'
549: ,p_lookup_code => p_sex
550: ) then
551: hr_utility.set_message(800,'HR_7511_PER_SEX_INVALID');
552: hr_utility.raise_error;
553: end if;
554: end if;
555: end if;
556: end if;
559: if hr_multi_message.exception_add
560: (p_associated_column1 =>
561: 'IRC_PENDING_DATA.SEX'
562: ) then
563: hr_utility.set_location(' Leaving:'||l_proc,30);
564: raise;
565: end if;
566: hr_utility.set_location(' Leaving:'||l_proc,50);
567: --
562: ) then
563: hr_utility.set_location(' Leaving:'||l_proc,30);
564: raise;
565: end if;
566: hr_utility.set_location(' Leaving:'||l_proc,50);
567: --
568: --
569: End chk_sex;
570: --
599: l_proc varchar2(72) := g_package||'chk_allow_access';
600: --
601: Begin
602: --
603: hr_utility.set_location(' Entering:'||l_proc,10);
604: --
605: hr_api.mandatory_arg_error
606: (p_api_name => l_proc
607: ,p_argument => 'ALLOW_ACCESS'
607: ,p_argument => 'ALLOW_ACCESS'
608: ,p_argument_value => p_allow_access
609: );
610: --
611: hr_utility.set_location(l_proc,20);
612: --
613: if p_allow_access not in ('Y','N') then
614: hr_utility.set_message(800,'IRC_412005_BAD_ALLOW_ACCESS');
615: hr_utility.raise_error;
610: --
611: hr_utility.set_location(l_proc,20);
612: --
613: if p_allow_access not in ('Y','N') then
614: hr_utility.set_message(800,'IRC_412005_BAD_ALLOW_ACCESS');
615: hr_utility.raise_error;
616: end if;
617: --
618: hr_utility.set_location(' Leaving:'||l_proc,30);
611: hr_utility.set_location(l_proc,20);
612: --
613: if p_allow_access not in ('Y','N') then
614: hr_utility.set_message(800,'IRC_412005_BAD_ALLOW_ACCESS');
615: hr_utility.raise_error;
616: end if;
617: --
618: hr_utility.set_location(' Leaving:'||l_proc,30);
619: --
614: hr_utility.set_message(800,'IRC_412005_BAD_ALLOW_ACCESS');
615: hr_utility.raise_error;
616: end if;
617: --
618: hr_utility.set_location(' Leaving:'||l_proc,30);
619: --
620: exception
621: when app_exception.application_exception then
622: if hr_multi_message.exception_add
622: if hr_multi_message.exception_add
623: (p_associated_column1 => 'IRC_PENDING_DATA.ALLOW_ACCESS'
624: ) then
625: --
626: hr_utility.set_location(' Leaving:'||l_proc,40);
627: --
628: raise;
629: end if;
630: --
627: --
628: raise;
629: end if;
630: --
631: hr_utility.set_location(' Leaving:'||l_proc,50);
632: --
633: --
634: --
635: End chk_allow_access;
755: l_output varchar2(150);
756: l_rgeflg varchar2(10);
757: --
758: begin
759: hr_utility.set_location('Entering:'|| l_proc, 10);
760: --
761: -- Check the mandatory parameters
762: --
763: --
785: ,p_lookup_code => p_per_information1
786: )
787: then
788: --
789: hr_utility.set_message(801, 'HR_7524_PER_INFO1_INVALID');
790: hr_utility.raise_error;
791: --
792: end if;
793: --
786: )
787: then
788: --
789: hr_utility.set_message(801, 'HR_7524_PER_INFO1_INVALID');
790: hr_utility.raise_error;
791: --
792: end if;
793: --
794: end if;
808: ,p_lookup_code => p_per_information2
809: )
810: then
811: --
812: hr_utility.set_message(801, 'HR_7525_PER_INFO2_INVALID');
813: hr_utility.raise_error;
814: --
815: end if;
816: --
809: )
810: then
811: --
812: hr_utility.set_message(801, 'HR_7525_PER_INFO2_INVALID');
813: hr_utility.raise_error;
814: --
815: end if;
816: --
817: end if;
831: ,p_lookup_code => p_per_information4
832: )
833: then
834: --
835: hr_utility.set_message(801, 'HR_7526_PER_INFO4_INVALID');
836: hr_utility.raise_error;
837: --
838: end if;
839: --
832: )
833: then
834: --
835: hr_utility.set_message(801, 'HR_7526_PER_INFO4_INVALID');
836: hr_utility.raise_error;
837: --
838: end if;
839: --
840: end if;
844: if p_per_information5 is not null then
845: if length(p_per_information5) > 30 then
846: -- Error: Work Permit (PER_INFORMATION5) cannot be longer than
847: -- 30 characters
848: hr_utility.set_message(801, 'HR_7527_PER_INFO5_LENGTH');
849: hr_utility.raise_error;
850: end if;
851: --
852: -- Check if p_per_information5 is not upper case
845: if length(p_per_information5) > 30 then
846: -- Error: Work Permit (PER_INFORMATION5) cannot be longer than
847: -- 30 characters
848: hr_utility.set_message(801, 'HR_7527_PER_INFO5_LENGTH');
849: hr_utility.raise_error;
850: end if;
851: --
852: -- Check if p_per_information5 is not upper case
853: --
853: --
854: --if p_per_information5 <> upper(p_per_information5) then
855: -- Error: Enter the Work Permit value (PER_INFORMATION5) in
856: -- upper case
857: --hr_utility.set_message(801, 'HR_7528_PER_INFO5_CASE');
858: --hr_utility.raise_error;
859: --end if;
860: end if;
861: --
854: --if p_per_information5 <> upper(p_per_information5) then
855: -- Error: Enter the Work Permit value (PER_INFORMATION5) in
856: -- upper case
857: --hr_utility.set_message(801, 'HR_7528_PER_INFO5_CASE');
858: --hr_utility.raise_error;
859: --end if;
860: end if;
861: --
862: -- Check if p_per_information6 is in the range 0 - 99.
876: if to_number(l_per_information6) < 0 or
877: to_number(l_per_information6) > 99 then
878: -- Error: Additional pension years (PER_INFORMATION6) not in the
879: -- range 0 - 99.
880: hr_utility.set_message(801, 'HR_51272_PER_INFO6_INVALID');
881: hr_utility.raise_error;
882: end if;
883: end if;
884: --
877: to_number(l_per_information6) > 99 then
878: -- Error: Additional pension years (PER_INFORMATION6) not in the
879: -- range 0 - 99.
880: hr_utility.set_message(801, 'HR_51272_PER_INFO6_INVALID');
881: hr_utility.raise_error;
882: end if;
883: end if;
884: --
885: -- Check if p_per_information7 is in the range 1 - 11.
899: if to_number(l_per_information7) < 1 or
900: to_number(l_per_information7) > 11 then
901: -- Error: Additional pension months (PER_INFORMATION7) not in the
902: -- range 1 - 11.
903: hr_utility.set_message(801, 'HR_51273_PER_INFO7_INVALID');
904: hr_utility.raise_error;
905: end if;
906: end if;
907: --
900: to_number(l_per_information7) > 11 then
901: -- Error: Additional pension months (PER_INFORMATION7) not in the
902: -- range 1 - 11.
903: hr_utility.set_message(801, 'HR_51273_PER_INFO7_INVALID');
904: hr_utility.raise_error;
905: end if;
906: end if;
907: --
908: -- Check if p_per_information8 is number.
935: ,p_lookup_code => p_per_information9
936: )
937: then
938: --
939: hr_utility.set_message(801, 'HR_51274_PER_INFO9_INVALID');
940: hr_utility.raise_error;
941: --
942: end if;
943: --
936: )
937: then
938: --
939: hr_utility.set_message(801, 'HR_51274_PER_INFO9_INVALID');
940: hr_utility.raise_error;
941: --
942: end if;
943: --
944: end if;
954: ,p_lookup_code => p_per_information10
955: )
956: then
957: --
958: hr_utility.set_message(801, 'HR_78105_PER_INFO10_INVALID');
959: hr_utility.raise_error;
960: --
961: end if;
962: --
955: )
956: then
957: --
958: hr_utility.set_message(801, 'HR_78105_PER_INFO10_INVALID');
959: hr_utility.raise_error;
960: --
961: end if;
962: --
963: end if;
1032: end if;
1033: exception
1034: when l_error then
1035: -- Error: Do not enter PER_INFORMATION99 for this legislation
1036: hr_utility.set_message(801, 'HR_7529_PER_INFO_NOT_NULL');
1037: hr_utility.set_message_token('NUM',to_char(l_info_attribute));
1038: hr_utility.raise_error;
1039: --
1040: hr_utility.set_location(' Leaving:'|| l_proc, 220);
1033: exception
1034: when l_error then
1035: -- Error: Do not enter PER_INFORMATION99 for this legislation
1036: hr_utility.set_message(801, 'HR_7529_PER_INFO_NOT_NULL');
1037: hr_utility.set_message_token('NUM',to_char(l_info_attribute));
1038: hr_utility.raise_error;
1039: --
1040: hr_utility.set_location(' Leaving:'|| l_proc, 220);
1041: end chk_GB_per_information;
1034: when l_error then
1035: -- Error: Do not enter PER_INFORMATION99 for this legislation
1036: hr_utility.set_message(801, 'HR_7529_PER_INFO_NOT_NULL');
1037: hr_utility.set_message_token('NUM',to_char(l_info_attribute));
1038: hr_utility.raise_error;
1039: --
1040: hr_utility.set_location(' Leaving:'|| l_proc, 220);
1041: end chk_GB_per_information;
1042: --
1036: hr_utility.set_message(801, 'HR_7529_PER_INFO_NOT_NULL');
1037: hr_utility.set_message_token('NUM',to_char(l_info_attribute));
1038: hr_utility.raise_error;
1039: --
1040: hr_utility.set_location(' Leaving:'|| l_proc, 220);
1041: end chk_GB_per_information;
1042: --
1043: -- ---------------------------------------------------------------------------
1044: -- |---------------------< chk_US_per_information >-------------------------|
1234: l_info_attribute number(2);
1235: l_proc varchar2(72) := g_package||'chk_US_per_information';
1236: --
1237: Begin
1238: hr_utility.set_location('Entering:'|| l_proc, 10);
1239: --
1240: -- Check the mandatory parameters
1241: --
1242: hr_api.mandatory_arg_error
1267: ,p_lookup_code => p_per_information1
1268: )
1269: then
1270: --
1271: hr_utility.set_message(801, 'HR_7524_PER_INFO1_INVALID');
1272: hr_utility.raise_error;
1273: --
1274: end if;
1275: end if;
1268: )
1269: then
1270: --
1271: hr_utility.set_message(801, 'HR_7524_PER_INFO1_INVALID');
1272: hr_utility.raise_error;
1273: --
1274: end if;
1275: end if;
1276: -- Check if the value for per information2 is set on insert or has
1293: ,p_lookup_code => p_per_information2
1294: )
1295: then
1296: --
1297: hr_utility.set_message(801, 'HR_51243_PER_INFO2_INVALID');
1298: hr_utility.raise_error;
1299: end if;
1300: end if;
1301: -- Check if the value for per information3 is set on insert or has
1294: )
1295: then
1296: --
1297: hr_utility.set_message(801, 'HR_51243_PER_INFO2_INVALID');
1298: hr_utility.raise_error;
1299: end if;
1300: end if;
1301: -- Check if the value for per information3 is set on insert or has
1302: -- changed on update.
1338: ,p_lookup_code => p_per_information4
1339: )
1340: then
1341: --
1342: hr_utility.set_message(801, 'HR_51245_PER_INFO4_INVALID');
1343: hr_utility.raise_error;
1344: --
1345: end if;
1346: end if;
1339: )
1340: then
1341: --
1342: hr_utility.set_message(801, 'HR_51245_PER_INFO4_INVALID');
1343: hr_utility.raise_error;
1344: --
1345: end if;
1346: end if;
1347: --
1365: ,p_lookup_code => p_per_information5
1366: )
1367: then
1368: --
1369: hr_utility.set_message(801, 'HR_51246_PER_INFO5_INVALID');
1370: hr_utility.raise_error;
1371: --
1372: end if;
1373: end if;
1366: )
1367: then
1368: --
1369: hr_utility.set_message(801, 'HR_51246_PER_INFO5_INVALID');
1370: hr_utility.raise_error;
1371: --
1372: end if;
1373: end if;
1374: --
1392: ,p_lookup_code => p_per_information6
1393: )
1394: then
1395: --
1396: hr_utility.set_message(801, 'HR_51247_PER_INFO6_INVALID');
1397: hr_utility.raise_error;
1398: --
1399: end if;
1400: end if;
1393: )
1394: then
1395: --
1396: hr_utility.set_message(801, 'HR_51247_PER_INFO6_INVALID');
1397: hr_utility.raise_error;
1398: --
1399: end if;
1400: end if;
1401: --
1419: ,p_lookup_code => p_per_information7
1420: )
1421: then
1422: --
1423: hr_utility.set_message(801, 'HR_51285_PER_INFO7_INVALID');
1424: hr_utility.raise_error;
1425: --
1426: end if;
1427: --
1420: )
1421: then
1422: --
1423: hr_utility.set_message(801, 'HR_51285_PER_INFO7_INVALID');
1424: hr_utility.raise_error;
1425: --
1426: end if;
1427: --
1428: end if;
1443: then
1444: --
1445: -- Error: Field must be null because per_info7 is not 'EXCL'
1446: --
1447: hr_utility.set_message(801, 'HR_51286_PER_INFO8_NOT_NULL');
1448: hr_utility.raise_error;
1449: else
1450: --
1451: -- Check that per information7 exists in hr_lookups for the
1444: --
1445: -- Error: Field must be null because per_info7 is not 'EXCL'
1446: --
1447: hr_utility.set_message(801, 'HR_51286_PER_INFO8_NOT_NULL');
1448: hr_utility.raise_error;
1449: else
1450: --
1451: -- Check that per information7 exists in hr_lookups for the
1452: -- lookup type 'US_NEW_HIRE_EXCEPTIONS' with an enabled flag set to 'Y'
1458: ,p_lookup_code => p_per_information8
1459: )
1460: then
1461: --
1462: hr_utility.set_message(801, 'HR_51287_PER_INFO8_INVALID');
1463: hr_utility.raise_error;
1464: --
1465: end if;
1466: end if;
1459: )
1460: then
1461: --
1462: hr_utility.set_message(801, 'HR_51287_PER_INFO8_INVALID');
1463: hr_utility.raise_error;
1464: --
1465: end if;
1466: end if;
1467: end if;
1486: ,p_lookup_code => p_per_information9
1487: )
1488: then
1489: --
1490: hr_utility.set_message(801, 'HR_51288_PER_INFO9_INVALID');
1491: hr_utility.raise_error;
1492: --
1493: end if;
1494: end if;
1487: )
1488: then
1489: --
1490: hr_utility.set_message(801, 'HR_51288_PER_INFO9_INVALID');
1491: hr_utility.raise_error;
1492: --
1493: end if;
1494: end if;
1495: --
1510: ,p_lookup_code => p_per_information10
1511: )
1512: then
1513: --
1514: hr_utility.set_message(801, 'PER_52390_PER_INFO10_INVALID');
1515: hr_utility.raise_error;
1516: --
1517: end if;
1518: end if;
1511: )
1512: then
1513: --
1514: hr_utility.set_message(801, 'PER_52390_PER_INFO10_INVALID');
1515: hr_utility.raise_error;
1516: --
1517: end if;
1518: end if;
1519: --
1587: --
1588: exception
1589: when l_error then
1590: -- Error: Do not enter PER_INFORMATION99 for this legislation
1591: hr_utility.set_message(801, 'HR_7529_PER_INFO_NOT_NULL');
1592: hr_utility.set_message_token('NUM',to_char(l_info_attribute));
1593: hr_utility.raise_error;
1594: --
1595: hr_utility.set_location(' Leaving:'||l_proc,50);
1588: exception
1589: when l_error then
1590: -- Error: Do not enter PER_INFORMATION99 for this legislation
1591: hr_utility.set_message(801, 'HR_7529_PER_INFO_NOT_NULL');
1592: hr_utility.set_message_token('NUM',to_char(l_info_attribute));
1593: hr_utility.raise_error;
1594: --
1595: hr_utility.set_location(' Leaving:'||l_proc,50);
1596: End chk_US_per_information;
1589: when l_error then
1590: -- Error: Do not enter PER_INFORMATION99 for this legislation
1591: hr_utility.set_message(801, 'HR_7529_PER_INFO_NOT_NULL');
1592: hr_utility.set_message_token('NUM',to_char(l_info_attribute));
1593: hr_utility.raise_error;
1594: --
1595: hr_utility.set_location(' Leaving:'||l_proc,50);
1596: End chk_US_per_information;
1597: --
1591: hr_utility.set_message(801, 'HR_7529_PER_INFO_NOT_NULL');
1592: hr_utility.set_message_token('NUM',to_char(l_info_attribute));
1593: hr_utility.raise_error;
1594: --
1595: hr_utility.set_location(' Leaving:'||l_proc,50);
1596: End chk_US_per_information;
1597: --
1598: --
1599: -- ---------------------------------------------------------------------------
1636: l_info_attribute number(2);
1637: l_proc varchar2(72) := g_package || 'chk_per_information';
1638: --
1639: Begin
1640: hr_utility.set_location('Entering:'||l_proc,10);
1641: --
1642: --
1643: -- Only proceed with validation if:
1644: -- a) The current g_old_rec is current and
1750: If p_rec.per_information_category = 'GB' then
1751: --
1752: -- GB specific validation.
1753: --
1754: hr_utility.set_location('Entering:'||l_proc,20);
1755: irc_ipd_bus.chk_GB_per_information
1756: (p_person_id => p_rec.person_id
1757: ,p_per_information_category => p_rec.per_information_category
1758: ,p_per_information1 => p_rec.per_information1
1790: elsif p_rec.per_information_category = 'US' then
1791: --
1792: -- US specific validation.
1793: --
1794: hr_utility.set_location('Entering:'||l_proc,30);
1795: irc_ipd_bus.chk_US_per_information
1796: (p_person_id => p_rec.person_id
1797: ,p_per_information_category => p_rec.per_information_category
1798: ,p_per_information1 => p_rec.per_information1
1833: end if;
1834: end if;
1835: exception
1836: when l_error then
1837: hr_utility.set_message(800, 'HR_7529_PER_INFO_NOT_NULL');
1838: hr_utility.set_message_token('NUM',to_char(l_info_attribute));
1839: hr_multi_message.add;
1840: hr_utility.set_location(' Leaving:'||l_proc,50);
1841: End chk_per_information;
1834: end if;
1835: exception
1836: when l_error then
1837: hr_utility.set_message(800, 'HR_7529_PER_INFO_NOT_NULL');
1838: hr_utility.set_message_token('NUM',to_char(l_info_attribute));
1839: hr_multi_message.add;
1840: hr_utility.set_location(' Leaving:'||l_proc,50);
1841: End chk_per_information;
1842: --
1836: when l_error then
1837: hr_utility.set_message(800, 'HR_7529_PER_INFO_NOT_NULL');
1838: hr_utility.set_message_token('NUM',to_char(l_info_attribute));
1839: hr_multi_message.add;
1840: hr_utility.set_location(' Leaving:'||l_proc,50);
1841: End chk_per_information;
1842: --
1843: -- ----------------------------------------------------------------------------
1844: -- |---------------------------< insert_validate >----------------------------|
1849: --
1850: l_proc varchar2(72) := g_package||'insert_validate';
1851: --
1852: Begin
1853: hr_utility.set_location('Entering:'||l_proc, 5);
1854: --
1855: -- Call all supporting business operations
1856: -- Validate Dependent Attributes
1857: --
1854: --
1855: -- Call all supporting business operations
1856: -- Validate Dependent Attributes
1857: --
1858: hr_utility.set_location(l_proc, 20);
1859: --
1860: if (p_rec.vacancy_id is not null) then
1861: irc_ipd_bus.chk_vacancy_id(
1862: p_vacancy_id => p_rec.vacancy_id
1872: ,p_pending_data_id => p_rec.pending_data_id
1873: );
1874: end if;
1875: --
1876: hr_utility.set_location(l_proc, 30);
1877: --
1878: if (p_rec.allow_access is not null) then
1879: --
1880: hr_utility.set_location(l_proc, 40);
1876: hr_utility.set_location(l_proc, 30);
1877: --
1878: if (p_rec.allow_access is not null) then
1879: --
1880: hr_utility.set_location(l_proc, 40);
1881: --
1882: irc_ipd_bus.chk_allow_access(
1883: p_allow_access => p_rec.allow_access
1884: );
1883: p_allow_access => p_rec.allow_access
1884: );
1885: end if;
1886: --
1887: hr_utility.set_location(l_proc, 50);
1888: -- Validate Developer Descriptive Flexfields
1889: --
1890: irc_ipd_bus.chk_per_information(
1891: p_rec => p_rec
1890: irc_ipd_bus.chk_per_information(
1891: p_rec => p_rec
1892: );
1893: --
1894: hr_utility.set_location(l_proc, 60);
1895: --
1896: irc_ipd_bus.chk_ddf(p_rec);
1897: --
1898: hr_utility.set_location(' Leaving:'||l_proc, 70);
1894: hr_utility.set_location(l_proc, 60);
1895: --
1896: irc_ipd_bus.chk_ddf(p_rec);
1897: --
1898: hr_utility.set_location(' Leaving:'||l_proc, 70);
1899: End insert_validate;
1900: --
1901: -- ----------------------------------------------------------------------------
1902: -- |---------------------------< update_validate >----------------------------|
1907: --
1908: l_proc varchar2(72) := g_package||'update_validate';
1909: --
1910: Begin
1911: hr_utility.set_location('Entering:'||l_proc, 5);
1912: --
1913: -- Call all supporting business operations
1914: --
1915: -- Validate Dependent Attributes
1917: chk_non_updateable_args(
1918: p_rec => p_rec
1919: );
1920: --
1921: hr_utility.set_location(l_proc, 30);
1922: --
1923: irc_ipd_bus.chk_sex(
1924: p_sex => p_rec.sex
1925: ,p_creation_date => p_rec.creation_date
1925: ,p_creation_date => p_rec.creation_date
1926: ,p_pending_data_id => p_rec.pending_data_id
1927: );
1928: --
1929: hr_utility.set_location(l_proc, 40);
1930: --
1931: -- Validate Developer Descriptive Flexfields
1932: --
1933: irc_ipd_bus.chk_per_information(
1933: irc_ipd_bus.chk_per_information(
1934: p_rec => p_rec
1935: );
1936: --
1937: hr_utility.set_location(l_proc, 50);
1938:
1939: irc_ipd_bus.chk_ddf(p_rec);
1940: --
1941: hr_utility.set_location(' Leaving:'||l_proc, 60);
1937: hr_utility.set_location(l_proc, 50);
1938:
1939: irc_ipd_bus.chk_ddf(p_rec);
1940: --
1941: hr_utility.set_location(' Leaving:'||l_proc, 60);
1942: End update_validate;
1943: --
1944: -- ----------------------------------------------------------------------------
1945: -- |---------------------------< delete_validate >----------------------------|
1950: --
1951: l_proc varchar2(72) := g_package||'delete_validate';
1952: --
1953: Begin
1954: hr_utility.set_location('Entering:'||l_proc, 5);
1955: --
1956: -- Call all supporting business operations
1957: --
1958: hr_utility.set_location(' Leaving:'||l_proc, 10);
1954: hr_utility.set_location('Entering:'||l_proc, 5);
1955: --
1956: -- Call all supporting business operations
1957: --
1958: hr_utility.set_location(' Leaving:'||l_proc, 10);
1959: End delete_validate;
1960: --
1961: end irc_ipd_bus;