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