[Home] [Help]
36:
37: l_result_rev_nbr NUMBER;
38:
39: BEGIN
40: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
41: IBE_UTIL.Debug(' => get_Config_Rev_Nbr(' || p_config_hdr_id || ', ' || p_config_rev_nbr || ') Begins');
42: END IF;
43: OPEN c_chk_rev_nbr;
44: FETCH c_chk_rev_nbr INTO l_result_rev_nbr;
37: l_result_rev_nbr NUMBER;
38:
39: BEGIN
40: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
41: IBE_UTIL.Debug(' => get_Config_Rev_Nbr(' || p_config_hdr_id || ', ' || p_config_rev_nbr || ') Begins');
42: END IF;
43: OPEN c_chk_rev_nbr;
44: FETCH c_chk_rev_nbr INTO l_result_rev_nbr;
45: IF c_chk_rev_nbr%NOTFOUND THEN
43: OPEN c_chk_rev_nbr;
44: FETCH c_chk_rev_nbr INTO l_result_rev_nbr;
45: IF c_chk_rev_nbr%NOTFOUND THEN
46: -- If revision nbr doesn't exist get the max from config
47: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
48: IBE_UTIL.Debug(' => get_Config_Rev_Nbr Revision Not Found. Looking for Max revision');
49: END IF;
50: OPEN c_max_rev_nbr;
51: FETCH c_max_rev_nbr INTO l_result_rev_nbr;
44: FETCH c_chk_rev_nbr INTO l_result_rev_nbr;
45: IF c_chk_rev_nbr%NOTFOUND THEN
46: -- If revision nbr doesn't exist get the max from config
47: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
48: IBE_UTIL.Debug(' => get_Config_Rev_Nbr Revision Not Found. Looking for Max revision');
49: END IF;
50: OPEN c_max_rev_nbr;
51: FETCH c_max_rev_nbr INTO l_result_rev_nbr;
52: CLOSE c_max_rev_nbr;
51: FETCH c_max_rev_nbr INTO l_result_rev_nbr;
52: CLOSE c_max_rev_nbr;
53: l_result_rev_nbr := NVL(l_result_rev_nbr, p_config_rev_nbr);
54: END IF;
55: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
56: IBE_UTIL.Debug(' => get_Config_Rev_Nbr Ends [ Result=' || l_result_rev_nbr || ' ] ');
57: END IF;
58: CLOSE c_chk_rev_nbr;
59:
52: CLOSE c_max_rev_nbr;
53: l_result_rev_nbr := NVL(l_result_rev_nbr, p_config_rev_nbr);
54: END IF;
55: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
56: IBE_UTIL.Debug(' => get_Config_Rev_Nbr Ends [ Result=' || l_result_rev_nbr || ' ] ');
57: END IF;
58: CLOSE c_chk_rev_nbr;
59:
60: RETURN l_result_rev_nbr;
218:
219: -- Initialize API return status to success
220: x_return_status := FND_API.G_RET_STS_SUCCESS;
221:
222: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
223: ibe_util.debug('p_mode='|| p_mode);
224: END IF;
225:
226: -- New api call to get line tbl in p_mode = 'CONTROLLED_COPY', currently this mode is used in
219: -- Initialize API return status to success
220: x_return_status := FND_API.G_RET_STS_SUCCESS;
221:
222: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
223: ibe_util.debug('p_mode='|| p_mode);
224: END IF;
225:
226: -- New api call to get line tbl in p_mode = 'CONTROLLED_COPY', currently this mode is used in
227: -- duplicate cart of shared carts/quotes.
228: IF p_mode = 'CONTROLLED_COPY' THEN
229: x_qte_line_tbl := getLineTblForControlledCopy(p_from_quote_header_id);
230:
231: -- To check user has create agreement permission.
232: l_permission_to_create_agrmt := ibe_util.check_user_permission(
233: p_permission => 'IBE_USE_PRICING_AGREEMENT' );
234: -- To check Line level agreement feature is enabled.
235: l_use_line_agrmts := FND_Profile.Value('IBE_USE_LINE_AGREEMENTS');
236:
238: l_use_commitments := FND_Profile.Value('IBE_USE_COMMITMENTS');
239:
240: -- Check if user has agreement permission and profile is ON, then if agreement is available then erase it from line record.
241: IF (l_permission_to_create_agrmt) and (l_use_line_agrmts = 'Y') THEN
242: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
243: ibe_util.debug('user has agreement permission and agreement feature is turned on, so keep the agrmt info');
244: END IF;
245: ELSE
246: -- check if agreementId is not null then erase agreement and pricelist.
239:
240: -- Check if user has agreement permission and profile is ON, then if agreement is available then erase it from line record.
241: IF (l_permission_to_create_agrmt) and (l_use_line_agrmts = 'Y') THEN
242: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
243: ibe_util.debug('user has agreement permission and agreement feature is turned on, so keep the agrmt info');
244: END IF;
245: ELSE
246: -- check if agreementId is not null then erase agreement and pricelist.
247: FOR k IN 1..x_qte_line_tbl.COUNT LOOP
254: ELSE
255: x_qte_line_tbl := IBE_Quote_Misc_pvt.getLineTbl
256: (p_from_quote_header_id);
257: l_Price_Adjustment_Tbl_ALL := IBE_Quote_Misc_pvt.getAllLinesPrcAdjTbl (p_from_quote_header_id);
258: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
259: ibe_util.debug('reusing x_Price_Adjustment_Tbl -- size='|| x_Price_Adjustment_Tbl.count);
260: ibe_util.debug('reusing x_Price_Adj_Rltship_Tbl -- size='|| x_Price_Adj_Rltship_Tbl.count);
261: ibe_util.debug('l_Price_Adjustment_Tbl_ALL size is='|| l_Price_Adjustment_Tbl_ALL.count);
262: END IF;
255: x_qte_line_tbl := IBE_Quote_Misc_pvt.getLineTbl
256: (p_from_quote_header_id);
257: l_Price_Adjustment_Tbl_ALL := IBE_Quote_Misc_pvt.getAllLinesPrcAdjTbl (p_from_quote_header_id);
258: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
259: ibe_util.debug('reusing x_Price_Adjustment_Tbl -- size='|| x_Price_Adjustment_Tbl.count);
260: ibe_util.debug('reusing x_Price_Adj_Rltship_Tbl -- size='|| x_Price_Adj_Rltship_Tbl.count);
261: ibe_util.debug('l_Price_Adjustment_Tbl_ALL size is='|| l_Price_Adjustment_Tbl_ALL.count);
262: END IF;
263:
256: (p_from_quote_header_id);
257: l_Price_Adjustment_Tbl_ALL := IBE_Quote_Misc_pvt.getAllLinesPrcAdjTbl (p_from_quote_header_id);
258: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
259: ibe_util.debug('reusing x_Price_Adjustment_Tbl -- size='|| x_Price_Adjustment_Tbl.count);
260: ibe_util.debug('reusing x_Price_Adj_Rltship_Tbl -- size='|| x_Price_Adj_Rltship_Tbl.count);
261: ibe_util.debug('l_Price_Adjustment_Tbl_ALL size is='|| l_Price_Adjustment_Tbl_ALL.count);
262: END IF;
263:
264: END IF;
257: l_Price_Adjustment_Tbl_ALL := IBE_Quote_Misc_pvt.getAllLinesPrcAdjTbl (p_from_quote_header_id);
258: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
259: ibe_util.debug('reusing x_Price_Adjustment_Tbl -- size='|| x_Price_Adjustment_Tbl.count);
260: ibe_util.debug('reusing x_Price_Adj_Rltship_Tbl -- size='|| x_Price_Adj_Rltship_Tbl.count);
261: ibe_util.debug('l_Price_Adjustment_Tbl_ALL size is='|| l_Price_Adjustment_Tbl_ALL.count);
262: END IF;
263:
264: END IF;
265:
262: END IF;
263:
264: END IF;
265:
266: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
267: ibe_util.debug('line number is='|| x_qte_line_tbl.count);
268: END IF;
269:
270:
263:
264: END IF;
265:
266: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
267: ibe_util.debug('line number is='|| x_qte_line_tbl.count);
268: END IF;
269:
270:
271: FOR i IN 1..x_qte_line_tbl.COUNT LOOP
312: -- Setup the line attr ext and price attributes table only if p_mode <> 'CONTROLLED_COPY'
313:
314: IF p_mode <> 'CONTROLLED_COPY' THEN
315:
316: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
317: ibe_util.debug('regulat copy lines and copying line attr and price attributes');
318: END IF;
319:
320: l_line_attr_ext_tbl := IBE_Quote_Misc_pvt.getLineAttrExtTbl
313:
314: IF p_mode <> 'CONTROLLED_COPY' THEN
315:
316: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
317: ibe_util.debug('regulat copy lines and copying line attr and price attributes');
318: END IF;
319:
320: l_line_attr_ext_tbl := IBE_Quote_Misc_pvt.getLineAttrExtTbl
321: (x_qte_line_tbl(i).quote_line_id);
350: FOR j IN 1..l_Price_Adjustment_Tbl.COUNT LOOP
351:
352: -- if Free Line, for each PRICE_ADJUSTMENT_ID, get the related info
353: if (x_qte_line_tbl(i).pricing_line_type_indicator = 'F') then
354: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
355: ibe_util.debug('x_qte_line_tbl(i).pricing_line_type_indicator='|| x_qte_line_tbl(i).pricing_line_type_indicator);
356: ibe_util.debug('before calling getLinePrcAdjRelTbl: l_Price_Adjustment_Tbl(j).PRICE_ADJUSTMENT_ID='|| l_Price_Adjustment_Tbl(j).PRICE_ADJUSTMENT_ID);
357: END IF;
358: l_Price_Adj_Rltship_Tbl := IBE_Quote_Misc_pvt.getLinePrcAdjRelTbl (l_Price_Adjustment_Tbl(j).PRICE_ADJUSTMENT_ID);
351:
352: -- if Free Line, for each PRICE_ADJUSTMENT_ID, get the related info
353: if (x_qte_line_tbl(i).pricing_line_type_indicator = 'F') then
354: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
355: ibe_util.debug('x_qte_line_tbl(i).pricing_line_type_indicator='|| x_qte_line_tbl(i).pricing_line_type_indicator);
356: ibe_util.debug('before calling getLinePrcAdjRelTbl: l_Price_Adjustment_Tbl(j).PRICE_ADJUSTMENT_ID='|| l_Price_Adjustment_Tbl(j).PRICE_ADJUSTMENT_ID);
357: END IF;
358: l_Price_Adj_Rltship_Tbl := IBE_Quote_Misc_pvt.getLinePrcAdjRelTbl (l_Price_Adjustment_Tbl(j).PRICE_ADJUSTMENT_ID);
359: FOR k IN 1..l_Price_Adj_Rltship_Tbl.COUNT LOOP
352: -- if Free Line, for each PRICE_ADJUSTMENT_ID, get the related info
353: if (x_qte_line_tbl(i).pricing_line_type_indicator = 'F') then
354: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
355: ibe_util.debug('x_qte_line_tbl(i).pricing_line_type_indicator='|| x_qte_line_tbl(i).pricing_line_type_indicator);
356: ibe_util.debug('before calling getLinePrcAdjRelTbl: l_Price_Adjustment_Tbl(j).PRICE_ADJUSTMENT_ID='|| l_Price_Adjustment_Tbl(j).PRICE_ADJUSTMENT_ID);
357: END IF;
358: l_Price_Adj_Rltship_Tbl := IBE_Quote_Misc_pvt.getLinePrcAdjRelTbl (l_Price_Adjustment_Tbl(j).PRICE_ADJUSTMENT_ID);
359: FOR k IN 1..l_Price_Adj_Rltship_Tbl.COUNT LOOP
360: l_Price_Adj_Rltship_Tbl(k).ADJ_RELATIONSHIP_ID := fnd_api.g_miss_num;
364:
365: -- the following two values are for Qual Lines, we have to search the indices
366: l_Price_Adj_Rltship_Tbl(k).PRICE_ADJ_INDEX := IBE_Quote_Misc_pvt.getPrcAdjIndexFromPrcAdjId
367: (l_Price_Adj_Rltship_Tbl(k).PRICE_ADJUSTMENT_ID, l_Price_Adjustment_Tbl_ALL);
368: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
369: ibe_util.debug('New... need to pass qte_line_index');
370: END IF;
371: l_Price_Adj_Rltship_Tbl(k).QTE_LINE_INDEX := IBE_Quote_Misc_pvt.getLineIndexFromLineId(l_Price_Adj_Rltship_Tbl(k).quote_line_id, x_qte_line_tbl);
372: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
365: -- the following two values are for Qual Lines, we have to search the indices
366: l_Price_Adj_Rltship_Tbl(k).PRICE_ADJ_INDEX := IBE_Quote_Misc_pvt.getPrcAdjIndexFromPrcAdjId
367: (l_Price_Adj_Rltship_Tbl(k).PRICE_ADJUSTMENT_ID, l_Price_Adjustment_Tbl_ALL);
368: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
369: ibe_util.debug('New... need to pass qte_line_index');
370: END IF;
371: l_Price_Adj_Rltship_Tbl(k).QTE_LINE_INDEX := IBE_Quote_Misc_pvt.getLineIndexFromLineId(l_Price_Adj_Rltship_Tbl(k).quote_line_id, x_qte_line_tbl);
372: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
373: ibe_util.debug('New... and the qte_line_index is:'||l_Price_Adj_Rltship_Tbl(k).QTE_LINE_INDEX);
368: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
369: ibe_util.debug('New... need to pass qte_line_index');
370: END IF;
371: l_Price_Adj_Rltship_Tbl(k).QTE_LINE_INDEX := IBE_Quote_Misc_pvt.getLineIndexFromLineId(l_Price_Adj_Rltship_Tbl(k).quote_line_id, x_qte_line_tbl);
372: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
373: ibe_util.debug('New... and the qte_line_index is:'||l_Price_Adj_Rltship_Tbl(k).QTE_LINE_INDEX);
374: END IF;
375: -- clear out the other id's
376: l_Price_Adj_Rltship_Tbl(k).RLTD_PRICE_ADJ_Id := fnd_api.g_miss_num;
369: ibe_util.debug('New... need to pass qte_line_index');
370: END IF;
371: l_Price_Adj_Rltship_Tbl(k).QTE_LINE_INDEX := IBE_Quote_Misc_pvt.getLineIndexFromLineId(l_Price_Adj_Rltship_Tbl(k).quote_line_id, x_qte_line_tbl);
372: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
373: ibe_util.debug('New... and the qte_line_index is:'||l_Price_Adj_Rltship_Tbl(k).QTE_LINE_INDEX);
374: END IF;
375: -- clear out the other id's
376: l_Price_Adj_Rltship_Tbl(k).RLTD_PRICE_ADJ_Id := fnd_api.g_miss_num;
377: l_Price_Adj_Rltship_Tbl(k).PRICE_ADJUSTMENT_ID := fnd_api.g_miss_num;
405: = 'MDL' THEN
406: l_old_config_hdr_id := x_qte_line_dtl_tbl(i).config_header_id;
407: l_old_config_rev_nbr := x_qte_line_dtl_tbl(i).config_revision_num;
408:
409: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
410: IBE_UTIL.debug('old config id = '|| l_old_config_hdr_id);
411: IBE_UTIL.debug('old config rev number = '|| l_old_config_rev_nbr);
412: END IF;
413:
406: l_old_config_hdr_id := x_qte_line_dtl_tbl(i).config_header_id;
407: l_old_config_rev_nbr := x_qte_line_dtl_tbl(i).config_revision_num;
408:
409: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
410: IBE_UTIL.debug('old config id = '|| l_old_config_hdr_id);
411: IBE_UTIL.debug('old config rev number = '|| l_old_config_rev_nbr);
412: END IF;
413:
414:
407: l_old_config_rev_nbr := x_qte_line_dtl_tbl(i).config_revision_num;
408:
409: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
410: IBE_UTIL.debug('old config id = '|| l_old_config_hdr_id);
411: IBE_UTIL.debug('old config rev number = '|| l_old_config_rev_nbr);
412: END IF;
413:
414:
415: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
411: IBE_UTIL.debug('old config rev number = '|| l_old_config_rev_nbr);
412: END IF;
413:
414:
415: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
416: IBE_UTIL.debug('call CZ_CONFIG_API_PUB.copy_configuration at'
417: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
418: END IF;
419:
412: END IF;
413:
414:
415: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
416: IBE_UTIL.debug('call CZ_CONFIG_API_PUB.copy_configuration at'
417: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
418: END IF;
419:
420: --ER#4025142
433: IF (l_ret_status <> FND_API.G_RET_STS_SUCCESS OR l_orig_item_id_tbl.count > 0) THEN
434: RAISE FND_API.G_EXC_ERROR;
435: END IF;
436:
437: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
438: IBE_UTIL.DEBUG('done CZ_CONFIG_API_PUB.Copy_Configuration at'
439: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
440: END IF;
441:
434: RAISE FND_API.G_EXC_ERROR;
435: END IF;
436:
437: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
438: IBE_UTIL.DEBUG('done CZ_CONFIG_API_PUB.Copy_Configuration at'
439: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
440: END IF;
441:
442: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
438: IBE_UTIL.DEBUG('done CZ_CONFIG_API_PUB.Copy_Configuration at'
439: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
440: END IF;
441:
442: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
443: IBE_UTIL.debug('new config id = '|| l_new_config_hdr_id);
444: IBE_UTIL.debug('new config rev number = '|| l_new_config_rev_nbr);
445: END IF;
446:
439: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
440: END IF;
441:
442: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
443: IBE_UTIL.debug('new config id = '|| l_new_config_hdr_id);
444: IBE_UTIL.debug('new config rev number = '|| l_new_config_rev_nbr);
445: END IF;
446:
447: -- update all other dtl table
440: END IF;
441:
442: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
443: IBE_UTIL.debug('new config id = '|| l_new_config_hdr_id);
444: IBE_UTIL.debug('new config rev number = '|| l_new_config_rev_nbr);
445: END IF;
446:
447: -- update all other dtl table
448: FOR j in 1..x_qte_line_dtl_tbl.COUNT LOOP
455: END LOOP;
456: END IF;
457: END LOOP;
458:
459: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
460: ibe_util.debug('before out line number is='|| x_qte_line_tbl.count);
461: END IF;
462: -- Standard check of p_commit.
463: IF FND_API.To_Boolean( p_commit ) THEN
456: END IF;
457: END LOOP;
458:
459: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
460: ibe_util.debug('before out line number is='|| x_qte_line_tbl.count);
461: END IF;
462: -- Standard check of p_commit.
463: IF FND_API.To_Boolean( p_commit ) THEN
464: COMMIT WORK;
469: p_count => x_msg_count,
470: p_data => x_msg_data);
471: EXCEPTION
472: WHEN FND_API.G_EXC_ERROR THEN
473: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
474: ibe_util.debug('Expected exception in copy_lines');
475: END IF;
476: ROLLBACK TO COPY_LINES_pvt;
477: x_return_status := FND_API.G_RET_STS_ERROR;
470: p_data => x_msg_data);
471: EXCEPTION
472: WHEN FND_API.G_EXC_ERROR THEN
473: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
474: ibe_util.debug('Expected exception in copy_lines');
475: END IF;
476: ROLLBACK TO COPY_LINES_pvt;
477: x_return_status := FND_API.G_RET_STS_ERROR;
478: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
478: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
479: p_count => x_msg_count,
480: p_data => x_msg_data);
481: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
482: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
483: ibe_util.debug('Unexpected exception in copy_lines');
484: END IF;
485: ROLLBACK TO COPY_LINES_pvt;
486: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
479: p_count => x_msg_count,
480: p_data => x_msg_data);
481: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
482: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
483: ibe_util.debug('Unexpected exception in copy_lines');
484: END IF;
485: ROLLBACK TO COPY_LINES_pvt;
486: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
487: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
487: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
488: p_count => x_msg_count,
489: p_data => x_msg_data);
490: WHEN OTHERS THEN
491: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
492: ibe_util.debug('Unknown exception in copy_lines');
493: END IF;
494: ROLLBACK TO COPY_LINES_pvt;
495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
488: p_count => x_msg_count,
489: p_data => x_msg_data);
490: WHEN OTHERS THEN
491: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
492: ibe_util.debug('Unknown exception in copy_lines');
493: END IF;
494: ROLLBACK TO COPY_LINES_pvt;
495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
496:
569: l_quote_access_rec.cust_account_id := p_recip_cust_account_id;
570: l_quote_access_rec.email_contact_address := p_emailAddress;
571: l_quote_access_rec.operation_code := 'CREATE';
572: l_qte_access_table(1) := l_quote_access_rec;
573: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
574: IBE_UTIL.DEBUG('Calling save_recipients to save recipient information');
575: END IF;
576: --DBMS_OUTPUT.PUT_LINE('Calling save_recipients to save recipient information ');
577: IF(nvl(l_qte_access_table.count,0) > 0) THEN
570: l_quote_access_rec.email_contact_address := p_emailAddress;
571: l_quote_access_rec.operation_code := 'CREATE';
572: l_qte_access_table(1) := l_quote_access_rec;
573: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
574: IBE_UTIL.DEBUG('Calling save_recipients to save recipient information');
575: END IF;
576: --DBMS_OUTPUT.PUT_LINE('Calling save_recipients to save recipient information ');
577: IF(nvl(l_qte_access_table.count,0) > 0) THEN
578:
575: END IF;
576: --DBMS_OUTPUT.PUT_LINE('Calling save_recipients to save recipient information ');
577: IF(nvl(l_qte_access_table.count,0) > 0) THEN
578:
579: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
580: IBE_UTIL.DEBUG('Calling save_recipients to save recipient information');
581: END IF;
582: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
583: IBE_UTIL.DEBUG('l_qte_access_table(1).quote_header_id: '||l_qte_access_table(1).quote_header_id);
576: --DBMS_OUTPUT.PUT_LINE('Calling save_recipients to save recipient information ');
577: IF(nvl(l_qte_access_table.count,0) > 0) THEN
578:
579: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
580: IBE_UTIL.DEBUG('Calling save_recipients to save recipient information');
581: END IF;
582: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
583: IBE_UTIL.DEBUG('l_qte_access_table(1).quote_header_id: '||l_qte_access_table(1).quote_header_id);
584: IBE_UTIL.DEBUG('l_qte_access_table(1).update_privilege_type_code: '|| l_qte_access_table(1).update_privilege_type_code);
578:
579: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
580: IBE_UTIL.DEBUG('Calling save_recipients to save recipient information');
581: END IF;
582: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
583: IBE_UTIL.DEBUG('l_qte_access_table(1).quote_header_id: '||l_qte_access_table(1).quote_header_id);
584: IBE_UTIL.DEBUG('l_qte_access_table(1).update_privilege_type_code: '|| l_qte_access_table(1).update_privilege_type_code);
585: IBE_UTIL.DEBUG('l_qte_access_table(1).party_id: '||l_qte_access_table(1).party_id);
586: IBE_UTIL.DEBUG('l_qte_access_table(1).cust_account_id: '||l_qte_access_table(1).cust_account_id);
579: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
580: IBE_UTIL.DEBUG('Calling save_recipients to save recipient information');
581: END IF;
582: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
583: IBE_UTIL.DEBUG('l_qte_access_table(1).quote_header_id: '||l_qte_access_table(1).quote_header_id);
584: IBE_UTIL.DEBUG('l_qte_access_table(1).update_privilege_type_code: '|| l_qte_access_table(1).update_privilege_type_code);
585: IBE_UTIL.DEBUG('l_qte_access_table(1).party_id: '||l_qte_access_table(1).party_id);
586: IBE_UTIL.DEBUG('l_qte_access_table(1).cust_account_id: '||l_qte_access_table(1).cust_account_id);
587: IBE_UTIL.DEBUG('l_qte_access_table(1).email_contact_address: '||l_qte_access_table(1).email_contact_address);
580: IBE_UTIL.DEBUG('Calling save_recipients to save recipient information');
581: END IF;
582: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
583: IBE_UTIL.DEBUG('l_qte_access_table(1).quote_header_id: '||l_qte_access_table(1).quote_header_id);
584: IBE_UTIL.DEBUG('l_qte_access_table(1).update_privilege_type_code: '|| l_qte_access_table(1).update_privilege_type_code);
585: IBE_UTIL.DEBUG('l_qte_access_table(1).party_id: '||l_qte_access_table(1).party_id);
586: IBE_UTIL.DEBUG('l_qte_access_table(1).cust_account_id: '||l_qte_access_table(1).cust_account_id);
587: IBE_UTIL.DEBUG('l_qte_access_table(1).email_contact_address: '||l_qte_access_table(1).email_contact_address);
588: END IF;
581: END IF;
582: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
583: IBE_UTIL.DEBUG('l_qte_access_table(1).quote_header_id: '||l_qte_access_table(1).quote_header_id);
584: IBE_UTIL.DEBUG('l_qte_access_table(1).update_privilege_type_code: '|| l_qte_access_table(1).update_privilege_type_code);
585: IBE_UTIL.DEBUG('l_qte_access_table(1).party_id: '||l_qte_access_table(1).party_id);
586: IBE_UTIL.DEBUG('l_qte_access_table(1).cust_account_id: '||l_qte_access_table(1).cust_account_id);
587: IBE_UTIL.DEBUG('l_qte_access_table(1).email_contact_address: '||l_qte_access_table(1).email_contact_address);
588: END IF;
589: IBE_QUOTE_SAVESHARE_V2_PVT.save_recipients(
582: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
583: IBE_UTIL.DEBUG('l_qte_access_table(1).quote_header_id: '||l_qte_access_table(1).quote_header_id);
584: IBE_UTIL.DEBUG('l_qte_access_table(1).update_privilege_type_code: '|| l_qte_access_table(1).update_privilege_type_code);
585: IBE_UTIL.DEBUG('l_qte_access_table(1).party_id: '||l_qte_access_table(1).party_id);
586: IBE_UTIL.DEBUG('l_qte_access_table(1).cust_account_id: '||l_qte_access_table(1).cust_account_id);
587: IBE_UTIL.DEBUG('l_qte_access_table(1).email_contact_address: '||l_qte_access_table(1).email_contact_address);
588: END IF;
589: IBE_QUOTE_SAVESHARE_V2_PVT.save_recipients(
590: p_quote_access_tbl => l_qte_access_table ,
583: IBE_UTIL.DEBUG('l_qte_access_table(1).quote_header_id: '||l_qte_access_table(1).quote_header_id);
584: IBE_UTIL.DEBUG('l_qte_access_table(1).update_privilege_type_code: '|| l_qte_access_table(1).update_privilege_type_code);
585: IBE_UTIL.DEBUG('l_qte_access_table(1).party_id: '||l_qte_access_table(1).party_id);
586: IBE_UTIL.DEBUG('l_qte_access_table(1).cust_account_id: '||l_qte_access_table(1).cust_account_id);
587: IBE_UTIL.DEBUG('l_qte_access_table(1).email_contact_address: '||l_qte_access_table(1).email_contact_address);
588: END IF;
589: IBE_QUOTE_SAVESHARE_V2_PVT.save_recipients(
590: p_quote_access_tbl => l_qte_access_table ,
591: p_quote_header_id => p_quote_header_id ,
606: END IF;
607:
608: END IF; -- IF(nvl(p_quote_access_tbl.count,0)
609:
610: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
611: IBE_UTIL.DEBUG('Done calling save_recipients to save recipient information');
612: END IF;
613: --DBMS_OUTPUT.PUT_LINE('Done calling save_recipients to save recipient information ');
614: for rec_get_sharee_id in c_get_sharee_id loop
607:
608: END IF; -- IF(nvl(p_quote_access_tbl.count,0)
609:
610: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
611: IBE_UTIL.DEBUG('Done calling save_recipients to save recipient information');
612: END IF;
613: --DBMS_OUTPUT.PUT_LINE('Done calling save_recipients to save recipient information ');
614: for rec_get_sharee_id in c_get_sharee_id loop
615: l_quote_access_rec.quote_sharee_number := rec_get_sharee_id.quote_sharee_number;
631: );
632:
633: EXCEPTION
634: WHEN FND_API.G_EXC_ERROR THEN
635: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
636: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.SaveSharee');
637: END IF;
638: ROLLBACK TO SAVESHAREE_pvt;
639: x_return_status := FND_API.G_RET_STS_ERROR;
632:
633: EXCEPTION
634: WHEN FND_API.G_EXC_ERROR THEN
635: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
636: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.SaveSharee');
637: END IF;
638: ROLLBACK TO SAVESHAREE_pvt;
639: x_return_status := FND_API.G_RET_STS_ERROR;
640: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
640: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
641: p_count => x_msg_count,
642: p_data => x_msg_data);
643: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
644: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
645: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.SaveSharee');
646: END IF;
647: ROLLBACK TO SAVESHAREE_pvt;
648: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
641: p_count => x_msg_count,
642: p_data => x_msg_data);
643: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
644: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
645: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.SaveSharee');
646: END IF;
647: ROLLBACK TO SAVESHAREE_pvt;
648: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
649: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
649: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
650: p_count => x_msg_count,
651: p_data => x_msg_data);
652: WHEN OTHERS THEN
653: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
654: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.SaveSharee');
655: END IF;
656: ROLLBACK TO SAVESHAREE_pvt;
657: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
650: p_count => x_msg_count,
651: p_data => x_msg_data);
652: WHEN OTHERS THEN
653: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
654: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.SaveSharee');
655: END IF;
656: ROLLBACK TO SAVESHAREE_pvt;
657: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
658:
721: l_order_type_id NUMBER;
722:
723:
724: BEGIN
725: -- --IBE_UTIL.ENABLE_DEBUG;
726: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
727: IBE_Util.Debug('Begin IBE_QUOTE_SAVESHARE_pvt.SaveAsAndShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
728: END IF;
729: -- Standard Start of API savepoint
722:
723:
724: BEGIN
725: -- --IBE_UTIL.ENABLE_DEBUG;
726: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
727: IBE_Util.Debug('Begin IBE_QUOTE_SAVESHARE_pvt.SaveAsAndShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
728: END IF;
729: -- Standard Start of API savepoint
730: SAVEPOINT SAVEASANDSHARE_pvt;
723:
724: BEGIN
725: -- --IBE_UTIL.ENABLE_DEBUG;
726: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
727: IBE_Util.Debug('Begin IBE_QUOTE_SAVESHARE_pvt.SaveAsAndShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
728: END IF;
729: -- Standard Start of API savepoint
730: SAVEPOINT SAVEASANDSHARE_pvt;
731: -- Standard call to check for call compatibility.
795: IF (l_to_qte_header_rec.quote_number <> fnd_api.g_miss_num) THEN
796: l_quote_number := l_to_qte_header_rec.quote_number;
797: END IF;
798:
799: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
800: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() starts at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
801: END IF;
802:
803: ASO_Quote_Pub.Copy_Quote(
796: l_quote_number := l_to_qte_header_rec.quote_number;
797: END IF;
798:
799: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
800: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() starts at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
801: END IF;
802:
803: ASO_Quote_Pub.Copy_Quote(
804: p_api_version_number => p_api_version_number
814: ,x_Return_Status => x_Return_Status
815: ,x_Msg_Count => x_Msg_Count
816: ,x_Msg_Data => x_Msg_Data);
817:
818: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
819: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() finishes at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
820: END IF;
821:
822: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
815: ,x_Msg_Count => x_Msg_Count
816: ,x_Msg_Data => x_Msg_Data);
817:
818: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
819: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() finishes at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
820: END IF;
821:
822: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
823: RAISE FND_API.G_EXC_ERROR;
832: := IBE_Quote_Misc_pvt.getQuotelastUpdateDate
833: (l_to_qte_header_rec.quote_header_id);
834: ELSE
835: -- get order_type_id from the original quote header
836: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
837: IBE_Util.Debug('Getting order_type_id from original quote header ' || p_from_quote_header_id);
838: END IF;
839: OPEN c_order_type(p_from_quote_header_id);
840: FETCH c_order_type INTO l_order_type_id;
833: (l_to_qte_header_rec.quote_header_id);
834: ELSE
835: -- get order_type_id from the original quote header
836: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
837: IBE_Util.Debug('Getting order_type_id from original quote header ' || p_from_quote_header_id);
838: END IF;
839: OPEN c_order_type(p_from_quote_header_id);
840: FETCH c_order_type INTO l_order_type_id;
841: IF l_order_type_id IS NOT NULL
842: THEN
843: l_to_qte_header_rec.order_type_id := l_order_type_id;
844: END IF;
845: CLOSE c_order_type;
846: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
847: IBE_Util.Debug('order_type_id=' || l_order_type_id);
848: END IF;
849:
850: -- get all line related information from original quote header id
843: l_to_qte_header_rec.order_type_id := l_order_type_id;
844: END IF;
845: CLOSE c_order_type;
846: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
847: IBE_Util.Debug('order_type_id=' || l_order_type_id);
848: END IF;
849:
850: -- get all line related information from original quote header id
851: Copy_Lines
935: -- Standard call to get message count and IF count is 1, get message info.
936: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
937: p_count => x_msg_count,
938: p_data => x_msg_data);
939: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
940: IBE_Util.Debug('End IBE_QUOTE_SAVESHARE_pvt.SaveAsAndShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
941: END IF;
942: --IBE_UTIL.DISABLE_DEBUG;
943: EXCEPTION
936: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
937: p_count => x_msg_count,
938: p_data => x_msg_data);
939: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
940: IBE_Util.Debug('End IBE_QUOTE_SAVESHARE_pvt.SaveAsAndShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
941: END IF;
942: --IBE_UTIL.DISABLE_DEBUG;
943: EXCEPTION
944: WHEN FND_API.G_EXC_ERROR THEN
938: p_data => x_msg_data);
939: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
940: IBE_Util.Debug('End IBE_QUOTE_SAVESHARE_pvt.SaveAsAndShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
941: END IF;
942: --IBE_UTIL.DISABLE_DEBUG;
943: EXCEPTION
944: WHEN FND_API.G_EXC_ERROR THEN
945: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
946: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.SaveAsAndShare');
941: END IF;
942: --IBE_UTIL.DISABLE_DEBUG;
943: EXCEPTION
944: WHEN FND_API.G_EXC_ERROR THEN
945: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
946: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.SaveAsAndShare');
947: END IF;
948: ROLLBACK TO SAVEASANDSHARE_pvt;
949: x_return_status := FND_API.G_RET_STS_ERROR;
942: --IBE_UTIL.DISABLE_DEBUG;
943: EXCEPTION
944: WHEN FND_API.G_EXC_ERROR THEN
945: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
946: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.SaveAsAndShare');
947: END IF;
948: ROLLBACK TO SAVEASANDSHARE_pvt;
949: x_return_status := FND_API.G_RET_STS_ERROR;
950: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
950: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
951: p_count => x_msg_count,
952: p_data => x_msg_data);
953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
955: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.SaveAsAndShare');
956: END IF;
957: ROLLBACK TO SAVEASANDSHARE_pvt;
958: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
951: p_count => x_msg_count,
952: p_data => x_msg_data);
953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
955: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.SaveAsAndShare');
956: END IF;
957: ROLLBACK TO SAVEASANDSHARE_pvt;
958: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
959: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
959: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
960: p_count => x_msg_count,
961: p_data => x_msg_data);
962: WHEN OTHERS THEN
963: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
964: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.SaveAsAndShare');
965: END IF;
966: ROLLBACK TO SAVEASANDSHARE_pvt;
967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
960: p_count => x_msg_count,
961: p_data => x_msg_data);
962: WHEN OTHERS THEN
963: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
964: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.SaveAsAndShare');
965: END IF;
966: ROLLBACK TO SAVEASANDSHARE_pvt;
967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
968:
973:
974: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
975: p_count => x_msg_count,
976: p_data => x_msg_data);
977: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
978: IBE_Util.Debug('End IBE_QUOTE_SAVESHARE_pvt.SaveAsAndShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
979: END IF;
980: --IBE_UTIL.DISABLE_DEBUG;
981: END SaveAsAndShare;
974: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
975: p_count => x_msg_count,
976: p_data => x_msg_data);
977: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
978: IBE_Util.Debug('End IBE_QUOTE_SAVESHARE_pvt.SaveAsAndShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
979: END IF;
980: --IBE_UTIL.DISABLE_DEBUG;
981: END SaveAsAndShare;
982:
976: p_data => x_msg_data);
977: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
978: IBE_Util.Debug('End IBE_QUOTE_SAVESHARE_pvt.SaveAsAndShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
979: END IF;
980: --IBE_UTIL.DISABLE_DEBUG;
981: END SaveAsAndShare;
982:
983: PROCEDURE AppendToReplaceShare(
984: p_api_version_number IN NUMBER ,
1071: l_Price_Adjustment_Tbl ASO_Quote_Pub.Price_Adj_Tbl_Type;
1072: l_Price_Adj_Rltship_Tbl ASO_Quote_Pub.Price_Adj_Rltship_Tbl_Type;
1073:
1074: BEGIN
1075: --IBE_UTIL.ENABLE_DEBUG;
1076: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1077: IBE_Util.Debug('Begin **new** IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1078: IBE_Util.Debug('Parameters pased to IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() are');
1079: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1072: l_Price_Adj_Rltship_Tbl ASO_Quote_Pub.Price_Adj_Rltship_Tbl_Type;
1073:
1074: BEGIN
1075: --IBE_UTIL.ENABLE_DEBUG;
1076: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1077: IBE_Util.Debug('Begin **new** IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1078: IBE_Util.Debug('Parameters pased to IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() are');
1079: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1080: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1073:
1074: BEGIN
1075: --IBE_UTIL.ENABLE_DEBUG;
1076: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1077: IBE_Util.Debug('Begin **new** IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1078: IBE_Util.Debug('Parameters pased to IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() are');
1079: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1080: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1081: IBE_Util.Debug('P_INCREASEVERSION: '||P_INCREASEVERSION);
1074: BEGIN
1075: --IBE_UTIL.ENABLE_DEBUG;
1076: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1077: IBE_Util.Debug('Begin **new** IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1078: IBE_Util.Debug('Parameters pased to IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() are');
1079: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1080: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1081: IBE_Util.Debug('P_INCREASEVERSION: '||P_INCREASEVERSION);
1082: END IF;
1075: --IBE_UTIL.ENABLE_DEBUG;
1076: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1077: IBE_Util.Debug('Begin **new** IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1078: IBE_Util.Debug('Parameters pased to IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() are');
1079: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1080: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1081: IBE_Util.Debug('P_INCREASEVERSION: '||P_INCREASEVERSION);
1082: END IF;
1083:
1076: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1077: IBE_Util.Debug('Begin **new** IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1078: IBE_Util.Debug('Parameters pased to IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() are');
1079: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1080: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1081: IBE_Util.Debug('P_INCREASEVERSION: '||P_INCREASEVERSION);
1082: END IF;
1083:
1084:
1077: IBE_Util.Debug('Begin **new** IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1078: IBE_Util.Debug('Parameters pased to IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() are');
1079: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1080: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1081: IBE_Util.Debug('P_INCREASEVERSION: '||P_INCREASEVERSION);
1082: END IF;
1083:
1084:
1085: -- Standard Start of API savepoint
1100: -- Initialize API return status to success
1101: x_return_status := FND_API.G_RET_STS_SUCCESS;
1102:
1103: -- API body
1104: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1105: IBE_UTIL.DEBUG('APPENDTOREPLACESHARE: Before Calling log_environment_info');
1106: END IF;
1107: IBE_Quote_Misc_pvt.log_environment_info();
1108: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1101: x_return_status := FND_API.G_RET_STS_SUCCESS;
1102:
1103: -- API body
1104: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1105: IBE_UTIL.DEBUG('APPENDTOREPLACESHARE: Before Calling log_environment_info');
1106: END IF;
1107: IBE_Quote_Misc_pvt.log_environment_info();
1108: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1109: IBE_UTIL.DEBUG('APPENDTOREPLACESHARE: After Calling log_environment_info');
1104: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1105: IBE_UTIL.DEBUG('APPENDTOREPLACESHARE: Before Calling log_environment_info');
1106: END IF;
1107: IBE_Quote_Misc_pvt.log_environment_info();
1108: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1109: IBE_UTIL.DEBUG('APPENDTOREPLACESHARE: After Calling log_environment_info');
1110: END IF;
1111:
1112: -- User Authentication
1105: IBE_UTIL.DEBUG('APPENDTOREPLACESHARE: Before Calling log_environment_info');
1106: END IF;
1107: IBE_Quote_Misc_pvt.log_environment_info();
1108: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1109: IBE_UTIL.DEBUG('APPENDTOREPLACESHARE: After Calling log_environment_info');
1110: END IF;
1111:
1112: -- User Authentication
1113: IBE_Quote_Misc_pvt.Validate_User_Update(
1165: IF p_price_list_id <> fnd_api.g_miss_num THEN
1166: l_to_qte_header_rec.price_list_id := p_price_list_id;
1167: END IF;
1168:
1169: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1170: IBE_Util.Debug('Parameter values just before checking "REPLACE" or "APPEND" condition');
1171: IBE_Util.Debug('p_MODE: '||p_MODE);
1172: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1173: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1166: l_to_qte_header_rec.price_list_id := p_price_list_id;
1167: END IF;
1168:
1169: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1170: IBE_Util.Debug('Parameter values just before checking "REPLACE" or "APPEND" condition');
1171: IBE_Util.Debug('p_MODE: '||p_MODE);
1172: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1173: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1174: IBE_Util.Debug('P_INCREASEVERSION: '||P_INCREASEVERSION);
1167: END IF;
1168:
1169: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1170: IBE_Util.Debug('Parameter values just before checking "REPLACE" or "APPEND" condition');
1171: IBE_Util.Debug('p_MODE: '||p_MODE);
1172: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1173: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1174: IBE_Util.Debug('P_INCREASEVERSION: '||P_INCREASEVERSION);
1175: END IF;
1168:
1169: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1170: IBE_Util.Debug('Parameter values just before checking "REPLACE" or "APPEND" condition');
1171: IBE_Util.Debug('p_MODE: '||p_MODE);
1172: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1173: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1174: IBE_Util.Debug('P_INCREASEVERSION: '||P_INCREASEVERSION);
1175: END IF;
1176:
1169: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1170: IBE_Util.Debug('Parameter values just before checking "REPLACE" or "APPEND" condition');
1171: IBE_Util.Debug('p_MODE: '||p_MODE);
1172: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1173: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1174: IBE_Util.Debug('P_INCREASEVERSION: '||P_INCREASEVERSION);
1175: END IF;
1176:
1177: /*Obtain cart name here*/
1170: IBE_Util.Debug('Parameter values just before checking "REPLACE" or "APPEND" condition');
1171: IBE_Util.Debug('p_MODE: '||p_MODE);
1172: IBE_Util.Debug('P_ORIGINAL_QUOTE_HEADER_ID: '||P_ORIGINAL_QUOTE_HEADER_ID);
1173: IBE_Util.Debug('P_REP_APP_QUOTE_HEADER_ID: '||P_REP_APP_QUOTE_HEADER_ID);
1174: IBE_Util.Debug('P_INCREASEVERSION: '||P_INCREASEVERSION);
1175: END IF;
1176:
1177: /*Obtain cart name here*/
1178: OPEN c_cart_name(p_rep_app_quote_header_id);
1191: FETCH c_check_cart_owner INTO
1192: l_source_cart_owner;
1193: CLOSE c_check_cart_owner;
1194:
1195: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1196: IBE_Util.Debug('quote number obtained from the cursor is: '||l_to_Qte_Header_Rec.quote_name);
1197: IBE_Util.Debug('quote name obtained from the cursor is: '|| l_to_Qte_Header_Rec.quote_number);
1198: END IF;
1199:
1192: l_source_cart_owner;
1193: CLOSE c_check_cart_owner;
1194:
1195: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1196: IBE_Util.Debug('quote number obtained from the cursor is: '||l_to_Qte_Header_Rec.quote_name);
1197: IBE_Util.Debug('quote name obtained from the cursor is: '|| l_to_Qte_Header_Rec.quote_number);
1198: END IF;
1199:
1200: if (((p_mode = 'REPLACE') and (l_target_cart_owner <> l_source_cart_owner)) or
1193: CLOSE c_check_cart_owner;
1194:
1195: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1196: IBE_Util.Debug('quote number obtained from the cursor is: '||l_to_Qte_Header_Rec.quote_name);
1197: IBE_Util.Debug('quote name obtained from the cursor is: '|| l_to_Qte_Header_Rec.quote_number);
1198: END IF;
1199:
1200: if (((p_mode = 'REPLACE') and (l_target_cart_owner <> l_source_cart_owner)) or
1201: ((p_mode = 'APPENDTO') and (fnd_api.to_Boolean(p_increaseversion)))) then
1222: if ((p_mode = 'REPLACE') or
1223: ((p_mode = 'APPENDTO') and (fnd_api.to_Boolean(p_increaseversion)))) then
1224:
1225:
1226: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1227: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() starts');
1228: END IF;
1229: aso_quote_pub.copy_quote(
1230: p_api_version_number => P_Api_Version_Number
1223: ((p_mode = 'APPENDTO') and (fnd_api.to_Boolean(p_increaseversion)))) then
1224:
1225:
1226: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1227: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() starts');
1228: END IF;
1229: aso_quote_pub.copy_quote(
1230: p_api_version_number => P_Api_Version_Number
1231: ,p_init_msg_list => fnd_api.g_false
1238: ,X_Return_Status => x_Return_Status
1239: ,X_Msg_Count => x_Msg_Count
1240: ,X_Msg_Data => x_Msg_Data);
1241:
1242: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1243: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() finishes');
1244: IBE_Util.Debug('x_qte_header_id: ' || l_to_qte_header_rec.quote_header_id);
1245: END IF;
1246:
1239: ,X_Msg_Count => x_Msg_Count
1240: ,X_Msg_Data => x_Msg_Data);
1241:
1242: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1243: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() finishes');
1244: IBE_Util.Debug('x_qte_header_id: ' || l_to_qte_header_rec.quote_header_id);
1245: END IF;
1246:
1247: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1240: ,X_Msg_Data => x_Msg_Data);
1241:
1242: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1243: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() finishes');
1244: IBE_Util.Debug('x_qte_header_id: ' || l_to_qte_header_rec.quote_header_id);
1245: END IF;
1246:
1247: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1248: RAISE FND_API.G_EXC_ERROR;
1330:
1331:
1332: /*To identify the name of the destination cart*/
1333:
1334: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1335: IBE_Util.Debug('parameter values before calling SAVE');
1336: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_name : '||l_to_Qte_Header_Rec.quote_name);
1337: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_number : '|| l_to_Qte_Header_Rec.quote_number);
1338: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_header_id : '|| l_to_Qte_Header_Rec.quote_header_id);
1331:
1332: /*To identify the name of the destination cart*/
1333:
1334: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1335: IBE_Util.Debug('parameter values before calling SAVE');
1336: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_name : '||l_to_Qte_Header_Rec.quote_name);
1337: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_number : '|| l_to_Qte_Header_Rec.quote_number);
1338: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_header_id : '|| l_to_Qte_Header_Rec.quote_header_id);
1339: IBE_Util.Debug('quote version q_ver is: '||q_ver);
1332: /*To identify the name of the destination cart*/
1333:
1334: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1335: IBE_Util.Debug('parameter values before calling SAVE');
1336: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_name : '||l_to_Qte_Header_Rec.quote_name);
1337: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_number : '|| l_to_Qte_Header_Rec.quote_number);
1338: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_header_id : '|| l_to_Qte_Header_Rec.quote_header_id);
1339: IBE_Util.Debug('quote version q_ver is: '||q_ver);
1340: END IF;
1333:
1334: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1335: IBE_Util.Debug('parameter values before calling SAVE');
1336: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_name : '||l_to_Qte_Header_Rec.quote_name);
1337: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_number : '|| l_to_Qte_Header_Rec.quote_number);
1338: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_header_id : '|| l_to_Qte_Header_Rec.quote_header_id);
1339: IBE_Util.Debug('quote version q_ver is: '||q_ver);
1340: END IF;
1341:
1334: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1335: IBE_Util.Debug('parameter values before calling SAVE');
1336: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_name : '||l_to_Qte_Header_Rec.quote_name);
1337: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_number : '|| l_to_Qte_Header_Rec.quote_number);
1338: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_header_id : '|| l_to_Qte_Header_Rec.quote_header_id);
1339: IBE_Util.Debug('quote version q_ver is: '||q_ver);
1340: END IF;
1341:
1342: --8/12/02: Default Feature:
1335: IBE_Util.Debug('parameter values before calling SAVE');
1336: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_name : '||l_to_Qte_Header_Rec.quote_name);
1337: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_number : '|| l_to_Qte_Header_Rec.quote_number);
1338: IBE_Util.Debug('l_to_Qte_Header_Rec.quote_header_id : '|| l_to_Qte_Header_Rec.quote_header_id);
1339: IBE_Util.Debug('quote version q_ver is: '||q_ver);
1340: END IF;
1341:
1342: --8/12/02: Default Feature:
1343: if ((p_rep_app_invTo_partySiteId is not null) and (p_rep_app_invTo_partySiteId <> FND_API.G_MISS_NUM) ) then
1408: -- Standard call to get message count and IF count is 1, get message info.
1409: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1410: p_count => x_msg_count,
1411: p_data => x_msg_data);
1412: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1413: IBE_Util.Debug('End IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1414: END IF;
1415:
1416: EXCEPTION
1409: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1410: p_count => x_msg_count,
1411: p_data => x_msg_data);
1412: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1413: IBE_Util.Debug('End IBE_QUOTE_SAVESHARE_pvt.AppendToReplaceShare() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1414: END IF;
1415:
1416: EXCEPTION
1417: WHEN FND_API.G_EXC_ERROR THEN
1414: END IF;
1415:
1416: EXCEPTION
1417: WHEN FND_API.G_EXC_ERROR THEN
1418: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1419: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.AppendToReplaceShare');
1420: END IF;
1421: ROLLBACK TO APPENDTOREPLACESHARE_pvt;
1422: x_return_status := FND_API.G_RET_STS_ERROR;
1415:
1416: EXCEPTION
1417: WHEN FND_API.G_EXC_ERROR THEN
1418: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1419: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.AppendToReplaceShare');
1420: END IF;
1421: ROLLBACK TO APPENDTOREPLACESHARE_pvt;
1422: x_return_status := FND_API.G_RET_STS_ERROR;
1423: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1422: x_return_status := FND_API.G_RET_STS_ERROR;
1423: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1424: p_count => x_msg_count,
1425: p_data => x_msg_data);
1426: --IBE_UTIL.DISABLE_DEBUG;
1427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1428: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1429: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.AppendToReplaceShare');
1430: END IF;
1424: p_count => x_msg_count,
1425: p_data => x_msg_data);
1426: --IBE_UTIL.DISABLE_DEBUG;
1427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1428: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1429: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.AppendToReplaceShare');
1430: END IF;
1431: ROLLBACK TO APPENDTOREPLACESHARE_pvt;
1432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1425: p_data => x_msg_data);
1426: --IBE_UTIL.DISABLE_DEBUG;
1427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1428: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1429: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.AppendToReplaceShare');
1430: END IF;
1431: ROLLBACK TO APPENDTOREPLACESHARE_pvt;
1432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1433: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1433: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1434: p_count => x_msg_count,
1435: p_data => x_msg_data);
1436: WHEN OTHERS THEN
1437: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1438: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.AppendToReplaceShare');
1439: END IF;
1440: ROLLBACK TO APPENDTOREPLACESHARE_pvt;
1441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1434: p_count => x_msg_count,
1435: p_data => x_msg_data);
1436: WHEN OTHERS THEN
1437: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1438: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.AppendToReplaceShare');
1439: END IF;
1440: ROLLBACK TO APPENDTOREPLACESHARE_pvt;
1441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1442:
1493: -- Initialize API return status to success
1494: x_return_status := FND_API.G_RET_STS_SUCCESS;
1495:
1496: -- API body
1497: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1498: IBE_UTIL.DEBUG('SAVEASANDSHARE: Before Calling log_environment_info');
1499: END IF;
1500: IBE_Quote_Misc_pvt.log_environment_info();
1501: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1494: x_return_status := FND_API.G_RET_STS_SUCCESS;
1495:
1496: -- API body
1497: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1498: IBE_UTIL.DEBUG('SAVEASANDSHARE: Before Calling log_environment_info');
1499: END IF;
1500: IBE_Quote_Misc_pvt.log_environment_info();
1501: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1502: IBE_UTIL.DEBUG('SAVEASANDSHARE: After Calling log_environment_info');
1497: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1498: IBE_UTIL.DEBUG('SAVEASANDSHARE: Before Calling log_environment_info');
1499: END IF;
1500: IBE_Quote_Misc_pvt.log_environment_info();
1501: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1502: IBE_UTIL.DEBUG('SAVEASANDSHARE: After Calling log_environment_info');
1503: END IF;
1504:
1505: /*IF (P_URL is not null and P_URL <> FND_API.G_MISS_CHAR) THEN
1498: IBE_UTIL.DEBUG('SAVEASANDSHARE: Before Calling log_environment_info');
1499: END IF;
1500: IBE_Quote_Misc_pvt.log_environment_info();
1501: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1502: IBE_UTIL.DEBUG('SAVEASANDSHARE: After Calling log_environment_info');
1503: END IF;
1504:
1505: /*IF (P_URL is not null and P_URL <> FND_API.G_MISS_CHAR) THEN
1506: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1502: IBE_UTIL.DEBUG('SAVEASANDSHARE: After Calling log_environment_info');
1503: END IF;
1504:
1505: /*IF (P_URL is not null and P_URL <> FND_API.G_MISS_CHAR) THEN
1506: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1507: ibe_util.debug('call IBE_QUOTE_SAVESHARE_pvt.savecontactpoint at '
1508: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1509: END IF;
1510:
1503: END IF;
1504:
1505: /*IF (P_URL is not null and P_URL <> FND_API.G_MISS_CHAR) THEN
1506: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1507: ibe_util.debug('call IBE_QUOTE_SAVESHARE_pvt.savecontactpoint at '
1508: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1509: END IF;
1510:
1511: saveContactPoint
1525: END IF;
1526: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1527: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1528: END IF;
1529: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1530: ibe_util.debug('done IBE_QUOTE_SAVESHARE_pvt.savecontactpoint at '
1531: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1532: END IF;
1533:
1526: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1527: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1528: END IF;
1529: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1530: ibe_util.debug('done IBE_QUOTE_SAVESHARE_pvt.savecontactpoint at '
1531: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1532: END IF;
1533:
1534: END IF; -- end of url*/
1534: END IF; -- end of url*/
1535:
1536: IF (P_sharee_email_Address is not null) THEN
1537: FOR i IN 1..P_sharee_email_Address.count LOOP
1538: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1539: ibe_util.debug('call IBE_QUOTE_SAVESHARE_pvt.savesharee '|| i || ' at '
1540: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1541: END IF;
1542:
1535:
1536: IF (P_sharee_email_Address is not null) THEN
1537: FOR i IN 1..P_sharee_email_Address.count LOOP
1538: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1539: ibe_util.debug('call IBE_QUOTE_SAVESHARE_pvt.savesharee '|| i || ' at '
1540: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1541: END IF;
1542:
1543: IBE_QUOTE_SAVESHARE_pvt.SaveSharee
1557: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1559: END IF;
1560:
1561: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1562: IBE_UTIL.DEBUG('call IBE_QUOTE_SAVESHARE_pvt.emailsharee at'
1563: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1564: END IF;
1565:
1558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1559: END IF;
1560:
1561: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1562: IBE_UTIL.DEBUG('call IBE_QUOTE_SAVESHARE_pvt.emailsharee at'
1563: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1564: END IF;
1565:
1566: IBE_QUOTE_SAVESHARE_pvt.EmailSharee
1582: END IF;
1583: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1584: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1585: END IF;
1586: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1587: IBE_UTIL.DEBUG('done IBE_QUOTE_SAVESHARE_pvt.emailsharee at'
1588: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1589: END IF;
1590:
1583: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1584: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1585: END IF;
1586: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1587: IBE_UTIL.DEBUG('done IBE_QUOTE_SAVESHARE_pvt.emailsharee at'
1588: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1589: END IF;
1590:
1591: END LOOP;
1649: -- Initialize API return status to success
1650: x_return_status := FND_API.G_RET_STS_SUCCESS;
1651:
1652: -- API body
1653: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1654: IBE_UTIL.DEBUG('ActivateQuote: Before Calling log_environment_info');
1655: END IF;
1656: IBE_Quote_Misc_pvt.log_environment_info();
1657: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1650: x_return_status := FND_API.G_RET_STS_SUCCESS;
1651:
1652: -- API body
1653: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1654: IBE_UTIL.DEBUG('ActivateQuote: Before Calling log_environment_info');
1655: END IF;
1656: IBE_Quote_Misc_pvt.log_environment_info();
1657: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1658: IBE_UTIL.DEBUG('ActivateQuote: After Calling log_environment_info');
1653: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1654: IBE_UTIL.DEBUG('ActivateQuote: Before Calling log_environment_info');
1655: END IF;
1656: IBE_Quote_Misc_pvt.log_environment_info();
1657: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1658: IBE_UTIL.DEBUG('ActivateQuote: After Calling log_environment_info');
1659: END IF;
1660:
1661: -- User Authentication
1654: IBE_UTIL.DEBUG('ActivateQuote: Before Calling log_environment_info');
1655: END IF;
1656: IBE_Quote_Misc_pvt.log_environment_info();
1657: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1658: IBE_UTIL.DEBUG('ActivateQuote: After Calling log_environment_info');
1659: END IF;
1660:
1661: -- User Authentication
1662: IBE_Quote_Misc_pvt.Validate_User_Update(
1673: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1674: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1675: END IF;
1676:
1677: --IBE_UTIL.ENABLE_DEBUG;
1678: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1679: IBE_Util.Debug('Begin IBE_QUOTE_SAVESHARE_pvt.ActivateQuote() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1680: END IF;
1681:
1674: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1675: END IF;
1676:
1677: --IBE_UTIL.ENABLE_DEBUG;
1678: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1679: IBE_Util.Debug('Begin IBE_QUOTE_SAVESHARE_pvt.ActivateQuote() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1680: END IF;
1681:
1682: l_qte_header_rec.quote_header_id := p_quote_header_id;
1675: END IF;
1676:
1677: --IBE_UTIL.ENABLE_DEBUG;
1678: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1679: IBE_Util.Debug('Begin IBE_QUOTE_SAVESHARE_pvt.ActivateQuote() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1680: END IF;
1681:
1682: l_qte_header_rec.quote_header_id := p_quote_header_id;
1683: l_qte_header_rec.last_update_date := p_last_update_date;
1688: END IF;
1689:
1690:
1691: IF FND_API.To_Boolean(p_increaseVersion) THEN
1692: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1693: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() starts at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1694: END IF;
1695:
1696: ASO_Quote_Pub.Copy_Quote(
1689:
1690:
1691: IF FND_API.To_Boolean(p_increaseVersion) THEN
1692: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1693: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() starts at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1694: END IF;
1695:
1696: ASO_Quote_Pub.Copy_Quote(
1697: P_Api_Version_Number => P_Api_Version_Number
1703: ,X_Return_Status => x_return_status
1704: ,X_Msg_Count => x_msg_count
1705: ,X_Msg_Data => x_msg_data);
1706:
1707: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1708: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() finishes at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1709: END IF;
1710:
1711: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1704: ,X_Msg_Count => x_msg_count
1705: ,X_Msg_Data => x_msg_data);
1706:
1707: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1708: IBE_Util.Debug('ASO_Quote_Pub.Copy_Quote() finishes at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1709: END IF;
1710:
1711: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1712: RAISE FND_API.G_EXC_ERROR;
1729: l_control_rec.header_pricing_event := FND_Profile.Value('IBE_INCART_PRICING_EVENT');
1730: l_control_rec.line_pricing_event := FND_API.G_MISS_CHAR;
1731: l_control_rec.calculate_freight_charge_flag := 'Y';
1732: l_control_rec.calculate_tax_flag := 'Y';
1733: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1734: ibe_util.debug('Activate quote: l_control_rec.pricing_request_type '||l_control_rec.pricing_request_type);
1735: ibe_util.debug('Activate quote: l_control_rec.header_pricing_event '||l_control_rec.header_pricing_event );
1736: ibe_util.debug('Activate quote: l_control_rec.line_pricing_event '||l_control_rec.line_pricing_event );
1737: END IF;
1730: l_control_rec.line_pricing_event := FND_API.G_MISS_CHAR;
1731: l_control_rec.calculate_freight_charge_flag := 'Y';
1732: l_control_rec.calculate_tax_flag := 'Y';
1733: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1734: ibe_util.debug('Activate quote: l_control_rec.pricing_request_type '||l_control_rec.pricing_request_type);
1735: ibe_util.debug('Activate quote: l_control_rec.header_pricing_event '||l_control_rec.header_pricing_event );
1736: ibe_util.debug('Activate quote: l_control_rec.line_pricing_event '||l_control_rec.line_pricing_event );
1737: END IF;
1738: IBE_Quote_Save_pvt.save(
1731: l_control_rec.calculate_freight_charge_flag := 'Y';
1732: l_control_rec.calculate_tax_flag := 'Y';
1733: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1734: ibe_util.debug('Activate quote: l_control_rec.pricing_request_type '||l_control_rec.pricing_request_type);
1735: ibe_util.debug('Activate quote: l_control_rec.header_pricing_event '||l_control_rec.header_pricing_event );
1736: ibe_util.debug('Activate quote: l_control_rec.line_pricing_event '||l_control_rec.line_pricing_event );
1737: END IF;
1738: IBE_Quote_Save_pvt.save(
1739: p_api_version_number => p_api_version_number
1732: l_control_rec.calculate_tax_flag := 'Y';
1733: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1734: ibe_util.debug('Activate quote: l_control_rec.pricing_request_type '||l_control_rec.pricing_request_type);
1735: ibe_util.debug('Activate quote: l_control_rec.header_pricing_event '||l_control_rec.header_pricing_event );
1736: ibe_util.debug('Activate quote: l_control_rec.line_pricing_event '||l_control_rec.line_pricing_event );
1737: END IF;
1738: IBE_Quote_Save_pvt.save(
1739: p_api_version_number => p_api_version_number
1740: ,p_init_msg_list => FND_API.G_FALSE
1759: l_party_id := rec_owner_party.party_id;
1760: l_cust_account_id := rec_owner_party.cust_account_id;
1761: exit when c_owner_party%notfound;
1762: END LOOP;
1763: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1764: IBE_UTIL.DEBUG('Owner party_id: '||l_party_id);
1765: IBE_UTIL.DEBUG('Owner cust_account_id: '||l_cust_account_id);
1766: END IF;
1767:
1760: l_cust_account_id := rec_owner_party.cust_account_id;
1761: exit when c_owner_party%notfound;
1762: END LOOP;
1763: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1764: IBE_UTIL.DEBUG('Owner party_id: '||l_party_id);
1765: IBE_UTIL.DEBUG('Owner cust_account_id: '||l_cust_account_id);
1766: END IF;
1767:
1768: --DBMS_OUTPUT.PUT_LINE('Calling IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE ');
1761: exit when c_owner_party%notfound;
1762: END LOOP;
1763: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1764: IBE_UTIL.DEBUG('Owner party_id: '||l_party_id);
1765: IBE_UTIL.DEBUG('Owner cust_account_id: '||l_cust_account_id);
1766: END IF;
1767:
1768: --DBMS_OUTPUT.PUT_LINE('Calling IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE ');
1769: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1765: IBE_UTIL.DEBUG('Owner cust_account_id: '||l_cust_account_id);
1766: END IF;
1767:
1768: --DBMS_OUTPUT.PUT_LINE('Calling IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE ');
1769: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1770: IBE_UTIL.DEBUG('Calling IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE ');
1771: END IF;
1772: IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE(
1773: P_Quote_header_rec => l_qte_header_rec ,
1766: END IF;
1767:
1768: --DBMS_OUTPUT.PUT_LINE('Calling IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE ');
1769: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1770: IBE_UTIL.DEBUG('Calling IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE ');
1771: END IF;
1772: IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE(
1773: P_Quote_header_rec => l_qte_header_rec ,
1774: P_Party_id => l_party_id ,
1787: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1788: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1789: END IF;
1790: --DBMS_OUTPUT.PUT_LINE('Finished calling IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE ');
1791: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1792: IBE_UTIL.DEBUG('Finished calling IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE ');
1793: END IF;
1794:
1795: -- Standard check of p_commit.
1788: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1789: END IF;
1790: --DBMS_OUTPUT.PUT_LINE('Finished calling IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE ');
1791: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1792: IBE_UTIL.DEBUG('Finished calling IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE ');
1793: END IF;
1794:
1795: -- Standard check of p_commit.
1796: IF FND_API.To_Boolean( p_commit ) THEN
1800: -- Standard call to get message count and IF count is 1, get message info.
1801: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1802: p_count => x_msg_count,
1803: p_data => x_msg_data);
1804: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1805: IBE_Util.Debug('End IBE_QUOTE_SAVESHARE_pvt.ActivateQuote() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1806: END IF;
1807: --IBE_UTIL.DISABLE_DEBUG;
1808: EXCEPTION
1801: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1802: p_count => x_msg_count,
1803: p_data => x_msg_data);
1804: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1805: IBE_Util.Debug('End IBE_QUOTE_SAVESHARE_pvt.ActivateQuote() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1806: END IF;
1807: --IBE_UTIL.DISABLE_DEBUG;
1808: EXCEPTION
1809: WHEN FND_API.G_EXC_ERROR THEN
1803: p_data => x_msg_data);
1804: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1805: IBE_Util.Debug('End IBE_QUOTE_SAVESHARE_pvt.ActivateQuote() at ' || TO_CHAR(SYSDATE, 'MM/DD/YYYY:HH24:MI:SS'));
1806: END IF;
1807: --IBE_UTIL.DISABLE_DEBUG;
1808: EXCEPTION
1809: WHEN FND_API.G_EXC_ERROR THEN
1810: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1811: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.ActivateQuote');
1806: END IF;
1807: --IBE_UTIL.DISABLE_DEBUG;
1808: EXCEPTION
1809: WHEN FND_API.G_EXC_ERROR THEN
1810: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1811: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.ActivateQuote');
1812: END IF;
1813: ROLLBACK TO ActivateQuote_pvt;
1814: x_return_status := FND_API.G_RET_STS_ERROR;
1807: --IBE_UTIL.DISABLE_DEBUG;
1808: EXCEPTION
1809: WHEN FND_API.G_EXC_ERROR THEN
1810: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1811: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.ActivateQuote');
1812: END IF;
1813: ROLLBACK TO ActivateQuote_pvt;
1814: x_return_status := FND_API.G_RET_STS_ERROR;
1815: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1815: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1816: p_count => x_msg_count,
1817: p_data => x_msg_data);
1818: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1819: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1820: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.ActivateQuote');
1821: END IF;
1822: ROLLBACK TO ActivateQuote_pvt;
1823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1816: p_count => x_msg_count,
1817: p_data => x_msg_data);
1818: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1819: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1820: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.ActivateQuote');
1821: END IF;
1822: ROLLBACK TO ActivateQuote_pvt;
1823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1824: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1824: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1825: p_count => x_msg_count,
1826: p_data => x_msg_data);
1827: WHEN OTHERS THEN
1828: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1829: ibe_util.debug('unknown exception in IBE_QUOTE_SAVESHARE_PVT.ActivateQuote');
1830: END IF;
1831: ROLLBACK TO ActivateQuote_pvt;
1832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1825: p_count => x_msg_count,
1826: p_data => x_msg_data);
1827: WHEN OTHERS THEN
1828: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1829: ibe_util.debug('unknown exception in IBE_QUOTE_SAVESHARE_PVT.ActivateQuote');
1830: END IF;
1831: ROLLBACK TO ActivateQuote_pvt;
1832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1833:
1898: -- Initialize API return status to success
1899: x_return_status := FND_API.G_RET_STS_SUCCESS;
1900:
1901:
1902: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1903: IBE_UTIL.DEBUG('RETRIEVESHAREQUOTE: Before Calling log_environment_info');
1904: END IF;
1905: IBE_Quote_Misc_pvt.log_environment_info();
1906: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1899: x_return_status := FND_API.G_RET_STS_SUCCESS;
1900:
1901:
1902: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1903: IBE_UTIL.DEBUG('RETRIEVESHAREQUOTE: Before Calling log_environment_info');
1904: END IF;
1905: IBE_Quote_Misc_pvt.log_environment_info();
1906: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1907: IBE_UTIL.DEBUG('RETRIEVESHAREQUOTE: After Calling log_environment_info');
1902: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1903: IBE_UTIL.DEBUG('RETRIEVESHAREQUOTE: Before Calling log_environment_info');
1904: END IF;
1905: IBE_Quote_Misc_pvt.log_environment_info();
1906: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1907: IBE_UTIL.DEBUG('RETRIEVESHAREQUOTE: After Calling log_environment_info');
1908: END IF;
1909:
1910: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1903: IBE_UTIL.DEBUG('RETRIEVESHAREQUOTE: Before Calling log_environment_info');
1904: END IF;
1905: IBE_Quote_Misc_pvt.log_environment_info();
1906: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1907: IBE_UTIL.DEBUG('RETRIEVESHAREQUOTE: After Calling log_environment_info');
1908: END IF;
1909:
1910: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1911: IBE_UTIL.DEBUG('call IBE_Quote_Misc_pvt.get_Shared_Quote at'
1906: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1907: IBE_UTIL.DEBUG('RETRIEVESHAREQUOTE: After Calling log_environment_info');
1908: END IF;
1909:
1910: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1911: IBE_UTIL.DEBUG('call IBE_Quote_Misc_pvt.get_Shared_Quote at'
1912: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1913: END IF;
1914:
1907: IBE_UTIL.DEBUG('RETRIEVESHAREQUOTE: After Calling log_environment_info');
1908: END IF;
1909:
1910: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1911: IBE_UTIL.DEBUG('call IBE_Quote_Misc_pvt.get_Shared_Quote at'
1912: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1913: END IF;
1914:
1915: IBE_Quote_Misc_pvt.get_Shared_Quote
1928: END IF;
1929: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1931: END IF;
1932: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1933: IBE_UTIL.DEBUG('done IBE_Quote_Misc_pvt.getShareQuote at'
1934: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1935: END IF;
1936:
1929: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1931: END IF;
1932: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1933: IBE_UTIL.DEBUG('done IBE_Quote_Misc_pvt.getShareQuote at'
1934: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1935: END IF;
1936:
1937: x_privilege_type_code := IBE_Quote_Misc_pvt.getShareePrivilege
1939: ,p_sharee_number => p_sharee_number
1940: );
1941: l_pricebasedonowner := fnd_profile.value('IBE_SC_PRICE_BASED_ON_OWNER');
1942:
1943: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1944: ibe_util.debug('l_pricebasedonowner='||l_pricebasedonowner);
1945: END IF;
1946: if( (P_Sharee_Number is not null and P_Sharee_Number <> fnd_api.g_miss_num)
1947: and (l_pricebasedonowner = 'N')
1940: );
1941: l_pricebasedonowner := fnd_profile.value('IBE_SC_PRICE_BASED_ON_OWNER');
1942:
1943: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1944: ibe_util.debug('l_pricebasedonowner='||l_pricebasedonowner);
1945: END IF;
1946: if( (P_Sharee_Number is not null and P_Sharee_Number <> fnd_api.g_miss_num)
1947: and (l_pricebasedonowner = 'N')
1948: and (x_privilege_type_code = 'A'
1946: if( (P_Sharee_Number is not null and P_Sharee_Number <> fnd_api.g_miss_num)
1947: and (l_pricebasedonowner = 'N')
1948: and (x_privilege_type_code = 'A'
1949: or x_privilege_type_code = 'F')) THEN
1950: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1951: ibe_util.debug('call IBE_Quote_Save_pvt.updatequoteforshare');
1952: END IF;
1953: l_qte_header_rec.price_list_id := p_price_list_id;
1954: l_qte_header_rec.currency_code := p_currency_code;
1947: and (l_pricebasedonowner = 'N')
1948: and (x_privilege_type_code = 'A'
1949: or x_privilege_type_code = 'F')) THEN
1950: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1951: ibe_util.debug('call IBE_Quote_Save_pvt.updatequoteforshare');
1952: END IF;
1953: l_qte_header_rec.price_list_id := p_price_list_id;
1954: l_qte_header_rec.currency_code := p_currency_code;
1955: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1951: ibe_util.debug('call IBE_Quote_Save_pvt.updatequoteforshare');
1952: END IF;
1953: l_qte_header_rec.price_list_id := p_price_list_id;
1954: l_qte_header_rec.currency_code := p_currency_code;
1955: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1956: IBE_UTIL.DEBUG('call IBE_Quote_Save_pvt.updatequoteforsharee at'
1957: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1958: END IF;
1959:
1952: END IF;
1953: l_qte_header_rec.price_list_id := p_price_list_id;
1954: l_qte_header_rec.currency_code := p_currency_code;
1955: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1956: IBE_UTIL.DEBUG('call IBE_Quote_Save_pvt.updatequoteforsharee at'
1957: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
1958: END IF;
1959:
1960: IBE_Quote_Save_pvt.get_quote_expiration_date(
1995: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1996: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1997: END IF;
1998: l_qte_header_rec := l_qte_header_rec_tmp;
1999: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2000: IBE_UTIL.DEBUG('done IBE_Quote_Save_pvt.updatequoteforsharee at'
2001: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
2002: END IF;
2003: END IF;
1996: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1997: END IF;
1998: l_qte_header_rec := l_qte_header_rec_tmp;
1999: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2000: IBE_UTIL.DEBUG('done IBE_Quote_Save_pvt.updatequoteforsharee at'
2001: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
2002: END IF;
2003: END IF;
2004:
2015: p_count => x_msg_count,
2016: p_data => x_msg_data);
2017: EXCEPTION
2018: WHEN FND_API.G_EXC_ERROR THEN
2019: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2020: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.RetrieveShareQuote');
2021: END IF;
2022: ROLLBACK TO RETRIEVESHAREQUOTE_pvt;
2023: x_return_status := FND_API.G_RET_STS_ERROR;
2016: p_data => x_msg_data);
2017: EXCEPTION
2018: WHEN FND_API.G_EXC_ERROR THEN
2019: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2020: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.RetrieveShareQuote');
2021: END IF;
2022: ROLLBACK TO RETRIEVESHAREQUOTE_pvt;
2023: x_return_status := FND_API.G_RET_STS_ERROR;
2024: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2024: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2025: p_count => x_msg_count,
2026: p_data => x_msg_data);
2027: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2028: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2029: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.RetrieveShareQuote');
2030: END IF;
2031: ROLLBACK TO RETRIEVESHAREQUOTE_pvt;
2032: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2025: p_count => x_msg_count,
2026: p_data => x_msg_data);
2027: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2028: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2029: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.RetrieveShareQuote');
2030: END IF;
2031: ROLLBACK TO RETRIEVESHAREQUOTE_pvt;
2032: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2033: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2033: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2034: p_count => x_msg_count,
2035: p_data => x_msg_data);
2036: WHEN OTHERS THEN
2037: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2038: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.RetrieveShareQuote');
2039: END IF;
2040: ROLLBACK TO RETRIEVESHAREQUOTE_pvt;
2041: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2034: p_count => x_msg_count,
2035: p_data => x_msg_data);
2036: WHEN OTHERS THEN
2037: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2038: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.RetrieveShareQuote');
2039: END IF;
2040: ROLLBACK TO RETRIEVESHAREQUOTE_pvt;
2041: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2042:
2173: l_handle_exception number; -- 0 for Save both the carts, 1 for promoting guest cart as account active cart
2174:
2175: BEGIN
2176:
2177: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2178: IBE_UTIL.DEBUG('MergeActiveQuote: Start');
2179: END IF;
2180: -- Standard Start of API savepoint
2181: SAVEPOINT MergeActiveQuote_pvt;
2174:
2175: BEGIN
2176:
2177: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2178: IBE_UTIL.DEBUG('MergeActiveQuote: Start');
2179: END IF;
2180: -- Standard Start of API savepoint
2181: SAVEPOINT MergeActiveQuote_pvt;
2182: -- Standard call to check for call compatibility.
2196: x_return_status := FND_API.G_RET_STS_SUCCESS;
2197:
2198: -- API body
2199:
2200: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2201: IBE_UTIL.DEBUG('MergeActiveQuote: Before Calling log_environment_info');
2202: END IF;
2203: IBE_Quote_Misc_pvt.log_environment_info();
2204: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2197:
2198: -- API body
2199:
2200: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2201: IBE_UTIL.DEBUG('MergeActiveQuote: Before Calling log_environment_info');
2202: END IF;
2203: IBE_Quote_Misc_pvt.log_environment_info();
2204: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2205: IBE_UTIL.DEBUG('MergeActiveQuote: After Calling log_environment_info');
2200: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2201: IBE_UTIL.DEBUG('MergeActiveQuote: Before Calling log_environment_info');
2202: END IF;
2203: IBE_Quote_Misc_pvt.log_environment_info();
2204: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2205: IBE_UTIL.DEBUG('MergeActiveQuote: After Calling log_environment_info');
2206: END IF;
2207:
2208: open c_getHdr(p_quote_header_id);
2201: IBE_UTIL.DEBUG('MergeActiveQuote: Before Calling log_environment_info');
2202: END IF;
2203: IBE_Quote_Misc_pvt.log_environment_info();
2204: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2205: IBE_UTIL.DEBUG('MergeActiveQuote: After Calling log_environment_info');
2206: END IF;
2207:
2208: open c_getHdr(p_quote_header_id);
2209: fetch c_getHdr into
2214: ,l_in_qte_header_rec.cust_account_id
2215: ,l_currency_code;
2216: close c_getHdr;
2217:
2218: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2219: IBE_UTIL.DEBUG('MergeActiveQuote: look at quote_source_code');
2220: END IF;
2221: IF (p_quote_source_code is null
2222: or p_quote_source_code = fnd_api.g_miss_char) THEN
2215: ,l_currency_code;
2216: close c_getHdr;
2217:
2218: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2219: IBE_UTIL.DEBUG('MergeActiveQuote: look at quote_source_code');
2220: END IF;
2221: IF (p_quote_source_code is null
2222: or p_quote_source_code = fnd_api.g_miss_char) THEN
2223: l_in_qte_header_rec.quote_source_code := 'IStore Account';
2224: else
2225: l_in_qte_header_rec.quote_source_code := p_quote_source_code;
2226: END IF;
2227:
2228: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2229: IBE_UTIL.DEBUG('MergeActiveQuote: checking guest cart id');
2230: END IF;
2231: IF ( l_in_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2232: and l_in_qte_header_rec.quote_header_id is not null
2225: l_in_qte_header_rec.quote_source_code := p_quote_source_code;
2226: END IF;
2227:
2228: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2229: IBE_UTIL.DEBUG('MergeActiveQuote: checking guest cart id');
2230: END IF;
2231: IF ( l_in_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2232: and l_in_qte_header_rec.quote_header_id is not null
2233: and l_in_qte_header_rec.quote_name <> 'IBE_PRMT_SC_UNNAMED' ) THEN
2240:
2241: /*open c_getIDDate(p_party_id, p_cust_account_id, l_in_qte_header_rec.quote_source_code);
2242: fetch c_getIDDate into*/
2243:
2244: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2245: IBE_UTIL.DEBUG('MergeActiveQuote: before getActiveQuote');
2246: END IF;
2247: --Retrieve the database(account active cart) quote header id
2248: l_db_qte_header_rec.quote_header_id
2241: /*open c_getIDDate(p_party_id, p_cust_account_id, l_in_qte_header_rec.quote_source_code);
2242: fetch c_getIDDate into*/
2243:
2244: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2245: IBE_UTIL.DEBUG('MergeActiveQuote: before getActiveQuote');
2246: END IF;
2247: --Retrieve the database(account active cart) quote header id
2248: l_db_qte_header_rec.quote_header_id
2249: := IBE_Quote_Misc_pvt.get_active_quote_id(
2249: := IBE_Quote_Misc_pvt.get_active_quote_id(
2250: p_party_id => p_party_id ,
2251: p_cust_account_id => p_cust_account_id);
2252:
2253: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2254: IBE_UTIL.DEBUG('MergeActiveQuote: l_db_qte_header_rec.quote_header_id='||l_db_qte_header_rec.quote_header_id);
2255: END IF;
2256: -- 8/12/02: Default Feature: Added to get values for db acct active cart: to be passed to get default api's
2257: open c_getHdr(l_db_qte_header_rec.quote_header_id);
2250: p_party_id => p_party_id ,
2251: p_cust_account_id => p_cust_account_id);
2252:
2253: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2254: IBE_UTIL.DEBUG('MergeActiveQuote: l_db_qte_header_rec.quote_header_id='||l_db_qte_header_rec.quote_header_id);
2255: END IF;
2256: -- 8/12/02: Default Feature: Added to get values for db acct active cart: to be passed to get default api's
2257: open c_getHdr(l_db_qte_header_rec.quote_header_id);
2258: fetch c_getHdr into
2273: else
2274: l_quote_header_id := l_in_qte_header_rec.quote_header_id;
2275: end if;
2276:
2277: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2278: IBE_Util.Debug('MergeActiveQutoe: get minisiteId#1 -- use quoteHeaderId='||l_quote_header_id);
2279: END IF;
2280: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: get minisiteId#1 -- use quoteHeaderId='||l_quote_header_id);
2281: open c_get_line_msiteId (l_quote_header_id);
2274: l_quote_header_id := l_in_qte_header_rec.quote_header_id;
2275: end if;
2276:
2277: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2278: IBE_Util.Debug('MergeActiveQutoe: get minisiteId#1 -- use quoteHeaderId='||l_quote_header_id);
2279: END IF;
2280: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: get minisiteId#1 -- use quoteHeaderId='||l_quote_header_id);
2281: open c_get_line_msiteId (l_quote_header_id);
2282: fetch c_get_line_msiteId into rec_get_line_msiteId;
2280: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: get minisiteId#1 -- use quoteHeaderId='||l_quote_header_id);
2281: open c_get_line_msiteId (l_quote_header_id);
2282: fetch c_get_line_msiteId into rec_get_line_msiteId;
2283: close c_get_line_msiteId;
2284: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2285: IBE_Util.Debug('MergeActiveQutoe: get minisiteId#1:'||rec_get_line_msiteId.minisite_id);
2286: END IF;
2287: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: get minisiteId#1:'||rec_get_line_msiteId.minisite_id);
2288:
2281: open c_get_line_msiteId (l_quote_header_id);
2282: fetch c_get_line_msiteId into rec_get_line_msiteId;
2283: close c_get_line_msiteId;
2284: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2285: IBE_Util.Debug('MergeActiveQutoe: get minisiteId#1:'||rec_get_line_msiteId.minisite_id);
2286: END IF;
2287: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: get minisiteId#1:'||rec_get_line_msiteId.minisite_id);
2288:
2289: -- 9/9/02: Defaulting feature
2290: -- for the case when the user has an empty Account Active Cart
2291: if ((rec_get_line_msiteId.minisite_id = fnd_api.g_miss_num) or (rec_get_line_msiteId.minisite_id is null) ) then
2292: l_quote_header_id := l_in_qte_header_rec.quote_header_id;
2293:
2294: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2295: IBE_Util.Debug('MergeActiveQutoe: get minisiteId#2 -- use quoteHeaderId='||l_quote_header_id);
2296: END IF;
2297: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: get minisiteId#2 -- use quoteHeaderId='||l_quote_header_id);
2298: open c_get_line_msiteId (l_quote_header_id);
2291: if ((rec_get_line_msiteId.minisite_id = fnd_api.g_miss_num) or (rec_get_line_msiteId.minisite_id is null) ) then
2292: l_quote_header_id := l_in_qte_header_rec.quote_header_id;
2293:
2294: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2295: IBE_Util.Debug('MergeActiveQutoe: get minisiteId#2 -- use quoteHeaderId='||l_quote_header_id);
2296: END IF;
2297: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: get minisiteId#2 -- use quoteHeaderId='||l_quote_header_id);
2298: open c_get_line_msiteId (l_quote_header_id);
2299: fetch c_get_line_msiteId into rec_get_line_msiteId;
2297: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: get minisiteId#2 -- use quoteHeaderId='||l_quote_header_id);
2298: open c_get_line_msiteId (l_quote_header_id);
2299: fetch c_get_line_msiteId into rec_get_line_msiteId;
2300: close c_get_line_msiteId;
2301: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2302: IBE_Util.Debug('MergeActiveQutoe: get minisiteId#2:'||rec_get_line_msiteId.minisite_id);
2303: END IF;
2304: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: get minisiteId#2:'||rec_get_line_msiteId.minisite_id);
2305: end if;
2298: open c_get_line_msiteId (l_quote_header_id);
2299: fetch c_get_line_msiteId into rec_get_line_msiteId;
2300: close c_get_line_msiteId;
2301: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2302: IBE_Util.Debug('MergeActiveQutoe: get minisiteId#2:'||rec_get_line_msiteId.minisite_id);
2303: END IF;
2304: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: get minisiteId#2:'||rec_get_line_msiteId.minisite_id);
2305: end if;
2306:
2306:
2307: l_saveshare_control_rec.control_rec := p_control_rec;
2308: l_saveshare_control_rec.combinesameitem := p_combinesameitem;
2309:
2310: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2311: IBE_UTIL.DEBUG('mergeActiveQuote: start the conditions');
2312: IBE_Util.Debug('input price list id: ' || p_price_list_id);
2313: END IF;
2314: IF ( l_in_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2307: l_saveshare_control_rec.control_rec := p_control_rec;
2308: l_saveshare_control_rec.combinesameitem := p_combinesameitem;
2309:
2310: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2311: IBE_UTIL.DEBUG('mergeActiveQuote: start the conditions');
2312: IBE_Util.Debug('input price list id: ' || p_price_list_id);
2313: END IF;
2314: IF ( l_in_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2315: and l_in_qte_header_rec.quote_header_id is not null ) THEN --If passed in cart is not null
2308: l_saveshare_control_rec.combinesameitem := p_combinesameitem;
2309:
2310: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2311: IBE_UTIL.DEBUG('mergeActiveQuote: start the conditions');
2312: IBE_Util.Debug('input price list id: ' || p_price_list_id);
2313: END IF;
2314: IF ( l_in_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2315: and l_in_qte_header_rec.quote_header_id is not null ) THEN --If passed in cart is not null
2316:
2313: END IF;
2314: IF ( l_in_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2315: and l_in_qte_header_rec.quote_header_id is not null ) THEN --If passed in cart is not null
2316:
2317: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2318: IBE_UTIL.DEBUG('qte_in is not null');
2319: END IF;
2320: IF (l_db_qte_header_rec.quote_header_id <> fnd_api.g_miss_num --If database cart is not null
2321: and l_db_qte_header_rec.quote_header_id is not null
2314: IF ( l_in_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2315: and l_in_qte_header_rec.quote_header_id is not null ) THEN --If passed in cart is not null
2316:
2317: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2318: IBE_UTIL.DEBUG('qte_in is not null');
2319: END IF;
2320: IF (l_db_qte_header_rec.quote_header_id <> fnd_api.g_miss_num --If database cart is not null
2321: and l_db_qte_header_rec.quote_header_id is not null
2322: and l_db_qte_header_rec.quote_header_id <> 0) THEN
2320: IF (l_db_qte_header_rec.quote_header_id <> fnd_api.g_miss_num --If database cart is not null
2321: and l_db_qte_header_rec.quote_header_id is not null
2322: and l_db_qte_header_rec.quote_header_id <> 0) THEN
2323:
2324: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2325: IBE_UTIL.DEBUG('qte_db is not null');
2326: END IF;
2327: IF (l_in_qte_header_rec.quote_header_id <>
2328: l_db_qte_header_rec.quote_header_id ) THEN
2321: and l_db_qte_header_rec.quote_header_id is not null
2322: and l_db_qte_header_rec.quote_header_id <> 0) THEN
2323:
2324: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2325: IBE_UTIL.DEBUG('qte_db is not null');
2326: END IF;
2327: IF (l_in_qte_header_rec.quote_header_id <>
2328: l_db_qte_header_rec.quote_header_id ) THEN
2329: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2325: IBE_UTIL.DEBUG('qte_db is not null');
2326: END IF;
2327: IF (l_in_qte_header_rec.quote_header_id <>
2328: l_db_qte_header_rec.quote_header_id ) THEN
2329: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2330: IBE_UTIL.DEBUG('input quote_header_id <> quote_header_id in db');
2331: END IF;
2332: IF (p_mode = 'MERGE') THEN -- combine two cart
2333: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2326: END IF;
2327: IF (l_in_qte_header_rec.quote_header_id <>
2328: l_db_qte_header_rec.quote_header_id ) THEN
2329: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2330: IBE_UTIL.DEBUG('input quote_header_id <> quote_header_id in db');
2331: END IF;
2332: IF (p_mode = 'MERGE') THEN -- combine two cart
2333: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2334: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE:Mode is merge');
2329: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2330: IBE_UTIL.DEBUG('input quote_header_id <> quote_header_id in db');
2331: END IF;
2332: IF (p_mode = 'MERGE') THEN -- combine two cart
2333: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2334: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE:Mode is merge');
2335: END IF;
2336: -- added 8/11/02: for Default Feature: we have to see if we need to default by calling getHdrDefaultValues:
2337: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2330: IBE_UTIL.DEBUG('input quote_header_id <> quote_header_id in db');
2331: END IF;
2332: IF (p_mode = 'MERGE') THEN -- combine two cart
2333: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2334: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE:Mode is merge');
2335: END IF;
2336: -- added 8/11/02: for Default Feature: we have to see if we need to default by calling getHdrDefaultValues:
2337: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2338: IBE_Util.Debug('MergeActiveQutoe: check to see if we can call getHdrDefaultValues');
2333: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2334: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE:Mode is merge');
2335: END IF;
2336: -- added 8/11/02: for Default Feature: we have to see if we need to default by calling getHdrDefaultValues:
2337: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2338: IBE_Util.Debug('MergeActiveQutoe: check to see if we can call getHdrDefaultValues');
2339: END IF;
2340: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: check to see if we can call getHdrDefaultValues');
2341: FOR rec_is_shared_cart in c_is_shared_cart(l_db_qte_header_rec.quote_header_id) LOOP
2334: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE:Mode is merge');
2335: END IF;
2336: -- added 8/11/02: for Default Feature: we have to see if we need to default by calling getHdrDefaultValues:
2337: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2338: IBE_Util.Debug('MergeActiveQutoe: check to see if we can call getHdrDefaultValues');
2339: END IF;
2340: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: check to see if we can call getHdrDefaultValues');
2341: FOR rec_is_shared_cart in c_is_shared_cart(l_db_qte_header_rec.quote_header_id) LOOP
2342: /*If the destination cart is a shared cart then promote guest cart as the
2358: IF(l_promote_guest_cart <> FND_API.G_TRUE) THEN
2359:
2360: if ((rec_get_line_msiteId.minisite_id is not null) or
2361: (rec_get_line_msiteId.minisite_id <> fnd_api.g_miss_num) ) then
2362: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2363: IBE_Util.Debug('MergeActiveQuote : About to call getHdrDefaultValues');
2364: IBE_Util.Debug(' partyid :'||l_db_qte_header_rec.party_id);
2365: IBE_Util.Debug(' accountid :'||l_db_qte_header_rec.cust_account_id);
2366: IBE_Util.Debug(' quoteheaderid :'||l_db_qte_header_rec.quote_header_id);
2359:
2360: if ((rec_get_line_msiteId.minisite_id is not null) or
2361: (rec_get_line_msiteId.minisite_id <> fnd_api.g_miss_num) ) then
2362: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2363: IBE_Util.Debug('MergeActiveQuote : About to call getHdrDefaultValues');
2364: IBE_Util.Debug(' partyid :'||l_db_qte_header_rec.party_id);
2365: IBE_Util.Debug(' accountid :'||l_db_qte_header_rec.cust_account_id);
2366: IBE_Util.Debug(' quoteheaderid :'||l_db_qte_header_rec.quote_header_id);
2367: END IF;
2360: if ((rec_get_line_msiteId.minisite_id is not null) or
2361: (rec_get_line_msiteId.minisite_id <> fnd_api.g_miss_num) ) then
2362: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2363: IBE_Util.Debug('MergeActiveQuote : About to call getHdrDefaultValues');
2364: IBE_Util.Debug(' partyid :'||l_db_qte_header_rec.party_id);
2365: IBE_Util.Debug(' accountid :'||l_db_qte_header_rec.cust_account_id);
2366: IBE_Util.Debug(' quoteheaderid :'||l_db_qte_header_rec.quote_header_id);
2367: END IF;
2368: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: About to call getHdrDefaultValues');
2361: (rec_get_line_msiteId.minisite_id <> fnd_api.g_miss_num) ) then
2362: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2363: IBE_Util.Debug('MergeActiveQuote : About to call getHdrDefaultValues');
2364: IBE_Util.Debug(' partyid :'||l_db_qte_header_rec.party_id);
2365: IBE_Util.Debug(' accountid :'||l_db_qte_header_rec.cust_account_id);
2366: IBE_Util.Debug(' quoteheaderid :'||l_db_qte_header_rec.quote_header_id);
2367: END IF;
2368: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: About to call getHdrDefaultValues');
2369: IBE_Quote_Save_pvt.getHdrDefaultValues(
2362: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2363: IBE_Util.Debug('MergeActiveQuote : About to call getHdrDefaultValues');
2364: IBE_Util.Debug(' partyid :'||l_db_qte_header_rec.party_id);
2365: IBE_Util.Debug(' accountid :'||l_db_qte_header_rec.cust_account_id);
2366: IBE_Util.Debug(' quoteheaderid :'||l_db_qte_header_rec.quote_header_id);
2367: END IF;
2368: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: About to call getHdrDefaultValues');
2369: IBE_Quote_Save_pvt.getHdrDefaultValues(
2370: P_Api_Version_Number => p_api_version_number
2399: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2401: END IF;
2402:
2403: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2404: IBE_Util.Debug('MergeActiveQutoe: Back from calling getHdrDefaultValues');
2405: IBE_Util.Debug('MergeActiveQuote: Assigning OUT params here');
2406: END IF;
2407: l_db_qte_header_rec := l_db_qte_header_rec_tmp;
2400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2401: END IF;
2402:
2403: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2404: IBE_Util.Debug('MergeActiveQutoe: Back from calling getHdrDefaultValues');
2405: IBE_Util.Debug('MergeActiveQuote: Assigning OUT params here');
2406: END IF;
2407: l_db_qte_header_rec := l_db_qte_header_rec_tmp;
2408: lx_Hd_Price_Attributes_Tbl := lx_Hd_Price_Attributes_Tbl_tmp;
2401: END IF;
2402:
2403: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2404: IBE_Util.Debug('MergeActiveQutoe: Back from calling getHdrDefaultValues');
2405: IBE_Util.Debug('MergeActiveQuote: Assigning OUT params here');
2406: END IF;
2407: l_db_qte_header_rec := l_db_qte_header_rec_tmp;
2408: lx_Hd_Price_Attributes_Tbl := lx_Hd_Price_Attributes_Tbl_tmp;
2409: lx_Hd_Payment_Tbl := lx_Hd_Payment_Tbl_tmp;
2412: lx_Hd_Tax_Detail_Tbl := lx_Hd_Tax_Detail_Tbl_tmp;
2413: lx_Price_Adjustment_Tbl := lx_Price_Adjustment_Tbl_tmp;
2414: lx_Price_Adj_Attr_Tbl := lx_Price_Adj_Attr_Tbl_tmp;
2415: lx_Price_Adj_Rltship_Tbl := lx_Price_Adj_Rltship_Tbl_tmp;
2416: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2417: IBE_Util.Debug('DB Quote info: ' || l_db_qte_header_rec.party_id ||'##' ||l_db_qte_header_rec.quote_header_id);
2418: End if;
2419: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: Back from calling getHdrDefaultValues');
2420: end if; -- if we can find the minisiteId
2413: lx_Price_Adjustment_Tbl := lx_Price_Adjustment_Tbl_tmp;
2414: lx_Price_Adj_Attr_Tbl := lx_Price_Adj_Attr_Tbl_tmp;
2415: lx_Price_Adj_Rltship_Tbl := lx_Price_Adj_Rltship_Tbl_tmp;
2416: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2417: IBE_Util.Debug('DB Quote info: ' || l_db_qte_header_rec.party_id ||'##' ||l_db_qte_header_rec.quote_header_id);
2418: End if;
2419: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: Back from calling getHdrDefaultValues');
2420: end if; -- if we can find the minisiteId
2421:
2452: END IF;
2453: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2454: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2455: END IF;
2456: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2457: IBE_UTIL.DEBUG('Assigns OUT params');
2458: END IF;
2459: l_db_qte_header_rec.quote_header_id := l_quote_header_id_tmp;
2460: l_db_qte_header_rec.last_update_date := l_last_update_date_tmp;
2453: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2454: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2455: END IF;
2456: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2457: IBE_UTIL.DEBUG('Assigns OUT params');
2458: END IF;
2459: l_db_qte_header_rec.quote_header_id := l_quote_header_id_tmp;
2460: l_db_qte_header_rec.last_update_date := l_last_update_date_tmp;
2461:
2458: END IF;
2459: l_db_qte_header_rec.quote_header_id := l_quote_header_id_tmp;
2460: l_db_qte_header_rec.last_update_date := l_last_update_date_tmp;
2461:
2462: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2463: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: done merge');
2464: END IF;
2465:
2466:
2459: l_db_qte_header_rec.quote_header_id := l_quote_header_id_tmp;
2460: l_db_qte_header_rec.last_update_date := l_last_update_date_tmp;
2461:
2462: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2463: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: done merge');
2464: END IF;
2465:
2466:
2467: IBE_Quote_Save_pvt.Delete
2480: END IF;
2481: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2482: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2483: END IF;
2484: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2485: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: done merge: +delete');
2486: END IF;
2487:
2488: x_quote_header_id := l_db_qte_header_rec.quote_header_id;
2481: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2482: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2483: END IF;
2484: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2485: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: done merge: +delete');
2486: END IF;
2487:
2488: x_quote_header_id := l_db_qte_header_rec.quote_header_id;
2489: x_last_update_date := l_db_qte_header_rec.last_update_date;
2490: END IF;
2491:
2492: elsif (p_mode ='KEEP') THEN
2493:
2494: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2495: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: mode is keep');
2496: --IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Calling delete on account active cart');
2497: END IF;
2498: if (l_db_qte_header_rec.quote_name = 'IBE_PRMT_SC_UNNAMED') then
2491:
2492: elsif (p_mode ='KEEP') THEN
2493:
2494: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2495: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: mode is keep');
2496: --IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Calling delete on account active cart');
2497: END IF;
2498: if (l_db_qte_header_rec.quote_name = 'IBE_PRMT_SC_UNNAMED') then
2499: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2492: elsif (p_mode ='KEEP') THEN
2493:
2494: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2495: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: mode is keep');
2496: --IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Calling delete on account active cart');
2497: END IF;
2498: if (l_db_qte_header_rec.quote_name = 'IBE_PRMT_SC_UNNAMED') then
2499: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2500: IBE_UTIL.DEBUG('Active cart was unnamed, calling IBE_Quote_Save_pvt.SAVE to default save the active cart');
2495: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: mode is keep');
2496: --IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Calling delete on account active cart');
2497: END IF;
2498: if (l_db_qte_header_rec.quote_name = 'IBE_PRMT_SC_UNNAMED') then
2499: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2500: IBE_UTIL.DEBUG('Active cart was unnamed, calling IBE_Quote_Save_pvt.SAVE to default save the active cart');
2501: END IF;
2502: l_default_save_qte_hdr_rec.quote_header_id := l_db_qte_header_rec.quote_header_id;
2503: l_default_save_qte_hdr_rec.last_update_date := l_db_qte_header_rec.last_update_date;
2496: --IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Calling delete on account active cart');
2497: END IF;
2498: if (l_db_qte_header_rec.quote_name = 'IBE_PRMT_SC_UNNAMED') then
2499: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2500: IBE_UTIL.DEBUG('Active cart was unnamed, calling IBE_Quote_Save_pvt.SAVE to default save the active cart');
2501: END IF;
2502: l_default_save_qte_hdr_rec.quote_header_id := l_db_qte_header_rec.quote_header_id;
2503: l_default_save_qte_hdr_rec.last_update_date := l_db_qte_header_rec.last_update_date;
2504: l_default_save_qte_hdr_rec.quote_name := 'IBE_PRMT_SC_DEFAULTNAMED';
2524: END IF;
2525: l_db_qte_header_rec.quote_header_id := l_quote_header_id_tmp;
2526: l_db_qte_header_rec.last_update_date := l_last_update_date_tmp;
2527:
2528: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2529: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Done keep: updating cart name to defaultnamed');
2530: END IF;
2531: end if; -- end if quote name was unnamed
2532: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2525: l_db_qte_header_rec.quote_header_id := l_quote_header_id_tmp;
2526: l_db_qte_header_rec.last_update_date := l_last_update_date_tmp;
2527:
2528: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2529: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Done keep: updating cart name to defaultnamed');
2530: END IF;
2531: end if; -- end if quote name was unnamed
2532: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2533: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Deactivating account active cart (since mode = KEEP)');
2528: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2529: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Done keep: updating cart name to defaultnamed');
2530: END IF;
2531: end if; -- end if quote name was unnamed
2532: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2533: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Deactivating account active cart (since mode = KEEP)');
2534: END IF;
2535: IBE_QUOTE_SAVESHARE_V2_PVT.DEACTIVATE_QUOTE (
2536: P_Quote_header_id => l_db_qte_header_rec.quote_header_id ,
2529: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Done keep: updating cart name to defaultnamed');
2530: END IF;
2531: end if; -- end if quote name was unnamed
2532: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2533: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: Deactivating account active cart (since mode = KEEP)');
2534: END IF;
2535: IBE_QUOTE_SAVESHARE_V2_PVT.DEACTIVATE_QUOTE (
2536: P_Quote_header_id => l_db_qte_header_rec.quote_header_id ,
2537: P_Party_id => l_db_qte_header_rec.party_id ,
2552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2553: END IF;
2554:
2555: l_promote_guest_cart := FND_API.G_TRUE;
2556: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2557: IBE_UTIL.DEBUG('keep: done');
2558: END IF;
2559:
2560: elsif (p_mode ='REMOVE') THEN
2553: END IF;
2554:
2555: l_promote_guest_cart := FND_API.G_TRUE;
2556: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2557: IBE_UTIL.DEBUG('keep: done');
2558: END IF;
2559:
2560: elsif (p_mode ='REMOVE') THEN
2561:
2558: END IF;
2559:
2560: elsif (p_mode ='REMOVE') THEN
2561:
2562: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2563: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE:start remove');
2564: END IF;
2565: IBE_Quote_Save_pvt.Delete
2566: ( p_api_version_number => p_api_version_number
2559:
2560: elsif (p_mode ='REMOVE') THEN
2561:
2562: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2563: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE:start remove');
2564: END IF;
2565: IBE_Quote_Save_pvt.Delete
2566: ( p_api_version_number => p_api_version_number
2567: ,p_init_msg_list => FND_API.G_false
2581: END IF;
2582: x_quote_header_id := l_db_qte_header_rec.quote_header_id;
2583: x_last_update_date := l_db_qte_header_rec.last_update_date;
2584:
2585: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2586: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: remove: after delete');
2587: END IF;
2588: END IF;
2589: else -- pass in quote is same as quote in db
2582: x_quote_header_id := l_db_qte_header_rec.quote_header_id;
2583: x_last_update_date := l_db_qte_header_rec.last_update_date;
2584:
2585: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2586: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE: remove: after delete');
2587: END IF;
2588: END IF;
2589: else -- pass in quote is same as quote in db
2590:
2587: END IF;
2588: END IF;
2589: else -- pass in quote is same as quote in db
2590:
2591: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2592: IBE_UTIL.DEBUG('in = db');
2593: END IF;
2594: x_quote_header_id := l_in_qte_header_rec.quote_header_id;
2595: x_last_update_date := l_in_qte_header_rec.last_update_date;
2588: END IF;
2589: else -- pass in quote is same as quote in db
2590:
2591: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2592: IBE_UTIL.DEBUG('in = db');
2593: END IF;
2594: x_quote_header_id := l_in_qte_header_rec.quote_header_id;
2595: x_last_update_date := l_in_qte_header_rec.last_update_date;
2596: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2592: IBE_UTIL.DEBUG('in = db');
2593: END IF;
2594: x_quote_header_id := l_in_qte_header_rec.quote_header_id;
2595: x_last_update_date := l_in_qte_header_rec.last_update_date;
2596: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2597: IBE_UTIL.DEBUG('in = db: done');
2598: END IF;
2599: END IF;
2600:
2593: END IF;
2594: x_quote_header_id := l_in_qte_header_rec.quote_header_id;
2595: x_last_update_date := l_in_qte_header_rec.last_update_date;
2596: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2597: IBE_UTIL.DEBUG('in = db: done');
2598: END IF;
2599: END IF;
2600:
2601:
2600:
2601:
2602: else -- no quote id in database
2603: l_promote_guest_cart := FND_API.G_TRUE;
2604: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2605: IBE_UTIL.DEBUG('No quote in database hence promoting guest cart ');
2606: END IF;
2607: END IF;
2608:
2601:
2602: else -- no quote id in database
2603: l_promote_guest_cart := FND_API.G_TRUE;
2604: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2605: IBE_UTIL.DEBUG('No quote in database hence promoting guest cart ');
2606: END IF;
2607: END IF;
2608:
2609: ELSE -- no quote_id passed in
2606: END IF;
2607: END IF;
2608:
2609: ELSE -- no quote_id passed in
2610: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2611: IBE_UTIL.DEBUG('no q_in');
2612: END IF;
2613: -- 8/13/02: Default Feature: the case when there is no guest cart.
2614: IF (l_db_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2607: END IF;
2608:
2609: ELSE -- no quote_id passed in
2610: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2611: IBE_UTIL.DEBUG('no q_in');
2612: END IF;
2613: -- 8/13/02: Default Feature: the case when there is no guest cart.
2614: IF (l_db_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2615: and l_db_qte_header_rec.quote_header_id is not null
2613: -- 8/13/02: Default Feature: the case when there is no guest cart.
2614: IF (l_db_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2615: and l_db_qte_header_rec.quote_header_id is not null
2616: and l_db_qte_header_rec.quote_header_id <> 0) THEN
2617: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2618: IBE_Util.Debug('MergeActiveQutoe -- when no quoteId is passed in: check to see if we can call getHdrDefaultValues');
2619: END IF;
2620: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe -- when no quoteId is passed in: check to see if we can call getHdrDefaultValues');
2621:
2614: IF (l_db_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2615: and l_db_qte_header_rec.quote_header_id is not null
2616: and l_db_qte_header_rec.quote_header_id <> 0) THEN
2617: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2618: IBE_Util.Debug('MergeActiveQutoe -- when no quoteId is passed in: check to see if we can call getHdrDefaultValues');
2619: END IF;
2620: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe -- when no quoteId is passed in: check to see if we can call getHdrDefaultValues');
2621:
2622: if ((rec_get_line_msiteId.minisite_id is not null) or (rec_get_line_msiteId.minisite_id <> fnd_api.g_miss_num) ) then
2619: END IF;
2620: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe -- when no quoteId is passed in: check to see if we can call getHdrDefaultValues');
2621:
2622: if ((rec_get_line_msiteId.minisite_id is not null) or (rec_get_line_msiteId.minisite_id <> fnd_api.g_miss_num) ) then
2623: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2624: IBE_Util.Debug('MergeActiveQuote: About to call getHdrDefaultValues');
2625: END IF;
2626: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: About to call getHdrDefaultValues');
2627: IBE_Quote_Save_pvt.getHdrDefaultValues(
2620: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe -- when no quoteId is passed in: check to see if we can call getHdrDefaultValues');
2621:
2622: if ((rec_get_line_msiteId.minisite_id is not null) or (rec_get_line_msiteId.minisite_id <> fnd_api.g_miss_num) ) then
2623: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2624: IBE_Util.Debug('MergeActiveQuote: About to call getHdrDefaultValues');
2625: END IF;
2626: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: About to call getHdrDefaultValues');
2627: IBE_Quote_Save_pvt.getHdrDefaultValues(
2628: P_Api_Version_Number => p_api_version_number
2668: lx_Price_Adjustment_Tbl := lx_Price_Adjustment_Tbl_tmp;
2669: lx_Price_Adj_Attr_Tbl := lx_Price_Adj_Attr_Tbl_tmp;
2670: lx_Price_Adj_Rltship_Tbl := lx_Price_Adj_Rltship_Tbl_tmp;
2671:
2672: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2673: IBE_Util.Debug('SUCCESS! MergeActiveQutoe: Back from calling getHdrDefaultValues');
2674: END IF;
2675: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: Back from calling getHdrDefaultValues');
2676:
2669: lx_Price_Adj_Attr_Tbl := lx_Price_Adj_Attr_Tbl_tmp;
2670: lx_Price_Adj_Rltship_Tbl := lx_Price_Adj_Rltship_Tbl_tmp;
2671:
2672: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2673: IBE_Util.Debug('SUCCESS! MergeActiveQutoe: Back from calling getHdrDefaultValues');
2674: END IF;
2675: --DBMS_OUTPUT.PUT_LINE('MergeActiveQutoe: Back from calling getHdrDefaultValues');
2676:
2677: -- 8/12/02: for Default Feature: added some more parameters
2684: l_control_rec.calculate_tax_flag := 'Y';
2685: END IF:*/
2686: -- added for bug 3217154 - really price list id was being passed in the right places except here
2687: l_db_qte_header_rec.price_list_id := p_price_list_id;
2688: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2689: IBE_Util.Debug('price list id: ' || l_db_qte_header_rec.price_list_id);
2690: END IF;
2691: IBE_Quote_Save_pvt.save
2692: ( p_api_version_number => p_api_version_number
2685: END IF:*/
2686: -- added for bug 3217154 - really price list id was being passed in the right places except here
2687: l_db_qte_header_rec.price_list_id := p_price_list_id;
2688: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2689: IBE_Util.Debug('price list id: ' || l_db_qte_header_rec.price_list_id);
2690: END IF;
2691: IBE_Quote_Save_pvt.save
2692: ( p_api_version_number => p_api_version_number
2693: ,p_init_msg_list => FND_API.G_FALSE
2741: END IF;
2742:
2743: --Code for promoting a guest cart
2744: IF (l_promote_guest_cart = FND_API.G_TRUE) THEN
2745: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2746: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart*******************');
2747: IBE_UTIL.DEBUG('********MergeActiveQutoe:Promote guest cart flag is set to true**********');
2748: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest party_id is: '||p_party_id);
2749: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest cust_account_id is: '||p_cust_account_id);
2742:
2743: --Code for promoting a guest cart
2744: IF (l_promote_guest_cart = FND_API.G_TRUE) THEN
2745: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2746: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart*******************');
2747: IBE_UTIL.DEBUG('********MergeActiveQutoe:Promote guest cart flag is set to true**********');
2748: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest party_id is: '||p_party_id);
2749: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest cust_account_id is: '||p_cust_account_id);
2750: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest header id: '||l_in_qte_header_rec.quote_header_id);
2743: --Code for promoting a guest cart
2744: IF (l_promote_guest_cart = FND_API.G_TRUE) THEN
2745: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2746: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart*******************');
2747: IBE_UTIL.DEBUG('********MergeActiveQutoe:Promote guest cart flag is set to true**********');
2748: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest party_id is: '||p_party_id);
2749: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest cust_account_id is: '||p_cust_account_id);
2750: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest header id: '||l_in_qte_header_rec.quote_header_id);
2751: IBE_UTIL.DEBUG('MergeActiveQutoe:quote name : '||l_in_qte_header_rec.quote_name);
2744: IF (l_promote_guest_cart = FND_API.G_TRUE) THEN
2745: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2746: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart*******************');
2747: IBE_UTIL.DEBUG('********MergeActiveQutoe:Promote guest cart flag is set to true**********');
2748: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest party_id is: '||p_party_id);
2749: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest cust_account_id is: '||p_cust_account_id);
2750: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest header id: '||l_in_qte_header_rec.quote_header_id);
2751: IBE_UTIL.DEBUG('MergeActiveQutoe:quote name : '||l_in_qte_header_rec.quote_name);
2752:
2745: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2746: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart*******************');
2747: IBE_UTIL.DEBUG('********MergeActiveQutoe:Promote guest cart flag is set to true**********');
2748: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest party_id is: '||p_party_id);
2749: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest cust_account_id is: '||p_cust_account_id);
2750: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest header id: '||l_in_qte_header_rec.quote_header_id);
2751: IBE_UTIL.DEBUG('MergeActiveQutoe:quote name : '||l_in_qte_header_rec.quote_name);
2752:
2753: END IF;
2746: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart*******************');
2747: IBE_UTIL.DEBUG('********MergeActiveQutoe:Promote guest cart flag is set to true**********');
2748: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest party_id is: '||p_party_id);
2749: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest cust_account_id is: '||p_cust_account_id);
2750: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest header id: '||l_in_qte_header_rec.quote_header_id);
2751: IBE_UTIL.DEBUG('MergeActiveQutoe:quote name : '||l_in_qte_header_rec.quote_name);
2752:
2753: END IF;
2754:
2747: IBE_UTIL.DEBUG('********MergeActiveQutoe:Promote guest cart flag is set to true**********');
2748: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest party_id is: '||p_party_id);
2749: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest cust_account_id is: '||p_cust_account_id);
2750: IBE_UTIL.DEBUG('MergeActiveQutoe:Guest header id: '||l_in_qte_header_rec.quote_header_id);
2751: IBE_UTIL.DEBUG('MergeActiveQutoe:quote name : '||l_in_qte_header_rec.quote_name);
2752:
2753: END IF;
2754:
2755: l_in_qte_header_rec.party_id := p_party_id;
2757: l_in_qte_header_rec.quote_source_code := 'IStore Account';
2758: l_in_qte_header_rec.price_list_id := p_price_list_id;
2759: l_in_qte_header_rec.currency_code := p_currency_code;
2760: IF(l_in_qte_header_rec.quote_name <> 'IBE_PRMT_SC_UNNAMED') THEN
2761: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2762: IBE_UTIL.DEBUG('MergeActiveQutoe:Changing guest cart name frm: '||l_in_qte_header_rec.quote_name||
2763: ' to IBE_PRMT_SC_UNNAMED');
2764: END IF;
2765: l_in_qte_header_rec.quote_name := 'IBE_PRMT_SC_UNNAMED';
2758: l_in_qte_header_rec.price_list_id := p_price_list_id;
2759: l_in_qte_header_rec.currency_code := p_currency_code;
2760: IF(l_in_qte_header_rec.quote_name <> 'IBE_PRMT_SC_UNNAMED') THEN
2761: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2762: IBE_UTIL.DEBUG('MergeActiveQutoe:Changing guest cart name frm: '||l_in_qte_header_rec.quote_name||
2763: ' to IBE_PRMT_SC_UNNAMED');
2764: END IF;
2765: l_in_qte_header_rec.quote_name := 'IBE_PRMT_SC_UNNAMED';
2766: END IF;
2766: END IF;
2767:
2768: if ((rec_get_line_msiteId.minisite_id is not null) or
2769: (rec_get_line_msiteId.minisite_id <> fnd_api.g_miss_num) ) then
2770: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2771: IBE_Util.Debug('MergeActiveQuote: About to call getHdrDefaultValues during promotion');
2772: END IF;
2773: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: About to call getHdrDefaultValues');
2774: IBE_Quote_Save_pvt.getHdrDefaultValues(
2767:
2768: if ((rec_get_line_msiteId.minisite_id is not null) or
2769: (rec_get_line_msiteId.minisite_id <> fnd_api.g_miss_num) ) then
2770: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2771: IBE_Util.Debug('MergeActiveQuote: About to call getHdrDefaultValues during promotion');
2772: END IF;
2773: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: About to call getHdrDefaultValues');
2774: IBE_Quote_Save_pvt.getHdrDefaultValues(
2775: P_Api_Version_Number => p_api_version_number
2815: lx_Price_Adj_Attr_Tbl := lx_Price_Adj_Attr_Tbl_tmp;
2816: lx_Price_Adj_Rltship_Tbl := lx_Price_Adj_Rltship_Tbl_tmp;
2817:
2818:
2819: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2820: IBE_Util.Debug('MergeActiveQuote: Back from calling getHdrDefaultValues');
2821: END IF;
2822: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: Back from calling getHdrDefaultValues');
2823: else
2816: lx_Price_Adj_Rltship_Tbl := lx_Price_Adj_Rltship_Tbl_tmp;
2817:
2818:
2819: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2820: IBE_Util.Debug('MergeActiveQuote: Back from calling getHdrDefaultValues');
2821: END IF;
2822: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: Back from calling getHdrDefaultValues');
2823: else
2824: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2820: IBE_Util.Debug('MergeActiveQuote: Back from calling getHdrDefaultValues');
2821: END IF;
2822: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: Back from calling getHdrDefaultValues');
2823: else
2824: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2825: IBE_UTIL.DEBUG('MergeActiveQuote:Cannot find a minisite_id while calling getHdrDefaultValues');
2826: END IF;
2827: end if; -- if we can find the minisiteId
2828:
2821: END IF;
2822: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: Back from calling getHdrDefaultValues');
2823: else
2824: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2825: IBE_UTIL.DEBUG('MergeActiveQuote:Cannot find a minisite_id while calling getHdrDefaultValues');
2826: END IF;
2827: end if; -- if we can find the minisiteId
2828:
2829: --save the guest cart into account active cart of the user
2826: END IF;
2827: end if; -- if we can find the minisiteId
2828:
2829: --save the guest cart into account active cart of the user
2830: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2831: IBE_UTIL.DEBUG('MergeActiveQuote:saving the guest cart as account active cart of the user');
2832: END IF;
2833: IBE_Quote_Save_pvt.save(
2834: p_api_version_number => p_api_version_number ,
2827: end if; -- if we can find the minisiteId
2828:
2829: --save the guest cart into account active cart of the user
2830: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2831: IBE_UTIL.DEBUG('MergeActiveQuote:saving the guest cart as account active cart of the user');
2832: END IF;
2833: IBE_Quote_Save_pvt.save(
2834: p_api_version_number => p_api_version_number ,
2835: p_init_msg_list => fnd_api.g_false ,
2872:
2873: l_in_qte_header_rec.quote_header_id := l_quote_header_id_tmp;
2874: l_in_qte_header_rec.last_update_date := l_last_update_date_tmp;
2875:
2876: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2877: IBE_UTIL.DEBUG('MergeActiveQuote:DONE saving the guest cart as account active cart of the user');
2878: IBE_UTIL.DEBUG('MergeActiveQuote:Calling IBE_QUOTE_SAVESHARE_V2_PVT.activate_quote');
2879: IBE_UTIL.DEBUG('MergeActiveQuote:l_in_qte_header_rec.quote_header_id: '||l_in_qte_header_rec.quote_header_id);
2880: END IF;
2873: l_in_qte_header_rec.quote_header_id := l_quote_header_id_tmp;
2874: l_in_qte_header_rec.last_update_date := l_last_update_date_tmp;
2875:
2876: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2877: IBE_UTIL.DEBUG('MergeActiveQuote:DONE saving the guest cart as account active cart of the user');
2878: IBE_UTIL.DEBUG('MergeActiveQuote:Calling IBE_QUOTE_SAVESHARE_V2_PVT.activate_quote');
2879: IBE_UTIL.DEBUG('MergeActiveQuote:l_in_qte_header_rec.quote_header_id: '||l_in_qte_header_rec.quote_header_id);
2880: END IF;
2881: IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE(
2874: l_in_qte_header_rec.last_update_date := l_last_update_date_tmp;
2875:
2876: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2877: IBE_UTIL.DEBUG('MergeActiveQuote:DONE saving the guest cart as account active cart of the user');
2878: IBE_UTIL.DEBUG('MergeActiveQuote:Calling IBE_QUOTE_SAVESHARE_V2_PVT.activate_quote');
2879: IBE_UTIL.DEBUG('MergeActiveQuote:l_in_qte_header_rec.quote_header_id: '||l_in_qte_header_rec.quote_header_id);
2880: END IF;
2881: IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE(
2882: P_Quote_header_rec => l_in_qte_header_rec ,
2875:
2876: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2877: IBE_UTIL.DEBUG('MergeActiveQuote:DONE saving the guest cart as account active cart of the user');
2878: IBE_UTIL.DEBUG('MergeActiveQuote:Calling IBE_QUOTE_SAVESHARE_V2_PVT.activate_quote');
2879: IBE_UTIL.DEBUG('MergeActiveQuote:l_in_qte_header_rec.quote_header_id: '||l_in_qte_header_rec.quote_header_id);
2880: END IF;
2881: IBE_QUOTE_SAVESHARE_V2_PVT.ACTIVATE_QUOTE(
2882: P_Quote_header_rec => l_in_qte_header_rec ,
2883: P_Party_id => P_party_id ,
2895:
2896: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2897: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2898: END IF;
2899: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2900: IBE_UTIL.DEBUG('MergeActiveQutoe:DONE calling IBE_QUOTE_SAVESHARE_V2_PVT.activate_quote');
2901: END IF;
2902: x_quote_header_id := l_in_qte_header_rec.quote_header_id;
2903: x_last_update_date := l_in_qte_header_rec.last_update_date;
2896: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2897: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2898: END IF;
2899: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2900: IBE_UTIL.DEBUG('MergeActiveQutoe:DONE calling IBE_QUOTE_SAVESHARE_V2_PVT.activate_quote');
2901: END IF;
2902: x_quote_header_id := l_in_qte_header_rec.quote_header_id;
2903: x_last_update_date := l_in_qte_header_rec.last_update_date;
2904:
2901: END IF;
2902: x_quote_header_id := l_in_qte_header_rec.quote_header_id;
2903: x_last_update_date := l_in_qte_header_rec.last_update_date;
2904:
2905: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2906: IBE_UTIL.DEBUG('MergeActiveQutoe:x_quote_header_id: '||x_quote_header_id);
2907: IBE_UTIL.DEBUG('MergeActiveQutoe:x_last_update_date: '||x_last_update_date);
2908: END IF;
2909:
2902: x_quote_header_id := l_in_qte_header_rec.quote_header_id;
2903: x_last_update_date := l_in_qte_header_rec.last_update_date;
2904:
2905: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2906: IBE_UTIL.DEBUG('MergeActiveQutoe:x_quote_header_id: '||x_quote_header_id);
2907: IBE_UTIL.DEBUG('MergeActiveQutoe:x_last_update_date: '||x_last_update_date);
2908: END IF;
2909:
2910: END IF;
2903: x_last_update_date := l_in_qte_header_rec.last_update_date;
2904:
2905: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2906: IBE_UTIL.DEBUG('MergeActiveQutoe:x_quote_header_id: '||x_quote_header_id);
2907: IBE_UTIL.DEBUG('MergeActiveQutoe:x_last_update_date: '||x_last_update_date);
2908: END IF;
2909:
2910: END IF;
2911:
2911:
2912:
2913: IF (x_quote_header_id = FND_API.G_MISS_NUM
2914: or x_quote_header_id = 0) THEN
2915: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2916: IBE_UTIL.DEBUG('cant find quote header id -> return null');
2917: END IF;
2918: x_quote_header_id := NULL;
2919: END IF;
2912:
2913: IF (x_quote_header_id = FND_API.G_MISS_NUM
2914: or x_quote_header_id = 0) THEN
2915: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2916: IBE_UTIL.DEBUG('cant find quote header id -> return null');
2917: END IF;
2918: x_quote_header_id := NULL;
2919: END IF;
2920: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2916: IBE_UTIL.DEBUG('cant find quote header id -> return null');
2917: END IF;
2918: x_quote_header_id := NULL;
2919: END IF;
2920: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2921: IBE_UTIL.DEBUG('mergeActiveQuote: End');
2922: END IF;
2923:
2924: -- Standard check of p_commit.
2917: END IF;
2918: x_quote_header_id := NULL;
2919: END IF;
2920: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2921: IBE_UTIL.DEBUG('mergeActiveQuote: End');
2922: END IF;
2923:
2924: -- Standard check of p_commit.
2925: IF FND_API.To_Boolean( p_commit ) THEN
2931: p_count => x_msg_count,
2932: p_data => x_msg_data);
2933: EXCEPTION
2934: WHEN FND_API.G_EXC_ERROR THEN
2935: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2936: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.mergeActiveQuote');
2937: END IF;
2938: ROLLBACK TO MergeActiveQuote_pvt;
2939: -- Handle saving the carts...
2932: p_data => x_msg_data);
2933: EXCEPTION
2934: WHEN FND_API.G_EXC_ERROR THEN
2935: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2936: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.mergeActiveQuote');
2937: END IF;
2938: ROLLBACK TO MergeActiveQuote_pvt;
2939: -- Handle saving the carts...
2940: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2936: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.mergeActiveQuote');
2937: END IF;
2938: ROLLBACK TO MergeActiveQuote_pvt;
2939: -- Handle saving the carts...
2940: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2941: ibe_util.debug('Exception:l_handle_exception = '||l_handle_exception);
2942: END IF;
2943: IF (l_handle_exception = 0) THEN
2944: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2937: END IF;
2938: ROLLBACK TO MergeActiveQuote_pvt;
2939: -- Handle saving the carts...
2940: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2941: ibe_util.debug('Exception:l_handle_exception = '||l_handle_exception);
2942: END IF;
2943: IF (l_handle_exception = 0) THEN
2944: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2945: ibe_util.debug('New exception handling, in case of few expected exception save the carts');
2940: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2941: ibe_util.debug('Exception:l_handle_exception = '||l_handle_exception);
2942: END IF;
2943: IF (l_handle_exception = 0) THEN
2944: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2945: ibe_util.debug('New exception handling, in case of few expected exception save the carts');
2946: END IF;
2947: if (l_db_qte_header_rec.quote_name = 'IBE_PRMT_SC_UNNAMED') then
2948: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2941: ibe_util.debug('Exception:l_handle_exception = '||l_handle_exception);
2942: END IF;
2943: IF (l_handle_exception = 0) THEN
2944: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2945: ibe_util.debug('New exception handling, in case of few expected exception save the carts');
2946: END IF;
2947: if (l_db_qte_header_rec.quote_name = 'IBE_PRMT_SC_UNNAMED') then
2948: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2949: IBE_UTIL.DEBUG('Exception: Active cart was unnamed, calling IBE_Quote_Save_pvt.SAVE to default save the active cart');
2944: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2945: ibe_util.debug('New exception handling, in case of few expected exception save the carts');
2946: END IF;
2947: if (l_db_qte_header_rec.quote_name = 'IBE_PRMT_SC_UNNAMED') then
2948: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2949: IBE_UTIL.DEBUG('Exception: Active cart was unnamed, calling IBE_Quote_Save_pvt.SAVE to default save the active cart');
2950: END IF;
2951: l_default_save_qte_hdr_rec.quote_header_id := l_db_qte_header_rec.quote_header_id;
2952: l_default_save_qte_hdr_rec.last_update_date := l_db_qte_header_rec.last_update_date;
2945: ibe_util.debug('New exception handling, in case of few expected exception save the carts');
2946: END IF;
2947: if (l_db_qte_header_rec.quote_name = 'IBE_PRMT_SC_UNNAMED') then
2948: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2949: IBE_UTIL.DEBUG('Exception: Active cart was unnamed, calling IBE_Quote_Save_pvt.SAVE to default save the active cart');
2950: END IF;
2951: l_default_save_qte_hdr_rec.quote_header_id := l_db_qte_header_rec.quote_header_id;
2952: l_default_save_qte_hdr_rec.last_update_date := l_db_qte_header_rec.last_update_date;
2953: l_default_save_qte_hdr_rec.quote_name := 'IBE_PRMT_SC_DEFAULTNAMED';
2966:
2967: l_db_qte_header_rec.quote_header_id := l_quote_header_id_tmp;
2968: l_db_qte_header_rec.last_update_date := l_last_update_date_tmp;
2969:
2970: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2971: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE Exception: Done keep: updating cart name to defaultnamed');
2972: END IF;
2973: end if; -- end if quote name was unnamed
2974: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2967: l_db_qte_header_rec.quote_header_id := l_quote_header_id_tmp;
2968: l_db_qte_header_rec.last_update_date := l_last_update_date_tmp;
2969:
2970: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2971: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE Exception: Done keep: updating cart name to defaultnamed');
2972: END IF;
2973: end if; -- end if quote name was unnamed
2974: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2975: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE Exception: Deactivating account active cart (since mode = KEEP)');
2970: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2971: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE Exception: Done keep: updating cart name to defaultnamed');
2972: END IF;
2973: end if; -- end if quote name was unnamed
2974: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2975: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE Exception: Deactivating account active cart (since mode = KEEP)');
2976: END IF;
2977: IBE_QUOTE_SAVESHARE_V2_PVT.DEACTIVATE_QUOTE (
2978: P_Quote_header_id => l_db_qte_header_rec.quote_header_id ,
2971: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE Exception: Done keep: updating cart name to defaultnamed');
2972: END IF;
2973: end if; -- end if quote name was unnamed
2974: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2975: IBE_UTIL.DEBUG('IBE_QUOTE_SAVESHARE_pvt.MERGE_QUOTE Exception: Deactivating account active cart (since mode = KEEP)');
2976: END IF;
2977: IBE_QUOTE_SAVESHARE_V2_PVT.DEACTIVATE_QUOTE (
2978: P_Quote_header_id => l_db_qte_header_rec.quote_header_id ,
2979: P_Party_id => l_db_qte_header_rec.party_id ,
2990:
2991: IF ( l_in_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2992: and l_in_qte_header_rec.quote_header_id is not null ) THEN
2993:
2994: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2995: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart in case of expected exception *******************');
2996: IBE_UTIL.DEBUG('********MergeActiveQutoe:Exception:Promote guest cart flag is set to true**********');
2997: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest party_id is: '||p_party_id);
2998: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest cust_account_id is: '||p_cust_account_id);
2991: IF ( l_in_qte_header_rec.quote_header_id <> fnd_api.g_miss_num
2992: and l_in_qte_header_rec.quote_header_id is not null ) THEN
2993:
2994: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2995: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart in case of expected exception *******************');
2996: IBE_UTIL.DEBUG('********MergeActiveQutoe:Exception:Promote guest cart flag is set to true**********');
2997: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest party_id is: '||p_party_id);
2998: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest cust_account_id is: '||p_cust_account_id);
2999: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest header id: '||l_in_qte_header_rec.quote_header_id);
2992: and l_in_qte_header_rec.quote_header_id is not null ) THEN
2993:
2994: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2995: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart in case of expected exception *******************');
2996: IBE_UTIL.DEBUG('********MergeActiveQutoe:Exception:Promote guest cart flag is set to true**********');
2997: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest party_id is: '||p_party_id);
2998: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest cust_account_id is: '||p_cust_account_id);
2999: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest header id: '||l_in_qte_header_rec.quote_header_id);
3000: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:quote name : '||l_in_qte_header_rec.quote_name);
2993:
2994: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2995: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart in case of expected exception *******************');
2996: IBE_UTIL.DEBUG('********MergeActiveQutoe:Exception:Promote guest cart flag is set to true**********');
2997: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest party_id is: '||p_party_id);
2998: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest cust_account_id is: '||p_cust_account_id);
2999: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest header id: '||l_in_qte_header_rec.quote_header_id);
3000: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:quote name : '||l_in_qte_header_rec.quote_name);
3001: END IF;
2994: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2995: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart in case of expected exception *******************');
2996: IBE_UTIL.DEBUG('********MergeActiveQutoe:Exception:Promote guest cart flag is set to true**********');
2997: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest party_id is: '||p_party_id);
2998: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest cust_account_id is: '||p_cust_account_id);
2999: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest header id: '||l_in_qte_header_rec.quote_header_id);
3000: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:quote name : '||l_in_qte_header_rec.quote_name);
3001: END IF;
3002: l_in_qte_header_rec.party_id := p_party_id;
2995: IBE_UTIL.DEBUG('*****************Code for promoting a guest cart in case of expected exception *******************');
2996: IBE_UTIL.DEBUG('********MergeActiveQutoe:Exception:Promote guest cart flag is set to true**********');
2997: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest party_id is: '||p_party_id);
2998: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest cust_account_id is: '||p_cust_account_id);
2999: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest header id: '||l_in_qte_header_rec.quote_header_id);
3000: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:quote name : '||l_in_qte_header_rec.quote_name);
3001: END IF;
3002: l_in_qte_header_rec.party_id := p_party_id;
3003: l_in_qte_header_rec.cust_account_id := p_cust_account_id;
2996: IBE_UTIL.DEBUG('********MergeActiveQutoe:Exception:Promote guest cart flag is set to true**********');
2997: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest party_id is: '||p_party_id);
2998: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest cust_account_id is: '||p_cust_account_id);
2999: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:Guest header id: '||l_in_qte_header_rec.quote_header_id);
3000: IBE_UTIL.DEBUG('MergeActiveQutoe:Exception:quote name : '||l_in_qte_header_rec.quote_name);
3001: END IF;
3002: l_in_qte_header_rec.party_id := p_party_id;
3003: l_in_qte_header_rec.cust_account_id := p_cust_account_id;
3004: l_in_qte_header_rec.quote_source_code := 'IStore Account';
3007: l_in_qte_header_rec.quote_name := 'IBE_PRMT_SC_DEFAULTNAMED';
3008:
3009: if ((rec_get_line_msiteId.minisite_id is not null) or
3010: (rec_get_line_msiteId.minisite_id <> fnd_api.g_miss_num) ) then
3011: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3012: IBE_Util.Debug('MergeActiveQuote:Exception: About to call getHdrDefaultValues during promotion');
3013: END IF;
3014:
3015: IBE_Quote_Save_pvt.getHdrDefaultValues(
3008:
3009: if ((rec_get_line_msiteId.minisite_id is not null) or
3010: (rec_get_line_msiteId.minisite_id <> fnd_api.g_miss_num) ) then
3011: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3012: IBE_Util.Debug('MergeActiveQuote:Exception: About to call getHdrDefaultValues during promotion');
3013: END IF;
3014:
3015: IBE_Quote_Save_pvt.getHdrDefaultValues(
3016: P_Api_Version_Number => p_api_version_number
3056: lx_Price_Adj_Attr_Tbl := lx_Price_Adj_Attr_Tbl_tmp;
3057: lx_Price_Adj_Rltship_Tbl := lx_Price_Adj_Rltship_Tbl_tmp;
3058:
3059:
3060: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3061: IBE_Util.Debug('MergeActiveQuote:Exception: Back from calling getHdrDefaultValues');
3062: END IF;
3063: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: Back from calling getHdrDefaultValues');
3064: else
3057: lx_Price_Adj_Rltship_Tbl := lx_Price_Adj_Rltship_Tbl_tmp;
3058:
3059:
3060: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3061: IBE_Util.Debug('MergeActiveQuote:Exception: Back from calling getHdrDefaultValues');
3062: END IF;
3063: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: Back from calling getHdrDefaultValues');
3064: else
3065: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3061: IBE_Util.Debug('MergeActiveQuote:Exception: Back from calling getHdrDefaultValues');
3062: END IF;
3063: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: Back from calling getHdrDefaultValues');
3064: else
3065: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3066: IBE_UTIL.DEBUG('MergeActiveQuote:Exception:Cannot find a minisite_id while calling getHdrDefaultValues');
3067: END IF;
3068: end if; -- if we can find the minisiteId
3069:
3062: END IF;
3063: --DBMS_OUTPUT.PUT_LINE('MergeActiveQuote: Back from calling getHdrDefaultValues');
3064: else
3065: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3066: IBE_UTIL.DEBUG('MergeActiveQuote:Exception:Cannot find a minisite_id while calling getHdrDefaultValues');
3067: END IF;
3068: end if; -- if we can find the minisiteId
3069:
3070: --save the guest cart into account active cart of the user
3067: END IF;
3068: end if; -- if we can find the minisiteId
3069:
3070: --save the guest cart into account active cart of the user
3071: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3072: IBE_UTIL.DEBUG('MergeActiveQuote:Exception:saving the guest cart as account active cart of the user');
3073: END IF;
3074: IBE_Quote_Save_pvt.save(
3075: p_api_version_number => p_api_version_number ,
3068: end if; -- if we can find the minisiteId
3069:
3070: --save the guest cart into account active cart of the user
3071: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3072: IBE_UTIL.DEBUG('MergeActiveQuote:Exception:saving the guest cart as account active cart of the user');
3073: END IF;
3074: IBE_Quote_Save_pvt.save(
3075: p_api_version_number => p_api_version_number ,
3076: p_init_msg_list => fnd_api.g_false ,
3103: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3104: p_count => x_msg_count,
3105: p_data => x_msg_data);
3106: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3107: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3108: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.mergeActiveQuote');
3109: END IF;
3110: ROLLBACK TO MergeActiveQuote_pvt;
3111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3104: p_count => x_msg_count,
3105: p_data => x_msg_data);
3106: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3107: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3108: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.mergeActiveQuote');
3109: END IF;
3110: ROLLBACK TO MergeActiveQuote_pvt;
3111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3112: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3112: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3113: p_count => x_msg_count,
3114: p_data => x_msg_data);
3115: WHEN OTHERS THEN
3116: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3117: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.mergeActiveQuote');
3118: END IF;
3119: ROLLBACK TO MergeActiveQuote_pvt;
3120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3113: p_count => x_msg_count,
3114: p_data => x_msg_data);
3115: WHEN OTHERS THEN
3116: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3117: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.mergeActiveQuote');
3118: END IF;
3119: ROLLBACK TO MergeActiveQuote_pvt;
3120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3121:
3202: l_url := l_url || 'retSharTQuoteNum=' || l_qte_header_rec.quote_number || '&';
3203: l_url := l_url || 'retSharTVersion=' || l_qte_header_rec.quote_version;
3204: l_url := p_url || '&' || l_url;
3205:
3206: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3207: IBE_UTIL.DEBUG('call IBE_WORKFLOW_pvt.NotifyForSharedCart starts');
3208: END IF;
3209:
3210: IBE_WORKFLOW_pvt.NotifyForSharedCart(
3203: l_url := l_url || 'retSharTVersion=' || l_qte_header_rec.quote_version;
3204: l_url := p_url || '&' || l_url;
3205:
3206: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3207: IBE_UTIL.DEBUG('call IBE_WORKFLOW_pvt.NotifyForSharedCart starts');
3208: END IF;
3209:
3210: IBE_WORKFLOW_pvt.NotifyForSharedCart(
3211: p_api_version => p_api_version_number
3221: ,x_msg_count => x_msg_count
3222: ,x_msg_data => x_msg_data
3223: );
3224:
3225: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3226: IBE_UTIL.DEBUG('call IBE_WORKFLOW_PVT.NotifyForSharedCart finishes');
3227: END IF;
3228:
3229: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3222: ,x_msg_data => x_msg_data
3223: );
3224:
3225: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3226: IBE_UTIL.DEBUG('call IBE_WORKFLOW_PVT.NotifyForSharedCart finishes');
3227: END IF;
3228:
3229: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3230: RAISE FND_API.G_EXC_ERROR;
3231: END IF;
3232: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3233: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3234: END IF;
3235: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3236: IBE_UTIL.DEBUG('done IBE_WFNOTIFICATION.send_email at'
3237: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
3238: END IF;
3239:
3232: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3233: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3234: END IF;
3235: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3236: IBE_UTIL.DEBUG('done IBE_WFNOTIFICATION.send_email at'
3237: || to_char(sysdate, 'mm/dd/yyyy:hh24:MI:SS'));
3238: END IF;
3239:
3240:
3248: p_count => x_msg_count,
3249: p_data => x_msg_data);
3250: EXCEPTION
3251: WHEN FND_API.G_EXC_ERROR THEN
3252: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3253: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.EmailSharee');
3254: END IF;
3255: ROLLBACK TO EMAILSHAREE_pvt;
3256: x_return_status := FND_API.G_RET_STS_ERROR;
3249: p_data => x_msg_data);
3250: EXCEPTION
3251: WHEN FND_API.G_EXC_ERROR THEN
3252: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3253: ibe_util.debug('Expected exception in IBE_QUOTE_SAVESHARE_PVT.EmailSharee');
3254: END IF;
3255: ROLLBACK TO EMAILSHAREE_pvt;
3256: x_return_status := FND_API.G_RET_STS_ERROR;
3257: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3257: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3258: p_count => x_msg_count,
3259: p_data => x_msg_data);
3260: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3261: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3262: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.EmailSharee');
3263: END IF;
3264: ROLLBACK TO EMAILSHAREE_pvt;
3265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3258: p_count => x_msg_count,
3259: p_data => x_msg_data);
3260: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3261: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3262: ibe_util.debug('Unexpected exception in IBE_QUOTE_SAVESHARE_PVT.EmailSharee');
3263: END IF;
3264: ROLLBACK TO EMAILSHAREE_pvt;
3265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3266: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3266: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3267: p_count => x_msg_count,
3268: p_data => x_msg_data);
3269: WHEN OTHERS THEN
3270: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3271: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.EmailSharee');
3272: END IF;
3273: ROLLBACK TO EMAILSHAREE_pvt;
3274: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3267: p_count => x_msg_count,
3268: p_data => x_msg_data);
3269: WHEN OTHERS THEN
3270: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
3271: ibe_util.debug('Unknown exception in IBE_QUOTE_SAVESHARE_PVT.EmailSharee');
3272: END IF;
3273: ROLLBACK TO EMAILSHAREE_pvt;
3274: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3275: