57: END IF;
58:
59: -- Initialize message list if p_init_msg_list is set to TRUE.
60: IF FND_API.To_Boolean( p_init_msg_list ) THEN
61: FND_MSG_PUB.initialize;
62: END IF;
63:
64: -- Initialize API return status to success
65: x_return_status := FND_API.G_RET_STS_SUCCESS;
128: COMMIT WORK;
129: END IF;
130:
131: -- Standard call to get message count and if count is 1, get message info.
132: FND_MSG_PUB.Count_And_Get(
133: p_count => x_msg_count,
134: p_data => x_msg_data );
135:
136: EXCEPTION
137: WHEN FND_API.G_EXC_ERROR THEN
138: ROLLBACK TO INSERT_STATISTICS;
139: x_return_status := FND_API.G_RET_STS_ERROR ;
140:
141: FND_MSG_PUB.Count_And_Get(
142: p_count => x_msg_count,
143: p_data => x_msg_data );
144:
145: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
145: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
146: ROLLBACK TO INSERT_STATISTICS;
147: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
148:
149: FND_MSG_PUB.Count_And_Get(
150: p_count => x_msg_count,
151: p_data => x_msg_data );
152:
153: WHEN OTHERS THEN
153: WHEN OTHERS THEN
154: ROLLBACK TO INSERT_STATISTICS;
155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
156:
157: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
158: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
159: END IF;
160:
161: FND_MSG_PUB.Count_And_Get(
154: ROLLBACK TO INSERT_STATISTICS;
155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
156:
157: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
158: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
159: END IF;
160:
161: FND_MSG_PUB.Count_And_Get(
162: p_count => x_msg_count,
157: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
158: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
159: END IF;
160:
161: FND_MSG_PUB.Count_And_Get(
162: p_count => x_msg_count,
163: p_data => x_msg_data );
164:
165: END INSERT_STATISTICS;
212: END IF;
213:
214: -- Initialize message list if p_init_msg_list is set to TRUE.
215: IF FND_API.To_Boolean( p_init_msg_list ) THEN
216: FND_MSG_PUB.initialize;
217: END IF;
218:
219: -- Initialize API return status to success
220: x_return_status := FND_API.G_RET_STS_SUCCESS;
262: COMMIT WORK;
263: END IF;
264:
265: -- Standard call to get message count and if count is 1, get message info.
266: FND_MSG_PUB.Count_And_Get(
267: p_count => x_msg_count,
268: p_data => x_msg_data );
269:
270: EXCEPTION
271: WHEN FND_API.G_EXC_ERROR THEN
272: ROLLBACK TO UPDATE_STATISTICS;
273: x_return_status := FND_API.G_RET_STS_ERROR ;
274:
275: FND_MSG_PUB.Count_And_Get(
276: p_count => x_msg_count,
277: p_data => x_msg_data );
278:
279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
280: ROLLBACK TO UPDATE_STATISTICS;
281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
282:
283: FND_MSG_PUB.Count_And_Get(
284: p_count => x_msg_count,
285: p_data => x_msg_data );
286:
287: WHEN OTHERS THEN
287: WHEN OTHERS THEN
288: ROLLBACK TO UPDATE_STATISTICS;
289: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
290:
291: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
292: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
293: END IF;
294:
295: FND_MSG_PUB.Count_And_Get(
288: ROLLBACK TO UPDATE_STATISTICS;
289: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
290:
291: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
292: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
293: END IF;
294:
295: FND_MSG_PUB.Count_And_Get(
296: p_count => x_msg_count,
291: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
292: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
293: END IF;
294:
295: FND_MSG_PUB.Count_And_Get(
296: p_count => x_msg_count,
297: p_data => x_msg_data );
298:
299: END UPDATE_STATISTICS;
331: END IF;
332:
333: -- Initialize message list if p_init_msg_list is set to TRUE.
334: IF FND_API.To_Boolean( p_init_msg_list ) THEN
335: FND_MSG_PUB.initialize;
336: END IF;
337:
338: -- Initialize API return status to success
339: x_return_status := FND_API.G_RET_STS_SUCCESS;
361: COMMIT WORK;
362: END IF;
363:
364: -- Standard call to get message count and if count is 1, get message info.
365: FND_MSG_PUB.Count_And_Get(
366: p_count => x_msg_count,
367: p_data => x_msg_data );
368:
369: EXCEPTION
370: WHEN FND_API.G_EXC_ERROR THEN
371: ROLLBACK TO DELETE_STATISTICS;
372: x_return_status := FND_API.G_RET_STS_ERROR ;
373:
374: FND_MSG_PUB.Count_And_Get(
375: p_count => x_msg_count,
376: p_data => x_msg_data );
377:
378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
379: ROLLBACK TO DELETE_STATISTICS;
380: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
381:
382: FND_MSG_PUB.Count_And_Get(
383: p_count => x_msg_count,
384: p_data => x_msg_data );
385:
386: WHEN OTHERS THEN
386: WHEN OTHERS THEN
387: ROLLBACK TO DELETE_STATISTICS;
388: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
389:
390: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
391: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
392: END IF;
393:
394: FND_MSG_PUB.Count_And_Get(
387: ROLLBACK TO DELETE_STATISTICS;
388: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
389:
390: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
391: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
392: END IF;
393:
394: FND_MSG_PUB.Count_And_Get(
395: p_count => x_msg_count,
390: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
391: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
392: END IF;
393:
394: FND_MSG_PUB.Count_And_Get(
395: p_count => x_msg_count,
396: p_data => x_msg_data );
397:
398: END DELETE_STATISTICS;
443: END IF;
444:
445: -- Initialize message list if p_init_msg_list is set to TRUE.
446: IF FND_API.To_Boolean( p_init_msg_list ) THEN
447: FND_MSG_PUB.initialize;
448: END IF;
449:
450: -- Initialize API return status to success
451: x_return_status := FND_API.G_RET_STS_SUCCESS;
476: COMMIT WORK;
477: END IF;
478:
479: -- Standard call to get message count and if count is 1, get message info.
480: FND_MSG_PUB.Count_And_Get(
481: p_count => x_msg_count,
482: p_data => x_msg_data );
483:
484: EXCEPTION
485: WHEN FND_API.G_EXC_ERROR THEN
486: ROLLBACK TO SELECT_STATISTICS;
487: x_return_status := FND_API.G_RET_STS_ERROR ;
488:
489: FND_MSG_PUB.Count_And_Get(
490: p_count => x_msg_count,
491: p_data => x_msg_data );
492:
493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
494: ROLLBACK TO SELECT_STATISTICS;
495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
496:
497: FND_MSG_PUB.Count_And_Get(
498: p_count => x_msg_count,
499: p_data => x_msg_data );
500:
501: WHEN OTHERS THEN
501: WHEN OTHERS THEN
502: ROLLBACK TO SELECT_STATISTICS;
503: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
504:
505: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
506: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
507: END IF;
508:
509: FND_MSG_PUB.Count_And_Get(
502: ROLLBACK TO SELECT_STATISTICS;
503: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
504:
505: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
506: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
507: END IF;
508:
509: FND_MSG_PUB.Count_And_Get(
510: p_count => x_msg_count,
505: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
506: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
507: END IF;
508:
509: FND_MSG_PUB.Count_And_Get(
510: p_count => x_msg_count,
511: p_data => x_msg_data );
512:
513: END SELECT_STATISTICS;