DBA Data[Home] [Help]

APPS.OKC_CFG_PUB dependencies on OKC_DEBUG

Line 280: OKC_DEBUG.set_indentation(l_api_name);

276: BEGIN
277: SAVEPOINT build_cle_from_cz;
278:
279: IF (l_debug = 'Y') THEN
280: OKC_DEBUG.set_indentation(l_api_name);
281: OKC_DEBUG.log('10: Entered build_cle_from_cz', 2);
282: END IF;
283: --FND_MSG_PUB.initialize;
284: okc_api.init_msg_list(p_init_msg_list);

Line 281: OKC_DEBUG.log('10: Entered build_cle_from_cz', 2);

277: SAVEPOINT build_cle_from_cz;
278:
279: IF (l_debug = 'Y') THEN
280: OKC_DEBUG.set_indentation(l_api_name);
281: OKC_DEBUG.log('10: Entered build_cle_from_cz', 2);
282: END IF;
283: --FND_MSG_PUB.initialize;
284: okc_api.init_msg_list(p_init_msg_list);
285:

Line 320: OKC_DEBUG.log('11: Config Exists already in OKC: '||p_au_line_rec.id);

316:
317: IF l_config_exists = 'Y'
318: THEN
319: IF (l_debug = 'Y') THEN
320: OKC_DEBUG.log('11: Config Exists already in OKC: '||p_au_line_rec.id);
321: END IF;
322: RAISE OKC_API.G_EXCEPTION_ERROR;
323: END IF;
324:

Line 345: OKC_DEBUG.log('30: Before delete old revision....');

341:
342: l_clev_rec.id := l_line_id;
343:
344: IF (l_debug = 'Y') THEN
345: OKC_DEBUG.log('30: Before delete old revision....');
346: END IF;
347:
348: OKC_CONTRACT_PUB.delete_contract_line (
349: p_api_version => l_api_version_number,

Line 357: OKC_DEBUG.log('40: After delete old revision...'||x_return_status);

353: x_msg_data => x_msg_data,
354: p_line_id => l_line_id );
355:
356: IF (l_debug = 'Y') THEN
357: OKC_DEBUG.log('40: After delete old revision...'||x_return_status);
358: END IF;
359:
360: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
361: p_data => x_msg_data);

Line 371: OKC_DEBUG.log('41: x_msg_data '||x_msg_data);

367: LOOP
368: x_msg_data := FND_MSG_PUB.Get(p_msg_index => i,
369: p_encoded => 'F');
370: IF (l_debug = 'Y') THEN
371: OKC_DEBUG.log('41: x_msg_data '||x_msg_data);
372: END IF;
373: END LOOP; -- end of message count loop
374: END IF;
375:

Line 395: OKC_DEBUG.log('130: Config Hdr Id : '||p_config_rec.config_hdr_id);

391: -- STEP.2: DEBUG: 100 series
392: -- Handle the inserts for the lines that are not existing in OKC.
393: -- -------------------------------------------------------------------
394: IF (l_debug = 'Y') THEN
395: OKC_DEBUG.log('130: Config Hdr Id : '||p_config_rec.config_hdr_id);
396: OKC_DEBUG.log('140: Config Rev Nbr: '||p_config_rec.config_rev_nbr);
397: OKC_DEBUG.log('150: Line Id : '||p_au_line_rec.id);
398: OKC_DEBUG.log('160: Inv Item Id : '||p_au_line_rec.inventory_item_id);
399: END IF;

Line 396: OKC_DEBUG.log('140: Config Rev Nbr: '||p_config_rec.config_rev_nbr);

392: -- Handle the inserts for the lines that are not existing in OKC.
393: -- -------------------------------------------------------------------
394: IF (l_debug = 'Y') THEN
395: OKC_DEBUG.log('130: Config Hdr Id : '||p_config_rec.config_hdr_id);
396: OKC_DEBUG.log('140: Config Rev Nbr: '||p_config_rec.config_rev_nbr);
397: OKC_DEBUG.log('150: Line Id : '||p_au_line_rec.id);
398: OKC_DEBUG.log('160: Inv Item Id : '||p_au_line_rec.inventory_item_id);
399: END IF;
400:

Line 397: OKC_DEBUG.log('150: Line Id : '||p_au_line_rec.id);

393: -- -------------------------------------------------------------------
394: IF (l_debug = 'Y') THEN
395: OKC_DEBUG.log('130: Config Hdr Id : '||p_config_rec.config_hdr_id);
396: OKC_DEBUG.log('140: Config Rev Nbr: '||p_config_rec.config_rev_nbr);
397: OKC_DEBUG.log('150: Line Id : '||p_au_line_rec.id);
398: OKC_DEBUG.log('160: Inv Item Id : '||p_au_line_rec.inventory_item_id);
399: END IF;
400:
401: -- Initialize clev record for further process.

Line 398: OKC_DEBUG.log('160: Inv Item Id : '||p_au_line_rec.inventory_item_id);

394: IF (l_debug = 'Y') THEN
395: OKC_DEBUG.log('130: Config Hdr Id : '||p_config_rec.config_hdr_id);
396: OKC_DEBUG.log('140: Config Rev Nbr: '||p_config_rec.config_rev_nbr);
397: OKC_DEBUG.log('150: Line Id : '||p_au_line_rec.id);
398: OKC_DEBUG.log('160: Inv Item Id : '||p_au_line_rec.inventory_item_id);
399: END IF;
400:
401: -- Initialize clev record for further process.
402: l_clev_rec := l_clev_rec_init;

Line 414: OKC_DEBUG.log('161: l_index = '||l_index);

410: EXIT WHEN cur_cle_ins%NOTFOUND;
411: l_index := l_index + 1;
412:
413: IF (l_debug = 'Y') THEN
414: OKC_DEBUG.log('161: l_index = '||l_index);
415: END IF;
416:
417: -- ------------------------------------------------------------
418: -- Added for Bug 2393302.

Line 437: OKC_DEBUG.log('165: Model Line Pricelist :'||l_price_list_id);

433: -- Getting l_line_pricing_date as per Bug 2393302
434: CLOSE cur_pr_list;
435:
436: IF (l_debug = 'Y') THEN
437: OKC_DEBUG.log('165: Model Line Pricelist :'||l_price_list_id);
438: OKC_DEBUG.log('166: Header Level Pricelist :'||p_au_line_rec.hdr_price_list_id);
439: END IF;
440:
441: l_price_list_id := NVL(l_price_list_id,

Line 438: OKC_DEBUG.log('166: Header Level Pricelist :'||p_au_line_rec.hdr_price_list_id);

434: CLOSE cur_pr_list;
435:
436: IF (l_debug = 'Y') THEN
437: OKC_DEBUG.log('165: Model Line Pricelist :'||l_price_list_id);
438: OKC_DEBUG.log('166: Header Level Pricelist :'||p_au_line_rec.hdr_price_list_id);
439: END IF;
440:
441: l_price_list_id := NVL(l_price_list_id,
442: p_au_line_rec.hdr_price_list_id);

Line 445: OKC_DEBUG.log('166: Defaulted Pricelist :'||l_price_list_id);

441: l_price_list_id := NVL(l_price_list_id,
442: p_au_line_rec.hdr_price_list_id);
443:
444: IF (l_debug = 'Y') THEN
445: OKC_DEBUG.log('166: Defaulted Pricelist :'||l_price_list_id);
446: END IF;
447:
448: -- Added for Bug 2393302
449: IF (l_debug = 'Y') THEN

Line 450: OKC_DEBUG.log('165.A: Header Pricing Date :'||l_hdr_pricing_date);

446: END IF;
447:
448: -- Added for Bug 2393302
449: IF (l_debug = 'Y') THEN
450: OKC_DEBUG.log('165.A: Header Pricing Date :'||l_hdr_pricing_date);
451: OKC_DEBUG.log('165.A: Line Pricing Date :'||l_line_pricing_date);
452: END IF;
453:
454: l_pricing_date := NVL(l_line_pricing_date,

Line 451: OKC_DEBUG.log('165.A: Line Pricing Date :'||l_line_pricing_date);

447:
448: -- Added for Bug 2393302
449: IF (l_debug = 'Y') THEN
450: OKC_DEBUG.log('165.A: Header Pricing Date :'||l_hdr_pricing_date);
451: OKC_DEBUG.log('165.A: Line Pricing Date :'||l_line_pricing_date);
452: END IF;
453:
454: l_pricing_date := NVL(l_line_pricing_date,
455: l_hdr_pricing_date);

Line 458: OKC_DEBUG.log('166.A: Defaulted PricingDate :'||l_pricing_date);

454: l_pricing_date := NVL(l_line_pricing_date,
455: l_hdr_pricing_date);
456:
457: IF (l_debug = 'Y') THEN
458: OKC_DEBUG.log('166.A: Defaulted PricingDate :'||l_pricing_date);
459: END IF;
460:
461: -- ------------------------------------------------------------
462:

Line 470: OKC_DEBUG.log('175: Inside Create Model contract lines...'||l_config_rec.inventory_item_id);

466: -- This is a model item.
467: -- Create top model, top base line and top base item.
468: -- ------------------------------------------------------------
469: IF (l_debug = 'Y') THEN
470: OKC_DEBUG.log('175: Inside Create Model contract lines...'||l_config_rec.inventory_item_id);
471: END IF;
472:
473: -- -----------------------------------------------------------------
474: -- Assign available values to create top model line record

Line 507: OKC_DEBUG.log('200: Before update contract top model line...');

503: -- No need to create contract item line, as this is update
504: -- for the Authoring form row. Form will commit the item row.
505: -- -----------------------------------------------------------------
506: IF (l_debug = 'Y') THEN
507: OKC_DEBUG.log('200: Before update contract top model line...');
508: END IF;
509:
510: OKC_CONTRACT_PUB.update_contract_line
511: ( p_api_version => l_api_version_number,

Line 520: OKC_DEBUG.log('210: Updated contract Top Model Line..'||x_return_status);

516: p_clev_rec => l_clev_rec,
517: x_clev_rec => x_clev_rec);
518:
519: IF (l_debug = 'Y') THEN
520: OKC_DEBUG.log('210: Updated contract Top Model Line..'||x_return_status);
521: END IF;
522:
523: IF (l_debug = 'Y') THEN
524: OKC_DEBUG.log('220: Top Model Line Id : '||x_clev_rec.id);

Line 524: OKC_DEBUG.log('220: Top Model Line Id : '||x_clev_rec.id);

520: OKC_DEBUG.log('210: Updated contract Top Model Line..'||x_return_status);
521: END IF;
522:
523: IF (l_debug = 'Y') THEN
524: OKC_DEBUG.log('220: Top Model Line Id : '||x_clev_rec.id);
525: END IF;
526:
527: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
528: p_data => x_msg_data);

Line 538: OKC_DEBUG.log('221: x_msg_data '||x_msg_data);

534: LOOP
535: x_msg_data := FND_MSG_PUB.Get(p_msg_index => i,
536: p_encoded => 'F');
537: IF (l_debug = 'Y') THEN
538: OKC_DEBUG.log('221: x_msg_data '||x_msg_data);
539: END IF;
540: END LOOP; -- end of message count loop
541: END IF;
542:

Line 576: OKC_DEBUG.log('300: Before create top base model line...');

572: l_clev_rec.display_sequence := l_index + 1;
573: l_clev_rec.config_item_id := l_config_rec.config_item_id;
574:
575: IF (l_debug = 'Y') THEN
576: OKC_DEBUG.log('300: Before create top base model line...');
577: END IF;
578:
579: OKC_CONTRACT_PUB.create_contract_line
580: ( p_api_version => l_api_version_number,

Line 589: OKC_DEBUG.log('310: Created Top Base Model Line...'||x_return_status);

585: p_clev_rec => l_clev_rec,
586: x_clev_rec => x_clev_rec);
587:
588: IF (l_debug = 'Y') THEN
589: OKC_DEBUG.log('310: Created Top Base Model Line...'||x_return_status);
590: END IF;
591:
592: IF (l_debug = 'Y') THEN
593: OKC_DEBUG.log('320:Top Base LineId :'||x_clev_rec.id);

Line 593: OKC_DEBUG.log('320:Top Base LineId :'||x_clev_rec.id);

589: OKC_DEBUG.log('310: Created Top Base Model Line...'||x_return_status);
590: END IF;
591:
592: IF (l_debug = 'Y') THEN
593: OKC_DEBUG.log('320:Top Base LineId :'||x_clev_rec.id);
594: OKC_DEBUG.log('330:Config Item Type:'||x_clev_rec.config_item_type);
595: END IF;
596:
597: FND_MSG_PUB.count_and_get(p_count => x_msg_count,

Line 594: OKC_DEBUG.log('330:Config Item Type:'||x_clev_rec.config_item_type);

590: END IF;
591:
592: IF (l_debug = 'Y') THEN
593: OKC_DEBUG.log('320:Top Base LineId :'||x_clev_rec.id);
594: OKC_DEBUG.log('330:Config Item Type:'||x_clev_rec.config_item_type);
595: END IF;
596:
597: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
598: p_data => x_msg_data);

Line 608: OKC_DEBUG.log('391: x_msg_data '||x_msg_data);

604: LOOP
605: x_msg_data := FND_MSG_PUB.Get(p_msg_index => i,
606: p_encoded => 'F');
607: IF (l_debug = 'Y') THEN
608: OKC_DEBUG.log('391: x_msg_data '||x_msg_data);
609: END IF;
610: END LOOP; -- end of message count loop
611: END IF;
612:

Line 663: OKC_DEBUG.log('400: x_msg_data '||x_msg_data);

659: LOOP
660: x_msg_data := FND_MSG_PUB.Get(p_msg_index => i,
661: p_encoded => 'F');
662: IF (l_debug = 'Y') THEN
663: OKC_DEBUG.log('400: x_msg_data '||x_msg_data);
664: END IF;
665: END LOOP; -- end of message count loop
666: END IF;
667:

Line 694: OKC_DEBUG.log('500: Before base contract item create ...');

690: l_cimv_rec.exception_yn := 'N';
691: l_cimv_rec.priced_item_yn := 'Y';
692: -- -----------------------------------------------------------------
693: IF (l_debug = 'Y') THEN
694: OKC_DEBUG.log('500: Before base contract item create ...');
695: END IF;
696:
697: OKC_CONTRACT_ITEM_PUB.create_contract_item
698: ( p_api_version => 1,

Line 707: OKC_DEBUG.log('510: Created contract Base model Item ...'||x_return_status);

703: p_cimv_rec => l_cimv_rec,
704: x_cimv_rec => x_cimv_rec);
705:
706: IF (l_debug = 'Y') THEN
707: OKC_DEBUG.log('510: Created contract Base model Item ...'||x_return_status);
708: END IF;
709:
710: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
711: p_data => x_msg_data);

Line 721: OKC_DEBUG.log('511: x_msg_data '||x_msg_data);

717: LOOP
718: x_msg_data := FND_MSG_PUB.Get(p_msg_index => i,
719: p_encoded => 'F');
720: IF (l_debug = 'Y') THEN
721: OKC_DEBUG.log('511: x_msg_data '||x_msg_data);
722: END IF;
723: END LOOP; -- end of message count loop
724: END IF;
725:

Line 742: OKC_DEBUG.log('5000: Creating new config line for item ...'||l_config_rec.inventory_item_id);

738: -- This row is a config options line. Child row of a model.
739: -- Create sublines and subline item.
740: -- -------------------------------------------------------
741: IF (l_debug = 'Y') THEN
742: OKC_DEBUG.log('5000: Creating new config line for item ...'||l_config_rec.inventory_item_id);
743: END IF;
744:
745: -- ----------------------------------------------------------------
746: -- STEP.2.4.1 DEBUG: 5010 - 5080

Line 754: OKC_DEBUG.log('5010: JTOT Object Code: '||p_au_line_rec.item_jtot_obj_code);

750: -- The linestyle source should contain the configured system items.
751: -- i.e. check for the inventory item is part of the model source.
752: -- ----------------------------------------------------------------
753: IF (l_debug = 'Y') THEN
754: OKC_DEBUG.log('5010: JTOT Object Code: '||p_au_line_rec.item_jtot_obj_code);
755: OKC_DEBUG.log('5020: Object1 Id1-Item: '||l_config_rec.inventory_item_id);
756: OKC_DEBUG.log('5030: Object1 Id2-Org : '||p_au_line_rec.item_object1_id2);
757: END IF;
758:

Line 755: OKC_DEBUG.log('5020: Object1 Id1-Item: '||l_config_rec.inventory_item_id);

751: -- i.e. check for the inventory item is part of the model source.
752: -- ----------------------------------------------------------------
753: IF (l_debug = 'Y') THEN
754: OKC_DEBUG.log('5010: JTOT Object Code: '||p_au_line_rec.item_jtot_obj_code);
755: OKC_DEBUG.log('5020: Object1 Id1-Item: '||l_config_rec.inventory_item_id);
756: OKC_DEBUG.log('5030: Object1 Id2-Org : '||p_au_line_rec.item_object1_id2);
757: END IF;
758:
759: -- ---------------------------------------------------------------------------

Line 756: OKC_DEBUG.log('5030: Object1 Id2-Org : '||p_au_line_rec.item_object1_id2);

