DBA Data[Home] [Help]

APPS.PAY_MIX_ROLLBACK_PKG dependencies on PAY_MIX_ROLLBACK_PKG

Line 1: PACKAGE BODY pay_mix_rollback_pkg AS

1: PACKAGE BODY pay_mix_rollback_pkg AS
2: /* $Header: pymixrbk.pkb 120.1 2006/11/29 12:29:29 susivasu noship $ */
3: --
4: -- type defs
5: --

Line 240: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix',10);

236: l_entry_exists varchar2(1) := 'N';
237:
238: begin
239:
240: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix',10);
241:
242: --
243: if p_asg_action_id is null then
244: l_payroll_action_id := null;

Line 280: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix',20);

276:
277: begin
278:
279: -- Ensure batch is valid for rollback
280: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix',20);
281:
282: select 'Y'
283: into l_check_batch_id
284: from pay_batch_headers

Line 289: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix',30);

285: where batch_id = p_batch_header_id
286: and batch_status = 'T';
287:
288: -- Get business_group_id
289: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix',30);
290:
291: select business_group_id,
292: nvl(REJECT_ENTRY_NOT_REMOVED,'N'),
293: nvl(ROLLBACK_ENTRY_UPDATES,'N'),

Line 329: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix',40);

325: purge_rollback_messages(p_batch_header_id,'H');
326: end if;
327:
328: if (l_check_batch_id = 'Y') or (l_check_batch_id = 'N' and p_asg_action_id is not null) then
329: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix',40);
330:
331: open c_batch_lines;
332: fetch c_batch_lines into l_batch_line;
333:

Line 668: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix_asg',10);

664: --
665: --
666: begin
667: --
668: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix_asg',10);
669: --
670: open csr_asg_act;
671: fetch csr_asg_act into l_rec;
672: close csr_asg_act;

Line 674: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix_asg',20);

670: open csr_asg_act;
671: fetch csr_asg_act into l_rec;
672: close csr_asg_act;
673: --
674: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix_asg',20);
675: --
676: if l_rec.batch_status = 'T' then
677: --
678: undo_mix(

Line 688: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix_asg',30);

684: p_assignment_id => l_rec.assignment_id,
685: p_asg_action_id => p_asg_action_id
686: );
687: --
688: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix_asg',30);
689: --
690: -- Now check o see if the batch lines have been changed. If so
691: -- then reset the control totals.
692: open csr_reset_control_total(l_rec.batch_id);

Line 697: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix_asg',40);

693: fetch csr_reset_control_total into l_rec_exists;
694: --
695: if csr_reset_control_total%found then
696: --
697: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix_asg',40);
698: --
699: for l_ctl_rec in csr_control_lines(l_rec.batch_id) loop
700: purge_rollback_messages(l_ctl_rec.batch_control_id,'C');
701: end loop;

Line 716: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix_asg',50);

712: close csr_reset_control_total;
713: --
714: end if;
715: --
716: hr_utility.set_location('pay_mix_rollback_pkg.undo_mix_asg',50);
717: --
718: end;
719:
720: --

Line 754: hr_utility.set_location('pay_mix_rollback_pkg.set_status',10);

750: --
751: --
752: begin
753: --
754: hr_utility.set_location('pay_mix_rollback_pkg.set_status',10);
755: --
756: open csr_asg_act;
757: fetch csr_asg_act into l_rec;
758: -- IF batch doesn't exists thenno need to reset the batch status.

Line 766: hr_utility.set_location('pay_mix_rollback_pkg.set_status',20);

762: end if;
763: --
764: close csr_asg_act;
765: --
766: hr_utility.set_location('pay_mix_rollback_pkg.set_status',20);
767: --
768: -- Only purge the batch if the payroll action is purged.
769: if (l_rec.purge_after_rollback = 'Y' and l_rec.BATCH_PROCESS_MODE = 'TRANSFER') then
770: -- Purge the batch regarless of the status of the leave_row flag.

Line 773: hr_utility.set_location('pay_mix_rollback_pkg.set_status',30);

769: if (l_rec.purge_after_rollback = 'Y' and l_rec.BATCH_PROCESS_MODE = 'TRANSFER') then
770: -- Purge the batch regarless of the status of the leave_row flag.
771: -- and p_leave_row = false) then
772: --
773: hr_utility.set_location('pay_mix_rollback_pkg.set_status',30);
774: --
775: -- The user wants the batch to be deleted from the database.
776: payplnk.run_process(l_errbuf,
777: l_retcode,

Line 782: hr_utility.set_location('pay_mix_rollback_pkg.set_status',40);

778: l_rec.business_group_id,
779: 'PURGE',
780: l_rec.batch_id);
781: --
782: hr_utility.set_location('pay_mix_rollback_pkg.set_status',40);
783: --
784: else
785: --
786: hr_utility.set_location('pay_mix_rollback_pkg.set_status',50);

Line 786: hr_utility.set_location('pay_mix_rollback_pkg.set_status',50);

782: hr_utility.set_location('pay_mix_rollback_pkg.set_status',40);
783: --
784: else
785: --
786: hr_utility.set_location('pay_mix_rollback_pkg.set_status',50);
787: -- Change batch header status to 'unprocessed'
788: --
789: purge_rollback_messages(l_rec.batch_id,'H');
790: --

Line 795: hr_utility.set_location('pay_mix_rollback_pkg.set_status',60);

791: update pay_batch_headers
792: set batch_status = 'U'
793: where batch_id = l_rec.batch_id;
794: --
795: hr_utility.set_location('pay_mix_rollback_pkg.set_status',60);
796: --
797: end if;
798: --
799: hr_utility.set_location('pay_mix_rollback_pkg.set_status',70);

Line 799: hr_utility.set_location('pay_mix_rollback_pkg.set_status',70);

795: hr_utility.set_location('pay_mix_rollback_pkg.set_status',60);
796: --
797: end if;
798: --
799: hr_utility.set_location('pay_mix_rollback_pkg.set_status',70);
800: --
801: end;
802:
803:

Line 817: hr_utility.set_location('pay_mix_rollback_pkg.run_results_exist',10);

813:
814: begin
815:
816: begin
817: hr_utility.set_location('pay_mix_rollback_pkg.run_results_exist',10);
818:
819: if p_chk_rollback_upd = 'Y' then
820: select 'Y' into l_results_found
821: from pay_run_results prr,

Line 873: hr_utility.set_location('pay_mix_rollback_pkg.insert_rollback_message',10);

869: l_line_text pay_message_lines.line_text%type;
870: l_payroll_id number;
871:
872: begin
873: hr_utility.set_location('pay_mix_rollback_pkg.insert_rollback_message',10);
874:
875: if p_level = 'H' then -- error occurred at header level
876:
877: l_line_text := substrb(hr_utility.get_message, 1, 240);

Line 913: hr_utility.set_location('pay_mix_rollback_pkg.action_parameter',10);

909: param_value pay_action_parameters.parameter_value%type;
910:
911: begin
912: begin
913: hr_utility.set_location('pay_mix_rollback_pkg.action_parameter',10);
914:
915: -- attempt to find value of the parameter in the action parameter table.
916: select par.parameter_value
917: into param_value

Line 944: hr_utility.set_location('pay_mix_rollback_pkg.commit_messages',10);

940:
941: i number;
942:
943: begin
944: hr_utility.set_location('pay_mix_rollback_pkg.commit_messages',10);
945:
946: for i in 1..g_message_count loop
947: if g_message_tbl(i) is not null and g_message_id_tbl(i) is not null then
948: insert into pay_message_lines(

Line 975: hr_utility.set_location('pay_mix_rollback_pkg.commit_messages',20);

971: --
972: -- commit;
973: --
974:
975: hr_utility.set_location('pay_mix_rollback_pkg.commit_messages',20);
976:
977: end commit_messages;
978:
979: --

Line 986: hr_utility.set_location('pay_mix_rollback_pkg.purge_rollback_messages',10);

982:
983: procedure purge_rollback_messages(p_source_id in number, p_msg_type varchar2) is
984:
985: begin
986: hr_utility.set_location('pay_mix_rollback_pkg.purge_rollback_messages',10);
987:
988: delete from pay_message_lines
989: where source_id = p_source_id
990: and source_type = p_msg_type;

Line 997: end pay_mix_rollback_pkg;

993:
994: end purge_rollback_messages;
995:
996:
997: end pay_mix_rollback_pkg;