69: --
70: -- Initialize message list if p_init_msg_list is set to TRUE.
71: --
72: IF FND_API.to_Boolean( p_init_msg_list ) THEN
73: FND_MSG_PUB.initialize;
74: END IF;
75: --
76: -- Initialize API return status to success
77: --
408: END LOOP;
409: EXCEPTION
410: WHEN FND_API.G_EXC_ERROR THEN
411: x_return_status := FND_API.G_RET_STS_ERROR ;
412: FND_MSG_PUB.Count_And_Get (
413: p_count => x_msg_count ,
414: p_data => x_msg_data ,
415: p_encoded => FND_API.G_FALSE);
416: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
415: p_encoded => FND_API.G_FALSE);
416: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
417: x_loading_status := 'UNEXPECTED_ERR';
418: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
419: FND_MSG_PUB.Count_And_Get (
420: p_count => x_msg_count ,
421: p_data => x_msg_data ,
422: p_encoded => FND_API.G_FALSE);
423: WHEN OTHERS THEN
422: p_encoded => FND_API.G_FALSE);
423: WHEN OTHERS THEN
424: x_loading_status := 'UNEXPECTED_ERR';
425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
426: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
427: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
428: END IF;
429: FND_MSG_PUB.Count_And_Get (
430: p_count => x_msg_count ,
423: WHEN OTHERS THEN
424: x_loading_status := 'UNEXPECTED_ERR';
425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
426: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
427: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
428: END IF;
429: FND_MSG_PUB.Count_And_Get (
430: p_count => x_msg_count ,
431: p_data => x_msg_data ,
425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
426: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
427: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
428: END IF;
429: FND_MSG_PUB.Count_And_Get (
430: p_count => x_msg_count ,
431: p_data => x_msg_data ,
432: p_encoded => FND_API.G_FALSE);
433: