[Home] [Help]
24: g_pact t_pact;
25: -----------------------------------------------------
26: -- record type to hold archival information
27: -----------------------------------------------------
28: rec_action_info pay_action_information%rowtype ;
29: -----------------------------------------------------
30: -- Table to store Defined Balance details
31: -----------------------------------------------------
32: type t_def_bal_id is table of pay_defined_balances.defined_balance_id%type ;
231: g_context_tab pay_balance_pkg.t_context_tab;
232: g_detailed_bal_out_tab pay_balance_pkg.t_detailed_bal_out_tab;
233: --
234: l_asg_act_id pay_assignment_actions.assignment_action_id%type;
235: l_action_info_id pay_action_information.action_information_id%type;
236: l_ovn pay_action_information.object_version_number%type;
237: l_person_id per_all_people_f.person_id%type;
238: l_fwl_amt number;
239: l_spl_amt number; /* Bug: 3595103 */
232: g_detailed_bal_out_tab pay_balance_pkg.t_detailed_bal_out_tab;
233: --
234: l_asg_act_id pay_assignment_actions.assignment_action_id%type;
235: l_action_info_id pay_action_information.action_information_id%type;
236: l_ovn pay_action_information.object_version_number%type;
237: l_person_id per_all_people_f.person_id%type;
238: l_fwl_amt number;
239: l_spl_amt number; /* Bug: 3595103 */
240:
417: l_spl_amt := g_detailed_bal_out_tab(14).balance_value; -- S Pass Liability
418: rec_action_info.action_information16 := l_fwl_amt + l_spl_amt ;
419:
420: ------------------------------------------------
421: -- Insert data into pay_action_information
422: ------------------------------------------------
423: if g_debug then
424: hr_utility.set_location(l_proc_name||' Before Insert into pay_action_information',40);
425: end if;
420: ------------------------------------------------
421: -- Insert data into pay_action_information
422: ------------------------------------------------
423: if g_debug then
424: hr_utility.set_location(l_proc_name||' Before Insert into pay_action_information',40);
425: end if;
426: insert into pay_action_information (
427: action_information_id,
428: action_context_id,
422: ------------------------------------------------
423: if g_debug then
424: hr_utility.set_location(l_proc_name||' Before Insert into pay_action_information',40);
425: end if;
426: insert into pay_action_information (
427: action_information_id,
428: action_context_id,
429: action_context_type,
430: effective_date,
456: action_information23,
457: action_information24,
458: action_information25)
459: values (
460: pay_action_information_s.nextval,
461: p_assignment_action_id,
462: 'AAC',
463: fnd_date.canonical_to_date(rec_action_info.action_information20),
464: l_person_id,
489: rec_action_info.action_information23,
490: rec_action_info.action_information24,
491: rec_action_info.action_information25) ;
492: if g_debug then
493: hr_utility.set_location(l_proc_name||' After Insert into pay_action_information',40);
494: end if;
495: --
496: if g_debug then
497: hr_utility.set_location(l_proc_name||' End of archive_code',40);
498: end if;
499: end archive_code ;
500: ---------------------------------
501: -- Deinitialization_code
502: -- Removes data from pay_action_information
503: -- table based on parameter value
504: -- Bug: 3619297 - Added check on action_context_type
505: ---------------------------------
506: procedure deinit_code
514: from pay_payroll_actions ppa
515: where ppa.payroll_action_id = p_payroll_action_id ;
516: --
517: if retain_archive_flag = 'N' then
518: delete from pay_action_information
519: where action_context_id in ( select assignment_action_id
520: from pay_assignment_actions
521: where payroll_action_id = p_payroll_action_id )
522: and action_information_category = 'SG CPF DETAILS'