752: -- ----------------------------------------------------------------
753: IF (l_debug = 'Y') THEN
754: OKC_DEBUG.log('5010: JTOT Object Code: '||p_au_line_rec.item_jtot_obj_code);
755: OKC_DEBUG.log('5020: Object1 Id1-Item: '||l_config_rec.inventory_item_id);
756: OKC_DEBUG.log('5030: Object1 Id2-Org : '||p_au_line_rec.item_object1_id2);
757: END IF;
758:
759: -- ---------------------------------------------------------------------------
760: -- Call to fetch the item name, with these values

Line 768: OKC_DEBUG.log('5080: Item Name : '||l_item_name);

764: p_id1 => l_config_rec.inventory_item_id,
765: p_id2 => p_au_line_rec.item_object1_id2);
766:
767: IF (l_debug = 'Y') THEN
768: OKC_DEBUG.log('5080: Item Name : '||l_item_name);
769: END IF;
770:
771: IF l_item_name IS NULL
772: THEN

Line 799: OKC_DEBUG.log('5100: New config contract line inited...');

795: -- -----------------------------------------------------------------
796: -- Initialize new contract line input record.
797: l_clev_rec := l_clev_rec_init;
798: IF (l_debug = 'Y') THEN
799: OKC_DEBUG.log('5100: New config contract line inited...');
800: END IF;
801:
802: -- -----------------------------------------------------------------
803: -- Assign available values to create config line record

Line 830: OKC_DEBUG.log('5101: Before create config line...');

826: l_clev_rec.pricing_date := l_pricing_date; -- Added for Bug 2393302
827: -- -----------------------------------------------------------------
828:
829: IF (l_debug = 'Y') THEN
830: OKC_DEBUG.log('5101: Before create config line...');
831: OKC_DEBUG.log('5102: Parent for this line :'||l_clev_rec.cle_id);
832: END IF;
833:
834: OKC_CONTRACT_PUB.create_contract_line

Line 831: OKC_DEBUG.log('5102: Parent for this line :'||l_clev_rec.cle_id);

827: -- -----------------------------------------------------------------
828:
829: IF (l_debug = 'Y') THEN
830: OKC_DEBUG.log('5101: Before create config line...');
831: OKC_DEBUG.log('5102: Parent for this line :'||l_clev_rec.cle_id);
832: END IF;
833:
834: OKC_CONTRACT_PUB.create_contract_line
835: ( p_api_version => l_api_version_number,

Line 844: OKC_DEBUG.log('5110: Created new Config Line...'|| x_return_status);

840: p_clev_rec => l_clev_rec,
841: x_clev_rec => x_clev_rec);
842:
843: IF (l_debug = 'Y') THEN
844: OKC_DEBUG.log('5110: Created new Config Line...'|| x_return_status);
845: END IF;
846:
847: IF (l_debug = 'Y') THEN
848: OKC_DEBUG.log('5200: New Cfg line :'||x_clev_rec.cle_id);

Line 848: OKC_DEBUG.log('5200: New Cfg line :'||x_clev_rec.cle_id);

844: OKC_DEBUG.log('5110: Created new Config Line...'|| x_return_status);
845: END IF;
846:
847: IF (l_debug = 'Y') THEN
848: OKC_DEBUG.log('5200: New Cfg line :'||x_clev_rec.cle_id);
849: OKC_DEBUG.log('5210: Cfg Item Type:'||x_clev_rec.config_item_type);
850: END IF;
851:
852: FND_MSG_PUB.count_and_get(p_count => x_msg_count,

Line 849: OKC_DEBUG.log('5210: Cfg Item Type:'||x_clev_rec.config_item_type);

845: END IF;
846:
847: IF (l_debug = 'Y') THEN
848: OKC_DEBUG.log('5200: New Cfg line :'||x_clev_rec.cle_id);
849: OKC_DEBUG.log('5210: Cfg Item Type:'||x_clev_rec.config_item_type);
850: END IF;
851:
852: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
853: p_data => x_msg_data);

Line 863: OKC_DEBUG.log('5290: x_msg_data '||x_msg_data);

859: LOOP
860: x_msg_data := FND_MSG_PUB.Get(p_msg_index => i,
861: p_encoded => 'F');
862: IF (l_debug = 'Y') THEN
863: OKC_DEBUG.log('5290: x_msg_data '||x_msg_data);
864: END IF;
865: END LOOP; -- end of message count loop
866: END IF;
867:

Line 924: OKC_DEBUG.log('5300: Before config contract item create ...');

920: l_cimv_rec.priced_item_yn := 'Y';
921: -- -----------------------------------------------------------------
922:
923: IF (l_debug = 'Y') THEN
924: OKC_DEBUG.log('5300: Before config contract item create ...');
925: END IF;
926:
927: OKC_CONTRACT_ITEM_PUB.create_contract_item
928: ( p_api_version => 1,

Line 937: OKC_DEBUG.log('5310: Created corresponding Contract Item...'||x_return_status);

933: p_cimv_rec => l_cimv_rec,
934: x_cimv_rec => x_cimv_rec);
935:
936: IF (l_debug = 'Y') THEN
937: OKC_DEBUG.log('5310: Created corresponding Contract Item...'||x_return_status);
938: END IF;
939:
940: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
941: p_data => x_msg_data);

Line 951: OKC_DEBUG.log('5311: x_msg_data '||x_msg_data);

947: LOOP
948: x_msg_data := FND_MSG_PUB.Get(p_msg_index => i,
949: p_encoded => 'F');
950: IF (l_debug = 'Y') THEN
951: OKC_DEBUG.log('5311: x_msg_data '||x_msg_data);
952: END IF;
953: END LOOP; -- end of message count loop
954: END IF;
955:

Line 974: OKC_DEBUG.log('5600: Entering Pricing Section ...', 2);

970: -- STEP.5: DEBUG: 5600 series
971: -- Handle the pricing call and update the line.
972: -- -------------------------------------------------------------------
973: IF (l_debug = 'Y') THEN
974: OKC_DEBUG.log('5600: Entering Pricing Section ...', 2);
975: END IF;
976:
977: -- ----------------------------------------------------------
978: -- STEP.5.1:

Line 999: OKC_DEBUG.log('<------------ INPUT LINE - '||i||' ------->');

995: l_chr_id,
996: l_cle_price_tbl(i).pricing_date; -- Added for Bug 2393302
997:
998: IF (l_debug = 'Y') THEN
999: OKC_DEBUG.log('<------------ INPUT LINE - '||i||' ------->');
1000: OKC_DEBUG.log('5611: Id : '||l_cle_price_tbl(i).id);
1001: OKC_DEBUG.log('5612: Inv Item: '||l_cle_price_tbl(i).id1);
1002: OKC_DEBUG.log('5613: Quantity: '||l_cle_price_tbl(i).qty);
1003: OKC_DEBUG.log('5614: UOM Code: '||l_cle_price_tbl(i).uom_code);

Line 1000: OKC_DEBUG.log('5611: Id : '||l_cle_price_tbl(i).id);

996: l_cle_price_tbl(i).pricing_date; -- Added for Bug 2393302
997:
998: IF (l_debug = 'Y') THEN
999: OKC_DEBUG.log('<------------ INPUT LINE - '||i||' ------->');
1000: OKC_DEBUG.log('5611: Id : '||l_cle_price_tbl(i).id);
1001: OKC_DEBUG.log('5612: Inv Item: '||l_cle_price_tbl(i).id1);
1002: OKC_DEBUG.log('5613: Quantity: '||l_cle_price_tbl(i).qty);
1003: OKC_DEBUG.log('5614: UOM Code: '||l_cle_price_tbl(i).uom_code);
1004: OKC_DEBUG.log('5615: Currency: '||l_cle_price_tbl(i).currency);

Line 1001: OKC_DEBUG.log('5612: Inv Item: '||l_cle_price_tbl(i).id1);

997:
998: IF (l_debug = 'Y') THEN
999: OKC_DEBUG.log('<------------ INPUT LINE - '||i||' ------->');
1000: OKC_DEBUG.log('5611: Id : '||l_cle_price_tbl(i).id);
1001: OKC_DEBUG.log('5612: Inv Item: '||l_cle_price_tbl(i).id1);
1002: OKC_DEBUG.log('5613: Quantity: '||l_cle_price_tbl(i).qty);
1003: OKC_DEBUG.log('5614: UOM Code: '||l_cle_price_tbl(i).uom_code);
1004: OKC_DEBUG.log('5615: Currency: '||l_cle_price_tbl(i).currency);
1005: OKC_DEBUG.log('5616: Org Id : '||l_cle_price_tbl(i).id2);

Line 1002: OKC_DEBUG.log('5613: Quantity: '||l_cle_price_tbl(i).qty);

998: IF (l_debug = 'Y') THEN
999: OKC_DEBUG.log('<------------ INPUT LINE - '||i||' ------->');
1000: OKC_DEBUG.log('5611: Id : '||l_cle_price_tbl(i).id);
1001: OKC_DEBUG.log('5612: Inv Item: '||l_cle_price_tbl(i).id1);
1002: OKC_DEBUG.log('5613: Quantity: '||l_cle_price_tbl(i).qty);
1003: OKC_DEBUG.log('5614: UOM Code: '||l_cle_price_tbl(i).uom_code);
1004: OKC_DEBUG.log('5615: Currency: '||l_cle_price_tbl(i).currency);
1005: OKC_DEBUG.log('5616: Org Id : '||l_cle_price_tbl(i).id2);
1006: OKC_DEBUG.log('5617: Jtot Obj: '||l_cle_price_tbl(i).object_code);

Line 1003: OKC_DEBUG.log('5614: UOM Code: '||l_cle_price_tbl(i).uom_code);

999: OKC_DEBUG.log('<------------ INPUT LINE - '||i||' ------->');
1000: OKC_DEBUG.log('5611: Id : '||l_cle_price_tbl(i).id);
1001: OKC_DEBUG.log('5612: Inv Item: '||l_cle_price_tbl(i).id1);
1002: OKC_DEBUG.log('5613: Quantity: '||l_cle_price_tbl(i).qty);
1003: OKC_DEBUG.log('5614: UOM Code: '||l_cle_price_tbl(i).uom_code);
1004: OKC_DEBUG.log('5615: Currency: '||l_cle_price_tbl(i).currency);
1005: OKC_DEBUG.log('5616: Org Id : '||l_cle_price_tbl(i).id2);
1006: OKC_DEBUG.log('5617: Jtot Obj: '||l_cle_price_tbl(i).object_code);
1007: OKC_DEBUG.log('5618: Pr List : '||l_cle_price_tbl(i).pricelist_id);

Line 1004: OKC_DEBUG.log('5615: Currency: '||l_cle_price_tbl(i).currency);

1000: OKC_DEBUG.log('5611: Id : '||l_cle_price_tbl(i).id);
1001: OKC_DEBUG.log('5612: Inv Item: '||l_cle_price_tbl(i).id1);
1002: OKC_DEBUG.log('5613: Quantity: '||l_cle_price_tbl(i).qty);
1003: OKC_DEBUG.log('5614: UOM Code: '||l_cle_price_tbl(i).uom_code);
1004: OKC_DEBUG.log('5615: Currency: '||l_cle_price_tbl(i).currency);
1005: OKC_DEBUG.log('5616: Org Id : '||l_cle_price_tbl(i).id2);
1006: OKC_DEBUG.log('5617: Jtot Obj: '||l_cle_price_tbl(i).object_code);
1007: OKC_DEBUG.log('5618: Pr List : '||l_cle_price_tbl(i).pricelist_id);
1008: OKC_DEBUG.log('5619: Chr Id : '||l_chr_id);

Line 1005: OKC_DEBUG.log('5616: Org Id : '||l_cle_price_tbl(i).id2);

1001: OKC_DEBUG.log('5612: Inv Item: '||l_cle_price_tbl(i).id1);
1002: OKC_DEBUG.log('5613: Quantity: '||l_cle_price_tbl(i).qty);
1003: OKC_DEBUG.log('5614: UOM Code: '||l_cle_price_tbl(i).uom_code);
1004: OKC_DEBUG.log('5615: Currency: '||l_cle_price_tbl(i).currency);
1005: OKC_DEBUG.log('5616: Org Id : '||l_cle_price_tbl(i).id2);
1006: OKC_DEBUG.log('5617: Jtot Obj: '||l_cle_price_tbl(i).object_code);
1007: OKC_DEBUG.log('5618: Pr List : '||l_cle_price_tbl(i).pricelist_id);
1008: OKC_DEBUG.log('5619: Chr Id : '||l_chr_id);
1009: OKC_DEBUG.log('5620: Pricing Date : '||l_cle_price_tbl(i).pricing_date); -- Added for Bug 2393302

Line 1006: OKC_DEBUG.log('5617: Jtot Obj: '||l_cle_price_tbl(i).object_code);

1002: OKC_DEBUG.log('5613: Quantity: '||l_cle_price_tbl(i).qty);
1003: OKC_DEBUG.log('5614: UOM Code: '||l_cle_price_tbl(i).uom_code);
1004: OKC_DEBUG.log('5615: Currency: '||l_cle_price_tbl(i).currency);
1005: OKC_DEBUG.log('5616: Org Id : '||l_cle_price_tbl(i).id2);
1006: OKC_DEBUG.log('5617: Jtot Obj: '||l_cle_price_tbl(i).object_code);
1007: OKC_DEBUG.log('5618: Pr List : '||l_cle_price_tbl(i).pricelist_id);
1008: OKC_DEBUG.log('5619: Chr Id : '||l_chr_id);
1009: OKC_DEBUG.log('5620: Pricing Date : '||l_cle_price_tbl(i).pricing_date); -- Added for Bug 2393302
1010: END IF;

Line 1007: OKC_DEBUG.log('5618: Pr List : '||l_cle_price_tbl(i).pricelist_id);

1003: OKC_DEBUG.log('5614: UOM Code: '||l_cle_price_tbl(i).uom_code);
1004: OKC_DEBUG.log('5615: Currency: '||l_cle_price_tbl(i).currency);
1005: OKC_DEBUG.log('5616: Org Id : '||l_cle_price_tbl(i).id2);
1006: OKC_DEBUG.log('5617: Jtot Obj: '||l_cle_price_tbl(i).object_code);
1007: OKC_DEBUG.log('5618: Pr List : '||l_cle_price_tbl(i).pricelist_id);
1008: OKC_DEBUG.log('5619: Chr Id : '||l_chr_id);
1009: OKC_DEBUG.log('5620: Pricing Date : '||l_cle_price_tbl(i).pricing_date); -- Added for Bug 2393302
1010: END IF;
1011:

Line 1008: OKC_DEBUG.log('5619: Chr Id : '||l_chr_id);

1004: OKC_DEBUG.log('5615: Currency: '||l_cle_price_tbl(i).currency);
1005: OKC_DEBUG.log('5616: Org Id : '||l_cle_price_tbl(i).id2);
1006: OKC_DEBUG.log('5617: Jtot Obj: '||l_cle_price_tbl(i).object_code);
1007: OKC_DEBUG.log('5618: Pr List : '||l_cle_price_tbl(i).pricelist_id);
1008: OKC_DEBUG.log('5619: Chr Id : '||l_chr_id);
1009: OKC_DEBUG.log('5620: Pricing Date : '||l_cle_price_tbl(i).pricing_date); -- Added for Bug 2393302
1010: END IF;
1011:
1012: EXIT WHEN cur_price_cle%NOTFOUND;

Line 1009: OKC_DEBUG.log('5620: Pricing Date : '||l_cle_price_tbl(i).pricing_date); -- Added for Bug 2393302

1005: OKC_DEBUG.log('5616: Org Id : '||l_cle_price_tbl(i).id2);
1006: OKC_DEBUG.log('5617: Jtot Obj: '||l_cle_price_tbl(i).object_code);
1007: OKC_DEBUG.log('5618: Pr List : '||l_cle_price_tbl(i).pricelist_id);
1008: OKC_DEBUG.log('5619: Chr Id : '||l_chr_id);
1009: OKC_DEBUG.log('5620: Pricing Date : '||l_cle_price_tbl(i).pricing_date); -- Added for Bug 2393302
1010: END IF;
1011:
1012: EXIT WHEN cur_price_cle%NOTFOUND;
1013: i := i + 1;

Line 1029: OKC_DEBUG.log('5630: Top Model Id for pricing : '||l_top_model_id);

1025: l_top_model_line_id;
1026: CLOSE cur_get_model_id;
1027:
1028: IF (l_debug = 'Y') THEN
1029: OKC_DEBUG.log('5630: Top Model Id for pricing : '||l_top_model_id);
1030: OKC_DEBUG.log('5635: Total Input Price rows : '||l_cle_price_tbl.count);
1031: END IF;
1032:
1033: -- ------------------------------------------------------------

Line 1030: OKC_DEBUG.log('5635: Total Input Price rows : '||l_cle_price_tbl.count);

1026: CLOSE cur_get_model_id;
1027:
1028: IF (l_debug = 'Y') THEN
1029: OKC_DEBUG.log('5630: Top Model Id for pricing : '||l_top_model_id);
1030: OKC_DEBUG.log('5635: Total Input Price rows : '||l_cle_price_tbl.count);
1031: END IF;
1032:
1033: -- ------------------------------------------------------------
1034: -- STEP.5.2:

Line 1042: OKC_DEBUG.log('5640: Pr Ctl.Top-Model :'||l_control_rec.p_top_model_id);

1038: l_control_rec.p_config_yn :='S';
1039: l_control_rec.qp_control_rec.pricing_event :='BATCH';
1040:
1041: IF (l_debug = 'Y') THEN
1042: OKC_DEBUG.log('5640: Pr Ctl.Top-Model :'||l_control_rec.p_top_model_id);
1043: OKC_DEBUG.log('5641: Pr Ctl.Config YN :'||l_control_rec.p_config_yn);
1044: OKC_DEBUG.log('5642: Pr Ctl.Pr Event :'||'BATCH');
1045: END IF;
1046:

Line 1043: OKC_DEBUG.log('5641: Pr Ctl.Config YN :'||l_control_rec.p_config_yn);

1039: l_control_rec.qp_control_rec.pricing_event :='BATCH';
1040:
1041: IF (l_debug = 'Y') THEN
1042: OKC_DEBUG.log('5640: Pr Ctl.Top-Model :'||l_control_rec.p_top_model_id);
1043: OKC_DEBUG.log('5641: Pr Ctl.Config YN :'||l_control_rec.p_config_yn);
1044: OKC_DEBUG.log('5642: Pr Ctl.Pr Event :'||'BATCH');
1045: END IF;
1046:
1047: -- --------------------------------------------------------------

Line 1044: OKC_DEBUG.log('5642: Pr Ctl.Pr Event :'||'BATCH');

1040:
1041: IF (l_debug = 'Y') THEN
1042: OKC_DEBUG.log('5640: Pr Ctl.Top-Model :'||l_control_rec.p_top_model_id);
1043: OKC_DEBUG.log('5641: Pr Ctl.Config YN :'||l_control_rec.p_config_yn);
1044: OKC_DEBUG.log('5642: Pr Ctl.Pr Event :'||'BATCH');
1045: END IF;
1046:
1047: -- --------------------------------------------------------------
1048: -- STEP.5.3:

Line 1052: OKC_DEBUG.log('5650: Before Calculate Price call...');

1048: -- STEP.5.3:
1049: -- OKC Specific Pricing call to calculate list or sell price.
1050: -- --------------------------------------------------------------
1051: IF (l_debug = 'Y') THEN
1052: OKC_DEBUG.log('5650: Before Calculate Price call...');
1053: END IF;
1054:
1055: OKC_PRICE_PVT.CALCULATE_PRICE(
1056: p_api_version => 1,

Line 1073: OKC_DEBUG.log('5655: Exiting Calculate Price... '||x_return_status);

1069: x_msg_count => x_msg_count,
1070: x_msg_data => x_msg_data);
1071:
1072: IF (l_debug = 'Y') THEN
1073: OKC_DEBUG.log('5655: Exiting Calculate Price... '||x_return_status);
1074: END IF;
1075:
1076: -- DEBUG: Print messages from stack
1077: IF NVL(x_msg_count,0) > 0

Line 1084: OKC_DEBUG.log('5660: x_msg_data '||x_msg_data);

1080: LOOP
1081: x_msg_data := FND_MSG_PUB.Get(p_msg_index => i,
1082: p_encoded => 'F');
1083: IF (l_debug = 'Y') THEN
1084: OKC_DEBUG.log('5660: x_msg_data '||x_msg_data);
1085: END IF;
1086: END LOOP; -- end of message count loop
1087: END IF;
1088:

Line 1106: OKC_DEBUG.log('5671: <--- OUTPUT LINE - '||(to_number(i))||' ------->');

