DBA Data[Home] [Help]

APPS.PAY_ZA_IRP5_IT3A_XMLP_PKG dependencies on HR_UTILITY

Line 323: -- hr_utility.trace_on(null,'ZACERT');

319: l_current_period varchar2(2);
320:
321: BEGIN
322:
323: -- hr_utility.trace_on(null,'ZACERT');
324: ----
325: -- updating certificate numbers
326: ----
327:

Line 464: hr_utility.set_location('P_DUMMY_RUN='||P_DUMMY_RUN,10);

460: close csr_paye_ref;
461:
462: set_periods (p_period, P_TAX_YEAR);
463:
464: hr_utility.set_location('P_DUMMY_RUN='||P_DUMMY_RUN,10);
465: hr_utility.set_location('P_REISSUE_IRP5='||P_REISSUE_IRP5,10);
466: hr_utility.set_location('l_paye_ref_num='||l_paye_ref_num,10);
467: hr_utility.set_location('P_TAX_YEAR='||P_TAX_YEAR,10);
468: hr_utility.set_location('P_BUSINESS_GROUP_ID='||P_BUSINESS_GROUP_ID,10);

Line 465: hr_utility.set_location('P_REISSUE_IRP5='||P_REISSUE_IRP5,10);

461:
462: set_periods (p_period, P_TAX_YEAR);
463:
464: hr_utility.set_location('P_DUMMY_RUN='||P_DUMMY_RUN,10);
465: hr_utility.set_location('P_REISSUE_IRP5='||P_REISSUE_IRP5,10);
466: hr_utility.set_location('l_paye_ref_num='||l_paye_ref_num,10);
467: hr_utility.set_location('P_TAX_YEAR='||P_TAX_YEAR,10);
468: hr_utility.set_location('P_BUSINESS_GROUP_ID='||P_BUSINESS_GROUP_ID,10);
469: hr_utility.set_location('P_SORT_ORDER1='||P_SORT_ORDER1,10);

Line 466: hr_utility.set_location('l_paye_ref_num='||l_paye_ref_num,10);

462: set_periods (p_period, P_TAX_YEAR);
463:
464: hr_utility.set_location('P_DUMMY_RUN='||P_DUMMY_RUN,10);
465: hr_utility.set_location('P_REISSUE_IRP5='||P_REISSUE_IRP5,10);
466: hr_utility.set_location('l_paye_ref_num='||l_paye_ref_num,10);
467: hr_utility.set_location('P_TAX_YEAR='||P_TAX_YEAR,10);
468: hr_utility.set_location('P_BUSINESS_GROUP_ID='||P_BUSINESS_GROUP_ID,10);
469: hr_utility.set_location('P_SORT_ORDER1='||P_SORT_ORDER1,10);
470: hr_utility.set_location('P_PAYROLL_ACTION_ID='||P_PAYROLL_ACTION_ID,10);

Line 467: hr_utility.set_location('P_TAX_YEAR='||P_TAX_YEAR,10);

463:
464: hr_utility.set_location('P_DUMMY_RUN='||P_DUMMY_RUN,10);
465: hr_utility.set_location('P_REISSUE_IRP5='||P_REISSUE_IRP5,10);
466: hr_utility.set_location('l_paye_ref_num='||l_paye_ref_num,10);
467: hr_utility.set_location('P_TAX_YEAR='||P_TAX_YEAR,10);
468: hr_utility.set_location('P_BUSINESS_GROUP_ID='||P_BUSINESS_GROUP_ID,10);
469: hr_utility.set_location('P_SORT_ORDER1='||P_SORT_ORDER1,10);
470: hr_utility.set_location('P_PAYROLL_ACTION_ID='||P_PAYROLL_ACTION_ID,10);
471: hr_utility.set_location('P_CERTIFICATE_TYPE='||P_CERTIFICATE_TYPE,10);

Line 468: hr_utility.set_location('P_BUSINESS_GROUP_ID='||P_BUSINESS_GROUP_ID,10);

464: hr_utility.set_location('P_DUMMY_RUN='||P_DUMMY_RUN,10);
465: hr_utility.set_location('P_REISSUE_IRP5='||P_REISSUE_IRP5,10);
466: hr_utility.set_location('l_paye_ref_num='||l_paye_ref_num,10);
467: hr_utility.set_location('P_TAX_YEAR='||P_TAX_YEAR,10);
468: hr_utility.set_location('P_BUSINESS_GROUP_ID='||P_BUSINESS_GROUP_ID,10);
469: hr_utility.set_location('P_SORT_ORDER1='||P_SORT_ORDER1,10);
470: hr_utility.set_location('P_PAYROLL_ACTION_ID='||P_PAYROLL_ACTION_ID,10);
471: hr_utility.set_location('P_CERTIFICATE_TYPE='||P_CERTIFICATE_TYPE,10);
472: hr_utility.set_location('P_ASSIGNMENT_NO='||P_ASSIGNMENT_NO,10);

Line 469: hr_utility.set_location('P_SORT_ORDER1='||P_SORT_ORDER1,10);

465: hr_utility.set_location('P_REISSUE_IRP5='||P_REISSUE_IRP5,10);
466: hr_utility.set_location('l_paye_ref_num='||l_paye_ref_num,10);
467: hr_utility.set_location('P_TAX_YEAR='||P_TAX_YEAR,10);
468: hr_utility.set_location('P_BUSINESS_GROUP_ID='||P_BUSINESS_GROUP_ID,10);
469: hr_utility.set_location('P_SORT_ORDER1='||P_SORT_ORDER1,10);
470: hr_utility.set_location('P_PAYROLL_ACTION_ID='||P_PAYROLL_ACTION_ID,10);
471: hr_utility.set_location('P_CERTIFICATE_TYPE='||P_CERTIFICATE_TYPE,10);
472: hr_utility.set_location('P_ASSIGNMENT_NO='||P_ASSIGNMENT_NO,10);
473: hr_utility.trace('SORT_ORDER='||C_SORT_ORDER);

Line 470: hr_utility.set_location('P_PAYROLL_ACTION_ID='||P_PAYROLL_ACTION_ID,10);

466: hr_utility.set_location('l_paye_ref_num='||l_paye_ref_num,10);
467: hr_utility.set_location('P_TAX_YEAR='||P_TAX_YEAR,10);
468: hr_utility.set_location('P_BUSINESS_GROUP_ID='||P_BUSINESS_GROUP_ID,10);
469: hr_utility.set_location('P_SORT_ORDER1='||P_SORT_ORDER1,10);
470: hr_utility.set_location('P_PAYROLL_ACTION_ID='||P_PAYROLL_ACTION_ID,10);
471: hr_utility.set_location('P_CERTIFICATE_TYPE='||P_CERTIFICATE_TYPE,10);
472: hr_utility.set_location('P_ASSIGNMENT_NO='||P_ASSIGNMENT_NO,10);
473: hr_utility.trace('SORT_ORDER='||C_SORT_ORDER);
474:

Line 471: hr_utility.set_location('P_CERTIFICATE_TYPE='||P_CERTIFICATE_TYPE,10);

467: hr_utility.set_location('P_TAX_YEAR='||P_TAX_YEAR,10);
468: hr_utility.set_location('P_BUSINESS_GROUP_ID='||P_BUSINESS_GROUP_ID,10);
469: hr_utility.set_location('P_SORT_ORDER1='||P_SORT_ORDER1,10);
470: hr_utility.set_location('P_PAYROLL_ACTION_ID='||P_PAYROLL_ACTION_ID,10);
471: hr_utility.set_location('P_CERTIFICATE_TYPE='||P_CERTIFICATE_TYPE,10);
472: hr_utility.set_location('P_ASSIGNMENT_NO='||P_ASSIGNMENT_NO,10);
473: hr_utility.trace('SORT_ORDER='||C_SORT_ORDER);
474:
475: l_prev_asg_id := null;

Line 472: hr_utility.set_location('P_ASSIGNMENT_NO='||P_ASSIGNMENT_NO,10);

468: hr_utility.set_location('P_BUSINESS_GROUP_ID='||P_BUSINESS_GROUP_ID,10);
469: hr_utility.set_location('P_SORT_ORDER1='||P_SORT_ORDER1,10);
470: hr_utility.set_location('P_PAYROLL_ACTION_ID='||P_PAYROLL_ACTION_ID,10);
471: hr_utility.set_location('P_CERTIFICATE_TYPE='||P_CERTIFICATE_TYPE,10);
472: hr_utility.set_location('P_ASSIGNMENT_NO='||P_ASSIGNMENT_NO,10);
473: hr_utility.trace('SORT_ORDER='||C_SORT_ORDER);
474:
475: l_prev_asg_id := null;
476:

Line 473: hr_utility.trace('SORT_ORDER='||C_SORT_ORDER);

