456:
457: CURSOR get_corrupt_tcs
458: IS SELECT cat.time_category_id
459: FROM hxc_time_categories cat,
460: hxc_time_category_comps comp
461: WHERE cat.time_category_id = comp.time_category_id
462: AND cat.time_category_name IN ('Payroll Processing Fields',
463: 'Projects Processing Fields',
464: 'HR Processing Fields')
484:
485: IF l_tc_tab.COUNT > 0
486: THEN
487: FORALL i IN l_tc_tab.FIRST..l_tc_tab.LAST
488: DELETE FROM hxc_time_category_comps
489: WHERE time_category_id = l_tc_tab(i);
490: END IF;
491:
492: COMMIT;