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:
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:
71: END Decode_Message;
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:
71: END Decode_Message;
72:
228:
229: --raise exception if the source record is not found
230:
231: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
232: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
233: fnd_message.set_token('ITEM',P_Proj_Item_Uninst_Attr_Rec.Item_Id);
234: l_error_message := fnd_message.get;
235: l_Return_Status := FND_API.G_RET_STS_ERROR;
236: RAISE Update_Ib_Exp;
229: --raise exception if the source record is not found
230:
231: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
232: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
233: fnd_message.set_token('ITEM',P_Proj_Item_Uninst_Attr_Rec.Item_Id);
234: l_error_message := fnd_message.get;
235: l_Return_Status := FND_API.G_RET_STS_ERROR;
236: RAISE Update_Ib_Exp;
237: END IF;
230:
231: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
232: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
233: fnd_message.set_token('ITEM',P_Proj_Item_Uninst_Attr_Rec.Item_Id);
234: l_error_message := fnd_message.get;
235: l_Return_Status := FND_API.G_RET_STS_ERROR;
236: RAISE Update_Ib_Exp;
237: END IF;
238:
239:
240: -- check if there exist multiple source instances
241:
242: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
243: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
244: fnd_message.set_token('ITEM',P_Proj_Item_Uninst_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: -- check if there exist multiple source instances
241:
242: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
243: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
244: fnd_message.set_token('ITEM',P_Proj_Item_Uninst_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>1) THEN
243: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
244: fnd_message.set_token('ITEM',P_Proj_Item_Uninst_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:
264: -- Step 3,Check if the txn_qty is more than source item instance qty
265:
266: IF(P_Proj_Item_Uninst_Attr_Rec.Quantity >
267: l_Instance_Header_Tbl_Out(i).Quantity) THEN
268: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
269: fnd_message.set_token('ITEM',P_Proj_Item_Uninst_Attr_Rec.Item_Id);
270: l_error_message := fnd_message.get;
271: l_Return_Status := FND_API.G_RET_STS_ERROR;
272: RAISE Update_Ib_Exp;
265:
266: IF(P_Proj_Item_Uninst_Attr_Rec.Quantity >
267: l_Instance_Header_Tbl_Out(i).Quantity) THEN
268: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
269: fnd_message.set_token('ITEM',P_Proj_Item_Uninst_Attr_Rec.Item_Id);
270: l_error_message := fnd_message.get;
271: l_Return_Status := FND_API.G_RET_STS_ERROR;
272: RAISE Update_Ib_Exp;
273: END IF;
266: IF(P_Proj_Item_Uninst_Attr_Rec.Quantity >
267: l_Instance_Header_Tbl_Out(i).Quantity) THEN
268: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
269: fnd_message.set_token('ITEM',P_Proj_Item_Uninst_Attr_Rec.Item_Id);
270: l_error_message := fnd_message.get;
271: l_Return_Status := FND_API.G_RET_STS_ERROR;
272: RAISE Update_Ib_Exp;
273: END IF;
274:
558: END IF;
559: END IF;
560:
561: ELSIF l_Dest_Instance_Rec.Instance_Id IS NULL THEN
562: fnd_message.set_name('CSE','CSE_NO_ACTIVE_DEST_INSTANCES');
563: fnd_message.set_token('ITEM',l_instance_header_tbl_out(i).inventory_item_id);
564: l_error_message := fnd_message.get;
565: l_Return_Status := FND_API.G_RET_STS_ERROR;
566: RAISE Update_Ib_Exp;
559: END IF;
560:
561: ELSIF l_Dest_Instance_Rec.Instance_Id IS NULL THEN
562: fnd_message.set_name('CSE','CSE_NO_ACTIVE_DEST_INSTANCES');
563: fnd_message.set_token('ITEM',l_instance_header_tbl_out(i).inventory_item_id);
564: l_error_message := fnd_message.get;
565: l_Return_Status := FND_API.G_RET_STS_ERROR;
566: RAISE Update_Ib_Exp;
567: END IF;
560:
561: ELSIF l_Dest_Instance_Rec.Instance_Id IS NULL THEN
562: fnd_message.set_name('CSE','CSE_NO_ACTIVE_DEST_INSTANCES');
563: fnd_message.set_token('ITEM',l_instance_header_tbl_out(i).inventory_item_id);
564: l_error_message := fnd_message.get;
565: l_Return_Status := FND_API.G_RET_STS_ERROR;
566: RAISE Update_Ib_Exp;
567: END IF;
568:
566: RAISE Update_Ib_Exp;
567: END IF;
568:
569: ELSIF (l_Instance_Header_Tbl_Out.COUNT=0) THEN
570: fnd_message.set_name('CSE','CSE_DEST_RECORD_NOTFOUND');
571: fnd_message.set_token('ITEM',l_instance_header_tbl_out(i).inventory_item_id);
572: l_error_message := fnd_message.get;
573: l_Return_Status := FND_API.G_RET_STS_ERROR;
574: RAISE Update_Ib_Exp;
567: END IF;
568:
569: ELSIF (l_Instance_Header_Tbl_Out.COUNT=0) THEN
570: fnd_message.set_name('CSE','CSE_DEST_RECORD_NOTFOUND');
571: fnd_message.set_token('ITEM',l_instance_header_tbl_out(i).inventory_item_id);
572: l_error_message := fnd_message.get;
573: l_Return_Status := FND_API.G_RET_STS_ERROR;
574: RAISE Update_Ib_Exp;
575: END IF;
568:
569: ELSIF (l_Instance_Header_Tbl_Out.COUNT=0) THEN
570: fnd_message.set_name('CSE','CSE_DEST_RECORD_NOTFOUND');
571: fnd_message.set_token('ITEM',l_instance_header_tbl_out(i).inventory_item_id);
572: l_error_message := fnd_message.get;
573: l_Return_Status := FND_API.G_RET_STS_ERROR;
574: RAISE Update_Ib_Exp;
575: END IF;
576:
585: X_Return_Status := l_Return_Status;
586: x_Error_Message := l_Error_Message;
587:
588: WHEN OTHERS THEN
589: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
590: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
591: x_error_message := fnd_message.get;
592: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
593:
586: x_Error_Message := l_Error_Message;
587:
588: WHEN OTHERS THEN
589: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
590: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
591: x_error_message := fnd_message.get;
592: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
593:
594: END Update_Ib_Repository;
587:
588: WHEN OTHERS THEN
589: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
590: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
591: x_error_message := fnd_message.get;
592: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
593:
594: END Update_Ib_Repository;
595: