59:
60: EXCEPTION
61:
62: WHEN OTHERS THEN
63: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
64: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
65: x_error_message := fnd_message.get;
66: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
67:
60: EXCEPTION
61:
62: WHEN OTHERS THEN
63: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
64: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
65: x_error_message := fnd_message.get;
66: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
67:
68: END Decode_Message;
61:
62: WHEN OTHERS THEN
63: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
64: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
65: x_error_message := fnd_message.get;
66: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
67:
68: END Decode_Message;
69:
247:
248: --raise exception if the source record is not found
249:
250: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
251: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
252: fnd_message.set_token('ITEM',P_Proj_Item_Inst_Attr_Rec.Item_Id);
253: l_error_message := fnd_message.get;
254: l_Return_Status := FND_API.G_RET_STS_ERROR;
255: RAISE Update_Ib_Exp;
248: --raise exception if the source record is not found
249:
250: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
251: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
252: fnd_message.set_token('ITEM',P_Proj_Item_Inst_Attr_Rec.Item_Id);
253: l_error_message := fnd_message.get;
254: l_Return_Status := FND_API.G_RET_STS_ERROR;
255: RAISE Update_Ib_Exp;
256: END IF;
249:
250: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
251: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
252: fnd_message.set_token('ITEM',P_Proj_Item_Inst_Attr_Rec.Item_Id);
253: l_error_message := fnd_message.get;
254: l_Return_Status := FND_API.G_RET_STS_ERROR;
255: RAISE Update_Ib_Exp;
256: END IF;
257:
257:
258: -- check if there exist multiple source instances
259:
260: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
261: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
262: fnd_message.set_token('ITEM',P_Proj_Item_Inst_Attr_Rec.Item_Id);
263: l_error_message := fnd_message.get;
264: l_Return_Status := FND_API.G_RET_STS_ERROR;
265: RAISE Update_Ib_Exp;
258: -- check if there exist multiple source instances
259:
260: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
261: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
262: fnd_message.set_token('ITEM',P_Proj_Item_Inst_Attr_Rec.Item_Id);
263: l_error_message := fnd_message.get;
264: l_Return_Status := FND_API.G_RET_STS_ERROR;
265: RAISE Update_Ib_Exp;
266: END IF;
259:
260: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
261: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
262: fnd_message.set_token('ITEM',P_Proj_Item_Inst_Attr_Rec.Item_Id);
263: l_error_message := fnd_message.get;
264: l_Return_Status := FND_API.G_RET_STS_ERROR;
265: RAISE Update_Ib_Exp;
266: END IF;
267:
285: -- Step 3,Check if the txn_qty is more than source item instance qty
286:
287: IF(P_Proj_Item_Inst_Attr_Rec.Quantity >
288: l_Instance_Header_Tbl_Out(i).Quantity) THEN
289: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
290: fnd_message.set_token('ITEM',P_Proj_Item_Inst_Attr_Rec.Item_Id);
291: l_error_message := fnd_message.get;
292: l_Return_Status := FND_API.G_RET_STS_ERROR;
293: RAISE Update_Ib_Exp;
286:
287: IF(P_Proj_Item_Inst_Attr_Rec.Quantity >
288: l_Instance_Header_Tbl_Out(i).Quantity) THEN
289: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
290: fnd_message.set_token('ITEM',P_Proj_Item_Inst_Attr_Rec.Item_Id);
291: l_error_message := fnd_message.get;
292: l_Return_Status := FND_API.G_RET_STS_ERROR;
293: RAISE Update_Ib_Exp;
294: END IF;
287: IF(P_Proj_Item_Inst_Attr_Rec.Quantity >
288: l_Instance_Header_Tbl_Out(i).Quantity) THEN
289: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
290: fnd_message.set_token('ITEM',P_Proj_Item_Inst_Attr_Rec.Item_Id);
291: l_error_message := fnd_message.get;
292: l_Return_Status := FND_API.G_RET_STS_ERROR;
293: RAISE Update_Ib_Exp;
294: END IF;
295:
749: X_Return_Status := l_Return_Status;
750: x_Error_Message := l_Error_Message;
751:
752: WHEN OTHERS THEN
753: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
754: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
755: x_error_message := fnd_message.get;
756: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
757: END Update_Ib_Repository;
750: x_Error_Message := l_Error_Message;
751:
752: WHEN OTHERS THEN
753: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
754: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
755: x_error_message := fnd_message.get;
756: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
757: END Update_Ib_Repository;
758: PROCEDURE Update_eib_instances(
751:
752: WHEN OTHERS THEN
753: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
754: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
755: x_error_message := fnd_message.get;
756: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
757: END Update_Ib_Repository;
758: PROCEDURE Update_eib_instances(
759: P_proj_item_inst_Attr_tbl IN proj_item_inst_Attr_tbl_Type,
774: END LOOP;
775: END IF; -- tbl.count IF
776: EXCEPTION
777: WHEN OTHERS THEN
778: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
779: fnd_message.set_token('ERR_MSG','CSE_PROJ_ITEM_INST_PKG.UPDATE_EIB_INSTANCES'||'='|| SQLERRM);
780: x_error_message := fnd_message.get;
781: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
782:
775: END IF; -- tbl.count IF
776: EXCEPTION
777: WHEN OTHERS THEN
778: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
779: fnd_message.set_token('ERR_MSG','CSE_PROJ_ITEM_INST_PKG.UPDATE_EIB_INSTANCES'||'='|| SQLERRM);
780: x_error_message := fnd_message.get;
781: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
782:
783: END update_eib_instances;
776: EXCEPTION
777: WHEN OTHERS THEN
778: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
779: fnd_message.set_token('ERR_MSG','CSE_PROJ_ITEM_INST_PKG.UPDATE_EIB_INSTANCES'||'='|| SQLERRM);
780: x_error_message := fnd_message.get;
781: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
782:
783: END update_eib_instances;
784: