182: /*dbms_output.put_line(p_inventory_item_id || ' ' || 'x_above' || x_above || 'x_below ' || x_below ||
183: x_not_enough_good_parts || ' ' || x_quantity_level || ' ' || x_onhand_good);*/
184:
185: -- Standard call to get message count and if count is 1, get message info.
186: FND_MSG_PUB.Count_And_Get
187: (p_count => x_msg_count ,
188: p_data => x_msg_data
189: );
190: EXCEPTION
190: EXCEPTION
191: WHEN FND_API.G_EXC_ERROR THEN
192: ROLLBACK TO calculate_loop_pvt;
193: x_return_status := FND_API.G_RET_STS_ERROR ;
194: FND_MSG_PUB.Count_And_Get
195: (p_count => x_msg_count ,
196: p_data => x_msg_data
197: );
198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
197: );
198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
199: ROLLBACK TO calculate_loop_pvt;
200: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
201: FND_MSG_PUB.Count_And_Get
202: (p_count => x_msg_count ,
203: p_data => x_msg_data
204: );
205: WHEN OTHERS THEN
204: );
205: WHEN OTHERS THEN
206: ROLLBACK TO calculate_loop_pvt;
207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
208: IF FND_MSG_PUB.Check_Msg_Level
209: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
210: THEN
211: FND_MSG_PUB.Add_Exc_Msg
212: ( G_PKG_NAME ,
205: WHEN OTHERS THEN
206: ROLLBACK TO calculate_loop_pvt;
207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
208: IF FND_MSG_PUB.Check_Msg_Level
209: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
210: THEN
211: FND_MSG_PUB.Add_Exc_Msg
212: ( G_PKG_NAME ,
213: l_api_name
207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
208: IF FND_MSG_PUB.Check_Msg_Level
209: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
210: THEN
211: FND_MSG_PUB.Add_Exc_Msg
212: ( G_PKG_NAME ,
213: l_api_name
214: );
215: END IF;
212: ( G_PKG_NAME ,
213: l_api_name
214: );
215: END IF;
216: FND_MSG_PUB.Count_And_Get
217: (p_count => x_msg_count ,
218: p_data => x_msg_data
219: );
220: END calculate_loop;
442: END LOOP;
443: END LOOP;
444:
445: -- Standard call to get message count and if count is 1, get message info.
446: -- FND_MSG_PUB.Count_And_Get
447: -- (p_count => x_msg_count ,
448: -- p_data => x_msg_data
449: -- );
450: EXCEPTION
450: EXCEPTION
451: WHEN FND_API.G_EXC_ERROR THEN
452: ROLLBACK TO create_notifications_pvt;
453: -- x_return_status := FND_API.G_RET_STS_ERROR ;
454: -- FND_MSG_PUB.Count_And_Get
455: -- (p_count => x_msg_count ,
456: -- p_data => x_msg_data
457: -- );
458: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
457: -- );
458: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
459: ROLLBACK TO create_notifications_pvt;
460: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
461: -- FND_MSG_PUB.Count_And_Get
462: -- (p_count => x_msg_count ,
463: -- p_data => x_msg_data
464: -- );
465: WHEN OTHERS THEN
464: -- );
465: WHEN OTHERS THEN
466: ROLLBACK TO create_notifications_pvt;
467: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
468: IF FND_MSG_PUB.Check_Msg_Level
469: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
470: THEN
471: FND_MSG_PUB.Add_Exc_Msg
472: ( G_PKG_NAME ,
465: WHEN OTHERS THEN
466: ROLLBACK TO create_notifications_pvt;
467: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
468: IF FND_MSG_PUB.Check_Msg_Level
469: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
470: THEN
471: FND_MSG_PUB.Add_Exc_Msg
472: ( G_PKG_NAME ,
473: l_api_name
467: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
468: IF FND_MSG_PUB.Check_Msg_Level
469: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
470: THEN
471: FND_MSG_PUB.Add_Exc_Msg
472: ( G_PKG_NAME ,
473: l_api_name
474: );
475: END IF;
472: ( G_PKG_NAME ,
473: l_api_name
474: );
475: END IF;
476: -- FND_MSG_PUB.Count_And_Get
477: -- (p_count => x_msg_count ,
478: -- p_data => x_msg_data
479: -- );
480: END create_notifications;