133: END IF;
134:
135: -- Check p_init_msg_list
136: IF FND_API.to_boolean(p_init_msg_list) THEN
137: FND_MSG_PUB.initialize;
138: END IF;
139:
140: -- initialize API return status to success
141: x_return_status := FND_API.G_RET_STS_SUCCESS;
659: END IF;
660: --
661: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
662: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
663: IF FND_MSG_PUB.check_msg_level
664: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
665: THEN
666: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
667: END IF;
660: --
661: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
662: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
663: IF FND_MSG_PUB.check_msg_level
664: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
665: THEN
666: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
667: END IF;
668: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
662: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
663: IF FND_MSG_PUB.check_msg_level
664: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
665: THEN
666: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
667: END IF;
668: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
669:
670: --
664: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
665: THEN
666: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
667: END IF;
668: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
669:
670: --
671: -- Debug Statements
672: --
676: END IF;
677: --
678: WHEN OTHERS THEN
679: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
680: IF FND_MSG_PUB.check_msg_level
681: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
682: THEN
683: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
684: END IF;
677: --
678: WHEN OTHERS THEN
679: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
680: IF FND_MSG_PUB.check_msg_level
681: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
682: THEN
683: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
684: END IF;
685: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
679: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
680: IF FND_MSG_PUB.check_msg_level
681: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
682: THEN
683: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
684: END IF;
685: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
686:
687: --
681: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
682: THEN
683: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
684: END IF;
685: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
686:
687: --
688: -- Debug Statements
689: --