[Home] [Help]
112: 70.30 02-NOV-95 nbristow Corrected cursors in
113: delete_bal_load_struct and balance
114: transfers are rolled back.
115: 70.31 06-NOV-95 nbristow delete_bal_load_struct now deletes from
116: pay_message_lines rather that doing a
117: full rollback of the batch upload.
118: 70.32 17-JAN-96 nbristow Now deleting from per_pay_bases,
119: pay_freq_rule_periods,
120: pay_ele_freq_rules and
421: FOR pbhrec IN pbh LOOP
422: if (pbhrec.batch_status in ('E', 'P', 'V')) then
423: hr_utility.set_location('hr_delete.delete_bal_load_struct',30);
424: FOR pblrec IN pbl (pbhrec.batch_id) LOOP
425: DELETE FROM pay_message_lines
426: WHERE source_id = pblrec.batch_line_id
427: AND source_type = 'L';
428: END LOOP;
429: --
426: WHERE source_id = pblrec.batch_line_id
427: AND source_type = 'L';
428: END LOOP;
429: --
430: DELETE FROM pay_message_lines
431: WHERE source_id = pbhrec.batch_id
432: AND source_type = 'H';
433: end if;
434: DELETE FROM pay_balance_batch_lines bl
1790: cursor csr_get_mess_lines
1791: (c_business_group_id pay_payrolls_f.business_group_id%TYPE)
1792: is
1793: SELECT null
1794: FROM PAY_MESSAGE_LINES
1795: WHERE source_id = c_business_group_id
1796: and source_type = 'B';
1797: --
1798: cursor csr_batch_header (p_bg_id number)
1855: open csr_get_mess_lines(p_business_group_id);
1856: fetch csr_get_mess_lines into l_exists;
1857: if csr_get_mess_lines%found then
1858: --
1859: DELETE FROM pay_message_lines ml
1860: WHERE ml.source_type = 'B'
1861: AND ml.source_id = p_business_group_id;
1862: --
1863: end if;