6424:
6425: /*
6426: * dsting 7/24/2002
6427: *
6428: * Deletes entries from mrp_atp_schedule_temp and mrp_atp_details_temp
6429: * older than p_hours old
6430: *
6431: */
6432: PROCEDURE ATP_Purge_MRP_Temp(
6459: msc_util.msc_log('Now sysdate: ' ||
6460: to_char(sysdate, 'DD:MM:YYYY hh24:mi:ss'));
6461:
6462:
6463: DELETE FROM mrp_atp_schedule_temp
6464: WHERE last_update_date < l_retain_date;
6465:
6466: msc_util.msc_log('Records Deleted from mrp_atp_schedule_temp : ' ||
6467: SQL%ROWCOUNT);
6462:
6463: DELETE FROM mrp_atp_schedule_temp
6464: WHERE last_update_date < l_retain_date;
6465:
6466: msc_util.msc_log('Records Deleted from mrp_atp_schedule_temp : ' ||
6467: SQL%ROWCOUNT);
6468:
6469: --3670695: issue commit so that rollback segment is freed
6470: commit;
6492: AND b.application_id = 704;
6493:
6494: msc_util.msc_log('l_mrp_schema: ' || l_mrp_schema );
6495: --bug3545959 end
6496: EXECUTE IMMEDIATE 'TRUNCATE TABLE ' || l_mrp_schema ||'.mrp_atp_schedule_temp';
6497: EXECUTE IMMEDIATE 'TRUNCATE TABLE ' || l_mrp_schema ||'.mrp_atp_details_temp';
6498:
6499: --bug3940999
6500: SELECT a.oracle_username