47: END IF;
48:
49: --Initialize message list if p_init_msg_list is TRUE.
50: IF FND_API.To_Boolean (p_init_msg_list) THEN
51: FND_MSG_PUB.initialize;
52: END IF;
53:
54: -- Initialize API return status to sucess
55: x_return_status := fnd_api.g_ret_sts_success;
130:
131: EXCEPTION
132: WHEN FND_API.g_exc_error THEN
133: x_return_status := FND_API.g_ret_sts_error;
134: FND_MSG_PUB.count_and_get (
135: p_encoded => FND_API.g_false
136: ,p_count => x_msg_count
137: ,p_data => x_msg_data
138: );
138: );
139:
140: WHEN FND_API.g_exc_unexpected_error THEN
141: x_return_status := FND_API.g_ret_sts_unexp_error ;
142: FND_MSG_PUB.count_and_get (
143: p_encoded => FND_API.g_false
144: ,p_count => x_msg_count
145: ,p_data => x_msg_data
146: );
146: );
147:
148: WHEN OTHERS THEN
149: x_return_status := FND_API.g_ret_sts_unexp_error ;
150: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
151: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
152: END IF;
153: FND_MSG_PUB.count_and_get(
154: p_encoded => FND_API.g_false
147:
148: WHEN OTHERS THEN
149: x_return_status := FND_API.g_ret_sts_unexp_error ;
150: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
151: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
152: END IF;
153: FND_MSG_PUB.count_and_get(
154: p_encoded => FND_API.g_false
155: ,p_count => x_msg_count
149: x_return_status := FND_API.g_ret_sts_unexp_error ;
150: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
151: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
152: END IF;
153: FND_MSG_PUB.count_and_get(
154: p_encoded => FND_API.g_false
155: ,p_count => x_msg_count
156: ,p_data => x_msg_data
157: );