1789: -- Cursor to get the next pay period
1790: --
1791: cursor csr_pay_period is
1792: select ptp.start_date 1793: from per_time_periods ptp 1794: where ptp.payroll_id = l_copy_payroll_id
1795: and ptp.start_date > l_effective_date;
1796: --
1797: BEGIN