127: delete from pay_sub_classification_rules_f
128: where rowid = sub_rowid;
129: End If;
130: if sql%notfound then -- system error trap
131: hr_utility.set_message (801,'HR_6153_ALL_PROCEDURE_FAIL');
132: hr_utility.set_message_token('PROCEDURE',
133: 'PAY_BALANCE_FEED_DEL_PKG.BAL_FEED_MAIN_PROC');
134: hr_utility.set_message_token('STEP','2');
135: hr_utility.raise_error;
128: where rowid = sub_rowid;
129: End If;
130: if sql%notfound then -- system error trap
131: hr_utility.set_message (801,'HR_6153_ALL_PROCEDURE_FAIL');
132: hr_utility.set_message_token('PROCEDURE',
133: 'PAY_BALANCE_FEED_DEL_PKG.BAL_FEED_MAIN_PROC');
134: hr_utility.set_message_token('STEP','2');
135: hr_utility.raise_error;
136: end if;
130: if sql%notfound then -- system error trap
131: hr_utility.set_message (801,'HR_6153_ALL_PROCEDURE_FAIL');
132: hr_utility.set_message_token('PROCEDURE',
133: 'PAY_BALANCE_FEED_DEL_PKG.BAL_FEED_MAIN_PROC');
134: hr_utility.set_message_token('STEP','2');
135: hr_utility.raise_error;
136: end if;
137:
138: delete from hr_application_ownerships
131: hr_utility.set_message (801,'HR_6153_ALL_PROCEDURE_FAIL');
132: hr_utility.set_message_token('PROCEDURE',
133: 'PAY_BALANCE_FEED_DEL_PKG.BAL_FEED_MAIN_PROC');
134: hr_utility.set_message_token('STEP','2');
135: hr_utility.raise_error;
136: end if;
137:
138: delete from hr_application_ownerships
139: where key_name = 'SUB_CLASSIFICATION_RULE_ID'
266: lv_proc_name varchar2(80);
267:
268: --
269: begin
270: g_debug := hr_utility.debug_enabled;
271: lv_proc_name := 'pay_balance_feed_del_pkg.trash_latest_balances_threaded';
272: --
273: if g_debug then
274: hr_utility.set_location(lv_proc_name,10);
270: g_debug := hr_utility.debug_enabled;
271: lv_proc_name := 'pay_balance_feed_del_pkg.trash_latest_balances_threaded';
272: --
273: if g_debug then
274: hr_utility.set_location(lv_proc_name,10);
275: end if;
276:
277: if (g_lat_bal_check_mode is null) then
278: begin
276:
277: if (g_lat_bal_check_mode is null) then
278: begin
279: if g_debug then
280: hr_utility.set_location(lv_proc_name,15);
281: end if;
282: select parameter_value
283: into g_lat_bal_check_mode
284: from pay_action_parameters
300:
301: if HRASSACT.CHECK_RRVS_FIRST = TRUE then
302:
303: if g_debug then
304: hr_utility.set_location(lv_proc_name,20);
305: end if;
306: --
307: -- Check for existance of run result value for input value
308: --
312:
313: if ivchk%FOUND then
314: --
315: if g_debug then
316: hr_utility.set_location(lv_proc_name,30);
317: end if;
318: -- Delete all balance context values and
319: -- person latest balances.
320: for plbcrec in platbalc loop
325: where PLB.latest_balance_id = plbcrec.latest_balance_id;
326: end loop;
327:
328: if g_debug then
329: hr_utility.set_location(lv_proc_name,40);
330: end if;
331: -- Delete all balance context values and
332: -- assignment latest balances.
333:
360:
361: elsif HRASSACT.CHECK_LAT_BALS_FIRST = TRUE then
362:
363: if g_debug then
364: hr_utility.set_location(lv_proc_name,50);
365: end if;
366: --
367: -- Check for any latest balances before relevant run result value
368: --
391: end if;
392: end loop;
393: --
394: if g_debug then
395: hr_utility.set_location(lv_proc_name,60);
396: end if;
397: -- Delete all balance context values and
398: -- assignment latest balances.
399: if l_rrv_found <> 0 then
446: --
447: -- Original Code
448: --
449: if g_debug then
450: hr_utility.set_location(lv_proc_name,70);
451: end if;
452: -- Delete all balance context values and
453: -- person latest balances.
454: for plbcrec in plbc loop
459: where PLB.latest_balance_id = plbcrec.latest_balance_id;
460: end loop;
461: --
462: if g_debug then
463: hr_utility.set_location(lv_proc_name,80);
464: end if;
465: -- Delete all balance context values and
466: -- assignment latest balances.
467:
473: X_batch_size => l_batch_size);
474:
475: --
476: if g_debug then
477: hr_utility.set_location(lv_proc_name,70);
478: end if;
479: --
480: for lbcrec in lbc loop
481: delete from pay_latest_balances ALB
484: --
485: end if;
486: --
487: if g_debug then
488: hr_utility.set_location(lv_proc_name,90);
489: end if;
490: --
491: for plrec in pl_feed_chk loop
492: --
490: --
491: for plrec in pl_feed_chk loop
492: --
493: if g_debug then
494: hr_utility.set_location(lv_proc_name,100);
495: end if;
496:
497: delete from pay_balance_context_values BCV
498: where BCV.latest_balance_id = plrec.latest_balance_id;
516: --
517: end if;
518: --
519: if g_debug then
520: hr_utility.set_location(lv_proc_name,110);
521: end if;
522: --
523: return;
524: --