94:
95: -- Initialize message list if p_init_msg_list is set to TRUE.
96: IF FND_API.to_Boolean( p_init_msg_list )
97: THEN
98: FND_MSG_PUB.initialize;
99: END IF;
100:
101: -- Initialize API return status to SUCCESS
102: x_return_status := FND_API.G_RET_STS_SUCCESS;
199: END IF;
200:
201:
202: -- Standard callto get message count and if count is 1, get message info.
203: FND_MSG_PUB.Count_And_Get
204: ( p_count => x_msg_count,
205: p_data => x_msg_data
206: );
207:
209:
210: WHEN FND_API.G_EXC_ERROR THEN
211: ROLLBACK TO get_folder_work_list_PVT;
212: x_return_status := FND_API.G_RET_STS_ERROR ;
213: FND_MSG_PUB.Count_And_Get
214:
215: ( p_count => x_msg_count,
216: p_data => x_msg_data
217: );
218:
219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
220: ROLLBACK TO get_folder_work_list_PVT;
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
222: FND_MSG_PUB.Count_And_Get
223: ( p_count => x_msg_count,
224: p_data => x_msg_data
225: );
226:
226:
227: WHEN OTHERS THEN
228: ROLLBACK TO get_folder_work_list_PVT;
229: x_return_status := FND_API.G_RET_STS_ERROR;
230: IF FND_MSG_PUB.Check_Msg_Level
231: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
232: THEN
233: FND_MSG_PUB.Add_Exc_Msg
234: ( G_PKG_NAME ,
227: WHEN OTHERS THEN
228: ROLLBACK TO get_folder_work_list_PVT;
229: x_return_status := FND_API.G_RET_STS_ERROR;
230: IF FND_MSG_PUB.Check_Msg_Level
231: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
232: THEN
233: FND_MSG_PUB.Add_Exc_Msg
234: ( G_PKG_NAME ,
235: l_api_name
229: x_return_status := FND_API.G_RET_STS_ERROR;
230: IF FND_MSG_PUB.Check_Msg_Level
231: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
232: THEN
233: FND_MSG_PUB.Add_Exc_Msg
234: ( G_PKG_NAME ,
235: l_api_name
236: );
237: END IF;
235: l_api_name
236: );
237: END IF;
238:
239: FND_MSG_PUB.Count_And_Get
240: ( p_count => x_msg_count,
241: p_data => x_msg_data
242:
243: );
298:
299: -- Initialize message list if p_init_msg_list is set to TRUE.
300: IF FND_API.to_Boolean( p_init_msg_list )
301: THEN
302: FND_MSG_PUB.initialize;
303: END IF;
304:
305: -- Initialize API return status to SUCCESS
306: x_return_status := FND_API.G_RET_STS_SUCCESS;
361: COMMIT WORK;
362: END IF;
363:
364: -- Standard callto 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
369: EXCEPTION
370: WHEN FND_API.G_EXC_ERROR THEN
371: ROLLBACK TO get_msg_work_list_PVT;
372: x_return_status := FND_API.G_RET_STS_ERROR ;
373: FND_MSG_PUB.Count_And_Get
374:
375: ( p_count => x_msg_count,
376: p_data => x_msg_data
377: );
378:
379: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
380: ROLLBACK TO get_msg_work_list_PVT;
381: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
382: FND_MSG_PUB.Count_And_Get
383: ( p_count => x_msg_count,
384: p_data => x_msg_data
385: );
386:
386:
387: WHEN OTHERS THEN
388: ROLLBACK TO get_msg_work_list_PVT;
389: x_return_status := FND_API.G_RET_STS_ERROR;
390: IF FND_MSG_PUB.Check_Msg_Level
391: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
392: THEN
393: FND_MSG_PUB.Add_Exc_Msg
394: ( G_PKG_NAME ,
387: WHEN OTHERS THEN
388: ROLLBACK TO get_msg_work_list_PVT;
389: x_return_status := FND_API.G_RET_STS_ERROR;
390: IF FND_MSG_PUB.Check_Msg_Level
391: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
392: THEN
393: FND_MSG_PUB.Add_Exc_Msg
394: ( G_PKG_NAME ,
395: l_api_name
389: x_return_status := FND_API.G_RET_STS_ERROR;
390: IF FND_MSG_PUB.Check_Msg_Level
391: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
392: THEN
393: FND_MSG_PUB.Add_Exc_Msg
394: ( G_PKG_NAME ,
395: l_api_name
396: );
397: END IF;
395: l_api_name
396: );
397: END IF;
398:
399: FND_MSG_PUB.Count_And_Get
400: ( p_count => x_msg_count,
401: p_data => x_msg_data
402:
403: );
445:
446: -- Initialize message list if p_init_msg_list is set to TRUE.
447: IF FND_API.to_Boolean( p_init_msg_list )
448: THEN
449: FND_MSG_PUB.initialize;
450: END IF;
451:
452: -- Initialize API return status to SUCCESS
453: x_return_status := FND_API.G_RET_STS_SUCCESS;
470: COMMIT WORK;
471: END IF;
472:
473: -- Standard callto get message count and if count is 1, get message info.
474: FND_MSG_PUB.Count_And_Get
475: ( p_count => x_msg_count,
476: p_data => x_msg_data
477: );
478: EXCEPTION
478: EXCEPTION
479: WHEN FND_API.G_EXC_ERROR THEN
480: ROLLBACK TO log_batch_error_PVT;
481: x_return_status := FND_API.G_RET_STS_ERROR ;
482: FND_MSG_PUB.Count_And_Get
483:
484: ( p_count => x_msg_count,
485: p_data => x_msg_data
486: );
487:
488: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
489: ROLLBACK TO log_batch_error_PVT;
490: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
491: FND_MSG_PUB.Count_And_Get
492: ( p_count => x_msg_count,
493: p_data => x_msg_data
494: );
495:
495:
496: WHEN OTHERS THEN
497: ROLLBACK TO log_batch_error_PVT;
498: x_return_status := FND_API.G_RET_STS_ERROR;
499: IF FND_MSG_PUB.Check_Msg_Level
500: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
501: THEN
502: FND_MSG_PUB.Add_Exc_Msg
503: ( G_PKG_NAME ,
496: WHEN OTHERS THEN
497: ROLLBACK TO log_batch_error_PVT;
498: x_return_status := FND_API.G_RET_STS_ERROR;
499: IF FND_MSG_PUB.Check_Msg_Level
500: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
501: THEN
502: FND_MSG_PUB.Add_Exc_Msg
503: ( G_PKG_NAME ,
504: l_api_name
498: x_return_status := FND_API.G_RET_STS_ERROR;
499: IF FND_MSG_PUB.Check_Msg_Level
500: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
501: THEN
502: FND_MSG_PUB.Add_Exc_Msg
503: ( G_PKG_NAME ,
504: l_api_name
505: );
506: END IF;
504: l_api_name
505: );
506: END IF;
507:
508: FND_MSG_PUB.Count_And_Get
509: ( p_count => x_msg_count,
510: p_data => x_msg_data
511:
512: );