372: rundate DATE := hr_api.g_eot;
373: paydate DATE := hr_api.g_eot;
374:
375: -- Holders for results from the interpreter package
376: l_de_det_tab_out pay_interpreter_pkg.t_detailed_output_table_type;
377: l_de_date_out pay_interpreter_pkg.t_proration_dates_table_type;
378: l_de_chge_out pay_interpreter_pkg.t_proration_type_table_type;
379: l_de_type_out pay_interpreter_pkg.t_proration_type_table_type;
380:
373: paydate DATE := hr_api.g_eot;
374:
375: -- Holders for results from the interpreter package
376: l_de_det_tab_out pay_interpreter_pkg.t_detailed_output_table_type;
377: l_de_date_out pay_interpreter_pkg.t_proration_dates_table_type;
378: l_de_chge_out pay_interpreter_pkg.t_proration_type_table_type;
379: l_de_type_out pay_interpreter_pkg.t_proration_type_table_type;
380:
381: l_dp_det_tab_out pay_interpreter_pkg.t_detailed_output_table_type;
374:
375: -- Holders for results from the interpreter package
376: l_de_det_tab_out pay_interpreter_pkg.t_detailed_output_table_type;
377: l_de_date_out pay_interpreter_pkg.t_proration_dates_table_type;
378: l_de_chge_out pay_interpreter_pkg.t_proration_type_table_type;
379: l_de_type_out pay_interpreter_pkg.t_proration_type_table_type;
380:
381: l_dp_det_tab_out pay_interpreter_pkg.t_detailed_output_table_type;
382: l_dp_date_out pay_interpreter_pkg.t_proration_dates_table_type;
375: -- Holders for results from the interpreter package
376: l_de_det_tab_out pay_interpreter_pkg.t_detailed_output_table_type;
377: l_de_date_out pay_interpreter_pkg.t_proration_dates_table_type;
378: l_de_chge_out pay_interpreter_pkg.t_proration_type_table_type;
379: l_de_type_out pay_interpreter_pkg.t_proration_type_table_type;
380:
381: l_dp_det_tab_out pay_interpreter_pkg.t_detailed_output_table_type;
382: l_dp_date_out pay_interpreter_pkg.t_proration_dates_table_type;
383: l_dp_chge_out pay_interpreter_pkg.t_proration_type_table_type;
377: l_de_date_out pay_interpreter_pkg.t_proration_dates_table_type;
378: l_de_chge_out pay_interpreter_pkg.t_proration_type_table_type;
379: l_de_type_out pay_interpreter_pkg.t_proration_type_table_type;
380:
381: l_dp_det_tab_out pay_interpreter_pkg.t_detailed_output_table_type;
382: l_dp_date_out pay_interpreter_pkg.t_proration_dates_table_type;
383: l_dp_chge_out pay_interpreter_pkg.t_proration_type_table_type;
384: l_dp_type_out pay_interpreter_pkg.t_proration_type_table_type;
385:
378: l_de_chge_out pay_interpreter_pkg.t_proration_type_table_type;
379: l_de_type_out pay_interpreter_pkg.t_proration_type_table_type;
380:
381: l_dp_det_tab_out pay_interpreter_pkg.t_detailed_output_table_type;
382: l_dp_date_out pay_interpreter_pkg.t_proration_dates_table_type;
383: l_dp_chge_out pay_interpreter_pkg.t_proration_type_table_type;
384: l_dp_type_out pay_interpreter_pkg.t_proration_type_table_type;
385:
386: l_proc varchar2(80) := g_pkg||'.archive_data';
379: l_de_type_out pay_interpreter_pkg.t_proration_type_table_type;
380:
381: l_dp_det_tab_out pay_interpreter_pkg.t_detailed_output_table_type;
382: l_dp_date_out pay_interpreter_pkg.t_proration_dates_table_type;
383: l_dp_chge_out pay_interpreter_pkg.t_proration_type_table_type;
384: l_dp_type_out pay_interpreter_pkg.t_proration_type_table_type;
385:
386: l_proc varchar2(80) := g_pkg||'.archive_data';
387: BEGIN
380:
381: l_dp_det_tab_out pay_interpreter_pkg.t_detailed_output_table_type;
382: l_dp_date_out pay_interpreter_pkg.t_proration_dates_table_type;
383: l_dp_chge_out pay_interpreter_pkg.t_proration_type_table_type;
384: l_dp_type_out pay_interpreter_pkg.t_proration_type_table_type;
385:
386: l_proc varchar2(80) := g_pkg||'.archive_data';
387: BEGIN
388: hr_utility.set_location(' Entering: '||l_proc,10);
443: -->>> PHASE 3a: Call Interpreter in DATE_EARNED mode
444: --
445: -- CC mark for retry requires the min date for an events with DATE_EARNED
446: -- So get all such events and find minimum
447: pay_interpreter_pkg.entry_affected(
448: p_element_entry_id => l_ele_rec.entry
449: , p_assignment_action_id => null
450: , p_assignment_id => l_assignment_id
451: , p_mode => 'DATE_EARNED'
480: -->>> PHASE 3b: Call Interpreter in DATE_PROCESSED mode
481: --
482: -- CC mark for retry also requires the min date for an events with DATE_PROCESSED
483: -- So get all such events and find minimum
484: pay_interpreter_pkg.entry_affected(
485: p_element_entry_id => l_ele_rec.entry
486: , p_assignment_action_id => null
487: , p_assignment_id => l_assignment_id
488: , p_mode => 'DATE_PROCESSED'
2001:
2002: while (get_group_events%notfound = FALSE
2003: and l_update_cc_date = TRUE) loop
2004:
2005: l_grp_event_valid := pay_interpreter_pkg.valid_group_event_for_asg(l_table_name,
2006: p_asg_id,
2007: l_surrogate_key);
2008:
2009: if l_grp_event_valid = 'Y' then