DBA Data[Home] [Help]

APPS.PAY_PPM_BUS dependencies on HR_UTILITY

Line 167: hr_utility.set_location('Entering:'||l_proc, 5);

163: l_dummy number;
164: l_proc varchar2(72) := g_package||'return_usage_date';
165: --
166: begin
167: hr_utility.set_location('Entering:'||l_proc, 5);
168: l_previous_payroll_id := null;
169: -- get assignment rows in effective order for processing
170: <>
171: for sel1 in asg_sel loop

Line 173: hr_utility.set_location(l_proc, 10);

169: -- get assignment rows in effective order for processing
170: <>
171: for sel1 in asg_sel loop
172: if sel1.payroll_id is not null then
173: hr_utility.set_location(l_proc, 10);
174: l_previous_payroll_id := nvl(l_previous_payroll_id, sel1.payroll_id);
175: -- as a payroll exists for the assignment we must set the
176: -- working range dates
177: l_start_range := greatest(p_effective_date,

Line 232: hr_utility.set_message(801, 'HR_6500_ASS_NO_PAYROLL');

228: -- payroll and we must just exit the loop.
229: --
230: if l_previous_payroll_id is null or
231: (sel1.effective_start_date = p_validation_start_date) then
232: hr_utility.set_message(801, 'HR_6500_ASS_NO_PAYROLL');
233: hr_utility.raise_error;
234: else
235: exit loop1;
236: end if;

Line 233: hr_utility.raise_error;

229: --
230: if l_previous_payroll_id is null or
231: (sel1.effective_start_date = p_validation_start_date) then
232: hr_utility.set_message(801, 'HR_6500_ASS_NO_PAYROLL');
233: hr_utility.raise_error;
234: else
235: exit loop1;
236: end if;
237: end if;

Line 244: hr_utility.set_message(801, 'HR_7348_PPM_ASSIGNMENT_INVALID');

240: -- check to see if the assignment exists
241: --
242: if l_previous_payroll_id is null then
243: -- the assignment doesn't exists
244: hr_utility.set_message(801, 'HR_7348_PPM_ASSIGNMENT_INVALID');
245: hr_utility.raise_error;
246: end if;
247: --
248: -- if the returning date is null then we must error as either a

Line 245: hr_utility.raise_error;

241: --
242: if l_previous_payroll_id is null then
243: -- the assignment doesn't exists
244: hr_utility.set_message(801, 'HR_7348_PPM_ASSIGNMENT_INVALID');
245: hr_utility.raise_error;
246: end if;
247: --
248: -- if the returning date is null then we must error as either a
249: -- usage or method does not exist

Line 258: hr_utility.set_message(801, 'HR_7347_PPM_INVALID_PAY_TYPE');

254: fetch csr_check_org_method into l_dummy;
255: if csr_check_org_method%notfound then
256: -- an organization method does not exist
257: close csr_check_org_method;
258: hr_utility.set_message(801, 'HR_7347_PPM_INVALID_PAY_TYPE');
259: hr_utility.raise_error;
260: end if;
261: close csr_check_org_method;
262: -- usages cannot exist

Line 259: hr_utility.raise_error;

255: if csr_check_org_method%notfound then
256: -- an organization method does not exist
257: close csr_check_org_method;
258: hr_utility.set_message(801, 'HR_7347_PPM_INVALID_PAY_TYPE');
259: hr_utility.raise_error;
260: end if;
261: close csr_check_org_method;
262: -- usages cannot exist
263: hr_utility.set_message(801, 'HR_7869_PPM_USAGE_INVALID');

Line 263: hr_utility.set_message(801, 'HR_7869_PPM_USAGE_INVALID');

259: hr_utility.raise_error;
260: end if;
261: close csr_check_org_method;
262: -- usages cannot exist
263: hr_utility.set_message(801, 'HR_7869_PPM_USAGE_INVALID');
264: hr_utility.raise_error;
265: end if;
266: hr_utility.set_location(' Leaving:'||l_proc, 20);
267: return(l_popmu_date);

Line 264: hr_utility.raise_error;

260: end if;
261: close csr_check_org_method;
262: -- usages cannot exist
263: hr_utility.set_message(801, 'HR_7869_PPM_USAGE_INVALID');
264: hr_utility.raise_error;
265: end if;
266: hr_utility.set_location(' Leaving:'||l_proc, 20);
267: return(l_popmu_date);
268: end return_usage_date;

Line 266: hr_utility.set_location(' Leaving:'||l_proc, 20);

262: -- usages cannot exist
263: hr_utility.set_message(801, 'HR_7869_PPM_USAGE_INVALID');
264: hr_utility.raise_error;
265: end if;
266: hr_utility.set_location(' Leaving:'||l_proc, 20);
267: return(l_popmu_date);
268: end return_usage_date;
269: --
270: -- if the payee_id is not null and the payee_type = 'P' then

Line 296: hr_utility.set_location('Entering:'||l_proc, 5);

292: l_payee_date date := hr_api.g_eot;
293: --
294: begin
295: --
296: hr_utility.set_location('Entering:'||l_proc, 5);
297: --
298: if (p_payee_id is not null and p_payee_type = 'P') then
299: open pp_sel;
300: fetch pp_sel into l_payee_date;

Line 304: hr_utility.set_message(801, 'HR_7846_PPM_INV_PERSON');

300: fetch pp_sel into l_payee_date;
301: if pp_sel%notfound then
302: -- person doesn't exist for the p_payee_id therefore error
303: close pp_sel;
304: hr_utility.set_message(801, 'HR_7846_PPM_INV_PERSON');
305: hr_utility.raise_error;
306: end if;
307: close pp_sel;
308: end if;

Line 305: hr_utility.raise_error;

301: if pp_sel%notfound then
302: -- person doesn't exist for the p_payee_id therefore error
303: close pp_sel;
304: hr_utility.set_message(801, 'HR_7846_PPM_INV_PERSON');
305: hr_utility.raise_error;
306: end if;
307: close pp_sel;
308: end if;
309: hr_utility.set_location(' Leaving:'||l_proc, 15);

Line 309: hr_utility.set_location(' Leaving:'||l_proc, 15);

305: hr_utility.raise_error;
306: end if;
307: close pp_sel;
308: end if;
309: hr_utility.set_location(' Leaving:'||l_proc, 15);
310: return(l_payee_date);
311: --
312: end return_payee_date;
313: --

Line 377: hr_utility.set_location('Entering:'||l_proc, 5);

373: l_priority_date date := hr_api.g_eot;
374: --
375: begin
376: --
377: hr_utility.set_location('Entering:'||l_proc, 5);
378: --
379: if p_priority is null then
380: hr_utility.set_message(801, 'HR_7357_PPM_PRIORITY_NULL');
381: hr_utility.raise_error;

Line 380: hr_utility.set_message(801, 'HR_7357_PPM_PRIORITY_NULL');

376: --
377: hr_utility.set_location('Entering:'||l_proc, 5);
378: --
379: if p_priority is null then
380: hr_utility.set_message(801, 'HR_7357_PPM_PRIORITY_NULL');
381: hr_utility.raise_error;
382: end if;
383: if balance_remunerative(p_org_payment_method_id, p_effective_date) then
384: open ppm_sel;

Line 381: hr_utility.raise_error;

377: hr_utility.set_location('Entering:'||l_proc, 5);
378: --
379: if p_priority is null then
380: hr_utility.set_message(801, 'HR_7357_PPM_PRIORITY_NULL');
381: hr_utility.raise_error;
382: end if;
383: if balance_remunerative(p_org_payment_method_id, p_effective_date) then
384: open ppm_sel;
385: fetch ppm_sel into l_priority_date;

Line 388: hr_utility.set_message(801, 'HR_6225_PAYM_DUP_PRIORITY');

384: open ppm_sel;
385: fetch ppm_sel into l_priority_date;
386: close ppm_sel;
387: if (l_priority_date < p_validation_start_date) then
388: hr_utility.set_message(801, 'HR_6225_PAYM_DUP_PRIORITY');
389: hr_utility.raise_error;
390: end if;
391: end if;
392: hr_utility.set_location(' Leaving:'||l_proc, 10);

Line 389: hr_utility.raise_error;

385: fetch ppm_sel into l_priority_date;
386: close ppm_sel;
387: if (l_priority_date < p_validation_start_date) then
388: hr_utility.set_message(801, 'HR_6225_PAYM_DUP_PRIORITY');
389: hr_utility.raise_error;
390: end if;
391: end if;
392: hr_utility.set_location(' Leaving:'||l_proc, 10);
393: return(l_priority_date);

Line 392: hr_utility.set_location(' Leaving:'||l_proc, 10);

388: hr_utility.set_message(801, 'HR_6225_PAYM_DUP_PRIORITY');
389: hr_utility.raise_error;
390: end if;
391: end if;
392: hr_utility.set_location(' Leaving:'||l_proc, 10);
393: return(l_priority_date);
394: --
395: end return_priority_date;
396: --

Line 415: hr_utility.set_location('Entering:'|| l_proc, 1);

411: and p_effective_date between asg.effective_start_date
412: and asg.effective_end_date;
413: --
414: begin
415: hr_utility.set_location('Entering:'|| l_proc, 1);
416: --
417: hr_utility.set_location(l_proc, 2);
418: open csr_ass_type;
419: fetch csr_ass_type

Line 417: hr_utility.set_location(l_proc, 2);

413: --
414: begin
415: hr_utility.set_location('Entering:'|| l_proc, 1);
416: --
417: hr_utility.set_location(l_proc, 2);
418: open csr_ass_type;
419: fetch csr_ass_type
420: into l_type;
421: if l_type <> 'E' then

Line 423: hr_utility.set_message(801, 'HR_7951_PPM_ASS_TYPE_NOT_EMP');

419: fetch csr_ass_type
420: into l_type;
421: if l_type <> 'E' then
422: close csr_ass_type;
423: hr_utility.set_message(801, 'HR_7951_PPM_ASS_TYPE_NOT_EMP');
424: hr_utility.raise_error;
425: end if;
426: close csr_ass_type;
427: --

Line 424: hr_utility.raise_error;

420: into l_type;
421: if l_type <> 'E' then
422: close csr_ass_type;
423: hr_utility.set_message(801, 'HR_7951_PPM_ASS_TYPE_NOT_EMP');
424: hr_utility.raise_error;
425: end if;
426: close csr_ass_type;
427: --
428: hr_utility.set_location(' Leaving:'|| l_proc, 5);

Line 428: hr_utility.set_location(' Leaving:'|| l_proc, 5);

424: hr_utility.raise_error;
425: end if;
426: close csr_ass_type;
427: --
428: hr_utility.set_location(' Leaving:'|| l_proc, 5);
429: end chk_assignment_type;
430: --
431: begin
432: hr_utility.set_location('Entering:'||l_proc, 5);

Line 432: hr_utility.set_location('Entering:'||l_proc, 5);

428: hr_utility.set_location(' Leaving:'|| l_proc, 5);
429: end chk_assignment_type;
430: --
431: begin
432: hr_utility.set_location('Entering:'||l_proc, 5);
433: --
434: -- check mandatory arguments
435: --
436: hr_api.mandatory_arg_error

Line 474: hr_utility.set_location(' Leaving:'||l_proc, 10);

470: --
471: if (p_datetrack_mode = 'INSERT' or
472: p_datetrack_mode = 'DELETE_NEXT_CHANGE' or
473: p_datetrack_mode = 'FUTURE_CHANGE') then
474: hr_utility.set_location(' Leaving:'||l_proc, 10);
475: -- determine the least date
476: l_rtn_date := least(return_usage_date,
477: return_payee_date,
478: return_priority_date,

Line 484: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');

480: --
481: -- ensure that the returning date is not null
482: --
483: if l_rtn_date is null then
484: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
485: hr_utility.set_message_token('PROCEDURE', l_proc);
486: hr_utility.set_message_token('STEP','10');
487: hr_utility.raise_error;
488: end if;

Line 485: hr_utility.set_message_token('PROCEDURE', l_proc);

481: -- ensure that the returning date is not null
482: --
483: if l_rtn_date is null then
484: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
485: hr_utility.set_message_token('PROCEDURE', l_proc);
486: hr_utility.set_message_token('STEP','10');
487: hr_utility.raise_error;
488: end if;
489: hr_utility.set_location(' Leaving:'||l_proc, 15);

Line 486: hr_utility.set_message_token('STEP','10');

482: --
483: if l_rtn_date is null then
484: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
485: hr_utility.set_message_token('PROCEDURE', l_proc);
486: hr_utility.set_message_token('STEP','10');
487: hr_utility.raise_error;
488: end if;
489: hr_utility.set_location(' Leaving:'||l_proc, 15);
490: return(l_rtn_date);

Line 487: hr_utility.raise_error;

483: if l_rtn_date is null then
484: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
485: hr_utility.set_message_token('PROCEDURE', l_proc);
486: hr_utility.set_message_token('STEP','10');
487: hr_utility.raise_error;
488: end if;
489: hr_utility.set_location(' Leaving:'||l_proc, 15);
490: return(l_rtn_date);
491: else

Line 489: hr_utility.set_location(' Leaving:'||l_proc, 15);

485: hr_utility.set_message_token('PROCEDURE', l_proc);
486: hr_utility.set_message_token('STEP','10');
487: hr_utility.raise_error;
488: end if;
489: hr_utility.set_location(' Leaving:'||l_proc, 15);
490: return(l_rtn_date);
491: else
492: hr_utility.set_location(' Leaving:'||l_proc, 20);
493: return(p_validation_end_date);

Line 492: hr_utility.set_location(' Leaving:'||l_proc, 20);

488: end if;
489: hr_utility.set_location(' Leaving:'||l_proc, 15);
490: return(l_rtn_date);
491: else
492: hr_utility.set_location(' Leaving:'||l_proc, 20);
493: return(p_validation_end_date);
494: end if;
495: end return_effective_end_date;
496: --

Line 556: hr_utility.set_location('Entering:'|| l_proc, 1);

552: and ppt.payment_type_id = opm.payment_type_id;
553: --
554: begin
555: --
556: hr_utility.set_location('Entering:'|| l_proc, 1);
557: --
558: -- Check mandatory parameters have been set
559: --
560: hr_api.mandatory_arg_error

Line 570: hr_utility.set_location(l_proc, 2);

566: (p_api_name => l_proc
567: ,p_argument => 'effective_date'
568: ,p_argument_value => p_effective_date);
569: --
570: hr_utility.set_location(l_proc, 2);
571: open csr_is_valid;
572: fetch csr_is_valid into l_exists;
573: if csr_is_valid%notfound then
574: close csr_is_valid;

Line 575: hr_utility.set_message(801, 'HR_7347_PPM_INVALID_PAY_TYPE');

571: open csr_is_valid;
572: fetch csr_is_valid into l_exists;
573: if csr_is_valid%notfound then
574: close csr_is_valid;
575: hr_utility.set_message(801, 'HR_7347_PPM_INVALID_PAY_TYPE');
576: hr_utility.raise_error;
577: end if;
578: close csr_is_valid;
579: --

Line 576: hr_utility.raise_error;

572: fetch csr_is_valid into l_exists;
573: if csr_is_valid%notfound then
574: close csr_is_valid;
575: hr_utility.set_message(801, 'HR_7347_PPM_INVALID_PAY_TYPE');
576: hr_utility.raise_error;
577: end if;
578: close csr_is_valid;
579: --
580: hr_utility.set_location(' Leaving:'|| l_proc, 6);

Line 580: hr_utility.set_location(' Leaving:'|| l_proc, 6);

576: hr_utility.raise_error;
577: end if;
578: close csr_is_valid;
579: --
580: hr_utility.set_location(' Leaving:'|| l_proc, 6);
581: end chk_org_payment_method_id;
582: --
583: -- ---------------------------------------------------------------------------
584: -- |----------------------< chk_defined_balance_id >-----------------------|

Line 723: hr_utility.set_location('Entering:'||l_proc, 5);

719: and asg.effective_end_date
720: and ctr.third_party_pay_flag = 'Y';
721: --
722: begin
723: hr_utility.set_location('Entering:'||l_proc, 5);
724: --
725: -- Ensure that all mandatory arguments are not null.
726: --
727: hr_api.mandatory_arg_error

Line 744: hr_utility.set_location(l_proc, 10);

740: -- organization, and that this organization is in the same business group
741: -- as the personal payment method.
742: --
743: if p_payee_type = 'O' then
744: hr_utility.set_location(l_proc, 10);
745: open csr_chk_organization;
746: fetch csr_chk_organization into l_business_group_id;
747: if csr_chk_organization%notfound then
748: -- Error: invalid organization

Line 750: hr_utility.set_message(801, 'HR_7839_PPM_INV_ORG');

746: fetch csr_chk_organization into l_business_group_id;
747: if csr_chk_organization%notfound then
748: -- Error: invalid organization
749: close csr_chk_organization;
750: hr_utility.set_message(801, 'HR_7839_PPM_INV_ORG');
751: hr_utility.raise_error;
752: end if;
753: close csr_chk_organization;
754: -- check the business group

Line 751: hr_utility.raise_error;

747: if csr_chk_organization%notfound then
748: -- Error: invalid organization
749: close csr_chk_organization;
750: hr_utility.set_message(801, 'HR_7839_PPM_INV_ORG');
751: hr_utility.raise_error;
752: end if;
753: close csr_chk_organization;
754: -- check the business group
755: if l_business_group_id <> p_business_group_id then

Line 757: hr_utility.set_message(801, 'HR_7844_ORG_INV_BUS_GRP');

753: close csr_chk_organization;
754: -- check the business group
755: if l_business_group_id <> p_business_group_id then
756: -- Error: organization is not in the correct business group
757: hr_utility.set_message(801, 'HR_7844_ORG_INV_BUS_GRP');
758: hr_utility.raise_error;
759: end if;
760: --
761: -- check that the organization is active

Line 758: hr_utility.raise_error;

754: -- check the business group
755: if l_business_group_id <> p_business_group_id then
756: -- Error: organization is not in the correct business group
757: hr_utility.set_message(801, 'HR_7844_ORG_INV_BUS_GRP');
758: hr_utility.raise_error;
759: end if;
760: --
761: -- check that the organization is active
762: --

Line 768: hr_utility.set_message(801, 'HR_7843_PPM_ORG_NOT_ACTIVE');

764: fetch csr_chk_organization_active into l_valid;
765: if csr_chk_organization_active%notfound then
766: -- Error: the organization is not active
767: close csr_chk_organization_active;
768: hr_utility.set_message(801, 'HR_7843_PPM_ORG_NOT_ACTIVE');
769: hr_utility.raise_error;
770: end if;
771: close csr_chk_organization_active;
772: --

Line 769: hr_utility.raise_error;

765: if csr_chk_organization_active%notfound then
766: -- Error: the organization is not active
767: close csr_chk_organization_active;
768: hr_utility.set_message(801, 'HR_7843_PPM_ORG_NOT_ACTIVE');
769: hr_utility.raise_error;
770: end if;
771: close csr_chk_organization_active;
772: --
773: -- If PAYEE_TYPE is 'P' then ensure that PAYEE_ID refers to a valid

Line 779: hr_utility.set_location(l_proc, 15);

775: -- to the owner of the personal payment method, and with the third party
776: -- pay flag set to 'Yes'.
777: --
778: elsif p_payee_type = 'P' then
779: hr_utility.set_location(l_proc, 15);
780: open csr_chk_person;
781: fetch csr_chk_person into l_valid;
782: if csr_chk_person%notfound then
783: close csr_chk_person;

Line 784: hr_utility.set_message(801, 'HR_7846_INV_PERSON');

780: open csr_chk_person;
781: fetch csr_chk_person into l_valid;
782: if csr_chk_person%notfound then
783: close csr_chk_person;
784: hr_utility.set_message(801, 'HR_7846_INV_PERSON');
785: hr_utility.raise_error;
786: end if;
787: close csr_chk_person;
788: --

Line 785: hr_utility.raise_error;

781: fetch csr_chk_person into l_valid;
782: if csr_chk_person%notfound then
783: close csr_chk_person;
784: hr_utility.set_message(801, 'HR_7846_INV_PERSON');
785: hr_utility.raise_error;
786: end if;
787: close csr_chk_person;
788: --
789: open csr_chk_contact;

Line 790: hr_utility.set_location(l_proc, 20);

786: end if;
787: close csr_chk_person;
788: --
789: open csr_chk_contact;
790: hr_utility.set_location(l_proc, 20);
791: fetch csr_chk_contact into l_valid;
792: if csr_chk_contact%notfound then
793: close csr_chk_contact;
794: hr_utility.set_message(801, 'HR_7847_PPM_INV_CONTACT');

Line 794: hr_utility.set_message(801, 'HR_7847_PPM_INV_CONTACT');

790: hr_utility.set_location(l_proc, 20);
791: fetch csr_chk_contact into l_valid;
792: if csr_chk_contact%notfound then
793: close csr_chk_contact;
794: hr_utility.set_message(801, 'HR_7847_PPM_INV_CONTACT');
795: hr_utility.raise_error;
796: end if;
797: close csr_chk_contact;
798: --

Line 795: hr_utility.raise_error;

791: fetch csr_chk_contact into l_valid;
792: if csr_chk_contact%notfound then
793: close csr_chk_contact;
794: hr_utility.set_message(801, 'HR_7847_PPM_INV_CONTACT');
795: hr_utility.raise_error;
796: end if;
797: close csr_chk_contact;
798: --
799: -- PAYEE_TYPE is invalid

Line 802: hr_utility.set_message(801, 'HR_7848_PPM_INV_PAYEE_TYPE');

798: --
799: -- PAYEE_TYPE is invalid
800: --
801: else
802: hr_utility.set_message(801, 'HR_7848_PPM_INV_PAYEE_TYPE');
803: hr_utility.raise_error;
804: end if;
805: hr_utility.set_location('Leaving:'||l_proc, 25);
806: end chk_payee_id_and_type;

Line 803: hr_utility.raise_error;

799: -- PAYEE_TYPE is invalid
800: --
801: else
802: hr_utility.set_message(801, 'HR_7848_PPM_INV_PAYEE_TYPE');
803: hr_utility.raise_error;
804: end if;
805: hr_utility.set_location('Leaving:'||l_proc, 25);
806: end chk_payee_id_and_type;
807: --

Line 805: hr_utility.set_location('Leaving:'||l_proc, 25);

801: else
802: hr_utility.set_message(801, 'HR_7848_PPM_INV_PAYEE_TYPE');
803: hr_utility.raise_error;
804: end if;
805: hr_utility.set_location('Leaving:'||l_proc, 25);
806: end chk_payee_id_and_type;
807: --
808: begin
809: hr_utility.set_location('Entering:'||l_proc, 5);

Line 809: hr_utility.set_location('Entering:'||l_proc, 5);

805: hr_utility.set_location('Leaving:'||l_proc, 25);
806: end chk_payee_id_and_type;
807: --
808: begin
809: hr_utility.set_location('Entering:'||l_proc, 5);
810: --
811: -- Ensure that all mandatory arguments are not null.
812: --
813: hr_api.mandatory_arg_error

Line 851: hr_utility.set_message(801, 'HR_7820_PPM_INV_PAYEE_DETAILS');

847: -- a garnishment does not exist therefore we must ensure that
848: -- the p_payee_id and p_payee_type argument are both null
849: if NOT (p_payee_id is null and
850: p_payee_type is null) then
851: hr_utility.set_message(801, 'HR_7820_PPM_INV_PAYEE_DETAILS');
852: hr_utility.raise_error;
853: end if;
854: else
855: close csr_chk_garnishment;

Line 852: hr_utility.raise_error;

848: -- the p_payee_id and p_payee_type argument are both null
849: if NOT (p_payee_id is null and
850: p_payee_type is null) then
851: hr_utility.set_message(801, 'HR_7820_PPM_INV_PAYEE_DETAILS');
852: hr_utility.raise_error;
853: end if;
854: else
855: close csr_chk_garnishment;
856: -- a garnishment does exist therefore we must ensure that

Line 870: hr_utility.set_message(801, 'HR_7822_PPM_NO_PAYEE_DETAILS');

866: open csr_chk_pay_type;
867: fetch csr_chk_pay_type into l_category;
868: close csr_chk_pay_type;
869: if (l_category <> 'MT' and l_category <> 'CH') then
870: hr_utility.set_message(801, 'HR_7822_PPM_NO_PAYEE_DETAILS');
871: hr_utility.raise_error;
872: end if;
873: end if;
874: end if;

Line 871: hr_utility.raise_error;

867: fetch csr_chk_pay_type into l_category;
868: close csr_chk_pay_type;
869: if (l_category <> 'MT' and l_category <> 'CH') then
870: hr_utility.set_message(801, 'HR_7822_PPM_NO_PAYEE_DETAILS');
871: hr_utility.raise_error;
872: end if;
873: end if;
874: end if;
875: end if;

Line 877: hr_utility.set_location('Leaving:'||l_proc, 10);

873: end if;
874: end if;
875: end if;
876: --
877: hr_utility.set_location('Leaving:'||l_proc, 10);
878: end chk_defined_balance_id;
879: --
880: -- ---------------------------------------------------------------------------
881: -- |---------------------< chk_amount_percent >----------------------------|

Line 918: hr_utility.set_location('Entering:'|| l_proc, 1);

914: and bt.balance_type_id = db.balance_type_id
915: ;
916: --
917: begin
918: hr_utility.set_location('Entering:'|| l_proc, 1);
919: --
920: -- Check mandatory parameters have been set
921: --
922: hr_api.mandatory_arg_error

Line 948: hr_utility.set_location(l_proc, 2);

944: <> nvl(p_amount,hr_api.g_number)) or
945: (l_api_updating and nvl(pay_ppm_shd.g_old_rec.percentage,hr_api.g_number)
946: <> nvl(p_percentage,hr_api.g_number)) or
947: (NOT l_api_updating)) then
948: hr_utility.set_location(l_proc, 2);
949: --
950: -- Check the related balance type
951: --
952: if not balance_remunerative(p_org_payment_method_id, p_effective_date) then

