476: p_purge_rec => x_purge_rec,
477: num_rows => l_serial_intf_rows);
478: END IF;
479:
480: x_purge_rec.table_name := 'WSM_RESERVATIONS';
481: IF (p_option = REPORT_ONLY) THEN
482: SELECT COUNT(*)
483: INTO x_num_rows
484: FROM WSM_RESERVATIONS
480: x_purge_rec.table_name := 'WSM_RESERVATIONS';
481: IF (p_option = REPORT_ONLY) THEN
482: SELECT COUNT(*)
483: INTO x_num_rows
484: FROM WSM_RESERVATIONS
485: WHERE wip_entity_id = x_purge_rec.wip_entity_id;
486: ELSE
487: DELETE FROM WSM_RESERVATIONS
488: WHERE wip_entity_id = x_purge_rec.wip_entity_id;
483: INTO x_num_rows
484: FROM WSM_RESERVATIONS
485: WHERE wip_entity_id = x_purge_rec.wip_entity_id;
486: ELSE
487: DELETE FROM WSM_RESERVATIONS
488: WHERE wip_entity_id = x_purge_rec.wip_entity_id;
489: x_num_rows := SQL%ROWCOUNT;
490: END IF;
491: