62:
63: EXCEPTION
64:
65: WHEN OTHERS THEN
66: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
67: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
68: x_error_message := fnd_message.get;
69: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
70: END Decode_Message;
63: EXCEPTION
64:
65: WHEN OTHERS THEN
66: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
67: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
68: x_error_message := fnd_message.get;
69: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
70: END Decode_Message;
71:
64:
65: WHEN OTHERS THEN
66: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
67: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
68: x_error_message := fnd_message.get;
69: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
70: END Decode_Message;
71:
72: PROCEDURE Update_Ib_Repository(
230: --raise exception if the source record is not found
231:
232: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
233:
234: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
235: fnd_message.set_token('ITEM',P_Out_Of_Service_Attr_Rec.Item_Id);
236: l_error_message := fnd_message.get;
237: l_Return_Status := FND_API.G_RET_STS_ERROR;
238: RAISE Update_Ib_Exp;
231:
232: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
233:
234: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
235: fnd_message.set_token('ITEM',P_Out_Of_Service_Attr_Rec.Item_Id);
236: l_error_message := fnd_message.get;
237: l_Return_Status := FND_API.G_RET_STS_ERROR;
238: RAISE Update_Ib_Exp;
239: END IF;
232: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
233:
234: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
235: fnd_message.set_token('ITEM',P_Out_Of_Service_Attr_Rec.Item_Id);
236: l_error_message := fnd_message.get;
237: l_Return_Status := FND_API.G_RET_STS_ERROR;
238: RAISE Update_Ib_Exp;
239: END IF;
240:
241: -- check if there exist multiple source instances
242:
243: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
244:
245: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
246: fnd_message.set_token('ITEM',P_Out_Of_Service_Attr_Rec.Item_Id);
247: l_error_message := fnd_message.get;
248: l_Return_Status := FND_API.G_RET_STS_ERROR;
249: RAISE Update_Ib_Exp;
242:
243: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
244:
245: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
246: fnd_message.set_token('ITEM',P_Out_Of_Service_Attr_Rec.Item_Id);
247: l_error_message := fnd_message.get;
248: l_Return_Status := FND_API.G_RET_STS_ERROR;
249: RAISE Update_Ib_Exp;
250: END IF;
243: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
244:
245: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
246: fnd_message.set_token('ITEM',P_Out_Of_Service_Attr_Rec.Item_Id);
247: l_error_message := fnd_message.get;
248: l_Return_Status := FND_API.G_RET_STS_ERROR;
249: RAISE Update_Ib_Exp;
250: END IF;
251:
268: -- Step 3,Check if the txn_qty is more than source item instance qty
269:
270: IF(P_Out_Of_Service_Attr_Rec.Quantity >
271: l_Instance_Header_Tbl_Out(i).Quantity) THEN
272: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
273: fnd_message.set_token('ITEM',P_Out_Of_Service_Attr_Rec.Item_Id);
274: l_error_message := fnd_message.get;
275: l_Return_Status := FND_API.G_RET_STS_ERROR;
276: RAISE Update_Ib_Exp;
269:
270: IF(P_Out_Of_Service_Attr_Rec.Quantity >
271: l_Instance_Header_Tbl_Out(i).Quantity) THEN
272: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
273: fnd_message.set_token('ITEM',P_Out_Of_Service_Attr_Rec.Item_Id);
274: l_error_message := fnd_message.get;
275: l_Return_Status := FND_API.G_RET_STS_ERROR;
276: RAISE Update_Ib_Exp;
277: END IF;
270: IF(P_Out_Of_Service_Attr_Rec.Quantity >
271: l_Instance_Header_Tbl_Out(i).Quantity) THEN
272: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
273: fnd_message.set_token('ITEM',P_Out_Of_Service_Attr_Rec.Item_Id);
274: l_error_message := fnd_message.get;
275: l_Return_Status := FND_API.G_RET_STS_ERROR;
276: RAISE Update_Ib_Exp;
277: END IF;
278:
659: X_Return_Status := l_Return_Status;
660: x_Error_Message := l_Error_Message;
661:
662: WHEN OTHERS THEN
663: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
664: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
665: x_error_message := fnd_message.get;
666: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
667:
660: x_Error_Message := l_Error_Message;
661:
662: WHEN OTHERS THEN
663: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
664: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
665: x_error_message := fnd_message.get;
666: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
667:
668: END Update_Ib_Repository;
661:
662: WHEN OTHERS THEN
663: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
664: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
665: x_error_message := fnd_message.get;
666: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
667:
668: END Update_Ib_Repository;
669: PROCEDURE Update_eib_instances(