Line 958: hr_utility.set_message(801, 'HR_7349_PPM_AMOUNT_NOT_NULL');

954: -- the related balance type is non-remunerative
955: --
956: if p_amount is not null then
957: -- Error: Amount not enterable
958: hr_utility.set_message(801, 'HR_7349_PPM_AMOUNT_NOT_NULL');
959: hr_utility.raise_error;
960: end if;
961: if p_percentage <> 100 then
962: -- Error: Percentage error

Line 959: hr_utility.raise_error;

955: --
956: if p_amount is not null then
957: -- Error: Amount not enterable
958: hr_utility.set_message(801, 'HR_7349_PPM_AMOUNT_NOT_NULL');
959: hr_utility.raise_error;
960: end if;
961: if p_percentage <> 100 then
962: -- Error: Percentage error
963: hr_utility.set_message(801, 'HR_7354_PPM_PERCENT_NOT_100');

Line 963: hr_utility.set_message(801, 'HR_7354_PPM_PERCENT_NOT_100');

959: hr_utility.raise_error;
960: end if;
961: if p_percentage <> 100 then
962: -- Error: Percentage error
963: hr_utility.set_message(801, 'HR_7354_PPM_PERCENT_NOT_100');
964: hr_utility.raise_error;
965: end if;
966: else
967: --

Line 964: hr_utility.raise_error;

960: end if;
961: if p_percentage <> 100 then
962: -- Error: Percentage error
963: hr_utility.set_message(801, 'HR_7354_PPM_PERCENT_NOT_100');
964: hr_utility.raise_error;
965: end if;
966: else
967: --
968: hr_utility.set_location(l_proc, 3);

Line 968: hr_utility.set_location(l_proc, 3);

964: hr_utility.raise_error;
965: end if;
966: else
967: --
968: hr_utility.set_location(l_proc, 3);
969: --
970: -- When the related balance type is remunerative
971: --
972: -- Check that percentage and amount are not both not null or both null

Line 977: hr_utility.set_message(801, 'HR_6221_PAYM_INVALID_PPM');

973: --
974: if p_percentage is not null then
975: if p_amount is not null then
976: -- Error: One and only one of amount or percentage need to be entered
977: hr_utility.set_message(801, 'HR_6221_PAYM_INVALID_PPM');
978: hr_utility.raise_error;
979: end if;
980: elsif p_amount is null then
981: -- Error: Either amount or percentage need to be entered

Line 978: hr_utility.raise_error;

974: if p_percentage is not null then
975: if p_amount is not null then
976: -- Error: One and only one of amount or percentage need to be entered
977: hr_utility.set_message(801, 'HR_6221_PAYM_INVALID_PPM');
978: hr_utility.raise_error;
979: end if;
980: elsif p_amount is null then
981: -- Error: Either amount or percentage need to be entered
982: hr_utility.set_message(801, 'HR_6680_PPM_AMT_PERC');