1102: FOR i in l_cle_price_tbl.FIRST..l_cle_price_tbl.LAST
1103: LOOP
1104: -- Dump all priced config lines in debug mode
1105: IF (l_debug = 'Y') THEN
1106: OKC_DEBUG.log('5671: <--- OUTPUT LINE - '||(to_number(i))||' ------->');
1107: OKC_DEBUG.log('5672: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1108: OKC_DEBUG.log('5673: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1109: OKC_DEBUG.log('5674: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1110: OKC_DEBUG.log('5675: Line Id : '||l_CLE_PRICE_TBL(i).id);

Line 1107: OKC_DEBUG.log('5672: List Price : '||l_CLE_PRICE_TBL(i).list_price);

1103: LOOP
1104: -- Dump all priced config lines in debug mode
1105: IF (l_debug = 'Y') THEN
1106: OKC_DEBUG.log('5671: <--- OUTPUT LINE - '||(to_number(i))||' ------->');
1107: OKC_DEBUG.log('5672: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1108: OKC_DEBUG.log('5673: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1109: OKC_DEBUG.log('5674: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1110: OKC_DEBUG.log('5675: Line Id : '||l_CLE_PRICE_TBL(i).id);
1111: OKC_DEBUG.log('5676: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);

Line 1108: OKC_DEBUG.log('5673: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);

1104: -- Dump all priced config lines in debug mode
1105: IF (l_debug = 'Y') THEN
1106: OKC_DEBUG.log('5671: <--- OUTPUT LINE - '||(to_number(i))||' ------->');
1107: OKC_DEBUG.log('5672: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1108: OKC_DEBUG.log('5673: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1109: OKC_DEBUG.log('5674: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1110: OKC_DEBUG.log('5675: Line Id : '||l_CLE_PRICE_TBL(i).id);
1111: OKC_DEBUG.log('5676: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1112: OKC_DEBUG.log('5677: Quantity : '||l_CLE_PRICE_TBL(i).qty);

Line 1109: OKC_DEBUG.log('5674: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);

1105: IF (l_debug = 'Y') THEN
1106: OKC_DEBUG.log('5671: <--- OUTPUT LINE - '||(to_number(i))||' ------->');
1107: OKC_DEBUG.log('5672: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1108: OKC_DEBUG.log('5673: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1109: OKC_DEBUG.log('5674: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1110: OKC_DEBUG.log('5675: Line Id : '||l_CLE_PRICE_TBL(i).id);
1111: OKC_DEBUG.log('5676: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1112: OKC_DEBUG.log('5677: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1113: OKC_DEBUG.log('5678: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);

Line 1110: OKC_DEBUG.log('5675: Line Id : '||l_CLE_PRICE_TBL(i).id);

1106: OKC_DEBUG.log('5671: <--- OUTPUT LINE - '||(to_number(i))||' ------->');
1107: OKC_DEBUG.log('5672: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1108: OKC_DEBUG.log('5673: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1109: OKC_DEBUG.log('5674: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1110: OKC_DEBUG.log('5675: Line Id : '||l_CLE_PRICE_TBL(i).id);
1111: OKC_DEBUG.log('5676: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1112: OKC_DEBUG.log('5677: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1113: OKC_DEBUG.log('5678: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1114: OKC_DEBUG.log('5679: Currency : '||l_CLE_PRICE_TBL(i).currency);

Line 1111: OKC_DEBUG.log('5676: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);

1107: OKC_DEBUG.log('5672: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1108: OKC_DEBUG.log('5673: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1109: OKC_DEBUG.log('5674: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1110: OKC_DEBUG.log('5675: Line Id : '||l_CLE_PRICE_TBL(i).id);
1111: OKC_DEBUG.log('5676: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1112: OKC_DEBUG.log('5677: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1113: OKC_DEBUG.log('5678: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1114: OKC_DEBUG.log('5679: Currency : '||l_CLE_PRICE_TBL(i).currency);
1115: OKC_DEBUG.log('5680: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);

Line 1112: OKC_DEBUG.log('5677: Quantity : '||l_CLE_PRICE_TBL(i).qty);

1108: OKC_DEBUG.log('5673: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1109: OKC_DEBUG.log('5674: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1110: OKC_DEBUG.log('5675: Line Id : '||l_CLE_PRICE_TBL(i).id);
1111: OKC_DEBUG.log('5676: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1112: OKC_DEBUG.log('5677: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1113: OKC_DEBUG.log('5678: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1114: OKC_DEBUG.log('5679: Currency : '||l_CLE_PRICE_TBL(i).currency);
1115: OKC_DEBUG.log('5680: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1116: OKC_DEBUG.log('5681: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);

Line 1113: OKC_DEBUG.log('5678: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);

1109: OKC_DEBUG.log('5674: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1110: OKC_DEBUG.log('5675: Line Id : '||l_CLE_PRICE_TBL(i).id);
1111: OKC_DEBUG.log('5676: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1112: OKC_DEBUG.log('5677: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1113: OKC_DEBUG.log('5678: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1114: OKC_DEBUG.log('5679: Currency : '||l_CLE_PRICE_TBL(i).currency);
1115: OKC_DEBUG.log('5680: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1116: OKC_DEBUG.log('5681: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);
1117: OKC_DEBUG.log('5682: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);

Line 1114: OKC_DEBUG.log('5679: Currency : '||l_CLE_PRICE_TBL(i).currency);

1110: OKC_DEBUG.log('5675: Line Id : '||l_CLE_PRICE_TBL(i).id);
1111: OKC_DEBUG.log('5676: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1112: OKC_DEBUG.log('5677: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1113: OKC_DEBUG.log('5678: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1114: OKC_DEBUG.log('5679: Currency : '||l_CLE_PRICE_TBL(i).currency);
1115: OKC_DEBUG.log('5680: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1116: OKC_DEBUG.log('5681: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);
1117: OKC_DEBUG.log('5682: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);
1118: OKC_DEBUG.log('5690: <------------------------------------------------>');

Line 1115: OKC_DEBUG.log('5680: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);

1111: OKC_DEBUG.log('5676: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1112: OKC_DEBUG.log('5677: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1113: OKC_DEBUG.log('5678: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1114: OKC_DEBUG.log('5679: Currency : '||l_CLE_PRICE_TBL(i).currency);
1115: OKC_DEBUG.log('5680: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1116: OKC_DEBUG.log('5681: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);
1117: OKC_DEBUG.log('5682: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);
1118: OKC_DEBUG.log('5690: <------------------------------------------------>');
1119: END IF;

Line 1116: OKC_DEBUG.log('5681: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);

1112: OKC_DEBUG.log('5677: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1113: OKC_DEBUG.log('5678: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1114: OKC_DEBUG.log('5679: Currency : '||l_CLE_PRICE_TBL(i).currency);
1115: OKC_DEBUG.log('5680: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1116: OKC_DEBUG.log('5681: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);
1117: OKC_DEBUG.log('5682: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);
1118: OKC_DEBUG.log('5690: <------------------------------------------------>');
1119: END IF;
1120:

Line 1117: OKC_DEBUG.log('5682: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);

1113: OKC_DEBUG.log('5678: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1114: OKC_DEBUG.log('5679: Currency : '||l_CLE_PRICE_TBL(i).currency);
1115: OKC_DEBUG.log('5680: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1116: OKC_DEBUG.log('5681: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);
1117: OKC_DEBUG.log('5682: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);
1118: OKC_DEBUG.log('5690: <------------------------------------------------>');
1119: END IF;
1120:
1121: -- --------------------------------------------------------------

Line 1118: OKC_DEBUG.log('5690: <------------------------------------------------>');

1114: OKC_DEBUG.log('5679: Currency : '||l_CLE_PRICE_TBL(i).currency);
1115: OKC_DEBUG.log('5680: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1116: OKC_DEBUG.log('5681: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);
1117: OKC_DEBUG.log('5682: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);
1118: OKC_DEBUG.log('5690: <------------------------------------------------>');
1119: END IF;
1120:
1121: -- --------------------------------------------------------------
1122: -- Calculate the rollup price to be shown for top model line.

Line 1149: OKC_DEBUG.log('5700: Before Update Pricing Info ....');

1145: l_clev_rec.pricing_date := l_CLE_PRICE_TBL(i).pricing_date;
1146: l_clev_rec.price_list_line_id := l_CLE_PRICE_TBL(i).list_line_id;
1147:
1148: IF (l_debug = 'Y') THEN
1149: OKC_DEBUG.log('5700: Before Update Pricing Info ....');
1150: END IF;
1151:
1152: IF (l_debug = 'Y') THEN
1153: OKC_DEBUG.log('5710: Priced Line Id : '||l_clev_rec.id);

Line 1153: OKC_DEBUG.log('5710: Priced Line Id : '||l_clev_rec.id);

1149: OKC_DEBUG.log('5700: Before Update Pricing Info ....');
1150: END IF;
1151:
1152: IF (l_debug = 'Y') THEN
1153: OKC_DEBUG.log('5710: Priced Line Id : '||l_clev_rec.id);
1154: OKC_DEBUG.log('5711: Cle Id : '||l_clev_rec.cle_id);
1155: OKC_DEBUG.log('5712: Chr Id : '||l_clev_rec.chr_id);
1156: OKC_DEBUG.log('5720: List Price : '||l_clev_rec.line_list_price);
1157: OKC_DEBUG.log('5730: Unit Price : '||l_clev_rec.price_unit);

Line 1154: OKC_DEBUG.log('5711: Cle Id : '||l_clev_rec.cle_id);

1150: END IF;
1151:
1152: IF (l_debug = 'Y') THEN
1153: OKC_DEBUG.log('5710: Priced Line Id : '||l_clev_rec.id);
1154: OKC_DEBUG.log('5711: Cle Id : '||l_clev_rec.cle_id);
1155: OKC_DEBUG.log('5712: Chr Id : '||l_clev_rec.chr_id);
1156: OKC_DEBUG.log('5720: List Price : '||l_clev_rec.line_list_price);
1157: OKC_DEBUG.log('5730: Unit Price : '||l_clev_rec.price_unit);
1158: OKC_DEBUG.log('5740: Negotiated Price: '||l_clev_rec.price_negotiated);

Line 1155: OKC_DEBUG.log('5712: Chr Id : '||l_clev_rec.chr_id);

1151:
1152: IF (l_debug = 'Y') THEN
1153: OKC_DEBUG.log('5710: Priced Line Id : '||l_clev_rec.id);
1154: OKC_DEBUG.log('5711: Cle Id : '||l_clev_rec.cle_id);
1155: OKC_DEBUG.log('5712: Chr Id : '||l_clev_rec.chr_id);
1156: OKC_DEBUG.log('5720: List Price : '||l_clev_rec.line_list_price);
1157: OKC_DEBUG.log('5730: Unit Price : '||l_clev_rec.price_unit);
1158: OKC_DEBUG.log('5740: Negotiated Price: '||l_clev_rec.price_negotiated);
1159: OKC_DEBUG.log('5750: Price List Id : '||l_clev_rec.price_list_id);

Line 1156: OKC_DEBUG.log('5720: List Price : '||l_clev_rec.line_list_price);

1152: IF (l_debug = 'Y') THEN
1153: OKC_DEBUG.log('5710: Priced Line Id : '||l_clev_rec.id);
1154: OKC_DEBUG.log('5711: Cle Id : '||l_clev_rec.cle_id);
1155: OKC_DEBUG.log('5712: Chr Id : '||l_clev_rec.chr_id);
1156: OKC_DEBUG.log('5720: List Price : '||l_clev_rec.line_list_price);
1157: OKC_DEBUG.log('5730: Unit Price : '||l_clev_rec.price_unit);
1158: OKC_DEBUG.log('5740: Negotiated Price: '||l_clev_rec.price_negotiated);
1159: OKC_DEBUG.log('5750: Price List Id : '||l_clev_rec.price_list_id);
1160: OKC_DEBUG.log('5760: Pricing Date : '||l_clev_rec.pricing_date);

Line 1157: OKC_DEBUG.log('5730: Unit Price : '||l_clev_rec.price_unit);

1153: OKC_DEBUG.log('5710: Priced Line Id : '||l_clev_rec.id);
1154: OKC_DEBUG.log('5711: Cle Id : '||l_clev_rec.cle_id);
1155: OKC_DEBUG.log('5712: Chr Id : '||l_clev_rec.chr_id);
1156: OKC_DEBUG.log('5720: List Price : '||l_clev_rec.line_list_price);
1157: OKC_DEBUG.log('5730: Unit Price : '||l_clev_rec.price_unit);
1158: OKC_DEBUG.log('5740: Negotiated Price: '||l_clev_rec.price_negotiated);
1159: OKC_DEBUG.log('5750: Price List Id : '||l_clev_rec.price_list_id);
1160: OKC_DEBUG.log('5760: Pricing Date : '||l_clev_rec.pricing_date);
1161: OKC_DEBUG.log('5780: Pr List Line Id : '||l_clev_rec.price_list_line_id);

Line 1158: OKC_DEBUG.log('5740: Negotiated Price: '||l_clev_rec.price_negotiated);

1154: OKC_DEBUG.log('5711: Cle Id : '||l_clev_rec.cle_id);
1155: OKC_DEBUG.log('5712: Chr Id : '||l_clev_rec.chr_id);
1156: OKC_DEBUG.log('5720: List Price : '||l_clev_rec.line_list_price);
1157: OKC_DEBUG.log('5730: Unit Price : '||l_clev_rec.price_unit);
1158: OKC_DEBUG.log('5740: Negotiated Price: '||l_clev_rec.price_negotiated);
1159: OKC_DEBUG.log('5750: Price List Id : '||l_clev_rec.price_list_id);
1160: OKC_DEBUG.log('5760: Pricing Date : '||l_clev_rec.pricing_date);
1161: OKC_DEBUG.log('5780: Pr List Line Id : '||l_clev_rec.price_list_line_id);
1162: OKC_DEBUG.log('5785: Config Item Type: '||l_clev_rec.config_item_type);

Line 1159: OKC_DEBUG.log('5750: Price List Id : '||l_clev_rec.price_list_id);

1155: OKC_DEBUG.log('5712: Chr Id : '||l_clev_rec.chr_id);
1156: OKC_DEBUG.log('5720: List Price : '||l_clev_rec.line_list_price);
1157: OKC_DEBUG.log('5730: Unit Price : '||l_clev_rec.price_unit);
1158: OKC_DEBUG.log('5740: Negotiated Price: '||l_clev_rec.price_negotiated);
1159: OKC_DEBUG.log('5750: Price List Id : '||l_clev_rec.price_list_id);
1160: OKC_DEBUG.log('5760: Pricing Date : '||l_clev_rec.pricing_date);
1161: OKC_DEBUG.log('5780: Pr List Line Id : '||l_clev_rec.price_list_line_id);
1162: OKC_DEBUG.log('5785: Config Item Type: '||l_clev_rec.config_item_type);
1163: END IF;

Line 1160: OKC_DEBUG.log('5760: Pricing Date : '||l_clev_rec.pricing_date);

1156: OKC_DEBUG.log('5720: List Price : '||l_clev_rec.line_list_price);
1157: OKC_DEBUG.log('5730: Unit Price : '||l_clev_rec.price_unit);
1158: OKC_DEBUG.log('5740: Negotiated Price: '||l_clev_rec.price_negotiated);
1159: OKC_DEBUG.log('5750: Price List Id : '||l_clev_rec.price_list_id);
1160: OKC_DEBUG.log('5760: Pricing Date : '||l_clev_rec.pricing_date);
1161: OKC_DEBUG.log('5780: Pr List Line Id : '||l_clev_rec.price_list_line_id);
1162: OKC_DEBUG.log('5785: Config Item Type: '||l_clev_rec.config_item_type);
1163: END IF;
1164:

Line 1161: OKC_DEBUG.log('5780: Pr List Line Id : '||l_clev_rec.price_list_line_id);

1157: OKC_DEBUG.log('5730: Unit Price : '||l_clev_rec.price_unit);
1158: OKC_DEBUG.log('5740: Negotiated Price: '||l_clev_rec.price_negotiated);
1159: OKC_DEBUG.log('5750: Price List Id : '||l_clev_rec.price_list_id);
1160: OKC_DEBUG.log('5760: Pricing Date : '||l_clev_rec.pricing_date);
1161: OKC_DEBUG.log('5780: Pr List Line Id : '||l_clev_rec.price_list_line_id);
1162: OKC_DEBUG.log('5785: Config Item Type: '||l_clev_rec.config_item_type);
1163: END IF;
1164:
1165: OKC_CONTRACT_PUB.update_contract_line

Line 1162: OKC_DEBUG.log('5785: Config Item Type: '||l_clev_rec.config_item_type);

1158: OKC_DEBUG.log('5740: Negotiated Price: '||l_clev_rec.price_negotiated);
1159: OKC_DEBUG.log('5750: Price List Id : '||l_clev_rec.price_list_id);
1160: OKC_DEBUG.log('5760: Pricing Date : '||l_clev_rec.pricing_date);
1161: OKC_DEBUG.log('5780: Pr List Line Id : '||l_clev_rec.price_list_line_id);
1162: OKC_DEBUG.log('5785: Config Item Type: '||l_clev_rec.config_item_type);
1163: END IF;
1164:
1165: OKC_CONTRACT_PUB.update_contract_line
1166: ( p_api_version => l_api_version_number,

Line 1175: OKC_DEBUG.log('5800: Updated Pricing Info...'||x_return_status);

1171: p_clev_rec => l_clev_rec,
1172: x_clev_rec => x_clev_rec);
1173:
1174: IF (l_debug = 'Y') THEN
1175: OKC_DEBUG.log('5800: Updated Pricing Info...'||x_return_status);
1176: END IF;
1177:
1178: IF (l_debug = 'Y') THEN
1179: OKC_DEBUG.log('5810: Priced Line Id : '||x_clev_rec.id);

Line 1179: OKC_DEBUG.log('5810: Priced Line Id : '||x_clev_rec.id);

1175: OKC_DEBUG.log('5800: Updated Pricing Info...'||x_return_status);
1176: END IF;
1177:
1178: IF (l_debug = 'Y') THEN
1179: OKC_DEBUG.log('5810: Priced Line Id : '||x_clev_rec.id);
1180: OKC_DEBUG.log('5811: Cle Id : '||x_clev_rec.cle_id);
1181: OKC_DEBUG.log('5812: Chr Id : '||x_clev_rec.chr_id);
1182: OKC_DEBUG.log('5820: List Price : '||x_clev_rec.line_list_price);
1183: OKC_DEBUG.log('5830: Unit Price : '||x_clev_rec.price_unit);

Line 1180: OKC_DEBUG.log('5811: Cle Id : '||x_clev_rec.cle_id);

1176: END IF;
1177:
1178: IF (l_debug = 'Y') THEN
1179: OKC_DEBUG.log('5810: Priced Line Id : '||x_clev_rec.id);
1180: OKC_DEBUG.log('5811: Cle Id : '||x_clev_rec.cle_id);
1181: OKC_DEBUG.log('5812: Chr Id : '||x_clev_rec.chr_id);
1182: OKC_DEBUG.log('5820: List Price : '||x_clev_rec.line_list_price);
1183: OKC_DEBUG.log('5830: Unit Price : '||x_clev_rec.price_unit);
1184: OKC_DEBUG.log('5840: Negotiated Price: '||x_clev_rec.price_negotiated);

Line 1181: OKC_DEBUG.log('5812: Chr Id : '||x_clev_rec.chr_id);

1177:
1178: IF (l_debug = 'Y') THEN
1179: OKC_DEBUG.log('5810: Priced Line Id : '||x_clev_rec.id);
1180: OKC_DEBUG.log('5811: Cle Id : '||x_clev_rec.cle_id);
1181: OKC_DEBUG.log('5812: Chr Id : '||x_clev_rec.chr_id);
1182: OKC_DEBUG.log('5820: List Price : '||x_clev_rec.line_list_price);
1183: OKC_DEBUG.log('5830: Unit Price : '||x_clev_rec.price_unit);
1184: OKC_DEBUG.log('5840: Negotiated Price: '||x_clev_rec.price_negotiated);
1185: OKC_DEBUG.log('5850: Price List Id : '||x_clev_rec.price_list_id);

Line 1182: OKC_DEBUG.log('5820: List Price : '||x_clev_rec.line_list_price);

1178: IF (l_debug = 'Y') THEN
1179: OKC_DEBUG.log('5810: Priced Line Id : '||x_clev_rec.id);
1180: OKC_DEBUG.log('5811: Cle Id : '||x_clev_rec.cle_id);
1181: OKC_DEBUG.log('5812: Chr Id : '||x_clev_rec.chr_id);
1182: OKC_DEBUG.log('5820: List Price : '||x_clev_rec.line_list_price);
1183: OKC_DEBUG.log('5830: Unit Price : '||x_clev_rec.price_unit);
1184: OKC_DEBUG.log('5840: Negotiated Price: '||x_clev_rec.price_negotiated);
1185: OKC_DEBUG.log('5850: Price List Id : '||x_clev_rec.price_list_id);
1186: OKC_DEBUG.log('5860: Pricing Date : '||x_clev_rec.pricing_date);

Line 1183: OKC_DEBUG.log('5830: Unit Price : '||x_clev_rec.price_unit);

1179: OKC_DEBUG.log('5810: Priced Line Id : '||x_clev_rec.id);
1180: OKC_DEBUG.log('5811: Cle Id : '||x_clev_rec.cle_id);
1181: OKC_DEBUG.log('5812: Chr Id : '||x_clev_rec.chr_id);
1182: OKC_DEBUG.log('5820: List Price : '||x_clev_rec.line_list_price);
1183: OKC_DEBUG.log('5830: Unit Price : '||x_clev_rec.price_unit);
1184: OKC_DEBUG.log('5840: Negotiated Price: '||x_clev_rec.price_negotiated);
1185: OKC_DEBUG.log('5850: Price List Id : '||x_clev_rec.price_list_id);
1186: OKC_DEBUG.log('5860: Pricing Date : '||x_clev_rec.pricing_date);
1187: OKC_DEBUG.log('5880: Pr List Line Id : '||x_clev_rec.price_list_line_id);

Line 1184: OKC_DEBUG.log('5840: Negotiated Price: '||x_clev_rec.price_negotiated);

1180: OKC_DEBUG.log('5811: Cle Id : '||x_clev_rec.cle_id);
1181: OKC_DEBUG.log('5812: Chr Id : '||x_clev_rec.chr_id);
1182: OKC_DEBUG.log('5820: List Price : '||x_clev_rec.line_list_price);
1183: OKC_DEBUG.log('5830: Unit Price : '||x_clev_rec.price_unit);
1184: OKC_DEBUG.log('5840: Negotiated Price: '||x_clev_rec.price_negotiated);
1185: OKC_DEBUG.log('5850: Price List Id : '||x_clev_rec.price_list_id);
1186: OKC_DEBUG.log('5860: Pricing Date : '||x_clev_rec.pricing_date);
1187: OKC_DEBUG.log('5880: Pr List Line Id : '||x_clev_rec.price_list_line_id);
1188: OKC_DEBUG.log('5885: Config Item Type: '||x_clev_rec.config_item_type);

Line 1185: OKC_DEBUG.log('5850: Price List Id : '||x_clev_rec.price_list_id);

1181: OKC_DEBUG.log('5812: Chr Id : '||x_clev_rec.chr_id);
1182: OKC_DEBUG.log('5820: List Price : '||x_clev_rec.line_list_price);
1183: OKC_DEBUG.log('5830: Unit Price : '||x_clev_rec.price_unit);
1184: OKC_DEBUG.log('5840: Negotiated Price: '||x_clev_rec.price_negotiated);
1185: OKC_DEBUG.log('5850: Price List Id : '||x_clev_rec.price_list_id);
1186: OKC_DEBUG.log('5860: Pricing Date : '||x_clev_rec.pricing_date);
1187: OKC_DEBUG.log('5880: Pr List Line Id : '||x_clev_rec.price_list_line_id);
1188: OKC_DEBUG.log('5885: Config Item Type: '||x_clev_rec.config_item_type);
1189: END IF;

Line 1186: OKC_DEBUG.log('5860: Pricing Date : '||x_clev_rec.pricing_date);

1182: OKC_DEBUG.log('5820: List Price : '||x_clev_rec.line_list_price);
1183: OKC_DEBUG.log('5830: Unit Price : '||x_clev_rec.price_unit);
1184: OKC_DEBUG.log('5840: Negotiated Price: '||x_clev_rec.price_negotiated);
1185: OKC_DEBUG.log('5850: Price List Id : '||x_clev_rec.price_list_id);
1186: OKC_DEBUG.log('5860: Pricing Date : '||x_clev_rec.pricing_date);
1187: OKC_DEBUG.log('5880: Pr List Line Id : '||x_clev_rec.price_list_line_id);
1188: OKC_DEBUG.log('5885: Config Item Type: '||x_clev_rec.config_item_type);
1189: END IF;
1190:

Line 1187: OKC_DEBUG.log('5880: Pr List Line Id : '||x_clev_rec.price_list_line_id);

1183: OKC_DEBUG.log('5830: Unit Price : '||x_clev_rec.price_unit);
1184: OKC_DEBUG.log('5840: Negotiated Price: '||x_clev_rec.price_negotiated);
1185: OKC_DEBUG.log('5850: Price List Id : '||x_clev_rec.price_list_id);
1186: OKC_DEBUG.log('5860: Pricing Date : '||x_clev_rec.pricing_date);
1187: OKC_DEBUG.log('5880: Pr List Line Id : '||x_clev_rec.price_list_line_id);
1188: OKC_DEBUG.log('5885: Config Item Type: '||x_clev_rec.config_item_type);
1189: END IF;
1190:
1191: FND_MSG_PUB.count_and_get(p_count => x_msg_count,

Line 1188: OKC_DEBUG.log('5885: Config Item Type: '||x_clev_rec.config_item_type);

1184: OKC_DEBUG.log('5840: Negotiated Price: '||x_clev_rec.price_negotiated);
1185: OKC_DEBUG.log('5850: Price List Id : '||x_clev_rec.price_list_id);
1186: OKC_DEBUG.log('5860: Pricing Date : '||x_clev_rec.pricing_date);
1187: OKC_DEBUG.log('5880: Pr List Line Id : '||x_clev_rec.price_list_line_id);
1188: OKC_DEBUG.log('5885: Config Item Type: '||x_clev_rec.config_item_type);
1189: END IF;
1190:
1191: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
1192: p_data => x_msg_data);

Line 1202: OKC_DEBUG.log('5890: x_msg_data '||x_msg_data);

1198: LOOP
1199: x_msg_data := FND_MSG_PUB.Get(p_msg_index => i,
1200: p_encoded => 'F');
1201: IF (l_debug = 'Y') THEN
1202: OKC_DEBUG.log('5890: x_msg_data '||x_msg_data);
1203: END IF;
1204: END LOOP; -- end of message count loop
1205: END IF;
1206:

Line 1226: OKC_DEBUG.log('5898: Total List Price : '||l_tot_list_price);

1222: -- Initialize clev record for further process.
1223: l_clev_rec := l_clev_rec_init;
1224:
1225: IF (l_debug = 'Y') THEN
1226: OKC_DEBUG.log('5898: Total List Price : '||l_tot_list_price);
1227: OKC_DEBUG.log('5899: Total Price : '||l_tot_negotiated);
1228: OKC_DEBUG.log('5900: Top Model Line : '||l_top_model_line_id);
1229: END IF;
1230:

Line 1227: OKC_DEBUG.log('5899: Total Price : '||l_tot_negotiated);

1223: l_clev_rec := l_clev_rec_init;
1224:
1225: IF (l_debug = 'Y') THEN
1226: OKC_DEBUG.log('5898: Total List Price : '||l_tot_list_price);
1227: OKC_DEBUG.log('5899: Total Price : '||l_tot_negotiated);
1228: OKC_DEBUG.log('5900: Top Model Line : '||l_top_model_line_id);
1229: END IF;
1230:
1231: OPEN cur_line_info (l_top_model_line_id);

Line 1228: OKC_DEBUG.log('5900: Top Model Line : '||l_top_model_line_id);

1224:
1225: IF (l_debug = 'Y') THEN
1226: OKC_DEBUG.log('5898: Total List Price : '||l_tot_list_price);
1227: OKC_DEBUG.log('5899: Total Price : '||l_tot_negotiated);
1228: OKC_DEBUG.log('5900: Top Model Line : '||l_top_model_line_id);
1229: END IF;
1230:
1231: OPEN cur_line_info (l_top_model_line_id);
1232: FETCH cur_line_info INTO l_cur_cle_id,

Line 1254: OKC_DEBUG.log('5910: Before Update Top Model Pricing Info ....');

1250: l_clev_rec.config_valid_yn := p_config_valid_yn;
1251: l_clev_rec.item_to_price_yn := 'Y';
1252:
1253: IF (l_debug = 'Y') THEN
1254: OKC_DEBUG.log('5910: Before Update Top Model Pricing Info ....');
1255: END IF;
1256:
1257: IF (l_debug = 'Y') THEN
1258: OKC_DEBUG.log('5911: Priced Line Id : '||l_clev_rec.id);

Line 1258: OKC_DEBUG.log('5911: Priced Line Id : '||l_clev_rec.id);

1254: OKC_DEBUG.log('5910: Before Update Top Model Pricing Info ....');
1255: END IF;
1256:
1257: IF (l_debug = 'Y') THEN
1258: OKC_DEBUG.log('5911: Priced Line Id : '||l_clev_rec.id);
1259: OKC_DEBUG.log('5912: Chr Id : '||l_clev_rec.chr_id);
1260: OKC_DEBUG.log('5913: Cle Id : '||l_clev_rec.cle_id);
1261: OKC_DEBUG.log('5914: List Price : '||l_clev_rec.line_list_price);
1262: OKC_DEBUG.log('5915: Unit Price : '||l_clev_rec.price_unit);

Line 1259: OKC_DEBUG.log('5912: Chr Id : '||l_clev_rec.chr_id);

1255: END IF;
1256:
1257: IF (l_debug = 'Y') THEN
1258: OKC_DEBUG.log('5911: Priced Line Id : '||l_clev_rec.id);
1259: OKC_DEBUG.log('5912: Chr Id : '||l_clev_rec.chr_id);
1260: OKC_DEBUG.log('5913: Cle Id : '||l_clev_rec.cle_id);
1261: OKC_DEBUG.log('5914: List Price : '||l_clev_rec.line_list_price);
1262: OKC_DEBUG.log('5915: Unit Price : '||l_clev_rec.price_unit);
1263: OKC_DEBUG.log('5916: Negotiated Price: '||l_clev_rec.price_negotiated);

Line 1260: OKC_DEBUG.log('5913: Cle Id : '||l_clev_rec.cle_id);

1256:
1257: IF (l_debug = 'Y') THEN
1258: OKC_DEBUG.log('5911: Priced Line Id : '||l_clev_rec.id);
1259: OKC_DEBUG.log('5912: Chr Id : '||l_clev_rec.chr_id);
1260: OKC_DEBUG.log('5913: Cle Id : '||l_clev_rec.cle_id);
1261: OKC_DEBUG.log('5914: List Price : '||l_clev_rec.line_list_price);
1262: OKC_DEBUG.log('5915: Unit Price : '||l_clev_rec.price_unit);
1263: OKC_DEBUG.log('5916: Negotiated Price: '||l_clev_rec.price_negotiated);
1264: OKC_DEBUG.log('5917: Price List Id : '||l_clev_rec.price_list_id);

Line 1261: OKC_DEBUG.log('5914: List Price : '||l_clev_rec.line_list_price);

1257: IF (l_debug = 'Y') THEN
1258: OKC_DEBUG.log('5911: Priced Line Id : '||l_clev_rec.id);
1259: OKC_DEBUG.log('5912: Chr Id : '||l_clev_rec.chr_id);
1260: OKC_DEBUG.log('5913: Cle Id : '||l_clev_rec.cle_id);
1261: OKC_DEBUG.log('5914: List Price : '||l_clev_rec.line_list_price);
1262: OKC_DEBUG.log('5915: Unit Price : '||l_clev_rec.price_unit);
1263: OKC_DEBUG.log('5916: Negotiated Price: '||l_clev_rec.price_negotiated);
1264: OKC_DEBUG.log('5917: Price List Id : '||l_clev_rec.price_list_id);
1265: OKC_DEBUG.log('5918: Pricing Date : '||l_clev_rec.pricing_date);

Line 1262: OKC_DEBUG.log('5915: Unit Price : '||l_clev_rec.price_unit);

1258: OKC_DEBUG.log('5911: Priced Line Id : '||l_clev_rec.id);
1259: OKC_DEBUG.log('5912: Chr Id : '||l_clev_rec.chr_id);
1260: OKC_DEBUG.log('5913: Cle Id : '||l_clev_rec.cle_id);
1261: OKC_DEBUG.log('5914: List Price : '||l_clev_rec.line_list_price);
1262: OKC_DEBUG.log('5915: Unit Price : '||l_clev_rec.price_unit);
1263: OKC_DEBUG.log('5916: Negotiated Price: '||l_clev_rec.price_negotiated);
1264: OKC_DEBUG.log('5917: Price List Id : '||l_clev_rec.price_list_id);
1265: OKC_DEBUG.log('5918: Pricing Date : '||l_clev_rec.pricing_date);
1266: OKC_DEBUG.log('5919: Pr List Line Id : '||l_clev_rec.price_list_line_id);

Line 1263: OKC_DEBUG.log('5916: Negotiated Price: '||l_clev_rec.price_negotiated);

1259: OKC_DEBUG.log('5912: Chr Id : '||l_clev_rec.chr_id);
1260: OKC_DEBUG.log('5913: Cle Id : '||l_clev_rec.cle_id);
1261: OKC_DEBUG.log('5914: List Price : '||l_clev_rec.line_list_price);
1262: OKC_DEBUG.log('5915: Unit Price : '||l_clev_rec.price_unit);
1263: OKC_DEBUG.log('5916: Negotiated Price: '||l_clev_rec.price_negotiated);
1264: OKC_DEBUG.log('5917: Price List Id : '||l_clev_rec.price_list_id);
1265: OKC_DEBUG.log('5918: Pricing Date : '||l_clev_rec.pricing_date);
1266: OKC_DEBUG.log('5919: Pr List Line Id : '||l_clev_rec.price_list_line_id);
1267: END IF;

Line 1264: OKC_DEBUG.log('5917: Price List Id : '||l_clev_rec.price_list_id);

1260: OKC_DEBUG.log('5913: Cle Id : '||l_clev_rec.cle_id);
1261: OKC_DEBUG.log('5914: List Price : '||l_clev_rec.line_list_price);
1262: OKC_DEBUG.log('5915: Unit Price : '||l_clev_rec.price_unit);
1263: OKC_DEBUG.log('5916: Negotiated Price: '||l_clev_rec.price_negotiated);
1264: OKC_DEBUG.log('5917: Price List Id : '||l_clev_rec.price_list_id);
1265: OKC_DEBUG.log('5918: Pricing Date : '||l_clev_rec.pricing_date);
1266: OKC_DEBUG.log('5919: Pr List Line Id : '||l_clev_rec.price_list_line_id);
1267: END IF;
1268:

Line 1265: OKC_DEBUG.log('5918: Pricing Date : '||l_clev_rec.pricing_date);

1261: OKC_DEBUG.log('5914: List Price : '||l_clev_rec.line_list_price);
1262: OKC_DEBUG.log('5915: Unit Price : '||l_clev_rec.price_unit);
1263: OKC_DEBUG.log('5916: Negotiated Price: '||l_clev_rec.price_negotiated);
1264: OKC_DEBUG.log('5917: Price List Id : '||l_clev_rec.price_list_id);
1265: OKC_DEBUG.log('5918: Pricing Date : '||l_clev_rec.pricing_date);
1266: OKC_DEBUG.log('5919: Pr List Line Id : '||l_clev_rec.price_list_line_id);
1267: END IF;
1268:
1269: OKC_CONTRACT_PUB.update_contract_line

Line 1266: OKC_DEBUG.log('5919: Pr List Line Id : '||l_clev_rec.price_list_line_id);

1262: OKC_DEBUG.log('5915: Unit Price : '||l_clev_rec.price_unit);
1263: OKC_DEBUG.log('5916: Negotiated Price: '||l_clev_rec.price_negotiated);
1264: OKC_DEBUG.log('5917: Price List Id : '||l_clev_rec.price_list_id);
1265: OKC_DEBUG.log('5918: Pricing Date : '||l_clev_rec.pricing_date);
1266: OKC_DEBUG.log('5919: Pr List Line Id : '||l_clev_rec.price_list_line_id);
1267: END IF;
1268:
1269: OKC_CONTRACT_PUB.update_contract_line
1270: ( p_api_version => l_api_version_number,

Line 1279: OKC_DEBUG.log('5920: Updated Top Model Pricing Info...'||x_return_status);

1275: p_clev_rec => l_clev_rec,
1276: x_clev_rec => x_clev_rec);
1277:
1278: IF (l_debug = 'Y') THEN
1279: OKC_DEBUG.log('5920: Updated Top Model Pricing Info...'||x_return_status);
1280: END IF;
1281:
1282: IF (l_debug = 'Y') THEN
1283: OKC_DEBUG.log('5921: Priced Line Id : '||x_clev_rec.id);

Line 1283: OKC_DEBUG.log('5921: Priced Line Id : '||x_clev_rec.id);

1279: OKC_DEBUG.log('5920: Updated Top Model Pricing Info...'||x_return_status);
1280: END IF;
1281:
1282: IF (l_debug = 'Y') THEN
1283: OKC_DEBUG.log('5921: Priced Line Id : '||x_clev_rec.id);
1284: OKC_DEBUG.log('5922: Display Sequence: '||x_clev_rec.display_sequence);
1285: OKC_DEBUG.log('5923: Chr Id : '||l_clev_rec.chr_id);
1286: OKC_DEBUG.log('5924: List Price : '||x_clev_rec.line_list_price);
1287: OKC_DEBUG.log('5925: Unit Price : '||x_clev_rec.price_unit);

Line 1284: OKC_DEBUG.log('5922: Display Sequence: '||x_clev_rec.display_sequence);

1280: END IF;
1281:
1282: IF (l_debug = 'Y') THEN
1283: OKC_DEBUG.log('5921: Priced Line Id : '||x_clev_rec.id);
1284: OKC_DEBUG.log('5922: Display Sequence: '||x_clev_rec.display_sequence);
1285: OKC_DEBUG.log('5923: Chr Id : '||l_clev_rec.chr_id);
1286: OKC_DEBUG.log('5924: List Price : '||x_clev_rec.line_list_price);
1287: OKC_DEBUG.log('5925: Unit Price : '||x_clev_rec.price_unit);
1288: OKC_DEBUG.log('5926: Negotiated Price: '||x_clev_rec.price_negotiated);

Line 1285: OKC_DEBUG.log('5923: Chr Id : '||l_clev_rec.chr_id);

1281:
1282: IF (l_debug = 'Y') THEN
1283: OKC_DEBUG.log('5921: Priced Line Id : '||x_clev_rec.id);
1284: OKC_DEBUG.log('5922: Display Sequence: '||x_clev_rec.display_sequence);
1285: OKC_DEBUG.log('5923: Chr Id : '||l_clev_rec.chr_id);
1286: OKC_DEBUG.log('5924: List Price : '||x_clev_rec.line_list_price);
1287: OKC_DEBUG.log('5925: Unit Price : '||x_clev_rec.price_unit);
1288: OKC_DEBUG.log('5926: Negotiated Price: '||x_clev_rec.price_negotiated);
1289: OKC_DEBUG.log('5927: Price List Id : '||x_clev_rec.price_list_id);

Line 1286: OKC_DEBUG.log('5924: List Price : '||x_clev_rec.line_list_price);

1282: IF (l_debug = 'Y') THEN
1283: OKC_DEBUG.log('5921: Priced Line Id : '||x_clev_rec.id);
1284: OKC_DEBUG.log('5922: Display Sequence: '||x_clev_rec.display_sequence);
1285: OKC_DEBUG.log('5923: Chr Id : '||l_clev_rec.chr_id);
1286: OKC_DEBUG.log('5924: List Price : '||x_clev_rec.line_list_price);
1287: OKC_DEBUG.log('5925: Unit Price : '||x_clev_rec.price_unit);
1288: OKC_DEBUG.log('5926: Negotiated Price: '||x_clev_rec.price_negotiated);
1289: OKC_DEBUG.log('5927: Price List Id : '||x_clev_rec.price_list_id);
1290: OKC_DEBUG.log('5928: Pricing Date : '||x_clev_rec.pricing_date);

Line 1287: OKC_DEBUG.log('5925: Unit Price : '||x_clev_rec.price_unit);

1283: OKC_DEBUG.log('5921: Priced Line Id : '||x_clev_rec.id);
1284: OKC_DEBUG.log('5922: Display Sequence: '||x_clev_rec.display_sequence);
1285: OKC_DEBUG.log('5923: Chr Id : '||l_clev_rec.chr_id);
1286: OKC_DEBUG.log('5924: List Price : '||x_clev_rec.line_list_price);
1287: OKC_DEBUG.log('5925: Unit Price : '||x_clev_rec.price_unit);
1288: OKC_DEBUG.log('5926: Negotiated Price: '||x_clev_rec.price_negotiated);
1289: OKC_DEBUG.log('5927: Price List Id : '||x_clev_rec.price_list_id);
1290: OKC_DEBUG.log('5928: Pricing Date : '||x_clev_rec.pricing_date);
1291: OKC_DEBUG.log('5929: Pr List Line Id : '||x_clev_rec.price_list_line_id);

Line 1288: OKC_DEBUG.log('5926: Negotiated Price: '||x_clev_rec.price_negotiated);

1284: OKC_DEBUG.log('5922: Display Sequence: '||x_clev_rec.display_sequence);
1285: OKC_DEBUG.log('5923: Chr Id : '||l_clev_rec.chr_id);
1286: OKC_DEBUG.log('5924: List Price : '||x_clev_rec.line_list_price);
1287: OKC_DEBUG.log('5925: Unit Price : '||x_clev_rec.price_unit);
1288: OKC_DEBUG.log('5926: Negotiated Price: '||x_clev_rec.price_negotiated);
1289: OKC_DEBUG.log('5927: Price List Id : '||x_clev_rec.price_list_id);
1290: OKC_DEBUG.log('5928: Pricing Date : '||x_clev_rec.pricing_date);
1291: OKC_DEBUG.log('5929: Pr List Line Id : '||x_clev_rec.price_list_line_id);
1292: OKC_DEBUG.log('5930: Cle Id : '||x_clev_rec.cle_id);

Line 1289: OKC_DEBUG.log('5927: Price List Id : '||x_clev_rec.price_list_id);

1285: OKC_DEBUG.log('5923: Chr Id : '||l_clev_rec.chr_id);
1286: OKC_DEBUG.log('5924: List Price : '||x_clev_rec.line_list_price);
1287: OKC_DEBUG.log('5925: Unit Price : '||x_clev_rec.price_unit);
1288: OKC_DEBUG.log('5926: Negotiated Price: '||x_clev_rec.price_negotiated);
1289: OKC_DEBUG.log('5927: Price List Id : '||x_clev_rec.price_list_id);
1290: OKC_DEBUG.log('5928: Pricing Date : '||x_clev_rec.pricing_date);
1291: OKC_DEBUG.log('5929: Pr List Line Id : '||x_clev_rec.price_list_line_id);
1292: OKC_DEBUG.log('5930: Cle Id : '||x_clev_rec.cle_id);
1293: OKC_DEBUG.log('5931: Config Item Type: '||x_clev_rec.config_item_type);

Line 1290: OKC_DEBUG.log('5928: Pricing Date : '||x_clev_rec.pricing_date);

1286: OKC_DEBUG.log('5924: List Price : '||x_clev_rec.line_list_price);
1287: OKC_DEBUG.log('5925: Unit Price : '||x_clev_rec.price_unit);
1288: OKC_DEBUG.log('5926: Negotiated Price: '||x_clev_rec.price_negotiated);
1289: OKC_DEBUG.log('5927: Price List Id : '||x_clev_rec.price_list_id);
1290: OKC_DEBUG.log('5928: Pricing Date : '||x_clev_rec.pricing_date);
1291: OKC_DEBUG.log('5929: Pr List Line Id : '||x_clev_rec.price_list_line_id);
1292: OKC_DEBUG.log('5930: Cle Id : '||x_clev_rec.cle_id);
1293: OKC_DEBUG.log('5931: Config Item Type: '||x_clev_rec.config_item_type);
1294: END IF;

Line 1291: OKC_DEBUG.log('5929: Pr List Line Id : '||x_clev_rec.price_list_line_id);

1287: OKC_DEBUG.log('5925: Unit Price : '||x_clev_rec.price_unit);
1288: OKC_DEBUG.log('5926: Negotiated Price: '||x_clev_rec.price_negotiated);
1289: OKC_DEBUG.log('5927: Price List Id : '||x_clev_rec.price_list_id);
1290: OKC_DEBUG.log('5928: Pricing Date : '||x_clev_rec.pricing_date);
1291: OKC_DEBUG.log('5929: Pr List Line Id : '||x_clev_rec.price_list_line_id);
1292: OKC_DEBUG.log('5930: Cle Id : '||x_clev_rec.cle_id);
1293: OKC_DEBUG.log('5931: Config Item Type: '||x_clev_rec.config_item_type);
1294: END IF;
1295:

Line 1292: OKC_DEBUG.log('5930: Cle Id : '||x_clev_rec.cle_id);

1288: OKC_DEBUG.log('5926: Negotiated Price: '||x_clev_rec.price_negotiated);
1289: OKC_DEBUG.log('5927: Price List Id : '||x_clev_rec.price_list_id);
1290: OKC_DEBUG.log('5928: Pricing Date : '||x_clev_rec.pricing_date);
1291: OKC_DEBUG.log('5929: Pr List Line Id : '||x_clev_rec.price_list_line_id);
1292: OKC_DEBUG.log('5930: Cle Id : '||x_clev_rec.cle_id);
1293: OKC_DEBUG.log('5931: Config Item Type: '||x_clev_rec.config_item_type);
1294: END IF;
1295:
1296: FND_MSG_PUB.count_and_get(p_count => x_msg_count,

Line 1293: OKC_DEBUG.log('5931: Config Item Type: '||x_clev_rec.config_item_type);

1289: OKC_DEBUG.log('5927: Price List Id : '||x_clev_rec.price_list_id);
1290: OKC_DEBUG.log('5928: Pricing Date : '||x_clev_rec.pricing_date);
1291: OKC_DEBUG.log('5929: Pr List Line Id : '||x_clev_rec.price_list_line_id);
1292: OKC_DEBUG.log('5930: Cle Id : '||x_clev_rec.cle_id);
1293: OKC_DEBUG.log('5931: Config Item Type: '||x_clev_rec.config_item_type);
1294: END IF;
1295:
1296: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
1297: p_data => x_msg_data);

Line 1307: OKC_DEBUG.log('5990: x_msg_data '||x_msg_data);

1303: LOOP
1304: x_msg_data := FND_MSG_PUB.Get(p_msg_index => i,
1305: p_encoded => 'F');
1306: IF (l_debug = 'Y') THEN
1307: OKC_DEBUG.log('5990: x_msg_data '||x_msg_data);
1308: END IF;
1309: END LOOP; -- end of message count loop
1310: END IF;
1311:

Line 1332: OKC_DEBUG.log('5990: Exiting Pricing Section ...', 2);

1328: x_cfg_list_price := l_tot_list_price;
1329: x_cfg_net_price := l_tot_negotiated;
1330:
1331: IF (l_debug = 'Y') THEN
1332: OKC_DEBUG.log('5990: Exiting Pricing Section ...', 2);
1333: END IF;
1334: -- -------------------------------------------------------------------
1335:
1336: -- end activity

Line 1341: OKC_DEBUG.log('5999: Exiting build_cle_from_cz...', 2);

1337: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1338: x_msg_data => x_msg_data);
1339:
1340: IF (l_debug = 'Y') THEN
1341: OKC_DEBUG.log('5999: Exiting build_cle_from_cz...', 2);
1342: OKC_DEBUG.Reset_Indentation;
1343: END IF;
1344:
1345: EXCEPTION

Line 1342: OKC_DEBUG.Reset_Indentation;

1338: x_msg_data => x_msg_data);
1339:
1340: IF (l_debug = 'Y') THEN
1341: OKC_DEBUG.log('5999: Exiting build_cle_from_cz...', 2);
1342: OKC_DEBUG.Reset_Indentation;
1343: END IF;
1344:
1345: EXCEPTION
1346: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1348: OKC_DEBUG.log('5999:Exception Error in Build Cle...', 2);

1344:
1345: EXCEPTION
1346: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1347: IF (l_debug = 'Y') THEN
1348: OKC_DEBUG.log('5999:Exception Error in Build Cle...', 2);
1349: OKC_DEBUG.Reset_Indentation;
1350: END IF;
1351:
1352: IF cur_cle_ins%ISOPEN

Line 1349: OKC_DEBUG.Reset_Indentation;

1345: EXCEPTION
1346: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1347: IF (l_debug = 'Y') THEN
1348: OKC_DEBUG.log('5999:Exception Error in Build Cle...', 2);
1349: OKC_DEBUG.Reset_Indentation;
1350: END IF;
1351:
1352: IF cur_cle_ins%ISOPEN
1353: THEN

Line 1367: OKC_DEBUG.log('5999:Unexpected Error in Build Cle...', 2);

1363: p_api_type => G_API_TYPE);
1364:
1365: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1366: IF (l_debug = 'Y') THEN
1367: OKC_DEBUG.log('5999:Unexpected Error in Build Cle...', 2);
1368: OKC_DEBUG.Reset_Indentation;
1369: END IF;
1370:
1371: IF cur_cle_ins%ISOPEN

Line 1368: OKC_DEBUG.Reset_Indentation;

1364:
1365: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1366: IF (l_debug = 'Y') THEN
1367: OKC_DEBUG.log('5999:Unexpected Error in Build Cle...', 2);
1368: OKC_DEBUG.Reset_Indentation;
1369: END IF;
1370:
1371: IF cur_cle_ins%ISOPEN
1372: THEN

Line 1385: OKC_DEBUG.log('5999:Other Exception in Build Cle...', 2);

1381: x_msg_data => x_msg_data,
1382: p_api_type => G_API_TYPE);
1383: WHEN OTHERS THEN
1384: IF (l_debug = 'Y') THEN
1385: OKC_DEBUG.log('5999:Other Exception in Build Cle...', 2);
1386: OKC_DEBUG.Reset_Indentation;
1387: END IF;
1388:
1389: IF cur_cle_ins%ISOPEN

Line 1386: OKC_DEBUG.Reset_Indentation;

1382: p_api_type => G_API_TYPE);
1383: WHEN OTHERS THEN
1384: IF (l_debug = 'Y') THEN
1385: OKC_DEBUG.log('5999:Other Exception in Build Cle...', 2);
1386: OKC_DEBUG.Reset_Indentation;
1387: END IF;
1388:
1389: IF cur_cle_ins%ISOPEN
1390: THEN

Line 1477: OKC_DEBUG.set_indentation('Config_qa_check');

1473: -- config_compelte_yn = N (or) config_valid_yn = N
1474: -- ----------------------------------------------------
1475:
1476: IF (l_debug = 'Y') THEN
1477: OKC_DEBUG.set_indentation('Config_qa_check');
1478: OKC_DEBUG.log('6000: Entering configuration_qa_check...', 2);
1479: END IF;
1480:
1481: -- initialize return status.

Line 1478: OKC_DEBUG.log('6000: Entering configuration_qa_check...', 2);

1474: -- ----------------------------------------------------
1475:
1476: IF (l_debug = 'Y') THEN
1477: OKC_DEBUG.set_indentation('Config_qa_check');
1478: OKC_DEBUG.log('6000: Entering configuration_qa_check...', 2);
1479: END IF;
1480:
1481: -- initialize return status.
1482: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 1488: OKC_DEBUG.log('6010: Getting Application Id: ');

1484: -- ----------------------------------------------------
1485: -- Config Validation is to be done only for OKC and OKO.
1486: -- ----------------------------------------------------
1487: IF (l_debug = 'Y') THEN
1488: OKC_DEBUG.log('6010: Getting Application Id: ');
1489: END IF;
1490:
1491: OPEN get_k_app_id;
1492: FETCH get_k_app_id INTO l_app_id, l_buy_or_sell;

Line 1496: OKC_DEBUG.log('6020: Application Id : '||TO_CHAR(l_app_id));

1492: FETCH get_k_app_id INTO l_app_id, l_buy_or_sell;
1493: CLOSE get_k_app_id;
1494:
1495: IF (l_debug = 'Y') THEN
1496: OKC_DEBUG.log('6020: Application Id : '||TO_CHAR(l_app_id));
1497: END IF;
1498: IF (l_app_id NOT IN (510, 871) OR
1499: l_buy_or_sell = 'B')
1500: THEN

Line 1524: OKC_DEBUG.log('6030: Line Id : '||l_line_id);

1520:
1521: EXIT WHEN get_cfg_line_info%NOTFOUND;
1522:
1523: IF (l_debug = 'Y') THEN
1524: OKC_DEBUG.log('6030: Line Id : '||l_line_id);
1525: OKC_DEBUG.log('6040: Config Valid YN : '||l_valid);
1526: OKC_DEBUG.log('6050: Config Complete YN : '||l_complete);
1527: END IF;
1528:

Line 1525: OKC_DEBUG.log('6040: Config Valid YN : '||l_valid);

1521: EXIT WHEN get_cfg_line_info%NOTFOUND;
1522:
1523: IF (l_debug = 'Y') THEN
1524: OKC_DEBUG.log('6030: Line Id : '||l_line_id);
1525: OKC_DEBUG.log('6040: Config Valid YN : '||l_valid);
1526: OKC_DEBUG.log('6050: Config Complete YN : '||l_complete);
1527: END IF;
1528:
1529: -- initialize the msg variable

Line 1526: OKC_DEBUG.log('6050: Config Complete YN : '||l_complete);

1522:
1523: IF (l_debug = 'Y') THEN
1524: OKC_DEBUG.log('6030: Line Id : '||l_line_id);
1525: OKC_DEBUG.log('6040: Config Valid YN : '||l_valid);
1526: OKC_DEBUG.log('6050: Config Complete YN : '||l_complete);
1527: END IF;
1528:
1529: -- initialize the msg variable
1530: l_msg_token := NULL;

Line 1543: OKC_DEBUG.log('6060: Line Index : '||l_line_index);

1539: l_line_index := 'Unknown';
1540: END IF;
1541:
1542: IF (l_debug = 'Y') THEN
1543: OKC_DEBUG.log('6060: Line Index : '||l_line_index);
1544: END IF;
1545:
1546: -- prefix the config string with above line index value.
1547: l_msg_token := RTRIM(l_line_index);

Line 1550: OKC_DEBUG.log('6070: QA Msg Token: '||l_msg_token);

1546: -- prefix the config string with above line index value.
1547: l_msg_token := RTRIM(l_line_index);
1548:
1549: IF (l_debug = 'Y') THEN
1550: OKC_DEBUG.log('6070: QA Msg Token: '||l_msg_token);
1551: END IF;
1552:
1553: -- ----------------------------------------------------------
1554: -- To prepare message string with appropriate error text.

Line 1564: OKC_DEBUG.log('6080: Config Invalid and Incomplete');

1560: ( NVL(l_complete,'Y') = 'N' )
1561: THEN
1562: -- Flag this configured model as invalid and incomplete
1563: IF (l_debug = 'Y') THEN
1564: OKC_DEBUG.log('6080: Config Invalid and Incomplete');
1565: END IF;
1566: OKC_API.set_message(
1567: p_app_name => G_APP_NAME,
1568: p_msg_name => 'OKC_CONFIG_INV_INC',

Line 1576: OKC_DEBUG.log('6090: Config Invalid ');

1572: ( NVL(l_complete,'Y') = 'Y' )
1573: THEN
1574: -- Flag this configured model as invalid
1575: IF (l_debug = 'Y') THEN
1576: OKC_DEBUG.log('6090: Config Invalid ');
1577: END IF;
1578: OKC_API.set_message(
1579: p_app_name => G_APP_NAME,
1580: p_msg_name => 'OKC_CONFIG_INVALID',

Line 1587: OKC_DEBUG.log('6100: Config Incomplete ');

1583: ELSIF ( NVL(l_complete,'Y') = 'N' )
1584: THEN
1585: -- Flag this configured model as incomplete
1586: IF (l_debug = 'Y') THEN
1587: OKC_DEBUG.log('6100: Config Incomplete ');
1588: END IF;
1589: OKC_API.set_message(
1590: p_app_name => G_APP_NAME,
1591: p_msg_name => 'OKC_CONFIG_INCOMPLETE',

Line 1611: OKC_DEBUG.log('6200: Config QA Ret Status : '||x_return_status);

1607: p_msg_name => G_QA_SUCCESS);
1608: END IF;
1609:
1610: IF (l_debug = 'Y') THEN
1611: OKC_DEBUG.log('6200: Config QA Ret Status : '||x_return_status);
1612: OKC_DEBUG.log('6300: Exiting config_qa_check...', 2);
1613: OKC_DEBUG.reset_indentation;
1614: END IF;
1615:

Line 1612: OKC_DEBUG.log('6300: Exiting config_qa_check...', 2);

1608: END IF;
1609:
1610: IF (l_debug = 'Y') THEN
1611: OKC_DEBUG.log('6200: Config QA Ret Status : '||x_return_status);
1612: OKC_DEBUG.log('6300: Exiting config_qa_check...', 2);
1613: OKC_DEBUG.reset_indentation;
1614: END IF;
1615:
1616: EXCEPTION

Line 1613: OKC_DEBUG.reset_indentation;

1609:
1610: IF (l_debug = 'Y') THEN
1611: OKC_DEBUG.log('6200: Config QA Ret Status : '||x_return_status);
1612: OKC_DEBUG.log('6300: Exiting config_qa_check...', 2);
1613: OKC_DEBUG.reset_indentation;
1614: END IF;
1615:
1616: EXCEPTION
1617: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 1619: OKC_DEBUG.log('6400: Exiting Config_qa_check', 2);

1615:
1616: EXCEPTION
1617: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1618: IF (l_debug = 'Y') THEN
1619: OKC_DEBUG.log('6400: Exiting Config_qa_check', 2);
1620: OKC_DEBUG.Reset_Indentation;
1621: END IF;
1622:
1623: WHEN OTHERS THEN

Line 1620: OKC_DEBUG.Reset_Indentation;

1616: EXCEPTION
1617: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1618: IF (l_debug = 'Y') THEN
1619: OKC_DEBUG.log('6400: Exiting Config_qa_check', 2);
1620: OKC_DEBUG.Reset_Indentation;
1621: END IF;
1622:
1623: WHEN OTHERS THEN
1624: IF (l_debug = 'Y') THEN

Line 1625: OKC_DEBUG.log('6500: Exiting Config_qa_check', 2);

1621: END IF;
1622:
1623: WHEN OTHERS THEN
1624: IF (l_debug = 'Y') THEN
1625: OKC_DEBUG.log('6500: Exiting Config_qa_check', 2);
1626: OKC_DEBUG.Reset_Indentation;
1627: END IF;
1628:
1629: -- notify caller of an error as UNEXPETED error

Line 1626: OKC_DEBUG.Reset_Indentation;

1622:
1623: WHEN OTHERS THEN
1624: IF (l_debug = 'Y') THEN
1625: OKC_DEBUG.log('6500: Exiting Config_qa_check', 2);
1626: OKC_DEBUG.Reset_Indentation;
1627: END IF;
1628:
1629: -- notify caller of an error as UNEXPETED error
1630: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1757: OKC_DEBUG.g_session_id := SYS_CONTEXT('USERENV','SESSIONID');

1753: -- Set the profile values for logging
1754: -- different sessions debug messages.
1755: -- --------------------------------------------------------------------------
1756: IF (l_debug = 'Y') THEN
1757: OKC_DEBUG.g_session_id := SYS_CONTEXT('USERENV','SESSIONID');
1758: END IF;
1759: FND_PROFILE.PUT('AFLOG_ENABLED','Y'); -- Enable the log
1760: FND_PROFILE.PUT('AFLOG_LEVEL',1); -- Set the debug level
1761: FND_PROFILE.PUT('AFLOG_MODULE','OKC'); -- Set the module name

Line 1766: -- In the Non-apps mode the value of g_profile_log_level in the okc_debug API

1762:
1763: -- --------------------------------------------------------------------------
1764: -- Pricing callback from the Oracle Configurator occurs from a new session
1765: -- in which configurator applet window operates. This is a non-apps mode.
1766: -- In the Non-apps mode the value of g_profile_log_level in the okc_debug API
1767: -- is set to 0. However in the subsequent call to the Fnd_Log.test procedure
1768: -- the value of G_CURRENT_RUNTIME_LEVEL is used.Hence need to set its value
1769: -- to 1 by executing the fnd_log_repository.init procedure call.
1770: -- --------------------------------------------------------------------------

Line 1772: FND_LOG_REPOSITORY.init(OKC_DEBUG.g_session_id,fnd_global.user_id);

1768: -- the value of G_CURRENT_RUNTIME_LEVEL is used.Hence need to set its value
1769: -- to 1 by executing the fnd_log_repository.init procedure call.
1770: -- --------------------------------------------------------------------------
1771: -- Initialize the current runtime level
1772: FND_LOG_REPOSITORY.init(OKC_DEBUG.g_session_id,fnd_global.user_id);
1773:
1774: l_debug := 'Y';
1775:
1776: IF (l_debug = 'Y') THEN

Line 1777: OKC_DEBUG.set_indentation(l_api_name);

1773:
1774: l_debug := 'Y';
1775:
1776: IF (l_debug = 'Y') THEN
1777: OKC_DEBUG.set_indentation(l_api_name);
1778: OKC_DEBUG.log('7000: Entered okc_pricing_callback...', 2);
1779: OKC_DEBUG.log('7001: Config Session Key : '||p_config_session_key);
1780: OKC_DEBUG.log('7002: Pricing Type : '||p_price_type);
1781: END IF;

Line 1778: OKC_DEBUG.log('7000: Entered okc_pricing_callback...', 2);

1774: l_debug := 'Y';
1775:
1776: IF (l_debug = 'Y') THEN
1777: OKC_DEBUG.set_indentation(l_api_name);
1778: OKC_DEBUG.log('7000: Entered okc_pricing_callback...', 2);
1779: OKC_DEBUG.log('7001: Config Session Key : '||p_config_session_key);
1780: OKC_DEBUG.log('7002: Pricing Type : '||p_price_type);
1781: END IF;
1782:

Line 1779: OKC_DEBUG.log('7001: Config Session Key : '||p_config_session_key);

1775:
1776: IF (l_debug = 'Y') THEN
1777: OKC_DEBUG.set_indentation(l_api_name);
1778: OKC_DEBUG.log('7000: Entered okc_pricing_callback...', 2);
1779: OKC_DEBUG.log('7001: Config Session Key : '||p_config_session_key);
1780: OKC_DEBUG.log('7002: Pricing Type : '||p_price_type);
1781: END IF;
1782:
1783: -- ----------------------------------------------------------

Line 1780: OKC_DEBUG.log('7002: Pricing Type : '||p_price_type);

1776: IF (l_debug = 'Y') THEN
1777: OKC_DEBUG.set_indentation(l_api_name);
1778: OKC_DEBUG.log('7000: Entered okc_pricing_callback...', 2);
1779: OKC_DEBUG.log('7001: Config Session Key : '||p_config_session_key);
1780: OKC_DEBUG.log('7002: Pricing Type : '||p_price_type);
1781: END IF;
1782:
1783: -- ----------------------------------------------------------
1784: -- Prepare the cz temporary table rows for pricing

Line 1796: OKC_DEBUG.log('7010: Top Model Line Id : '||l_top_model_line_id);

1792: l_uom_code,
1793: l_comp_code;
1794:
1795: IF (l_debug = 'Y') THEN
1796: OKC_DEBUG.log('7010: Top Model Line Id : '||l_top_model_line_id);
1797: OKC_DEBUG.log('7011: Inventory Item Id : '||l_item_id);
1798: OKC_DEBUG.log('7012: Quantity : '||l_quantity);
1799: OKC_DEBUG.log('7013: UOM Code : '||l_uom_code);
1800: OKC_DEBUG.log('7014: Component Code : '||l_comp_code);

Line 1797: OKC_DEBUG.log('7011: Inventory Item Id : '||l_item_id);

1793: l_comp_code;
1794:
1795: IF (l_debug = 'Y') THEN
1796: OKC_DEBUG.log('7010: Top Model Line Id : '||l_top_model_line_id);
1797: OKC_DEBUG.log('7011: Inventory Item Id : '||l_item_id);
1798: OKC_DEBUG.log('7012: Quantity : '||l_quantity);
1799: OKC_DEBUG.log('7013: UOM Code : '||l_uom_code);
1800: OKC_DEBUG.log('7014: Component Code : '||l_comp_code);
1801: END IF;

Line 1798: OKC_DEBUG.log('7012: Quantity : '||l_quantity);

1794:
1795: IF (l_debug = 'Y') THEN
1796: OKC_DEBUG.log('7010: Top Model Line Id : '||l_top_model_line_id);
1797: OKC_DEBUG.log('7011: Inventory Item Id : '||l_item_id);
1798: OKC_DEBUG.log('7012: Quantity : '||l_quantity);
1799: OKC_DEBUG.log('7013: UOM Code : '||l_uom_code);
1800: OKC_DEBUG.log('7014: Component Code : '||l_comp_code);
1801: END IF;
1802:

Line 1799: OKC_DEBUG.log('7013: UOM Code : '||l_uom_code);

1795: IF (l_debug = 'Y') THEN
1796: OKC_DEBUG.log('7010: Top Model Line Id : '||l_top_model_line_id);
1797: OKC_DEBUG.log('7011: Inventory Item Id : '||l_item_id);
1798: OKC_DEBUG.log('7012: Quantity : '||l_quantity);
1799: OKC_DEBUG.log('7013: UOM Code : '||l_uom_code);
1800: OKC_DEBUG.log('7014: Component Code : '||l_comp_code);
1801: END IF;
1802:
1803: -- ----------------------------------------------------------

Line 1800: OKC_DEBUG.log('7014: Component Code : '||l_comp_code);

1796: OKC_DEBUG.log('7010: Top Model Line Id : '||l_top_model_line_id);
1797: OKC_DEBUG.log('7011: Inventory Item Id : '||l_item_id);
1798: OKC_DEBUG.log('7012: Quantity : '||l_quantity);
1799: OKC_DEBUG.log('7013: UOM Code : '||l_uom_code);
1800: OKC_DEBUG.log('7014: Component Code : '||l_comp_code);
1801: END IF;
1802:
1803: -- ----------------------------------------------------------
1804: -- Get corresponding Contract Header Id from top model line.

Line 1811: OKC_DEBUG.log('7015: Contract Hdr Id : '||l_chr_id);

1807: FETCH cur_line_details INTO l_chr_id,l_price_list_id;
1808: CLOSE cur_line_details;
1809:
1810: IF (l_debug = 'Y') THEN
1811: OKC_DEBUG.log('7015: Contract Hdr Id : '||l_chr_id);
1812: OKC_DEBUG.log('7016: Line Price List Id : '||l_price_list_id);
1813: END IF;
1814:
1815: -- ----------------------------------------------------------

Line 1812: OKC_DEBUG.log('7016: Line Price List Id : '||l_price_list_id);

1808: CLOSE cur_line_details;
1809:
1810: IF (l_debug = 'Y') THEN
1811: OKC_DEBUG.log('7015: Contract Hdr Id : '||l_chr_id);
1812: OKC_DEBUG.log('7016: Line Price List Id : '||l_price_list_id);
1813: END IF;
1814:
1815: -- ----------------------------------------------------------
1816: -- Get corresponding Contract Header details from header row.

Line 1826: OKC_DEBUG.log('7020: Currency : '||l_currency);

1822: l_hdr_price_list_id;
1823: CLOSE cur_get_hdr_det;
1824:
1825: IF (l_debug = 'Y') THEN
1826: OKC_DEBUG.log('7020: Currency : '||l_currency);
1827: OKC_DEBUG.log('7021: Auth Org Id : '||l_org_id);
1828: OKC_DEBUG.log('7022: Hdr Price List Id : '||l_hdr_price_list_id);
1829: END IF;
1830:

Line 1827: OKC_DEBUG.log('7021: Auth Org Id : '||l_org_id);

1823: CLOSE cur_get_hdr_det;
1824:
1825: IF (l_debug = 'Y') THEN
1826: OKC_DEBUG.log('7020: Currency : '||l_currency);
1827: OKC_DEBUG.log('7021: Auth Org Id : '||l_org_id);
1828: OKC_DEBUG.log('7022: Hdr Price List Id : '||l_hdr_price_list_id);
1829: END IF;
1830:
1831: -- -------------------------------------------------------------

Line 1828: OKC_DEBUG.log('7022: Hdr Price List Id : '||l_hdr_price_list_id);

1824:
1825: IF (l_debug = 'Y') THEN
1826: OKC_DEBUG.log('7020: Currency : '||l_currency);
1827: OKC_DEBUG.log('7021: Auth Org Id : '||l_org_id);
1828: OKC_DEBUG.log('7022: Hdr Price List Id : '||l_hdr_price_list_id);
1829: END IF;
1830:
1831: -- -------------------------------------------------------------
1832: -- If line level pricelist is null, pick header level price list

Line 1837: OKC_DEBUG.log('7023: Final Price List Id : '||l_price_list_id);

1833: -- -------------------------------------------------------------
1834: l_price_list_id := NVL(l_price_list_id,l_hdr_price_list_id);
1835:
1836: IF (l_debug = 'Y') THEN
1837: OKC_DEBUG.log('7023: Final Price List Id : '||l_price_list_id);
1838: END IF;
1839:
1840: -- ----------------------------------------------------------
1841: -- Prepare init values for the pricing call

Line 1860: OKC_DEBUG.log('7050: Total input Pr-Cb rows : '||l_cle_price_tbl.count);

1856: -- delete last blank row
1857: l_cle_price_tbl.DELETE(i);
1858:
1859: IF (l_debug = 'Y') THEN
1860: OKC_DEBUG.log('7050: Total input Pr-Cb rows : '||l_cle_price_tbl.count);
1861: END IF;
1862:
1863: -- ---------------------------------------------------------------------
1864: -- Pricing Call init values:

Line 1875: OKC_DEBUG.log('7700: Before Calculate Price call...');

1871: -- STEP:1
1872: -- OKC Specific Pricing call to calculate list or sell price.
1873: -- --------------------------------------------------------------
1874: IF (l_debug = 'Y') THEN
1875: OKC_DEBUG.log('7700: Before Calculate Price call...');
1876: END IF;
1877:
1878: OKC_PRICE_PVT.CALCULATE_PRICE(
1879: p_api_version => 1,

Line 1896: OKC_DEBUG.log('7750: Exiting Calculate Price... '||x_return_status);

1892: x_msg_count => x_msg_count,
1893: x_msg_data => x_msg_data);
1894:
1895: IF (l_debug = 'Y') THEN
1896: OKC_DEBUG.log('7750: Exiting Calculate Price... '||x_return_status);
1897: END IF;
1898: l_calc_price_error := 'Error in Calculate Price..';
1899:
1900: -- DEBUG: Print messages from stack

Line 1908: OKC_DEBUG.log('7755: x_msg_data '||x_msg_data);

1904: LOOP
1905: x_msg_data := FND_MSG_PUB.Get(p_msg_index => i,
1906: p_encoded => 'F');
1907: IF (l_debug = 'Y') THEN
1908: OKC_DEBUG.log('7755: x_msg_data '||x_msg_data);
1909: END IF;
1910: -- Limit size for Error message to Configurator
1911: IF LENGTH(l_calc_price_error||x_msg_data) < 2000
1912: THEN

Line 1935: OKC_DEBUG.log('7810: <--- OUTPUT LINE - '||(to_number(i)+1)||' ------->');

1931: FOR i in l_cle_price_tbl.FIRST..l_cle_price_tbl.LAST
1932: LOOP
1933: -- Dump all priced config lines in debug mode
1934: IF (l_debug = 'Y') THEN
1935: OKC_DEBUG.log('7810: <--- OUTPUT LINE - '||(to_number(i)+1)||' ------->');
1936: OKC_DEBUG.log('7811: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1937: OKC_DEBUG.log('7812: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1938: OKC_DEBUG.log('7813: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1939: OKC_DEBUG.log('7814: Line Id : '||l_CLE_PRICE_TBL(i).id);

Line 1936: OKC_DEBUG.log('7811: List Price : '||l_CLE_PRICE_TBL(i).list_price);

1932: LOOP
1933: -- Dump all priced config lines in debug mode
1934: IF (l_debug = 'Y') THEN
1935: OKC_DEBUG.log('7810: <--- OUTPUT LINE - '||(to_number(i)+1)||' ------->');
1936: OKC_DEBUG.log('7811: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1937: OKC_DEBUG.log('7812: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1938: OKC_DEBUG.log('7813: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1939: OKC_DEBUG.log('7814: Line Id : '||l_CLE_PRICE_TBL(i).id);
1940: OKC_DEBUG.log('7815: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);

Line 1937: OKC_DEBUG.log('7812: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);

1933: -- Dump all priced config lines in debug mode
1934: IF (l_debug = 'Y') THEN
1935: OKC_DEBUG.log('7810: <--- OUTPUT LINE - '||(to_number(i)+1)||' ------->');
1936: OKC_DEBUG.log('7811: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1937: OKC_DEBUG.log('7812: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1938: OKC_DEBUG.log('7813: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1939: OKC_DEBUG.log('7814: Line Id : '||l_CLE_PRICE_TBL(i).id);
1940: OKC_DEBUG.log('7815: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1941: OKC_DEBUG.log('7816: Quantity : '||l_CLE_PRICE_TBL(i).qty);

Line 1938: OKC_DEBUG.log('7813: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);

1934: IF (l_debug = 'Y') THEN
1935: OKC_DEBUG.log('7810: <--- OUTPUT LINE - '||(to_number(i)+1)||' ------->');
1936: OKC_DEBUG.log('7811: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1937: OKC_DEBUG.log('7812: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1938: OKC_DEBUG.log('7813: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1939: OKC_DEBUG.log('7814: Line Id : '||l_CLE_PRICE_TBL(i).id);
1940: OKC_DEBUG.log('7815: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1941: OKC_DEBUG.log('7816: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1942: OKC_DEBUG.log('7817: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);

Line 1939: OKC_DEBUG.log('7814: Line Id : '||l_CLE_PRICE_TBL(i).id);

1935: OKC_DEBUG.log('7810: <--- OUTPUT LINE - '||(to_number(i)+1)||' ------->');
1936: OKC_DEBUG.log('7811: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1937: OKC_DEBUG.log('7812: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1938: OKC_DEBUG.log('7813: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1939: OKC_DEBUG.log('7814: Line Id : '||l_CLE_PRICE_TBL(i).id);
1940: OKC_DEBUG.log('7815: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1941: OKC_DEBUG.log('7816: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1942: OKC_DEBUG.log('7817: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1943: OKC_DEBUG.log('7818: Currency : '||l_CLE_PRICE_TBL(i).currency);

Line 1940: OKC_DEBUG.log('7815: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);

1936: OKC_DEBUG.log('7811: List Price : '||l_CLE_PRICE_TBL(i).list_price);
1937: OKC_DEBUG.log('7812: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1938: OKC_DEBUG.log('7813: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1939: OKC_DEBUG.log('7814: Line Id : '||l_CLE_PRICE_TBL(i).id);
1940: OKC_DEBUG.log('7815: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1941: OKC_DEBUG.log('7816: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1942: OKC_DEBUG.log('7817: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1943: OKC_DEBUG.log('7818: Currency : '||l_CLE_PRICE_TBL(i).currency);
1944: OKC_DEBUG.log('7819: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);

Line 1941: OKC_DEBUG.log('7816: Quantity : '||l_CLE_PRICE_TBL(i).qty);

1937: OKC_DEBUG.log('7812: Nego Price : '||l_CLE_PRICE_TBL(i).negotiated_amt);
1938: OKC_DEBUG.log('7813: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1939: OKC_DEBUG.log('7814: Line Id : '||l_CLE_PRICE_TBL(i).id);
1940: OKC_DEBUG.log('7815: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1941: OKC_DEBUG.log('7816: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1942: OKC_DEBUG.log('7817: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1943: OKC_DEBUG.log('7818: Currency : '||l_CLE_PRICE_TBL(i).currency);
1944: OKC_DEBUG.log('7819: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1945: OKC_DEBUG.log('7820: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);

Line 1942: OKC_DEBUG.log('7817: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);

1938: OKC_DEBUG.log('7813: Pr List Id : '||l_CLE_PRICE_TBL(i).pricelist_id);
1939: OKC_DEBUG.log('7814: Line Id : '||l_CLE_PRICE_TBL(i).id);
1940: OKC_DEBUG.log('7815: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1941: OKC_DEBUG.log('7816: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1942: OKC_DEBUG.log('7817: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1943: OKC_DEBUG.log('7818: Currency : '||l_CLE_PRICE_TBL(i).currency);
1944: OKC_DEBUG.log('7819: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1945: OKC_DEBUG.log('7820: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);
1946: OKC_DEBUG.log('7821: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);

Line 1943: OKC_DEBUG.log('7818: Currency : '||l_CLE_PRICE_TBL(i).currency);

1939: OKC_DEBUG.log('7814: Line Id : '||l_CLE_PRICE_TBL(i).id);
1940: OKC_DEBUG.log('7815: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1941: OKC_DEBUG.log('7816: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1942: OKC_DEBUG.log('7817: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1943: OKC_DEBUG.log('7818: Currency : '||l_CLE_PRICE_TBL(i).currency);
1944: OKC_DEBUG.log('7819: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1945: OKC_DEBUG.log('7820: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);
1946: OKC_DEBUG.log('7821: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);
1947: END IF;

Line 1944: OKC_DEBUG.log('7819: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);

1940: OKC_DEBUG.log('7815: Pi Bpi : '||l_CLE_PRICE_TBL(i).pi_bpi);
1941: OKC_DEBUG.log('7816: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1942: OKC_DEBUG.log('7817: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1943: OKC_DEBUG.log('7818: Currency : '||l_CLE_PRICE_TBL(i).currency);
1944: OKC_DEBUG.log('7819: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1945: OKC_DEBUG.log('7820: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);
1946: OKC_DEBUG.log('7821: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);
1947: END IF;
1948:

Line 1945: OKC_DEBUG.log('7820: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);

1941: OKC_DEBUG.log('7816: Quantity : '||l_CLE_PRICE_TBL(i).qty);
1942: OKC_DEBUG.log('7817: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1943: OKC_DEBUG.log('7818: Currency : '||l_CLE_PRICE_TBL(i).currency);
1944: OKC_DEBUG.log('7819: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1945: OKC_DEBUG.log('7820: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);
1946: OKC_DEBUG.log('7821: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);
1947: END IF;
1948:
1949: -- --------------------------------------------------------------

Line 1946: OKC_DEBUG.log('7821: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);

1942: OKC_DEBUG.log('7817: Uom Code : '||l_CLE_PRICE_TBL(i).uom_code);
1943: OKC_DEBUG.log('7818: Currency : '||l_CLE_PRICE_TBL(i).currency);
1944: OKC_DEBUG.log('7819: Obj Code : '||l_CLE_PRICE_TBL(i).object_code);
1945: OKC_DEBUG.log('7820: Obj Id1 : '||l_CLE_PRICE_TBL(i).id1);
1946: OKC_DEBUG.log('7821: Obj Id2 : '||l_CLE_PRICE_TBL(i).id2);
1947: END IF;
1948:
1949: -- --------------------------------------------------------------
1950: -- Calculate the rollup price to be shown for top model line.

Line 2001: OKC_DEBUG.log('7900: Total Sell Price : '||x_total_price);

1997: -- END;
1998: -- -------------------------------------------------------------
1999:
2000: IF (l_debug = 'Y') THEN
2001: OKC_DEBUG.log('7900: Total Sell Price : '||x_total_price);
2002: OKC_DEBUG.log('7999: Leaving okc_pricing_callback...', 2);
2003: END IF;
2004:
2005: IF (l_debug = 'Y') THEN

Line 2002: OKC_DEBUG.log('7999: Leaving okc_pricing_callback...', 2);

1998: -- -------------------------------------------------------------
1999:
2000: IF (l_debug = 'Y') THEN
2001: OKC_DEBUG.log('7900: Total Sell Price : '||x_total_price);
2002: OKC_DEBUG.log('7999: Leaving okc_pricing_callback...', 2);
2003: END IF;
2004:
2005: IF (l_debug = 'Y') THEN
2006: OKC_DEBUG.Reset_Indentation;

Line 2006: OKC_DEBUG.Reset_Indentation;

2002: OKC_DEBUG.log('7999: Leaving okc_pricing_callback...', 2);
2003: END IF;
2004:
2005: IF (l_debug = 'Y') THEN
2006: OKC_DEBUG.Reset_Indentation;
2007: END IF;
2008:
2009: EXCEPTION
2010: WHEN OTHERS THEN

Line 2013: OKC_DEBUG.log('7995: Sending Pricing Callback Error Message to Configurator...');

2009: EXCEPTION
2010: WHEN OTHERS THEN
2011:
2012: IF (l_debug = 'Y') THEN
2013: OKC_DEBUG.log('7995: Sending Pricing Callback Error Message to Configurator...');
2014: OKC_DEBUG.log('7996: Error Message: '||l_calc_price_error);
2015: END IF;
2016:
2017: -- Set the error message

Line 2014: OKC_DEBUG.log('7996: Error Message: '||l_calc_price_error);

2010: WHEN OTHERS THEN
2011:
2012: IF (l_debug = 'Y') THEN
2013: OKC_DEBUG.log('7995: Sending Pricing Callback Error Message to Configurator...');
2014: OKC_DEBUG.log('7996: Error Message: '||l_calc_price_error);
2015: END IF;
2016:
2017: -- Set the error message
2018: UPDATE okx_config_pricing_v

Line 2023: OKC_DEBUG.log('7997: Pricing Callback Error Message sent to Configurator...');

2019: SET msg_data = l_calc_price_error
2020: WHERE configurator_session_key = p_config_session_key;
2021:
2022: IF (l_debug = 'Y') THEN
2023: OKC_DEBUG.log('7997: Pricing Callback Error Message sent to Configurator...');
2024: OKC_DEBUG.Reset_Indentation;
2025: END IF;
2026:
2027: END okc_pricing_callback;

Line 2024: OKC_DEBUG.Reset_Indentation;

2020: WHERE configurator_session_key = p_config_session_key;
2021:
2022: IF (l_debug = 'Y') THEN
2023: OKC_DEBUG.log('7997: Pricing Callback Error Message sent to Configurator...');
2024: OKC_DEBUG.Reset_Indentation;
2025: END IF;
2026:
2027: END okc_pricing_callback;
2028:

Line 2076: OKC_DEBUG.set_indentation('copy_config');

2072:
2073: BEGIN
2074: SAVEPOINT okc_copy_config;
2075: IF (l_debug = 'Y') THEN
2076: OKC_DEBUG.set_indentation('copy_config');
2077: END IF;
2078: --FND_MSG_PUB.initialize;
2079:
2080: IF (l_debug = 'Y') THEN

Line 2081: OKC_DEBUG.log('9000: Entering OKC Copy Configuration...');

2077: END IF;
2078: --FND_MSG_PUB.initialize;
2079:
2080: IF (l_debug = 'Y') THEN
2081: OKC_DEBUG.log('9000: Entering OKC Copy Configuration...');
2082: END IF;
2083: x_return_status := FND_API.G_RET_STS_SUCCESS;
2084:
2085: FOR cur_get_top_models_rec in cur_get_top_models

Line 2092: OKC_DEBUG.log('9100: Config Top Model Id : '||l_top_model_line_id);

2088: l_cfg_hdr_id := cur_get_top_models_rec.config_header_id;
2089: l_cfg_rev_nbr := cur_get_top_models_rec.config_revision_number;
2090:
2091: IF (l_debug = 'Y') THEN
2092: OKC_DEBUG.log('9100: Config Top Model Id : '||l_top_model_line_id);
2093: OKC_DEBUG.log('9110: Old config header id : '||l_cfg_hdr_id);
2094: OKC_DEBUG.log('9120: Old config Revision : '||l_cfg_rev_nbr);
2095: END IF;
2096:

Line 2093: OKC_DEBUG.log('9110: Old config header id : '||l_cfg_hdr_id);

2089: l_cfg_rev_nbr := cur_get_top_models_rec.config_revision_number;
2090:
2091: IF (l_debug = 'Y') THEN
2092: OKC_DEBUG.log('9100: Config Top Model Id : '||l_top_model_line_id);
2093: OKC_DEBUG.log('9110: Old config header id : '||l_cfg_hdr_id);
2094: OKC_DEBUG.log('9120: Old config Revision : '||l_cfg_rev_nbr);
2095: END IF;
2096:
2097: IF l_cfg_hdr_id IS NOT NULL AND

Line 2094: OKC_DEBUG.log('9120: Old config Revision : '||l_cfg_rev_nbr);

2090:
2091: IF (l_debug = 'Y') THEN
2092: OKC_DEBUG.log('9100: Config Top Model Id : '||l_top_model_line_id);
2093: OKC_DEBUG.log('9110: Old config header id : '||l_cfg_hdr_id);
2094: OKC_DEBUG.log('9120: Old config Revision : '||l_cfg_rev_nbr);
2095: END IF;
2096:
2097: IF l_cfg_hdr_id IS NOT NULL AND
2098: l_cfg_rev_nbr IS NOT NULL

Line 2101: OKC_DEBUG.log('9130: Calling CZ Copy Config API...');

2097: IF l_cfg_hdr_id IS NOT NULL AND
2098: l_cfg_rev_nbr IS NOT NULL
2099: THEN
2100: IF (l_debug = 'Y') THEN
2101: OKC_DEBUG.log('9130: Calling CZ Copy Config API...');
2102: END IF;
2103:
2104: -- Bug 2614950.
2105: -- The old copy_configuration call has been commented out below.

Line 2143: OKC_DEBUG.log('9250: Error in Copy Configuration...'||x_err_msg);

2139: IF x_ret_status <> OKC_API.G_RET_STS_SUCCESS
2140: THEN
2141: -- This is an error condition for copy configuration
2142: IF (l_debug = 'Y') THEN
2143: OKC_DEBUG.log('9250: Error in Copy Configuration...'||x_err_msg);
2144: END IF;
2145: RAISE OKC_API.G_EXCEPTION_ERROR;
2146: ELSE
2147: -- --------------------------------------------------------

Line 2156: OKC_DEBUG.LOG('9200: New config header id : '||x_cfg_hdr_id);

2152: -- --------------------------------------------------------
2153:
2154: IF (l_debug = 'Y') THEN -- Display all the returned info in debug mode
2155:
2156: OKC_DEBUG.LOG('9200: New config header id : '||x_cfg_hdr_id);
2157: OKC_DEBUG.LOG('9210: New config Revision : '||x_cfg_rev_nbr);
2158: OKC_DEBUG.LOG('9220: Error Message : '||x_err_msg);
2159: OKC_DEBUG.LOG('9221: Error Message Count : '||x_msg_count);
2160: OKC_DEBUG.LOG('9230: Return Status : '||x_ret_status);

Line 2157: OKC_DEBUG.LOG('9210: New config Revision : '||x_cfg_rev_nbr);

2153:
2154: IF (l_debug = 'Y') THEN -- Display all the returned info in debug mode
2155:
2156: OKC_DEBUG.LOG('9200: New config header id : '||x_cfg_hdr_id);
2157: OKC_DEBUG.LOG('9210: New config Revision : '||x_cfg_rev_nbr);
2158: OKC_DEBUG.LOG('9220: Error Message : '||x_err_msg);
2159: OKC_DEBUG.LOG('9221: Error Message Count : '||x_msg_count);
2160: OKC_DEBUG.LOG('9230: Return Status : '||x_ret_status);
2161: OKC_DEBUG.LOG(' ');

Line 2158: OKC_DEBUG.LOG('9220: Error Message : '||x_err_msg);

2154: IF (l_debug = 'Y') THEN -- Display all the returned info in debug mode
2155:
2156: OKC_DEBUG.LOG('9200: New config header id : '||x_cfg_hdr_id);
2157: OKC_DEBUG.LOG('9210: New config Revision : '||x_cfg_rev_nbr);
2158: OKC_DEBUG.LOG('9220: Error Message : '||x_err_msg);
2159: OKC_DEBUG.LOG('9221: Error Message Count : '||x_msg_count);
2160: OKC_DEBUG.LOG('9230: Return Status : '||x_ret_status);
2161: OKC_DEBUG.LOG(' ');
2162: OKC_DEBUG.LOG('9231: The original item ids from the output table');

Line 2159: OKC_DEBUG.LOG('9221: Error Message Count : '||x_msg_count);

2155:
2156: OKC_DEBUG.LOG('9200: New config header id : '||x_cfg_hdr_id);
2157: OKC_DEBUG.LOG('9210: New config Revision : '||x_cfg_rev_nbr);
2158: OKC_DEBUG.LOG('9220: Error Message : '||x_err_msg);
2159: OKC_DEBUG.LOG('9221: Error Message Count : '||x_msg_count);
2160: OKC_DEBUG.LOG('9230: Return Status : '||x_ret_status);
2161: OKC_DEBUG.LOG(' ');
2162: OKC_DEBUG.LOG('9231: The original item ids from the output table');
2163:

Line 2160: OKC_DEBUG.LOG('9230: Return Status : '||x_ret_status);

2156: OKC_DEBUG.LOG('9200: New config header id : '||x_cfg_hdr_id);
2157: OKC_DEBUG.LOG('9210: New config Revision : '||x_cfg_rev_nbr);
2158: OKC_DEBUG.LOG('9220: Error Message : '||x_err_msg);
2159: OKC_DEBUG.LOG('9221: Error Message Count : '||x_msg_count);
2160: OKC_DEBUG.LOG('9230: Return Status : '||x_ret_status);
2161: OKC_DEBUG.LOG(' ');
2162: OKC_DEBUG.LOG('9231: The original item ids from the output table');
2163:
2164: IF x_orig_item_id_tbl.count > 0 THEN

Line 2161: OKC_DEBUG.LOG(' ');

2157: OKC_DEBUG.LOG('9210: New config Revision : '||x_cfg_rev_nbr);
2158: OKC_DEBUG.LOG('9220: Error Message : '||x_err_msg);
2159: OKC_DEBUG.LOG('9221: Error Message Count : '||x_msg_count);
2160: OKC_DEBUG.LOG('9230: Return Status : '||x_ret_status);
2161: OKC_DEBUG.LOG(' ');
2162: OKC_DEBUG.LOG('9231: The original item ids from the output table');
2163:
2164: IF x_orig_item_id_tbl.count > 0 THEN
2165: FOR i in x_orig_item_id_tbl.FIRST..x_orig_item_id_tbl.LAST

Line 2162: OKC_DEBUG.LOG('9231: The original item ids from the output table');

2158: OKC_DEBUG.LOG('9220: Error Message : '||x_err_msg);
2159: OKC_DEBUG.LOG('9221: Error Message Count : '||x_msg_count);
2160: OKC_DEBUG.LOG('9230: Return Status : '||x_ret_status);
2161: OKC_DEBUG.LOG(' ');
2162: OKC_DEBUG.LOG('9231: The original item ids from the output table');
2163:
2164: IF x_orig_item_id_tbl.count > 0 THEN
2165: FOR i in x_orig_item_id_tbl.FIRST..x_orig_item_id_tbl.LAST
2166: LOOP

Line 2167: OKC_DEBUG.LOG(' ');

2163:
2164: IF x_orig_item_id_tbl.count > 0 THEN
2165: FOR i in x_orig_item_id_tbl.FIRST..x_orig_item_id_tbl.LAST
2166: LOOP
2167: OKC_DEBUG.LOG(' ');
2168: OKC_DEBUG.LOG('Original config item id '||i||' = '||x_orig_item_id_tbl(i));
2169: END LOOP;
2170: END IF;
2171:

Line 2168: OKC_DEBUG.LOG('Original config item id '||i||' = '||x_orig_item_id_tbl(i));

2164: IF x_orig_item_id_tbl.count > 0 THEN
2165: FOR i in x_orig_item_id_tbl.FIRST..x_orig_item_id_tbl.LAST
2166: LOOP
2167: OKC_DEBUG.LOG(' ');
2168: OKC_DEBUG.LOG('Original config item id '||i||' = '||x_orig_item_id_tbl(i));
2169: END LOOP;
2170: END IF;
2171:
2172: OKC_DEBUG.LOG(' ');

Line 2172: OKC_DEBUG.LOG(' ');

2168: OKC_DEBUG.LOG('Original config item id '||i||' = '||x_orig_item_id_tbl(i));
2169: END LOOP;
2170: END IF;
2171:
2172: OKC_DEBUG.LOG(' ');
2173: OKC_DEBUG.LOG('9232: The new item ids from the output table');
2174:
2175: IF x_new_item_id_tbl.count > 0 THEN
2176: FOR i in x_new_item_id_tbl.FIRST..x_new_item_id_tbl.LAST

Line 2173: OKC_DEBUG.LOG('9232: The new item ids from the output table');

2169: END LOOP;
2170: END IF;
2171:
2172: OKC_DEBUG.LOG(' ');
2173: OKC_DEBUG.LOG('9232: The new item ids from the output table');
2174:
2175: IF x_new_item_id_tbl.count > 0 THEN
2176: FOR i in x_new_item_id_tbl.FIRST..x_new_item_id_tbl.LAST
2177: LOOP

Line 2178: OKC_DEBUG.LOG(' ');

2174:
2175: IF x_new_item_id_tbl.count > 0 THEN
2176: FOR i in x_new_item_id_tbl.FIRST..x_new_item_id_tbl.LAST
2177: LOOP
2178: OKC_DEBUG.LOG(' ');
2179: OKC_DEBUG.LOG('New config item id '||i||' = '||x_new_item_id_tbl(i));
2180: END LOOP;
2181: END IF;
2182: END IF; -- End display all the returned info in debug mode

Line 2179: OKC_DEBUG.LOG('New config item id '||i||' = '||x_new_item_id_tbl(i));

2175: IF x_new_item_id_tbl.count > 0 THEN
2176: FOR i in x_new_item_id_tbl.FIRST..x_new_item_id_tbl.LAST
2177: LOOP
2178: OKC_DEBUG.LOG(' ');
2179: OKC_DEBUG.LOG('New config item id '||i||' = '||x_new_item_id_tbl(i));
2180: END LOOP;
2181: END IF;
2182: END IF; -- End display all the returned info in debug mode
2183:

Line 2196: OKC_DEBUG.log('9500: Created new Configuration for : '||l_cfg_hdr_id, 2);

2192:
2193: END IF;
2194:
2195: IF (l_debug = 'Y') THEN
2196: OKC_DEBUG.log('9500: Created new Configuration for : '||l_cfg_hdr_id, 2);
2197: END IF;
2198:
2199: -- ----------------------------------------------------------------------------
2200: -- Update the contract lines for this configuration with the new config_item_id

Line 2205: OKC_DEBUG.log('9501: Updating the CONFIG ITEM IDs : ');

2201: -- with the new config_item_id.
2202: -- ----------------------------------------------------------------------------
2203:
2204: IF (l_debug = 'Y') THEN
2205: OKC_DEBUG.log('9501: Updating the CONFIG ITEM IDs : ');
2206: END IF;
2207:
2208: IF x_orig_item_id_tbl.COUNT > 0 THEN
2209: FOR i IN x_orig_item_id_tbl.FIRST..x_orig_item_id_tbl.LAST LOOP

Line 2225: OKC_DEBUG.log('9999: Exiting Copy Configuration...', 2);

2221:
2222: END LOOP;
2223:
2224: IF (l_debug = 'Y') THEN
2225: OKC_DEBUG.log('9999: Exiting Copy Configuration...', 2);
2226: OKC_DEBUG.Reset_Indentation;
2227: END IF;
2228:
2229: EXCEPTION

Line 2226: OKC_DEBUG.Reset_Indentation;

2222: END LOOP;
2223:
2224: IF (l_debug = 'Y') THEN
2225: OKC_DEBUG.log('9999: Exiting Copy Configuration...', 2);
2226: OKC_DEBUG.Reset_Indentation;
2227: END IF;
2228:
2229: EXCEPTION
2230: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 2232: OKC_DEBUG.log('5999:Exception Error in Copy Config...', 2);

2228:
2229: EXCEPTION
2230: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2231: IF (l_debug = 'Y') THEN
2232: OKC_DEBUG.log('5999:Exception Error in Copy Config...', 2);
2233: OKC_DEBUG.Reset_Indentation;
2234: END IF;
2235:
2236: IF cur_get_top_models%ISOPEN

Line 2233: OKC_DEBUG.Reset_Indentation;

2229: EXCEPTION
2230: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2231: IF (l_debug = 'Y') THEN
2232: OKC_DEBUG.log('5999:Exception Error in Copy Config...', 2);
2233: OKC_DEBUG.Reset_Indentation;
2234: END IF;
2235:
2236: IF cur_get_top_models%ISOPEN
2237: THEN

Line 2245: OKC_DEBUG.log('5999:Other Exception in Copy Config...', 2);

2241: x_return_status := FND_API.G_RET_STS_ERROR;
2242:
2243: WHEN OTHERS THEN
2244: IF (l_debug = 'Y') THEN
2245: OKC_DEBUG.log('5999:Other Exception in Copy Config...', 2);
2246: OKC_DEBUG.Reset_Indentation;
2247: END IF;
2248:
2249: IF cur_get_top_models%ISOPEN

Line 2246: OKC_DEBUG.Reset_Indentation;

2242:
2243: WHEN OTHERS THEN
2244: IF (l_debug = 'Y') THEN
2245: OKC_DEBUG.log('5999:Other Exception in Copy Config...', 2);
2246: OKC_DEBUG.Reset_Indentation;
2247: END IF;
2248:
2249: IF cur_get_top_models%ISOPEN
2250: THEN