194: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
195: FND_MESSAGE.set_name('XLA', 'XLA_ONLINE_ACCTG_ERROR');
196: END IF;
197: FND_MSG_PUB.ADD;
198: RAISE FND_API.g_exc_unexpected_error;
199: ELSE
200: l_event_count:=l_event_count+1;
201: END IF;
202:
210: END IF;
211:
212: END IF;
213: EXCEPTION
214: WHEN FND_API.G_EXC_ERROR THEN
215: retcode:=1;
216: ROLLBACK TO CREATE_EVENT;
217: errbuf:= FND_API.G_RET_STS_ERROR;
218:
213: EXCEPTION
214: WHEN FND_API.G_EXC_ERROR THEN
215: retcode:=1;
216: ROLLBACK TO CREATE_EVENT;
217: errbuf:= FND_API.G_RET_STS_ERROR;
218:
219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
220: retcode:=1;
221: ROLLBACK TO CREATE_EVENT;
215: retcode:=1;
216: ROLLBACK TO CREATE_EVENT;
217: errbuf:= FND_API.G_RET_STS_ERROR;
218:
219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
220: retcode:=1;
221: ROLLBACK TO CREATE_EVENT;
222: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
223: WHEN OTHERS THEN
218:
219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
220: retcode:=1;
221: ROLLBACK TO CREATE_EVENT;
222: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
223: WHEN OTHERS THEN
224: retcode:=1;
225: ROLLBACK TO CREATE_EVENT;
226: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
222: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
223: WHEN OTHERS THEN
224: retcode:=1;
225: ROLLBACK TO CREATE_EVENT;
226: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
227: END;
228: END LOOP;
229:
230:
293: retcode:=0;
294: end if;
295: COMMIT;
296: EXCEPTION
297: WHEN FND_API.G_EXC_ERROR THEN
298: retcode:=2;
299: ROLLBACK TO CREATE_Accounting;
300: errbuf:= FND_API.G_RET_STS_ERROR;
301:
296: EXCEPTION
297: WHEN FND_API.G_EXC_ERROR THEN
298: retcode:=2;
299: ROLLBACK TO CREATE_Accounting;
300: errbuf:= FND_API.G_RET_STS_ERROR;
301:
302: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
303: retcode:=2;
304: ROLLBACK TO CREATE_Accounting;
298: retcode:=2;
299: ROLLBACK TO CREATE_Accounting;
300: errbuf:= FND_API.G_RET_STS_ERROR;
301:
302: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
303: retcode:=2;
304: ROLLBACK TO CREATE_Accounting;
305: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
306: WHEN OTHERS THEN
301:
302: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
303: retcode:=2;
304: ROLLBACK TO CREATE_Accounting;
305: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
306: WHEN OTHERS THEN
307: retcode:=2;
308: ROLLBACK TO CREATE_Accounting;
309: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
305: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
306: WHEN OTHERS THEN
307: retcode:=2;
308: ROLLBACK TO CREATE_Accounting;
309: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
310:
311: END;
312:
313: