60:
61: EXCEPTION
62:
63: WHEN OTHERS THEN
64: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
65: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
66: x_error_message := fnd_message.get;
67: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
68:
61: EXCEPTION
62:
63: WHEN OTHERS THEN
64: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
65: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
66: x_error_message := fnd_message.get;
67: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
68:
69: END Decode_Message;
62:
63: WHEN OTHERS THEN
64: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
65: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
66: x_error_message := fnd_message.get;
67: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
68:
69: END Decode_Message;
70:
238:
239: --raise exception if the source record is not found
240:
241: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
242: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
243: fnd_message.set_token('ITEM',P_Item_Move_Attr_Rec.Item_Id);
244: l_error_message := fnd_message.get;
245: l_Return_Status := FND_API.G_RET_STS_ERROR;
246: RAISE Update_Ib_Exp;
239: --raise exception if the source record is not found
240:
241: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
242: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
243: fnd_message.set_token('ITEM',P_Item_Move_Attr_Rec.Item_Id);
244: l_error_message := fnd_message.get;
245: l_Return_Status := FND_API.G_RET_STS_ERROR;
246: RAISE Update_Ib_Exp;
247: END IF;
240:
241: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
242: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
243: fnd_message.set_token('ITEM',P_Item_Move_Attr_Rec.Item_Id);
244: l_error_message := fnd_message.get;
245: l_Return_Status := FND_API.G_RET_STS_ERROR;
246: RAISE Update_Ib_Exp;
247: END IF;
248:
248:
249: -- check if there exist multiple source instances
250:
251: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
252: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
253: fnd_message.set_token('ITEM',P_Item_Move_Attr_Rec.Item_Id);
254: l_error_message := fnd_message.get;
255: l_Return_Status := FND_API.G_RET_STS_ERROR;
256: RAISE Update_Ib_Exp;
249: -- check if there exist multiple source instances
250:
251: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
252: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
253: fnd_message.set_token('ITEM',P_Item_Move_Attr_Rec.Item_Id);
254: l_error_message := fnd_message.get;
255: l_Return_Status := FND_API.G_RET_STS_ERROR;
256: RAISE Update_Ib_Exp;
257: END IF;
250:
251: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
252: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
253: fnd_message.set_token('ITEM',P_Item_Move_Attr_Rec.Item_Id);
254: l_error_message := fnd_message.get;
255: l_Return_Status := FND_API.G_RET_STS_ERROR;
256: RAISE Update_Ib_Exp;
257: END IF;
258:
275: -- Step 3,Check if the txn_qty is more than source item instance qty
276:
277: IF(P_Item_Move_Attr_Rec.Quantity >
278: l_Instance_Header_Tbl_Out(i).Quantity) THEN
279: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
280: fnd_message.set_token('ITEM',P_Item_Move_Attr_Rec.Item_Id);
281: l_error_message := fnd_message.get;
282: l_Return_Status := FND_API.G_RET_STS_ERROR;
283: RAISE Update_Ib_Exp;
276:
277: IF(P_Item_Move_Attr_Rec.Quantity >
278: l_Instance_Header_Tbl_Out(i).Quantity) THEN
279: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
280: fnd_message.set_token('ITEM',P_Item_Move_Attr_Rec.Item_Id);
281: l_error_message := fnd_message.get;
282: l_Return_Status := FND_API.G_RET_STS_ERROR;
283: RAISE Update_Ib_Exp;
284: END IF;
277: IF(P_Item_Move_Attr_Rec.Quantity >
278: l_Instance_Header_Tbl_Out(i).Quantity) THEN
279: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
280: fnd_message.set_token('ITEM',P_Item_Move_Attr_Rec.Item_Id);
281: l_error_message := fnd_message.get;
282: l_Return_Status := FND_API.G_RET_STS_ERROR;
283: RAISE Update_Ib_Exp;
284: END IF;
285:
669: X_Return_Status := l_Return_Status;
670: x_Error_Message := l_Error_Message;
671:
672: WHEN OTHERS THEN
673: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
674: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
675: x_error_message := fnd_message.get;
676: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
677:
670: x_Error_Message := l_Error_Message;
671:
672: WHEN OTHERS THEN
673: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
674: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
675: x_error_message := fnd_message.get;
676: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
677:
678: END Update_Ib_Repository;
671:
672: WHEN OTHERS THEN
673: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
674: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
675: x_error_message := fnd_message.get;
676: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
677:
678: END Update_Ib_Repository;
679: PROCEDURE Update_eib_instances(