[Home] [Help]
1410: -- If a Model parent is deleted then all related children alos would be deleted.
1411: -- IMPORTANT NOTE:
1412: -- WHEN THIS API IS REMOVED FOR ANY FUTURE ENHANCEMENTS,
1413: -- ENSURE THAT ITEMTYPECODE IS NOT PASSED FROM UI LAYER.
1414: -- NOW MODEL/KIT ITEMS ARE STORED AS STANDARD IN OE.
1415: -- SO IT CANT BE OVERWRITTEN WHICH CREATES UNNECESSARY PBM WHILE BOOKING THE RETURN.
1416: -- UNTIL OE UPTAKES MODEL/CHILDEN RELATION IN RETURN ORDERS DONT OVERRIDE.
1417:
1418: Procedure SaveMDLRelatedOperations(p_context_type IN VARCHAR2,
1758: -- Info. about the major variables used in this API ---
1759: -- l_order_line_tbl --> Return Line Ids sent to OM for Qty verifications
1760: -- l_tmp_order_line_tbl --> The temporary plsql table declared w/in this API.
1761: -- This would have the failing Return Line Ids: only
1762: -- the Model/Kit Parents' LineIds and Standard LineIds.
1763: -- This is to cover the scenario where individual Child
1764: -- Line Items are already returned, but parents are not.
1765: -- For UI, only the related Parent Line Id need to be sent.
1766: -- x_error_tbl --> It maintains all the qty validation failing Line Ids
1949: l_index2 := l_tmp_order_line_tbl.FIRST;
1950: WHILE (l_index2 IS NOT NULL)
1951: LOOP
1952: IF (l_order_line_tbl(l_index1).line_id = l_tmp_order_line_tbl(l_index2).return_line_id) THEN
1953: IF (l_tmp_order_line_tbl(l_index2).item_type_code='STANDARD') then
1954: tempQty := (l_tmp_order_line_tbl(l_index2).orig_ordered_qty) -
1955: (l_tmp_order_line_tbl(l_index2).already_return_qty);
1956:
1957: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2008: --
2009: -- End of API body
2010: --
2011:
2012: -- Standard call to get message count and if count is 1, get message info.
2013:
2014: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2015: p_data => x_msg_data);
2016:
2794: IBE_Util.Debug('Begin IBE_ORDER_SAVE_PVT:Save(): ' || p_save_type);
2795: END IF;
2796:
2797:
2798: -- Standard Start of API savepoint
2799: SAVEPOINT SAVE_ORDER_SAVE_PVT;
2800:
2801: -- Standard call to check for call compatibility.
2802: IF NOT FND_API.Compatible_API_Call (l_api_version,
2797:
2798: -- Standard Start of API savepoint
2799: SAVEPOINT SAVE_ORDER_SAVE_PVT;
2800:
2801: -- Standard call to check for call compatibility.
2802: IF NOT FND_API.Compatible_API_Call (l_api_version,
2803: P_Api_Version_Number,
2804: l_api_name,
2805: G_PKG_NAME )
3154:
3155: END IF; -- booking submitflag='Y'
3156:
3157: -- bug# 3069333
3158: OE_STANDARD_WF.SAVE_MESSAGES_OFF;
3159:
3160: IF (IBE_UTIL.G_DEBUGON = l_true) then
3161: IBE_UTIL.DEBUG('l_ProcessOrder_Flow: ' || l_ProcessOrder_Flow );
3162: end if;
3389: --
3390: -- End of API body
3391: --
3392:
3393: -- Standard check for p_commit
3394: IF FND_API.to_Boolean( p_commit )
3395: THEN
3396: COMMIT WORK;
3397: END IF;
3399: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3400: IBE_Util.Debug('End OE_ORDER_SAVE_PVT:Save)');
3401: END IF;
3402:
3403: -- Standard call to get message count and if count is 1, get message info.
3404:
3405: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3406: p_data => x_msg_data);
3407:
3542: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3543: IBE_Util.Debug('Begin IBE_ORDER_SAVE_PVT:CheckConstraints()');
3544: END IF;
3545:
3546: -- Standard Start of API savepoint
3547: SAVEPOINT ORDER_CHKCONSTRAINT;
3548:
3549: -- Standard call to check for call compatibility.
3550: IF NOT FND_API.Compatible_API_Call (l_api_version,
3545:
3546: -- Standard Start of API savepoint
3547: SAVEPOINT ORDER_CHKCONSTRAINT;
3548:
3549: -- Standard call to check for call compatibility.
3550: IF NOT FND_API.Compatible_API_Call (l_api_version,
3551: P_Api_Version_Number,
3552: l_api_name,
3553: G_PKG_NAME )
3853:
3854: ROLLBACK TO ORDER_CHKCONSTRAINT;
3855: l_commit := p_commit;
3856:
3857: -- Standard check for p_commit
3858: IF FND_API.to_Boolean(l_commit)
3859: THEN
3860: COMMIT WORK;
3861: END IF;
3863: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3864: IBE_Util.Debug('End OE_ORDER_SAVE_PVT:CHECKCONSTRAINT()');
3865: END IF;
3866:
3867: -- Standard call to get message count and if count is 1, get message info.
3868: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3869: p_data => x_msg_data);
3870:
3871:
3972: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3973: IBE_Util.Debug('Begin IBE_ORDER_SAVE_PVT:UpdateLinebilling()');
3974: END IF;
3975:
3976: -- Standard Start of API savepoint
3977: SAVEPOINT ORDER_UPDTLINEBILL;
3978:
3979: -- Standard call to check for call compatibility.
3980: IF NOT FND_API.Compatible_API_Call (l_api_version,
3975:
3976: -- Standard Start of API savepoint
3977: SAVEPOINT ORDER_UPDTLINEBILL;
3978:
3979: -- Standard call to check for call compatibility.
3980: IF NOT FND_API.Compatible_API_Call (l_api_version,
3981: P_Api_Version_Number,
3982: l_api_name,
3983: G_PKG_NAME )
4257: --
4258: -- End of API body
4259: --
4260:
4261: -- Standard check for p_commit
4262: IF FND_API.to_Boolean( p_commit )
4263: THEN
4264: COMMIT WORK;
4265: END IF;
4267: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
4268: IBE_Util.Debug('End IBE_ORDER_SAVE_PVT:UpdateLinebilling()');
4269: END IF;
4270:
4271: -- Standard call to get message count and if count is 1, get message info.
4272: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4273: p_data => x_msg_data);
4274:
4275: EXCEPTION