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