45: l_package varchar2(80) := g_package||'.write_params';
46: --
47: begin
48: --
49: hr_utility.set_location ('Entering '||l_package,10);
50: --
51: fnd_file.put_line
52: (which => fnd_file.log,
53: buff => 'Runtime Parameters');
67: fnd_file.put_line
68: (which => fnd_file.log,
69: buff => 'Effective Date : '||to_char(p_effective_date,'DD/MM/YYYY'));
70: --
71: hr_utility.set_location ('Leaving '||l_package,10);
72: --
73: exception
74: --
75: when others then
95: l_package varchar2(80) := g_package||'.write_logfile';
96: --
97: begin
98: --
99: hr_utility.set_location ('Entering '||l_package,10);
100: --
101: fnd_file.put_line
102: (which => fnd_file.log,
103: buff => benutils.g_banner_minus);
149: fnd_file.put_line
150: (which => fnd_file.log,
151: buff => benutils.g_banner_minus);
152: --
153: hr_utility.set_location ('Leaving '||l_package,10);
154: --
155: exception
156: --
157: when others then
172: -- records at a time
173: --
174: begin
175: --
176: hr_utility.set_location ('Entering '||l_package,10);
177: --
178: p_rows :=0;
179: loop
180: delete from ben_reporting
187: commit;
188: end loop;
189: --
190: commit;
191: hr_utility.set_location ('Leaving '||l_package,10);
192: --
193: end delete_reporting_rows;
194: --
195: procedure delete_batch_range_rows(p_benefit_action_id in number,
199: l_records_to_be_deleted number := 5000;
200: --
201: begin
202: --
203: hr_utility.set_location ('Entering '||l_package,10);
204: --
205: p_rows :=0;
206: loop
207: delete from ben_batch_ranges
214: commit;
215: end loop;
216: --
217: commit;
218: hr_utility.set_location ('Leaving '||l_package,10);
219: --
220: end delete_batch_range_rows;
221: --
222: procedure delete_batch_ler_rows(p_benefit_action_id in number,
226: --
227: l_records_to_be_deleted number := 5000;
228: begin
229: --
230: hr_utility.set_location ('Entering '||l_package,10);
231: --
232: p_rows :=0;
233: loop
234: delete from ben_batch_ler_info
241: commit;
242: end loop;
243: --
244: commit;
245: hr_utility.set_location ('Leaving '||l_package,10);
246: --
247: end delete_batch_ler_rows;
248: --
249: procedure delete_batch_dpnt_rows(p_benefit_action_id in number,
253: --
254: l_records_to_be_deleted number := 5000;
255: begin
256: --
257: hr_utility.set_location ('Entering '||l_package,10);
258: --
259: p_rows :=0;
260: loop
261: delete from ben_batch_dpnt_info
268: exit when sql%rowcount=0;
269: end loop;
270: --
271: commit;
272: hr_utility.set_location ('Leaving '||l_package,10);
273: --
274: end delete_batch_dpnt_rows;
275: --
276: procedure delete_batch_elctbl_rows(p_benefit_action_id in number,
280: l_records_to_be_deleted number := 5000;
281: --
282: begin
283: --
284: hr_utility.set_location ('Entering '||l_package,10);
285: --
286: p_rows :=0;
287: loop
288: delete from ben_batch_elctbl_chc_info
296: end loop;
297: --
298: commit;
299: --
300: hr_utility.set_location ('Leaving '||l_package,10);
301: --
302: end delete_batch_elctbl_rows;
303: --
304: procedure delete_batch_elig_rows(p_benefit_action_id in number,
308: --
309: l_records_to_be_deleted number := 5000;
310: begin
311: --
312: hr_utility.set_location ('Entering '||l_package,10);
313: --
314: p_rows := 0 ;
315: loop
316: delete from ben_batch_elig_info
323: commit;
324: end loop;
325: --
326: commit;
327: hr_utility.set_location ('Leaving '||l_package,10);
328: --
329: end delete_batch_elig_rows;
330: --
331: procedure delete_batch_proc_rows(p_benefit_action_id in number,
335: l_records_to_be_deleted number := 5000;
336: --
337: begin
338: --
339: hr_utility.set_location ('Entering '||l_package,10);
340: --
341: p_rows := 0 ;
342: loop
343: delete from ben_batch_proc_info
351: end loop;
352: --
353: commit;
354: --
355: hr_utility.set_location ('Leaving '||l_package,10);
356: --
357: end delete_batch_proc_rows;
358: --
359: procedure delete_batch_rate_rows(p_benefit_action_id in number,
363: --
364: l_records_to_be_deleted number := 5000;
365: begin
366: --
367: hr_utility.set_location ('Entering '||l_package,10);
368: --
369: p_rows := 0 ;
370: loop
371: delete from ben_batch_rate_info
379: end loop;
380: --
381: commit;
382: --
383: hr_utility.set_location ('Leaving '||l_package,10);
384: --
385: end delete_batch_rate_rows;
386: --
387: procedure delete_person_action_rows(p_benefit_action_id in number,
391: --
392: l_records_to_be_deleted number := 5000;
393: begin
394: --
395: hr_utility.set_location ('Entering '||l_package,10);
396: --
397: p_rows :=0;
398: loop
399: delete from ben_person_actions
406: commit;
407: end loop;
408: --
409: commit;
410: hr_utility.set_location ('Leaving '||l_package,10);
411: --
412: end delete_person_action_rows;
413: --
414: procedure delete_benefit_action_rows(p_benefit_action_id in number,
417: l_package varchar2(80) := g_package||'.delete_benefit_action_rows';
418: --
419: begin
420: --
421: hr_utility.set_location ('Entering '||l_package,10);
422: --
423: delete from ben_benefit_actions
424: where benefit_action_id = p_benefit_action_id;
425: --
426: p_rows := sql%rowcount;
427: --
428: commit;
429: --
430: hr_utility.set_location ('Leaving '||l_package,10);
431: --
432: end delete_benefit_action_rows;
433: --
434: procedure purge_single(p_benefit_action_id in number) is
449: l_benefit_action_rows number := 0;
450: --
451: begin
452: --
453: hr_utility.set_location ('Entering '||l_package,10);
454: --
455: -- Delete in the order
456: --
457: -- 1) Reporting Rows
497: p_proc_rows => l_proc_rows,
498: p_rate_rows => l_rate_rows,
499: p_ler_rows => l_ler_rows);
500: --
501: hr_utility.set_location ('Leaving '||l_package,10);
502: --
503: end purge_single;
504: --
505: procedure purge_all(errbuf out nocopy varchar2,
530: l_benefit_actions benactionTable;
531:
532: begin
533: --
534: hr_utility.set_location ('Entering '||l_package,10);
535: --
536: -- Convert date from canonical to regular date
537: --
538: -- Convert varchar2 dates to real dates
572: loop
573: purge_single(p_benefit_action_id => l_benefit_actions(i).benefit_action_id);
574: end loop;
575: --
576: hr_utility.set_location ('Leaving '||l_package,10);
577: --
578: end purge_all;
579: --
580: end ben_benmngle_purge;