195:
196: -- Initialize message stack if required
197: IF FND_API.to_Boolean(p_init_msg_list)
198: THEN
199: FND_MSG_PUB.initialize;
200: END IF;
201:
202: -- BEGIN PROCEDURE LOGIC
203:
213:
214: -- END PROCEDURE LOGIC
215: -- report success
216: x_return_status := FND_API.G_RET_STS_SUCCESS;
217: FND_MSG_PUB.Count_And_Get
218: ( p_count => x_msg_count
219: , p_data => x_msg_data
220: );
221: --
228: EXCEPTION
229: WHEN FND_API.G_EXC_ERROR THEN
230: x_return_status := FND_API.G_RET_STS_ERROR;
231: -- Get message count and data
232: FND_MSG_PUB.Count_And_Get
233: ( p_count => x_msg_count
234: , p_data => x_msg_data
235: );
236:
244: --
245: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
246: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
247: -- Get message count and data
248: FND_MSG_PUB.Count_And_Get
249: ( p_count => x_msg_count
250: , p_data => x_msg_data
251: );
252:
259: END IF;
260: --
261: WHEN OTHERS THEN
262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
263: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
264: THEN
265: FND_MSG_PUB.Add_Exc_Msg
266: ( G_PKG_NAME
267: , '_x_'
261: WHEN OTHERS THEN
262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
263: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
264: THEN
265: FND_MSG_PUB.Add_Exc_Msg
266: ( G_PKG_NAME
267: , '_x_'
268: );
269: END IF;
267: , '_x_'
268: );
269: END IF;
270: -- Get message count and data
271: FND_MSG_PUB.Count_And_Get
272: ( p_count => x_msg_count
273: , p_data => x_msg_data
274: );
275: --
427:
428: -- Initialize message stack if required
429: IF FND_API.to_Boolean(p_init_msg_list)
430: THEN
431: FND_MSG_PUB.initialize;
432: END IF;
433:
434: -- BEGIN PROCEDURE LOGIC
435: x_suggest_ship_date := p_ship_date;
803: END IF;
804: -- END PROCEDURE LOGIC
805: -- report success
806: x_return_status := FND_API.G_RET_STS_SUCCESS;
807: FND_MSG_PUB.Count_And_Get
808: ( p_count => x_msg_count
809: , p_data => x_msg_data
810: );
811: --
841: --
842: WHEN FND_API.G_EXC_ERROR THEN
843: x_return_status := FND_API.G_RET_STS_ERROR;
844: -- Get message count and data
845: FND_MSG_PUB.Count_And_Get
846: ( p_count => x_msg_count
847: , p_data => x_msg_data
848: );
849:
857: --
858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
860: -- Get message count and data
861: FND_MSG_PUB.Count_And_Get
862: ( p_count => x_msg_count
863: , p_data => x_msg_data
864: );
865:
872: END IF;
873: --
874: WHEN OTHERS THEN
875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
876: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
877: THEN
878: FND_MSG_PUB.Add_Exc_Msg
879: ( G_PKG_NAME
880: , '_x_'
874: WHEN OTHERS THEN
875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
876: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
877: THEN
878: FND_MSG_PUB.Add_Exc_Msg
879: ( G_PKG_NAME
880: , '_x_'
881: );
882: END IF;
880: , '_x_'
881: );
882: END IF;
883: -- Get message count and data
884: FND_MSG_PUB.Count_And_Get
885: ( p_count => x_msg_count
886: , p_data => x_msg_data
887: );
888: --