Line 982: hr_utility.set_message(801, 'HR_6680_PPM_AMT_PERC');

978: hr_utility.raise_error;
979: end if;
980: elsif p_amount is null then
981: -- Error: Either amount or percentage need to be entered
982: hr_utility.set_message(801, 'HR_6680_PPM_AMT_PERC');
983: hr_utility.raise_error;
984: end if;
985: --
986: hr_utility.set_location(l_proc, 5);

Line 983: hr_utility.raise_error;

979: end if;
980: elsif p_amount is null then
981: -- Error: Either amount or percentage need to be entered
982: hr_utility.set_message(801, 'HR_6680_PPM_AMT_PERC');
983: hr_utility.raise_error;
984: end if;
985: --
986: hr_utility.set_location(l_proc, 5);
987: --

Line 986: hr_utility.set_location(l_proc, 5);

982: hr_utility.set_message(801, 'HR_6680_PPM_AMT_PERC');
983: hr_utility.raise_error;
984: end if;
985: --
986: hr_utility.set_location(l_proc, 5);
987: --
988: -- Check if the amount is less than 0
989: --
990: if p_amount < 0 then

Line 992: hr_utility.set_message(801, 'HR_7355_PPM_AMOUNT_NEGATIVE');

988: -- Check if the amount is less than 0
989: --
990: if p_amount < 0 then
991: -- Error: Amount less than 0
992: hr_utility.set_message(801, 'HR_7355_PPM_AMOUNT_NEGATIVE');
993: hr_utility.raise_error;
994: end if ;
995: --
996: hr_utility.set_location(l_proc, 6);

Line 993: hr_utility.raise_error;

989: --
990: if p_amount < 0 then
991: -- Error: Amount less than 0
992: hr_utility.set_message(801, 'HR_7355_PPM_AMOUNT_NEGATIVE');
993: hr_utility.raise_error;
994: end if ;
995: --
996: hr_utility.set_location(l_proc, 6);
997: --

Line 996: hr_utility.set_location(l_proc, 6);

992: hr_utility.set_message(801, 'HR_7355_PPM_AMOUNT_NEGATIVE');
993: hr_utility.raise_error;
994: end if ;
995: --
996: hr_utility.set_location(l_proc, 6);
997: --
998: -- Check if the percentage is between 0 and 100
999: --
1000: if p_percentage not between 0 and 100 then

Line 1002: hr_utility.set_message(801, 'HR_7040_PERCENT_RANGE');

998: -- Check if the percentage is between 0 and 100
999: --
1000: if p_percentage not between 0 and 100 then
1001: -- Error: Percentage must be between 0 and 100
1002: hr_utility.set_message(801, 'HR_7040_PERCENT_RANGE');
1003: hr_utility.raise_error;
1004: end if ;
1005: --
1006: end if ;

Line 1003: hr_utility.raise_error;

999: --
1000: if p_percentage not between 0 and 100 then
1001: -- Error: Percentage must be between 0 and 100
1002: hr_utility.set_message(801, 'HR_7040_PERCENT_RANGE');
1003: hr_utility.raise_error;
1004: end if ;
1005: --
1006: end if ;
1007: --

Line 1008: hr_utility.set_location(l_proc, 7);

1004: end if ;
1005: --
1006: end if ;
1007: --
1008: hr_utility.set_location(l_proc, 7);
1009: --
1010: if p_amount is not null then
1011: --
1012: -- Check that Amount has a money format

Line 1025: hr_utility.set_location(l_proc, 8);

1021: p_arg_name => 'AMOUNT',
1022: p_format => 'M',
1023: p_curcode => l_curcode);
1024: else
1025: hr_utility.set_location(l_proc, 8);
1026: --
1027: -- p_percentage is not null so check that format is decimal with
1028: -- 2 decimal places
1029: --

Line 1040: hr_utility.set_location(' Leaving:'|| l_proc, 9);

1036: p_format => 'H_DECIMAL2');
1037: end if;
1038: end if ;
1039: --
1040: hr_utility.set_location(' Leaving:'|| l_proc, 9);
1041: end chk_amount_percent;
1042: --
1043: -- ---------------------------------------------------------------------------
1044: -- |---------------------< chk_external_account_id >------------------------|

