54:
55: EXCEPTION
56:
57: WHEN OTHERS THEN
58: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
59: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
60: x_error_message := fnd_message.get;
61: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
62: END Decode_Message;
55: EXCEPTION
56:
57: WHEN OTHERS THEN
58: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
59: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
60: x_error_message := fnd_message.get;
61: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
62: END Decode_Message;
63:
56:
57: WHEN OTHERS THEN
58: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
59: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
60: x_error_message := fnd_message.get;
61: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
62: END Decode_Message;
63:
64: PROCEDURE Update_Ib_Repository(
236: IF(l_Instance_Header_Tbl_Out.COUNT=0) THEN
237: IF (l_debug = 'Y') THEN
238: CSE_DEBUG_PUB.ADD('source instance not found');
239: END IF;
240: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
241: fnd_message.set_token('ITEM',P_In_Service_Attr_Rec.Item_Id);
242: l_error_message := fnd_message.get;
243: l_Return_Status := FND_API.G_RET_STS_ERROR;
244: RAISE Update_Ib_Exp;
237: IF (l_debug = 'Y') THEN
238: CSE_DEBUG_PUB.ADD('source instance not found');
239: END IF;
240: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
241: fnd_message.set_token('ITEM',P_In_Service_Attr_Rec.Item_Id);
242: l_error_message := fnd_message.get;
243: l_Return_Status := FND_API.G_RET_STS_ERROR;
244: RAISE Update_Ib_Exp;
245: END IF;
238: CSE_DEBUG_PUB.ADD('source instance not found');
239: END IF;
240: fnd_message.set_name('CSE','CSE_SRC_RECORD_NOTFOUND');
241: fnd_message.set_token('ITEM',P_In_Service_Attr_Rec.Item_Id);
242: l_error_message := fnd_message.get;
243: l_Return_Status := FND_API.G_RET_STS_ERROR;
244: RAISE Update_Ib_Exp;
245: END IF;
246:
249: IF(l_Instance_Header_Tbl_Out.COUNT>1) THEN
250: IF (l_debug = 'Y') THEN
251: CSE_DEBUG_PUB.ADD('multiple source instances found');
252: END IF;
253: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
254: fnd_message.set_token('ITEM',P_In_Service_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: IF (l_debug = 'Y') THEN
251: CSE_DEBUG_PUB.ADD('multiple source instances found');
252: END IF;
253: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
254: fnd_message.set_token('ITEM',P_In_Service_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: CSE_DEBUG_PUB.ADD('multiple source instances found');
252: END IF;
253: fnd_message.set_name('CSE','CSE_SRC_MULTIPLE_ITM_INSTANCES');
254: fnd_message.set_token('ITEM',P_In_Service_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:
279: l_Instance_Header_Tbl_Out(i).Quantity) THEN
280: IF (l_debug = 'Y') THEN
281: CSE_DEBUG_PUB.ADD('not enough source quantity');
282: END IF;
283: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
284: fnd_message.set_token('ITEM',P_In_Service_Attr_Rec.Item_Id);
285: l_error_message := fnd_message.get;
286: l_Return_Status := FND_API.G_RET_STS_ERROR;
287: RAISE Update_Ib_Exp;
280: IF (l_debug = 'Y') THEN
281: CSE_DEBUG_PUB.ADD('not enough source quantity');
282: END IF;
283: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
284: fnd_message.set_token('ITEM',P_In_Service_Attr_Rec.Item_Id);
285: l_error_message := fnd_message.get;
286: l_Return_Status := FND_API.G_RET_STS_ERROR;
287: RAISE Update_Ib_Exp;
288: END IF;
281: CSE_DEBUG_PUB.ADD('not enough source quantity');
282: END IF;
283: fnd_message.set_name('CSE','CSE_SRC_ITEM_QUANTITY');
284: fnd_message.set_token('ITEM',P_In_Service_Attr_Rec.Item_Id);
285: l_error_message := fnd_message.get;
286: l_Return_Status := FND_API.G_RET_STS_ERROR;
287: RAISE Update_Ib_Exp;
288: END IF;
289:
684: X_Return_Status := l_Return_Status;
685: x_Error_Message := l_Error_Message;
686:
687: WHEN OTHERS THEN
688: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
689: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
690: x_error_message := fnd_message.get;
691: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
692:
685: x_Error_Message := l_Error_Message;
686:
687: WHEN OTHERS THEN
688: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
689: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
690: x_error_message := fnd_message.get;
691: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
692:
693: END Update_Ib_Repository;
686:
687: WHEN OTHERS THEN
688: fnd_message.set_name('CSE','CSE_OTHERS_EXCEPTION');
689: fnd_message.set_token('ERR_MSG',l_Api_Name||'='|| SQLERRM);
690: x_error_message := fnd_message.get;
691: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
692:
693: END Update_Ib_Repository;
694: PROCEDURE update_eib_instances(