[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 )
3167:
3168: END IF; -- booking submitflag='Y'
3169:
3170: -- bug# 3069333
3171: OE_STANDARD_WF.SAVE_MESSAGES_OFF;
3172:
3173: IF (IBE_UTIL.G_DEBUGON = l_true) then
3174: IBE_UTIL.DEBUG('l_ProcessOrder_Flow: ' || l_ProcessOrder_Flow );
3175: end if;
3402: --
3403: -- End of API body
3404: --
3405:
3406: -- Standard check for p_commit
3407: IF FND_API.to_Boolean( p_commit )
3408: THEN
3409: COMMIT WORK;
3410: END IF;
3412: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3413: IBE_Util.Debug('End OE_ORDER_SAVE_PVT:Save)');
3414: END IF;
3415:
3416: -- Standard call to get message count and if count is 1, get message info.
3417:
3418: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3419: p_data => x_msg_data);
3420:
3555: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3556: IBE_Util.Debug('Begin IBE_ORDER_SAVE_PVT:CheckConstraints()');
3557: END IF;
3558:
3559: -- Standard Start of API savepoint
3560: SAVEPOINT ORDER_CHKCONSTRAINT;
3561:
3562: -- Standard call to check for call compatibility.
3563: IF NOT FND_API.Compatible_API_Call (l_api_version,
3558:
3559: -- Standard Start of API savepoint
3560: SAVEPOINT ORDER_CHKCONSTRAINT;
3561:
3562: -- Standard call to check for call compatibility.
3563: IF NOT FND_API.Compatible_API_Call (l_api_version,
3564: P_Api_Version_Number,
3565: l_api_name,
3566: G_PKG_NAME )
3866:
3867: ROLLBACK TO ORDER_CHKCONSTRAINT;
3868: l_commit := p_commit;
3869:
3870: -- Standard check for p_commit
3871: IF FND_API.to_Boolean(l_commit)
3872: THEN
3873: COMMIT WORK;
3874: END IF;
3876: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3877: IBE_Util.Debug('End OE_ORDER_SAVE_PVT:CHECKCONSTRAINT()');
3878: END IF;
3879:
3880: -- Standard call to get message count and if count is 1, get message info.
3881: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3882: p_data => x_msg_data);
3883:
3884:
3985: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3986: IBE_Util.Debug('Begin IBE_ORDER_SAVE_PVT:UpdateLinebilling()');
3987: END IF;
3988:
3989: -- Standard Start of API savepoint
3990: SAVEPOINT ORDER_UPDTLINEBILL;
3991:
3992: -- Standard call to check for call compatibility.
3993: IF NOT FND_API.Compatible_API_Call (l_api_version,
3988:
3989: -- Standard Start of API savepoint
3990: SAVEPOINT ORDER_UPDTLINEBILL;
3991:
3992: -- Standard call to check for call compatibility.
3993: IF NOT FND_API.Compatible_API_Call (l_api_version,
3994: P_Api_Version_Number,
3995: l_api_name,
3996: G_PKG_NAME )
4270: --
4271: -- End of API body
4272: --
4273:
4274: -- Standard check for p_commit
4275: IF FND_API.to_Boolean( p_commit )
4276: THEN
4277: COMMIT WORK;
4278: END IF;
4280: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
4281: IBE_Util.Debug('End IBE_ORDER_SAVE_PVT:UpdateLinebilling()');
4282: END IF;
4283:
4284: -- Standard call to get message count and if count is 1, get message info.
4285: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4286: p_data => x_msg_data);
4287:
4288: EXCEPTION