Line 1099: hr_utility.set_location('Entering:'|| l_proc, 1);

1095: where to_char(pea1.id_flex_num) = rule_mode
1096: and rule_type ='E');
1097: --
1098: begin
1099: hr_utility.set_location('Entering:'|| l_proc, 1);
1100: --
1101: -- Check mandatory parameters have been set
1102: --
1103: hr_api.mandatory_arg_error

Line 1128: hr_utility.set_location(l_proc, 2);

1124: if ((l_api_updating and nvl(pay_ppm_shd.g_old_rec.external_account_id,
1125: hr_api.g_number)
1126: <> nvl(p_external_account_id,hr_api.g_number)) or
1127: (NOT l_api_updating)) then
1128: hr_utility.set_location(l_proc, 2);
1129: --
1130: -- Check if related payment type is Magnetic Tape
1131: --
1132: open csr_chk_pay_type;

Line 1141: hr_utility.set_message(801, 'HR_6678_PPM_MT_BANK');

1137: --
1138: if p_external_account_id is null then
1139: close csr_chk_pay_type;
1140: -- Error: Bank details needed for magnetic tape payment types
1141: hr_utility.set_message(801, 'HR_6678_PPM_MT_BANK');
1142: hr_utility.raise_error;
1143: end if;
1144: else
1145: --

Line 1142: hr_utility.raise_error;

1138: if p_external_account_id is null then
1139: close csr_chk_pay_type;
1140: -- Error: Bank details needed for magnetic tape payment types
1141: hr_utility.set_message(801, 'HR_6678_PPM_MT_BANK');
1142: hr_utility.raise_error;
1143: end if;
1144: else
1145: --
1146: -- related payment type is not Magnetic Tape

Line 1151: hr_utility.set_message(801, 'HR_7356_PPM_EXT_ACC_NOT_NULL');

1147: --
1148: if p_external_account_id is not null then
1149: close csr_chk_pay_type;
1150: -- Error: External account not enterable
1151: hr_utility.set_message(801, 'HR_7356_PPM_EXT_ACC_NOT_NULL');
1152: hr_utility.raise_error;
1153: end if;
1154: end if;
1155: close csr_chk_pay_type;

Line 1152: hr_utility.raise_error;

1148: if p_external_account_id is not null then
1149: close csr_chk_pay_type;
1150: -- Error: External account not enterable
1151: hr_utility.set_message(801, 'HR_7356_PPM_EXT_ACC_NOT_NULL');
1152: hr_utility.raise_error;
1153: end if;
1154: end if;
1155: close csr_chk_pay_type;
1156: --

Line 1157: hr_utility.set_location(l_proc, 3);

1153: end if;
1154: end if;
1155: close csr_chk_pay_type;
1156: --
1157: hr_utility.set_location(l_proc, 3);
1158: --
1159: -- Check if foreign key constraint error is violated
1160: --
1161: if p_external_account_id is not null then

Line 1183: hr_utility.set_message(801, 'HR_51350_PPM_EXT_ACC_STRUC');

1179: fetch chk_org_flex_struct into l_exists;
1180: if chk_org_flex_struct%notfound then
1181: close chk_org_flex_struct;
1182: -- Error: PPM external account structure does not exist
1183: hr_utility.set_message(801, 'HR_51350_PPM_EXT_ACC_STRUC');
1184: hr_utility.raise_error;
1185: else
1186: close chk_org_flex_struct;
1187: end if;

Line 1184: hr_utility.raise_error;

1180: if chk_org_flex_struct%notfound then
1181: close chk_org_flex_struct;
1182: -- Error: PPM external account structure does not exist
1183: hr_utility.set_message(801, 'HR_51350_PPM_EXT_ACC_STRUC');
1184: hr_utility.raise_error;
1185: else
1186: close chk_org_flex_struct;
1187: end if;
1188: --

Line 1193: hr_utility.set_location(' Leaving:'|| l_proc, 4);

1189: end if;
1190: --
1191: end if;
1192: --
1193: hr_utility.set_location(' Leaving:'|| l_proc, 4);
1194: end chk_external_account_id;
1195: --
1196: -- ---------------------------------------------------------------------------
1197: -- |---------------------------< chk_priority >----------------------------|

Line 1251: hr_utility.set_location('Entering:'|| l_proc, 1);

1247: and ppm.effective_start_date <= p_validation_end_date
1248: and ppm.effective_end_date >= p_validation_start_date;
1249: --
1250: begin
1251: hr_utility.set_location('Entering:'|| l_proc, 1);
1252: --
1253: -- Check mandatory parameters have been set
1254: --
1255: hr_api.mandatory_arg_error

Line 1285: hr_utility.set_location(l_proc, 2);

1281: --
1282: if ((l_api_updating and nvl(pay_ppm_shd.g_old_rec.priority,hr_api.g_number)
1283: <> nvl(p_priority,hr_api.g_number)) or
1284: (NOT l_api_updating)) then
1285: hr_utility.set_location(l_proc, 2);
1286: --
1287: -- Check if priority is null
1288: --
1289: if p_priority is null then

Line 1291: hr_utility.set_message(801, 'HR_7357_PPM_PRIORITY_NULL');

1287: -- Check if priority is null
1288: --
1289: if p_priority is null then
1290: -- Error: Priority required
1291: hr_utility.set_message(801, 'HR_7357_PPM_PRIORITY_NULL');
1292: hr_utility.raise_error;
1293: end if;
1294: --
1295: -- Check if the related balance type is remunerative

Line 1292: hr_utility.raise_error;

1288: --
1289: if p_priority is null then
1290: -- Error: Priority required
1291: hr_utility.set_message(801, 'HR_7357_PPM_PRIORITY_NULL');
1292: hr_utility.raise_error;
1293: end if;
1294: --
1295: -- Check if the related balance type is remunerative
1296: --

Line 1304: hr_utility.Set_message(801, 'HR_7358_PPM_PRIORITY_RANGE');

1300: -- note: this could be coded using the API version of checkformat
1301: --
1302: if p_priority not between 1 and 99 then
1303: -- Error: Priority out of range
1304: hr_utility.Set_message(801, 'HR_7358_PPM_PRIORITY_RANGE');
1305: hr_utility.raise_error;
1306: end if;
1307: --
1308: hr_utility.set_location(l_proc, 3);

Line 1305: hr_utility.raise_error;

1301: --
1302: if p_priority not between 1 and 99 then
1303: -- Error: Priority out of range
1304: hr_utility.Set_message(801, 'HR_7358_PPM_PRIORITY_RANGE');
1305: hr_utility.raise_error;
1306: end if;
1307: --
1308: hr_utility.set_location(l_proc, 3);
1309: if l_api_updating then

Line 1308: hr_utility.set_location(l_proc, 3);

1304: hr_utility.Set_message(801, 'HR_7358_PPM_PRIORITY_RANGE');
1305: hr_utility.raise_error;
1306: end if;
1307: --
1308: hr_utility.set_location(l_proc, 3);
1309: if l_api_updating then
1310: --
1311: -- As we are updating we validate the priority.
1312: -- We do not need to do this for INSERT because the

Line 1322: hr_utility.set_message(801, 'HR_6225_PAYM_DUP_PRIORITY');

1318: if csr_check_unique%found then
1319: close csr_check_unique;
1320: -- Error: A payment method with this priority exists for this
1321: -- assignment
1322: hr_utility.set_message(801, 'HR_6225_PAYM_DUP_PRIORITY');
1323: hr_utility.raise_error;
1324: end if;
1325: close csr_check_unique;
1326: end if;

Line 1323: hr_utility.raise_error;

1319: close csr_check_unique;
1320: -- Error: A payment method with this priority exists for this
1321: -- assignment
1322: hr_utility.set_message(801, 'HR_6225_PAYM_DUP_PRIORITY');
1323: hr_utility.raise_error;
1324: end if;
1325: close csr_check_unique;
1326: end if;
1327: else

Line 1329: hr_utility.set_location(l_proc, 4);

1325: close csr_check_unique;
1326: end if;
1327: else
1328: --
1329: hr_utility.set_location(l_proc, 4);
1330: --
1331: -- Balance Type is non_remunerative
1332: --
1333: if p_priority <> 1 then

Line 1335: hr_utility.set_message(801, 'HR_7359_PPM_MUST_BE_1');

1331: -- Balance Type is non_remunerative
1332: --
1333: if p_priority <> 1 then
1334: -- Error: Priority must be 1
1335: hr_utility.set_message(801, 'HR_7359_PPM_MUST_BE_1');
1336: hr_utility.raise_error;
1337: end if;
1338: end if;
1339: --

Line 1336: hr_utility.raise_error;

1332: --
1333: if p_priority <> 1 then
1334: -- Error: Priority must be 1
1335: hr_utility.set_message(801, 'HR_7359_PPM_MUST_BE_1');
1336: hr_utility.raise_error;
1337: end if;
1338: end if;
1339: --
1340: end if;

Line 1341: hr_utility.set_location(' Leaving:'|| l_proc, 5);

1337: end if;
1338: end if;
1339: --
1340: end if;
1341: hr_utility.set_location(' Leaving:'|| l_proc, 5);
1342: end chk_priority;
1343: --
1344: -- ---------------------------------------------------------------------------
1345: -- |------------------------< chk_delete >----------------------------|

Line 1436: hr_utility.set_location('Entering:'|| l_proc, 5);

1432: and ele.effective_start_date <= p_validation_start_date
1433: and ele.effective_end_date >= p_validation_end_date;
1434: --
1435: begin
1436: hr_utility.set_location('Entering:'|| l_proc, 5);
1437: open csr_del_garnishment;
1438: fetch csr_del_garnishment into l_exists;
1439: if csr_del_garnishment%found then
1440: close csr_del_garnishment;

Line 1442: hr_utility.set_message(801, 'HR_7849_PPM_ELE_DELETE');

1438: fetch csr_del_garnishment into l_exists;
1439: if csr_del_garnishment%found then
1440: close csr_del_garnishment;
1441: -- Error: Delete not allowed
1442: hr_utility.set_message(801, 'HR_7849_PPM_ELE_DELETE');
1443: hr_utility.raise_error;
1444: end if;
1445: close csr_del_garnishment;
1446: hr_utility.set_location(' Leaving:'|| l_proc, 10);

Line 1443: hr_utility.raise_error;

1439: if csr_del_garnishment%found then
1440: close csr_del_garnishment;
1441: -- Error: Delete not allowed
1442: hr_utility.set_message(801, 'HR_7849_PPM_ELE_DELETE');
1443: hr_utility.raise_error;
1444: end if;
1445: close csr_del_garnishment;
1446: hr_utility.set_location(' Leaving:'|| l_proc, 10);
1447: end check_garnishment_delete;

Line 1446: hr_utility.set_location(' Leaving:'|| l_proc, 10);

1442: hr_utility.set_message(801, 'HR_7849_PPM_ELE_DELETE');
1443: hr_utility.raise_error;
1444: end if;
1445: close csr_del_garnishment;
1446: hr_utility.set_location(' Leaving:'|| l_proc, 10);
1447: end check_garnishment_delete;
1448: --
1449: begin
1450: hr_utility.set_location('Entering:'|| l_proc, 1);

Line 1450: hr_utility.set_location('Entering:'|| l_proc, 1);

1446: hr_utility.set_location(' Leaving:'|| l_proc, 10);
1447: end check_garnishment_delete;
1448: --
1449: begin
1450: hr_utility.set_location('Entering:'|| l_proc, 1);
1451: --
1452: -- Check mandatory parameters have been set
1453: --
1454: hr_api.mandatory_arg_error

Line 1466: hr_utility.set_location(l_proc, 2);

1462: ,p_argument => 'datetrack_mode'
1463: ,p_argument_value => p_datetrack_mode
1464: );
1465: --
1466: hr_utility.set_location(l_proc, 2);
1467: --
1468: -- If delete mode is DELETE (ie: set end date) then
1469: -- check if rows exist in PAY_PRE_PAYMENTS for PAY_PAYROLL_ACTION
1470: -- effective dates that are effective beyond the session date

Line 1478: hr_utility.set_message(801, 'HR_7360_PPM_DEL_NOT_ALLOWED');

1474: fetch csr_date_eff into l_exists;
1475: if csr_date_eff%found then
1476: close csr_date_eff;
1477: -- Error: Delete not allowed
1478: hr_utility.set_message(801, 'HR_7360_PPM_DEL_NOT_ALLOWED');
1479: hr_utility.raise_error;
1480: end if;
1481: close csr_date_eff;
1482: --

Line 1479: hr_utility.raise_error;

1475: if csr_date_eff%found then
1476: close csr_date_eff;
1477: -- Error: Delete not allowed
1478: hr_utility.set_message(801, 'HR_7360_PPM_DEL_NOT_ALLOWED');
1479: hr_utility.raise_error;
1480: end if;
1481: close csr_date_eff;
1482: --
1483: check_garnishment_delete;

Line 1486: hr_utility.set_location(l_proc, 3);

1482: --
1483: check_garnishment_delete;
1484: end if;
1485: --
1486: hr_utility.set_location(l_proc, 3);
1487: --
1488: -- If delete mode is ZAP (ie: remove all records) then
1489: -- check if rows exist in PAY_PRE_PAYMENTS
1490: --

Line 1497: hr_utility.set_message(801, 'HR_6679_PPM_PRE_PAY');

1493: fetch csr_del into l_exists;
1494: if csr_del%found then
1495: close csr_del;
1496: -- Error:Cannot delete. Pre payments exist
1497: hr_utility.set_message(801, 'HR_6679_PPM_PRE_PAY');
1498: hr_utility.raise_error;
1499: end if;
1500: close csr_del;
1501: --

Line 1498: hr_utility.raise_error;

1494: if csr_del%found then
1495: close csr_del;
1496: -- Error:Cannot delete. Pre payments exist
1497: hr_utility.set_message(801, 'HR_6679_PPM_PRE_PAY');
1498: hr_utility.raise_error;
1499: end if;
1500: close csr_del;
1501: --
1502: check_garnishment_delete;

Line 1505: hr_utility.set_location(' Leaving:'|| l_proc, 4);

1501: --
1502: check_garnishment_delete;
1503: end if;
1504: --
1505: hr_utility.set_location(' Leaving:'|| l_proc, 4);
1506: end chk_delete;
1507: --
1508: -- ----------------------------------------------------------------------------
1509: -- |----------------------< check_non_updateable_args >-----------------------|

Line 1520: hr_utility.set_location('Entering:'||l_proc, 5);

1516: l_error exception;
1517: l_argument varchar2(30);
1518: --
1519: Begin
1520: hr_utility.set_location('Entering:'||l_proc, 5);
1521: --
1522: -- Only proceed with validation if a row exists for
1523: -- the current record in the HR Schema
1524: --

Line 1529: hr_utility.set_message(801, 'HR_51351_PPM_UPD_ROW_NOT_EXIST');

1525: if not pay_ppm_shd.api_updating
1526: (p_personal_payment_method_id => p_rec.personal_payment_method_id
1527: ,p_effective_date => p_effective_date
1528: ,p_object_version_number => p_rec.object_version_number) then
1529: hr_utility.set_message(801, 'HR_51351_PPM_UPD_ROW_NOT_EXIST');
1530: hr_utility.set_message_token('PROCEDURE', l_proc);
1531: hr_utility.set_message_token('STEP', '5');
1532: end if;
1533: --

Line 1530: hr_utility.set_message_token('PROCEDURE', l_proc);

1526: (p_personal_payment_method_id => p_rec.personal_payment_method_id
1527: ,p_effective_date => p_effective_date
1528: ,p_object_version_number => p_rec.object_version_number) then
1529: hr_utility.set_message(801, 'HR_51351_PPM_UPD_ROW_NOT_EXIST');
1530: hr_utility.set_message_token('PROCEDURE', l_proc);
1531: hr_utility.set_message_token('STEP', '5');
1532: end if;
1533: --
1534: hr_utility.set_location(l_proc, 6);

Line 1531: hr_utility.set_message_token('STEP', '5');

1527: ,p_effective_date => p_effective_date
1528: ,p_object_version_number => p_rec.object_version_number) then
1529: hr_utility.set_message(801, 'HR_51351_PPM_UPD_ROW_NOT_EXIST');
1530: hr_utility.set_message_token('PROCEDURE', l_proc);
1531: hr_utility.set_message_token('STEP', '5');
1532: end if;
1533: --
1534: hr_utility.set_location(l_proc, 6);
1535: --

Line 1534: hr_utility.set_location(l_proc, 6);

1530: hr_utility.set_message_token('PROCEDURE', l_proc);
1531: hr_utility.set_message_token('STEP', '5');
1532: end if;
1533: --
1534: hr_utility.set_location(l_proc, 6);
1535: --
1536: if nvl(p_rec.business_group_id, hr_api.g_number) <>
1537: nvl(pay_ppm_shd.g_old_rec.business_group_id, hr_api.g_number) then
1538: l_argument := 'business_group_id';

Line 1541: hr_utility.set_location(l_proc, 7);

1537: nvl(pay_ppm_shd.g_old_rec.business_group_id, hr_api.g_number) then
1538: l_argument := 'business_group_id';
1539: raise l_error;
1540: end if;
1541: hr_utility.set_location(l_proc, 7);
1542: --
1543: if p_rec.assignment_id <> pay_ppm_shd.g_old_rec.assignment_id then
1544: l_argument := 'assignment_id';
1545: raise l_error;

Line 1547: hr_utility.set_location(l_proc, 8);

1543: if p_rec.assignment_id <> pay_ppm_shd.g_old_rec.assignment_id then
1544: l_argument := 'assignment_id';
1545: raise l_error;
1546: end if;
1547: hr_utility.set_location(l_proc, 8);
1548: --
1549: if nvl(p_rec.org_payment_method_id, hr_api.g_number) <>
1550: nvl(pay_ppm_shd.g_old_rec.org_payment_method_id, hr_api.g_number) then
1551: l_argument := 'org_payment_method_id';

Line 1554: hr_utility.set_location(l_proc, 9);

1550: nvl(pay_ppm_shd.g_old_rec.org_payment_method_id, hr_api.g_number) then
1551: l_argument := 'org_payment_method_id';
1552: raise l_error;
1553: end if;
1554: hr_utility.set_location(l_proc, 9);
1555: --
1556: exception
1557: when l_error then
1558: hr_api.argument_changed_error

Line 1563: hr_utility.set_location(' Leaving:'||l_proc, 10);

1559: (p_api_name => l_proc
1560: ,p_argument => l_argument);
1561: when others then
1562: raise;
1563: hr_utility.set_location(' Leaving:'||l_proc, 10);
1564: end check_non_updateable_args;
1565: --
1566: -- ----------------------------------------------------------------------------
1567: -- |--------------------------< dt_update_validate >--------------------------|

Line 1607: hr_utility.set_location('Entering:'||l_proc, 5);

1603: l_integrity_error Exception;
1604: l_table_name all_tables.table_name%TYPE;
1605: --
1606: Begin
1607: hr_utility.set_location('Entering:'||l_proc, 5);
1608: --
1609: -- Ensure that the p_datetrack_mode argument is not null
1610: --
1611: hr_api.mandatory_arg_error

Line 1656: hr_utility.set_location(' Leaving:'||l_proc, 10);

1652: End If;
1653: --
1654: End If;
1655: --
1656: hr_utility.set_location(' Leaving:'||l_proc, 10);
1657: Exception
1658: When l_integrity_error Then
1659: --
1660: -- A referential integrity check was violated therefore

Line 1663: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');

1659: --
1660: -- A referential integrity check was violated therefore
1661: -- we must error
1662: --
1663: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1664: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1665: hr_utility.raise_error;
1666: When Others Then
1667: --

Line 1664: hr_utility.set_message_token('TABLE_NAME', l_table_name);

1660: -- A referential integrity check was violated therefore
1661: -- we must error
1662: --
1663: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1664: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1665: hr_utility.raise_error;
1666: When Others Then
1667: --
1668: -- An unhandled or unexpected error has occurred which

Line 1665: hr_utility.raise_error;

1661: -- we must error
1662: --
1663: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1664: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1665: hr_utility.raise_error;
1666: When Others Then
1667: --
1668: -- An unhandled or unexpected error has occurred which
1669: -- we must report

Line 1671: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');

1667: --
1668: -- An unhandled or unexpected error has occurred which
1669: -- we must report
1670: --
1671: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1672: hr_utility.set_message_token('PROCEDURE', l_proc);
1673: hr_utility.set_message_token('STEP','15');
1674: hr_utility.raise_error;
1675: End dt_update_validate;

Line 1672: hr_utility.set_message_token('PROCEDURE', l_proc);

1668: -- An unhandled or unexpected error has occurred which
1669: -- we must report
1670: --
1671: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1672: hr_utility.set_message_token('PROCEDURE', l_proc);
1673: hr_utility.set_message_token('STEP','15');
1674: hr_utility.raise_error;
1675: End dt_update_validate;
1676: --

Line 1673: hr_utility.set_message_token('STEP','15');

1669: -- we must report
1670: --
1671: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1672: hr_utility.set_message_token('PROCEDURE', l_proc);
1673: hr_utility.set_message_token('STEP','15');
1674: hr_utility.raise_error;
1675: End dt_update_validate;
1676: --
1677: -- ----------------------------------------------------------------------------

Line 1674: hr_utility.raise_error;

1670: --
1671: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1672: hr_utility.set_message_token('PROCEDURE', l_proc);
1673: hr_utility.set_message_token('STEP','15');
1674: hr_utility.raise_error;
1675: End dt_update_validate;
1676: --
1677: -- ----------------------------------------------------------------------------
1678: -- |--------------------------< dt_delete_validate >--------------------------|

Line 1724: hr_utility.set_location('Entering:'||l_proc, 5);

1720: l_future_change Exception;
1721: l_table_name all_tables.table_name%TYPE;
1722: --
1723: Begin
1724: hr_utility.set_location('Entering:'||l_proc, 5);
1725: --
1726: -- Ensure that the p_datetrack_mode argument is not null
1727: --
1728: hr_api.mandatory_arg_error

Line 1737: -- hr_utility.set_message(801, 'PAY_6209_ELEMENT_NO_FC_DEL');

1733: -- Raise error if date_track mode is FUTURE_CHANGE
1734: --
1735: If (p_datetrack_mode ='FUTURE_CHANGE') then
1736: raise l_future_change;
1737: -- hr_utility.set_message(801, 'PAY_6209_ELEMENT_NO_FC_DEL');
1738: -- hr_utility.raise_error;
1739: end if;
1740: --
1741: -- Only perform the validation if the datetrack mode is either

Line 1738: -- hr_utility.raise_error;

1734: --
1735: If (p_datetrack_mode ='FUTURE_CHANGE') then
1736: raise l_future_change;
1737: -- hr_utility.set_message(801, 'PAY_6209_ELEMENT_NO_FC_DEL');
1738: -- hr_utility.raise_error;
1739: end if;
1740: --
1741: -- Only perform the validation if the datetrack mode is either
1742: -- DELETE or ZAP

Line 1767: hr_utility.set_location(' Leaving:'||l_proc, 10);

1763: p_argument_value => p_personal_payment_method_id);
1764: --
1765: End If;
1766: --
1767: hr_utility.set_location(' Leaving:'||l_proc, 10);
1768: Exception
1769: When l_rows_exist Then
1770: --
1771: -- A referential integrity check was violated therefore

Line 1774: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');

1770: --
1771: -- A referential integrity check was violated therefore
1772: -- we must error
1773: --
1774: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1775: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1776: hr_utility.raise_error;
1777: When l_future_change then
1778: hr_utility.set_message(801, 'PAY_6209_ELEMENT_NO_FC_DEL');

Line 1775: hr_utility.set_message_token('TABLE_NAME', l_table_name);

1771: -- A referential integrity check was violated therefore
1772: -- we must error
1773: --
1774: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1775: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1776: hr_utility.raise_error;
1777: When l_future_change then
1778: hr_utility.set_message(801, 'PAY_6209_ELEMENT_NO_FC_DEL');
1779: hr_utility.raise_error;

Line 1776: hr_utility.raise_error;

1772: -- we must error
1773: --
1774: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1775: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1776: hr_utility.raise_error;
1777: When l_future_change then
1778: hr_utility.set_message(801, 'PAY_6209_ELEMENT_NO_FC_DEL');
1779: hr_utility.raise_error;
1780: When Others Then

Line 1778: hr_utility.set_message(801, 'PAY_6209_ELEMENT_NO_FC_DEL');

1774: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1775: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1776: hr_utility.raise_error;
1777: When l_future_change then
1778: hr_utility.set_message(801, 'PAY_6209_ELEMENT_NO_FC_DEL');
1779: hr_utility.raise_error;
1780: When Others Then
1781: --
1782: -- An unhandled or unexpected error has occurred which

Line 1779: hr_utility.raise_error;

1775: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1776: hr_utility.raise_error;
1777: When l_future_change then
1778: hr_utility.set_message(801, 'PAY_6209_ELEMENT_NO_FC_DEL');
1779: hr_utility.raise_error;
1780: When Others Then
1781: --
1782: -- An unhandled or unexpected error has occurred which
1783: -- we must report

Line 1785: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');

1781: --
1782: -- An unhandled or unexpected error has occurred which
1783: -- we must report
1784: --
1785: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1786: hr_utility.set_message_token('PROCEDURE', l_proc);
1787: hr_utility.set_message_token('STEP','15');
1788: hr_utility.raise_error;
1789: End dt_delete_validate;

Line 1786: hr_utility.set_message_token('PROCEDURE', l_proc);

1782: -- An unhandled or unexpected error has occurred which
1783: -- we must report
1784: --
1785: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1786: hr_utility.set_message_token('PROCEDURE', l_proc);
1787: hr_utility.set_message_token('STEP','15');
1788: hr_utility.raise_error;
1789: End dt_delete_validate;
1790: --

Line 1787: hr_utility.set_message_token('STEP','15');

1783: -- we must report
1784: --
1785: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1786: hr_utility.set_message_token('PROCEDURE', l_proc);
1787: hr_utility.set_message_token('STEP','15');
1788: hr_utility.raise_error;
1789: End dt_delete_validate;
1790: --
1791: -- ----------------------------------------------------------------------------

Line 1788: hr_utility.raise_error;

1784: --
1785: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1786: hr_utility.set_message_token('PROCEDURE', l_proc);
1787: hr_utility.set_message_token('STEP','15');
1788: hr_utility.raise_error;
1789: End dt_delete_validate;
1790: --
1791: -- ----------------------------------------------------------------------------
1792: -- |---------------------------< insert_validate >----------------------------|

Line 1804: hr_utility.set_location('Entering:'||l_proc, 5);

1800: --
1801: l_proc varchar2(72) := g_package||'insert_validate';
1802: --
1803: Begin
1804: hr_utility.set_location('Entering:'||l_proc, 5);
1805: --
1806: -- Call all supporting business operations. Mapping to the appropriate
1807: -- Business Rules in payppm.bru is provided.
1808: --

Line 1878: hr_utility.set_location(' Leaving:'||l_proc, 10);

1874: -- DF external hook
1875: --
1876: pay_ppm_bus.chk_df(p_rec => p_rec);
1877: --
1878: hr_utility.set_location(' Leaving:'||l_proc, 10);
1879: End insert_validate;
1880: --
1881: -- ----------------------------------------------------------------------------
1882: -- |---------------------------< update_validate >----------------------------|

Line 1894: hr_utility.set_location('Entering:'||l_proc, 5);

1890: --
1891: l_proc varchar2(72) := g_package||'update_validate';
1892: --
1893: Begin
1894: hr_utility.set_location('Entering:'||l_proc, 5);
1895: --
1896: -- Call all supporting business operations. Mapping to the appropriate
1897: -- Business Rules in payppm.bru is provided.
1898: --

Line 1970: hr_utility.set_location(' Leaving:'||l_proc, 10);

1966: p_datetrack_mode => p_datetrack_mode,
1967: p_validation_start_date => p_validation_start_date,
1968: p_validation_end_date => p_validation_end_date);
1969: --
1970: hr_utility.set_location(' Leaving:'||l_proc, 10);
1971: End update_validate;
1972: --
1973: -- ----------------------------------------------------------------------------
1974: -- |---------------------------< delete_validate >----------------------------|

Line 1986: hr_utility.set_location('Entering:'||l_proc, 5);

1982: --
1983: l_proc varchar2(72) := g_package||'delete_validate';
1984: --
1985: Begin
1986: hr_utility.set_location('Entering:'||l_proc, 5);
1987: --
1988: -- Call all supporting business operations. Mapping to the appropriate
1989: -- business rules on paypm.bru is provided
1990: --

Line 2007: hr_utility.set_location(' Leaving:'||l_proc, 10);

2003: p_validation_start_date => p_validation_start_date,
2004: p_validation_end_date => p_validation_end_date,
2005: p_personal_payment_method_id => p_rec.personal_payment_method_id);
2006: --
2007: hr_utility.set_location(' Leaving:'||l_proc, 10);
2008: End delete_validate;
2009: --
2010: -- ---------------------------------------------------------------------------
2011: -- |---------------------< return_legislation_code >-------------------------|

Line 2032: hr_utility.set_location('Entering:'|| l_proc, 10);

2028: --
2029: l_legislation_code varchar2(150);
2030: l_proc varchar2(72) := g_package||'return_legislation_code';
2031: begin
2032: hr_utility.set_location('Entering:'|| l_proc, 10);
2033: --
2034: -- Ensure that all the mandatory parameter are not null
2035: --
2036: hr_api.mandatory_arg_error(p_api_name => l_proc,

Line 2047: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');

2043: close csr_leg_code;
2044: --
2045: -- The primary key is invalid therefore we must error
2046: --
2047: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
2048: hr_utility.raise_error;
2049: end if;
2050: --
2051: close csr_leg_code;

Line 2048: hr_utility.raise_error;

2044: --
2045: -- The primary key is invalid therefore we must error
2046: --
2047: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
2048: hr_utility.raise_error;
2049: end if;
2050: --
2051: close csr_leg_code;
2052: hr_utility.set_location(' Leaving:'|| l_proc, 20);

Line 2052: hr_utility.set_location(' Leaving:'|| l_proc, 20);

2048: hr_utility.raise_error;
2049: end if;
2050: --
2051: close csr_leg_code;
2052: hr_utility.set_location(' Leaving:'|| l_proc, 20);
2053: --
2054: return l_legislation_code;
2055: end return_legislation_code;
2056: --

Line 2067: hr_utility.set_location('Entering:'||l_proc,10);

2063: --
2064: l_proc varchar2(72) := g_package || 'chk_ddf';
2065: --
2066: begin
2067: hr_utility.set_location('Entering:'||l_proc,10);
2068: --
2069: if ((p_rec.personal_payment_method_id is not null) and (
2070: nvl(pay_ppm_shd.g_old_rec.ppm_information_category, hr_api.g_varchar2) <>
2071: nvl(p_rec.ppm_information_category, hr_api.g_varchar2) or

Line 2206: hr_utility.set_location(' Leaving:'||l_proc,20);

2202: ,p_attribute30_value => p_rec.ppm_information30
2203: );
2204: end if;
2205: --
2206: hr_utility.set_location(' Leaving:'||l_proc,20);
2207: end chk_ddf;
2208: --
2209: -- -----------------------------------------------------------------------
2210: -- |------------------------------< chk_df >-----------------------------|

Line 2218: hr_utility.set_location('Entering:'||l_proc, 10);

2214: ) is
2215: l_proc varchar2(2000) := g_package||'chk_df';
2216: l_rec pay_ppm_shd.g_rec_type;
2217: begin
2218: hr_utility.set_location('Entering:'||l_proc, 10);
2219: l_rec := pay_ppm_shd.g_old_rec;
2220: --
2221: -- Only do the validation if inserting or if values have changed on
2222: -- update.

Line 2269: hr_utility.set_location(l_proc, 20);

2265: nvl(p_rec.attribute20, hr_api.g_varchar2) <>
2266: nvl(l_rec.attribute20, hr_api.g_varchar2))) or
2267: p_rec.personal_payment_method_id is null
2268: then
2269: hr_utility.set_location(l_proc, 20);
2270: hr_dflex_utility.ins_or_upd_descflex_attribs
2271: (p_appl_short_name => 'PAY'
2272: ,p_descflex_name => 'PAY_PERSONAL_PAYMENT_METHODS'
2273: ,p_attribute_category => p_rec.attribute_category

Line 2316: hr_utility.set_location('Leaving:'||l_proc, 30);

2312: ,p_attribute20_name => 'ATTRIBUTE20'
2313: ,p_attribute20_value => p_rec.attribute20
2314: );
2315: end if;
2316: hr_utility.set_location('Leaving:'||l_proc, 30);
2317: end chk_df;
2318: --
2319: end pay_ppm_bus;