469: hr_utility.set_location('P_SORT_ORDER1='||P_SORT_ORDER1,10);
470: hr_utility.set_location('P_PAYROLL_ACTION_ID='||P_PAYROLL_ACTION_ID,10);
471: hr_utility.set_location('P_CERTIFICATE_TYPE='||P_CERTIFICATE_TYPE,10);
472: hr_utility.set_location('P_ASSIGNMENT_NO='||P_ASSIGNMENT_NO,10);
473: hr_utility.trace('SORT_ORDER='||C_SORT_ORDER);
474:
475: l_prev_asg_id := null;
476:
477: -- Fetch certificates

Line 497: hr_utility.trace('Assignment_id :'||l_asg_id);

493: -- Serial Number(digit 23-30 )
494: --
495:
496: l_asg_id := l_employee_info.assignment_id;
497: hr_utility.trace('Assignment_id :'||l_asg_id);
498:
499: select action_information12
500: into l_terminated_bef_sep
501: from pay_action_information

Line 518: hr_utility.set_location(l_proc_name, 20);

514: -- for the previous assignment to mark all previous (not generated by this
515: -- payroll action) certificates of that assignment for the current period
516: -- as 'Old'
517: IF l_prev_asg_id IS NOT NULL AND l_prev_asg_id <> l_asg_id THEN
518: hr_utility.set_location(l_proc_name, 20);
519: mark_all_prev_cert_old (l_archive_pact, l_prev_asg_id, l_paye_ref_num, l_current_period);
520: END if;
521:
522: l_new_cert_num := null;

Line 525: hr_utility.set_location(l_proc_name, 30);

521:
522: l_new_cert_num := null;
523: if P_DUMMY_RUN = 'Y' then
524: -- For dummy run, do not generate/return certificate number
525: hr_utility.set_location(l_proc_name, 30);
526: l_new_cert_num := NULL;
527: else
528:
529: hr_utility.set_location(l_proc_name, 40);

Line 529: hr_utility.set_location(l_proc_name, 40);

525: hr_utility.set_location(l_proc_name, 30);
526: l_new_cert_num := NULL;
527: else
528:
529: hr_utility.set_location(l_proc_name, 40);
530: if l_employee_info.CERTIFICATE_NUMBER is not null then
531: -- Certificate Number has already been generated for this certificate
532: -- Return same certificate number
533: hr_utility.set_location(l_proc_name, 50);

Line 533: hr_utility.set_location(l_proc_name, 50);

529: hr_utility.set_location(l_proc_name, 40);
530: if l_employee_info.CERTIFICATE_NUMBER is not null then
531: -- Certificate Number has already been generated for this certificate
532: -- Return same certificate number
533: hr_utility.set_location(l_proc_name, 50);
534: l_new_cert_num := l_employee_info.CERTIFICATE_NUMBER;
535:
536: else
537: -- Generate certificate number

Line 538: hr_utility.set_location(l_proc_name, 60);

534: l_new_cert_num := l_employee_info.CERTIFICATE_NUMBER;
535:
536: else
537: -- Generate certificate number
538: hr_utility.set_location(l_proc_name, 60);
539:
540: -- Get Payroll IRP5 Number for this assignment
541: select least(g_effective_date,max(effective_end_date))
542: into l_effective_date

Line 553: hr_utility.trace('l_effective_date :'||l_effective_date);

549: where assignment_id = l_asg_id
550: and l_effective_date between effective_start_date and effective_end_date ;
551:
552: l_payroll_ref := get_payroll_ref(l_payroll_id);
553: hr_utility.trace('l_effective_date :'||l_effective_date);
554: hr_utility.trace('l_payroll_id :'||l_payroll_id);
555: hr_utility.trace('l_payroll_ref :'||l_payroll_ref);
556:
557: -- REISSUE means "Reissue new certificate numbers"

Line 554: hr_utility.trace('l_payroll_id :'||l_payroll_id);

550: and l_effective_date between effective_start_date and effective_end_date ;
551:
552: l_payroll_ref := get_payroll_ref(l_payroll_id);
553: hr_utility.trace('l_effective_date :'||l_effective_date);
554: hr_utility.trace('l_payroll_id :'||l_payroll_id);
555: hr_utility.trace('l_payroll_ref :'||l_payroll_ref);
556:
557: -- REISSUE means "Reissue new certificate numbers"
558: -- If "No" then

Line 555: hr_utility.trace('l_payroll_ref :'||l_payroll_ref);

551:
552: l_payroll_ref := get_payroll_ref(l_payroll_id);
553: hr_utility.trace('l_effective_date :'||l_effective_date);
554: hr_utility.trace('l_payroll_id :'||l_payroll_id);
555: hr_utility.trace('l_payroll_ref :'||l_payroll_ref);
556:
557: -- REISSUE means "Reissue new certificate numbers"
558: -- If "No" then
559: -- 1) Get any active (not 'Old') certificate for the assignment for

Line 577: hr_utility.set_location(l_proc_name, 70);

573: -- use the same mechanism as in Step 3 above to create new certificate
574: -- number.
575: if P_REISSUE_IRP5 = 'N' then
576:
577: hr_utility.set_location(l_proc_name, 70);
578: -- Pick up certificate type (MAIN / LMPSM) of this current certificate
579: select action_information26
580: into l_cert_type
581: from pay_action_information

Line 589: hr_utility.trace('l_cert_type :'||l_cert_type);

585: and action_information30 = l_employee_info.TEMP_CERTIFICATE_NUMBER;
586:
587: l_directive_num := l_employee_info.DIRECTIVE_NUMBER1;
588:
589: hr_utility.trace('l_cert_type :'||l_cert_type);
590: hr_utility.trace('l_directive_num :'||l_directive_num);
591:
592: -- check for the active(non-old) certificate issued for this assignment in this period
593: l_last_cert_num := get_prev_cert_num (l_archive_pact, l_paye_ref_num, P_TAX_YEAR, l_asg_id, l_current_period, l_cert_type, l_directive_num);

Line 590: hr_utility.trace('l_directive_num :'||l_directive_num);

586:
587: l_directive_num := l_employee_info.DIRECTIVE_NUMBER1;
588:
589: hr_utility.trace('l_cert_type :'||l_cert_type);
590: hr_utility.trace('l_directive_num :'||l_directive_num);
591:
592: -- check for the active(non-old) certificate issued for this assignment in this period
593: l_last_cert_num := get_prev_cert_num (l_archive_pact, l_paye_ref_num, P_TAX_YEAR, l_asg_id, l_current_period, l_cert_type, l_directive_num);
594: l_new_cert_num := l_last_cert_num;

Line 598: hr_utility.set_location(l_proc_name, 80);

594: l_new_cert_num := l_last_cert_num;
595:
596: -- if no certificate issued in this period
597: if l_new_cert_num is null then
598: hr_utility.set_location(l_proc_name, 80);
599: if g_previous_period is not null then
600: -- check for the last(non-old) certificate issued for this assignment in previous period
601: -- and use the same certificate number (after replacing period_id)
602: hr_utility.set_location(l_proc_name, 90);

Line 602: hr_utility.set_location(l_proc_name, 90);

598: hr_utility.set_location(l_proc_name, 80);
599: if g_previous_period is not null then
600: -- check for the last(non-old) certificate issued for this assignment in previous period
601: -- and use the same certificate number (after replacing period_id)
602: hr_utility.set_location(l_proc_name, 90);
603: l_last_cert_num := get_prev_cert_num (l_archive_pact, l_paye_ref_num, P_TAX_YEAR, l_asg_id, g_previous_period, l_cert_type, l_directive_num);
604: if l_last_cert_num is not null then
605: hr_utility.set_location(l_proc_name, 100);
606: l_new_cert_num := substr(l_last_cert_num, 1,14) || l_current_period || SUBSTR(l_last_cert_num,17,14);

Line 605: hr_utility.set_location(l_proc_name, 100);

601: -- and use the same certificate number (after replacing period_id)
602: hr_utility.set_location(l_proc_name, 90);
603: l_last_cert_num := get_prev_cert_num (l_archive_pact, l_paye_ref_num, P_TAX_YEAR, l_asg_id, g_previous_period, l_cert_type, l_directive_num);
604: if l_last_cert_num is not null then
605: hr_utility.set_location(l_proc_name, 100);
606: l_new_cert_num := substr(l_last_cert_num, 1,14) || l_current_period || SUBSTR(l_last_cert_num,17,14);
607: end if;
608: end if;
609: end if;

Line 613: hr_utility.set_location(l_proc_name, 110);

609: end if;
610:
611: -- if no certificate issued in current or previous period
612: -- then issue a new certificate number
613: hr_utility.set_location(l_proc_name, 110);
614: if l_new_cert_num is null then
615: hr_utility.set_location(l_proc_name, 120);
616: l_new_serial_num := get_new_serial_num(l_paye_ref_num, P_TAX_YEAR, l_payroll_ref);
617: l_new_cert_num := l_paye_ref_num || P_TAX_YEAR || l_current_period || l_payroll_ref || l_new_serial_num;

Line 615: hr_utility.set_location(l_proc_name, 120);

611: -- if no certificate issued in current or previous period
612: -- then issue a new certificate number
613: hr_utility.set_location(l_proc_name, 110);
614: if l_new_cert_num is null then
615: hr_utility.set_location(l_proc_name, 120);
616: l_new_serial_num := get_new_serial_num(l_paye_ref_num, P_TAX_YEAR, l_payroll_ref);
617: l_new_cert_num := l_paye_ref_num || P_TAX_YEAR || l_current_period || l_payroll_ref || l_new_serial_num;
618: end if;
619:

Line 622: hr_utility.set_location(l_proc_name, 130);

618: end if;
619:
620: else -- P_REISSUE_IRP5 = 'Y'
621: -- issue a new certificate number
622: hr_utility.set_location(l_proc_name, 130);
623: hr_utility.trace('l_payroll_ref :'||l_payroll_ref);
624: l_new_serial_num := get_new_serial_num(l_paye_ref_num, P_TAX_YEAR, l_payroll_ref);
625: l_new_cert_num := l_paye_ref_num || P_TAX_YEAR || l_current_period || l_payroll_ref || l_new_serial_num;
626: end if;

Line 623: hr_utility.trace('l_payroll_ref :'||l_payroll_ref);

619:
620: else -- P_REISSUE_IRP5 = 'Y'
621: -- issue a new certificate number
622: hr_utility.set_location(l_proc_name, 130);
623: hr_utility.trace('l_payroll_ref :'||l_payroll_ref);
624: l_new_serial_num := get_new_serial_num(l_paye_ref_num, P_TAX_YEAR, l_payroll_ref);
625: l_new_cert_num := l_paye_ref_num || P_TAX_YEAR || l_current_period || l_payroll_ref || l_new_serial_num;
626: end if;
627:

Line 628: hr_utility.set_location(l_proc_name, 140);

624: l_new_serial_num := get_new_serial_num(l_paye_ref_num, P_TAX_YEAR, l_payroll_ref);
625: l_new_cert_num := l_paye_ref_num || P_TAX_YEAR || l_current_period || l_payroll_ref || l_new_serial_num;
626: end if;
627:
628: hr_utility.set_location(l_proc_name, 140);
629: -- Update all archive records for this certificate with new certificate number
630: update pay_action_information
631: set action_information1 = l_new_cert_num
632: where action_context_type = 'AAP'

Line 637: hr_utility.set_location(l_proc_name, 150);

633: and action_context_id = l_employee_info.p_archive_assacct
634: and action_information30 = l_employee_info.TEMP_CERTIFICATE_NUMBER;
635: end if; -- closing if l_employee_info.CERTIFICATE_NUMBER is not null
636:
637: hr_utility.set_location(l_proc_name, 150);
638:
639: end if; -- closing if P_DUMMY_RUN = 'Y'
640: l_prev_asg_id := l_asg_id ;
641: hr_utility.set_location('Certificate Number : '||l_new_cert_num, 13);

Line 641: hr_utility.set_location('Certificate Number : '||l_new_cert_num, 13);

637: hr_utility.set_location(l_proc_name, 150);
638:
639: end if; -- closing if P_DUMMY_RUN = 'Y'
640: l_prev_asg_id := l_asg_id ;
641: hr_utility.set_location('Certificate Number : '||l_new_cert_num, 13);
642:
643: END LOOP;
644:
645: hr_utility.set_location(l_proc_name, 160);

Line 645: hr_utility.set_location(l_proc_name, 160);

641: hr_utility.set_location('Certificate Number : '||l_new_cert_num, 13);
642:
643: END LOOP;
644:
645: hr_utility.set_location(l_proc_name, 160);
646:
647: -- mark all previous certificates of the last assignment for current period as Old
648: if P_DUMMY_RUN <> 'Y' then
649: hr_utility.set_location(l_proc_name, 170);

Line 649: hr_utility.set_location(l_proc_name, 170);

645: hr_utility.set_location(l_proc_name, 160);
646:
647: -- mark all previous certificates of the last assignment for current period as Old
648: if P_DUMMY_RUN <> 'Y' then
649: hr_utility.set_location(l_proc_name, 170);
650: mark_all_prev_cert_old (l_archive_pact, l_asg_id, l_paye_ref_num, l_current_period);
651: end if;
652:
653: