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