169: COMMIT WORK;
170: END IF;
171: x_return_Status:='S';
172: -- Standard callto get message count and if count is 1, get message info.
173: FND_MSG_PUB.Count_And_Get
174: ( p_count => x_msg_count,
175: p_data => x_msg_data
176: );
177: EXCEPTION
177: EXCEPTION
178: WHEN FND_API.G_EXC_ERROR THEN
179: ROLLBACK TO select_mail_count_pvt;
180: x_return_status := FND_API.G_RET_STS_ERROR ;
181: FND_MSG_PUB.Count_And_Get
182: ( p_count => x_msg_count,
183: p_data => x_msg_data
184: );
185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
184: );
185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
186: ROLLBACK TO select_mail_count_pvt;
187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
188: FND_MSG_PUB.Count_And_Get
189: ( p_count => x_msg_count,
190: p_data => x_msg_data
191: );
192: WHEN OTHERS THEN
191: );
192: WHEN OTHERS THEN
193: ROLLBACK TO select_mail_count_pvt;
194: x_return_status := FND_API.G_RET_STS_ERROR;
195: IF FND_MSG_PUB.Check_Msg_Level
196: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
197: THEN
198: FND_MSG_PUB.Add_Exc_Msg
199: ( G_PKG_NAME ,
192: WHEN OTHERS THEN
193: ROLLBACK TO select_mail_count_pvt;
194: x_return_status := FND_API.G_RET_STS_ERROR;
195: IF FND_MSG_PUB.Check_Msg_Level
196: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
197: THEN
198: FND_MSG_PUB.Add_Exc_Msg
199: ( G_PKG_NAME ,
200: l_api_name
194: x_return_status := FND_API.G_RET_STS_ERROR;
195: IF FND_MSG_PUB.Check_Msg_Level
196: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
197: THEN
198: FND_MSG_PUB.Add_Exc_Msg
199: ( G_PKG_NAME ,
200: l_api_name
201: );
202: END IF;
199: ( G_PKG_NAME ,
200: l_api_name
201: );
202: END IF;
203: FND_MSG_PUB.Count_And_Get
204: ( p_count => x_msg_count ,
205: p_data => x_msg_data
206: );
207: END searchmessages;