623: ROLLBACK TO EAM_ASSET_LOG_PVT_SV;
624: fnd_message.set_name('EAM','EAM_PURGE_EVENT_LOG_FAILURE');
625: errbuf := fnd_message.get();
626: retcode := 2;
627: fnd_file.put_line(FND_FILE.LOG, fnd_message.get);
628: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
629: ROLLBACK TO EAM_ASSET_LOG_PVT_SV;
630: fnd_message.set_name('EAM','EAM_PURGE_EVENT_LOG_FAILURE');
631: errbuf := fnd_message.get();
629: ROLLBACK TO EAM_ASSET_LOG_PVT_SV;
630: fnd_message.set_name('EAM','EAM_PURGE_EVENT_LOG_FAILURE');
631: errbuf := fnd_message.get();
632: retcode := 2;
633: fnd_file.put_line(FND_FILE.LOG, fnd_message.get);
634: WHEN OTHERS THEN
635: ROLLBACK TO EAM_ASSET_LOG_PVT_SV;
636: retcode := 2;
637: fnd_file.put_line(FND_FILE.LOG, SQLERRM);
633: fnd_file.put_line(FND_FILE.LOG, fnd_message.get);
634: WHEN OTHERS THEN
635: ROLLBACK TO EAM_ASSET_LOG_PVT_SV;
636: retcode := 2;
637: fnd_file.put_line(FND_FILE.LOG, SQLERRM);
638:
639: END delete_row;
640:
641: -- Procedure to Insert Log for Inventory Transactions