625: is
626: rr_id number;
627: begin
628: --
629: select pay_run_results_s.nextval
630: into rr_id
631: from sys.dual;
632: --
633: p_rr_id_list := rr_id;
1672: cursor c_procsep (p_aa_id number,
1673: p_eff_date date)
1674: is
1675: select prr.source_id
1676: from pay_run_results prr,
1677: pay_element_types_f pet
1678: where prr.assignment_action_id = p_aa_id
1679: and prr.source_type = 'E'
1680: and prr.element_type_id = pet.element_type_id
1691: 2);
1692: --
1693: l_run_meth pay_run_types_f.run_method%type;
1694: l_eff_date pay_payroll_actions.effective_date%type;
1695: l_ee_id pay_run_results.source_id%type;
1696: --
1697: begin
1698: --
1699: select nvl(prt.run_method, 'N'),