112: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
113: END IF;
114: -- Initialize message list if p_init_msg_list is set to TRUE.
115: IF FND_API.To_Boolean( p_init_msg_list ) THEN
116: FND_MSG_PUB.initialize;
117: END IF;
118: -- Initialize API return status to success
119: RETCODE := FND_API.G_RET_STS_SUCCESS;
120: -- API body
172: IF FND_API.To_Boolean( p_commit ) THEN
173: COMMIT WORK;
174: END IF;
175: -- Standard call to get message count and if count is 1, get message info.
176: FND_MSG_PUB.Count_And_Get
177: ( p_count => l_msg_count ,
178: p_data => ERRBUF
179: );
180: EXCEPTION
181:
182: WHEN FND_API.G_EXC_ERROR THEN
183: ROLLBACK TO IEO_CHECK_RESTART_SERVERS_PUB;
184: RETCODE := FND_API.G_RET_STS_ERROR ;
185: FND_MSG_PUB.Count_And_Get
186: ( p_count => l_msg_count ,
187: p_data => ERRBUF
188: );
189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
188: );
189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
190: ROLLBACK TO IEO_CHECK_RESTART_SERVERS_PUB;
191: RETCODE := FND_API.G_RET_STS_UNEXP_ERROR ;
192: FND_MSG_PUB.Count_And_Get
193: ( p_count => l_msg_count ,
194: p_data => ERRBUF
195: );
196: WHEN REQUEST_NOT_SUBMITTED THEN
199: fnd_file.put_line(fnd_file.log, error_msg);
200: WHEN OTHERS THEN
201: ROLLBACK TO IEO_CHECK_RESTART_SERVERS_PUB;
202: RETCODE := FND_API.G_RET_STS_UNEXP_ERROR ;
203: IF FND_MSG_PUB.Check_Msg_Level
204: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
205: THEN
206: FND_MSG_PUB.Add_Exc_Msg
207: ( G_PKG_NAME ,
200: WHEN OTHERS THEN
201: ROLLBACK TO IEO_CHECK_RESTART_SERVERS_PUB;
202: RETCODE := FND_API.G_RET_STS_UNEXP_ERROR ;
203: IF FND_MSG_PUB.Check_Msg_Level
204: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
205: THEN
206: FND_MSG_PUB.Add_Exc_Msg
207: ( G_PKG_NAME ,
208: l_api_name
202: RETCODE := FND_API.G_RET_STS_UNEXP_ERROR ;
203: IF FND_MSG_PUB.Check_Msg_Level
204: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
205: THEN
206: FND_MSG_PUB.Add_Exc_Msg
207: ( G_PKG_NAME ,
208: l_api_name
209: );
210: END IF;
207: ( G_PKG_NAME ,
208: l_api_name
209: );
210: END IF;
211: FND_MSG_PUB.Count_And_Get
212: ( p_count => l_msg_count ,
213: p_data => ERRBUF
214: );
215:
263: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
264: END IF;
265: -- Initialize message list if p_init_msg_list is set to TRUE.
266: IF FND_API.To_Boolean( p_init_msg_list ) THEN
267: FND_MSG_PUB.initialize;
268: END IF;
269: -- Initialize API return status to success
270: RETCODE := FND_API.G_RET_STS_SUCCESS;
271: -- API body
362: IF FND_API.To_Boolean( p_commit ) THEN
363: COMMIT WORK;
364: END IF;
365: -- Standard call to get message count and if count is 1, get message info.
366: FND_MSG_PUB.Count_And_Get
367: ( p_count => l_msg_count ,
368: p_data => ERRBUF
369: );
370: EXCEPTION
371:
372: WHEN FND_API.G_EXC_ERROR THEN
373: ROLLBACK TO IEO_PING_RESTART_SVR_PUB;
374: RETCODE := FND_API.G_RET_STS_ERROR ;
375: FND_MSG_PUB.Count_And_Get
376: ( p_count => l_msg_count ,
377: p_data => ERRBUF
378: );
379: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
378: );
379: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
380: ROLLBACK TO IEO_CHECK_RESTART_SERVERS_PUB;
381: RETCODE := FND_API.G_RET_STS_UNEXP_ERROR ;
382: FND_MSG_PUB.Count_And_Get
383: ( p_count => l_msg_count ,
384: p_data => ERRBUF
385: );
386: WHEN OTHERS THEN
385: );
386: WHEN OTHERS THEN
387: ROLLBACK TO IEO_CHECK_RESTART_SERVERS_PUB;
388: RETCODE := FND_API.G_RET_STS_UNEXP_ERROR ;
389: IF FND_MSG_PUB.Check_Msg_Level
390: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
391: THEN
392: FND_MSG_PUB.Add_Exc_Msg
393: ( G_PKG_NAME ,
386: WHEN OTHERS THEN
387: ROLLBACK TO IEO_CHECK_RESTART_SERVERS_PUB;
388: RETCODE := FND_API.G_RET_STS_UNEXP_ERROR ;
389: IF FND_MSG_PUB.Check_Msg_Level
390: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
391: THEN
392: FND_MSG_PUB.Add_Exc_Msg
393: ( G_PKG_NAME ,
394: l_api_name
388: RETCODE := FND_API.G_RET_STS_UNEXP_ERROR ;
389: IF FND_MSG_PUB.Check_Msg_Level
390: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
391: THEN
392: FND_MSG_PUB.Add_Exc_Msg
393: ( G_PKG_NAME ,
394: l_api_name
395: );
396: END IF;
393: ( G_PKG_NAME ,
394: l_api_name
395: );
396: END IF;
397: FND_MSG_PUB.Count_And_Get
398: ( p_count => l_msg_count ,
399: p_data => ERRBUF
400: );
401: