DBA Data[Home] [Help]

APPS.QP_FORMULA_PRICE_CALC_PVT dependencies on FND_API

Line 84: x_return_status := FND_API.G_RET_STS_SUCCESS;

80: l_cursor INTEGER;
81:
82: BEGIN
83:
84: x_return_status := FND_API.G_RET_STS_SUCCESS;
85:
86: EXECUTE IMMEDIATE 'SELECT ' || p_formula || ' FROM DUAL';
87:
88: EXCEPTION

Line 89: WHEN FND_API.G_EXC_ERROR THEN

85:
86: EXECUTE IMMEDIATE 'SELECT ' || p_formula || ' FROM DUAL';
87:
88: EXCEPTION
89: WHEN FND_API.G_EXC_ERROR THEN
90:
91: x_return_status := FND_API.G_RET_STS_ERROR;
92:
93: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 91: x_return_status := FND_API.G_RET_STS_ERROR;

87:
88: EXCEPTION
89: WHEN FND_API.G_EXC_ERROR THEN
90:
91: x_return_status := FND_API.G_RET_STS_ERROR;
92:
93: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
94: THEN
95: fnd_message.set_name('QP','QP_FORMULA_NOT_FOUND');

Line 101: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

97: END IF;
98:
99: -- RAISE;
100:
101: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
102:
103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
104:
105: -- RAISE;

Line 103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

99: -- RAISE;
100:
101: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
102:
103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
104:
105: -- RAISE;
106:
107: WHEN OTHERS THEN

Line 109: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

105: -- RAISE;
106:
107: WHEN OTHERS THEN
108:
109: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
110:
111: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
112: THEN
113: FND_MSG_PUB.Add_Exc_Msg

Line 119: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

115: , 'Parse Formula'
116: );
117: END IF;
118:
119: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
120:
121: END Parse_Formula;
122:
123:

Line 176: IF l_debug = FND_API.G_TRUE THEN

172: l_new_formula := l_new_formula || l_char;
173: END IF; -- If the character is a number or not
174: END LOOP; -- Loop through every character in the Formula String
175:
176: IF l_debug = FND_API.G_TRUE THEN
177: QP_PREQ_GRP.engine_debug('Formula is ' || l_new_formula);
178: END IF;
179:
180: l_select_stmt := 'SELECT '|| l_new_formula || ' FROM DUAL';

Line 508: x_return_status := FND_API.G_RET_STS_SUCCESS;

504:
505: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
506: l_formula_start_time := dbms_utility.get_time;
507:
508: x_return_status := FND_API.G_RET_STS_SUCCESS;
509:
510: IF l_debug = FND_API.G_TRUE THEN
511: QP_PREQ_GRP.engine_debug('Start Formula...');
512: END IF;

Line 510: IF l_debug = FND_API.G_TRUE THEN

506: l_formula_start_time := dbms_utility.get_time;
507:
508: x_return_status := FND_API.G_RET_STS_SUCCESS;
509:
510: IF l_debug = FND_API.G_TRUE THEN
511: QP_PREQ_GRP.engine_debug('Start Formula...');
512: END IF;
513:
514: --added for formula messages

Line 528: x_return_status := FND_API.G_RET_STS_ERROR;

524: FETCH price_formulas_cur INTO l_formula;
525:
526: IF price_formulas_cur%NOTFOUND THEN
527:
528: x_return_status := FND_API.G_RET_STS_ERROR;
529:
530: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
531: THEN
532: RAISE E_FORMULA_NOT_FOUND;

Line 542: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

538: CLOSE price_formulas_cur;
539:
540: Parse_Formula (l_formula, l_return_status);
541:
542: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
543: x_return_status := l_return_status;
544: RAISE E_INVALID_FORMULA;
545: END IF;
546:

Line 558: x_return_status := FND_API.G_RET_STS_ERROR;

554: WHERE price_formula_id = p_price_formula_id;
555:
556: IF l_no_of_comps = 0 THEN
557:
558: x_return_status := FND_API.G_RET_STS_ERROR;
559:
560: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
561: THEN
562: RAISE E_FORMULA_COMPONENTS_REQ;

Line 576: IF l_debug = FND_API.G_TRUE THEN

572:
573: --process all factors before for bug 10273166 smbalara START
574: -- Now Process all Factor Lists in the formula
575:
576: IF l_debug = FND_API.G_TRUE THEN
577: QP_PREQ_GRP.engine_debug('Before populating plsql table of formula lines');
578:
579: END IF;
580: --Populate l_formula_line_tbl for all factor lists in the formula

Line 586: IF l_debug = FND_API.G_TRUE THEN

582: p_price_effective_date)
583: LOOP
584: --l_Operand_Tbl(l_factors_rec.step_number):= null;--10273166,commented for 11898355
585:
586: IF l_debug = FND_API.G_TRUE THEN
587: QP_PREQ_GRP.engine_debug('enter factors_cur loop -step number -'||l_factors_rec.step_number);
588:
589: END IF;
590: IF l_skip_factor AND

Line 597: IF l_debug = FND_API.G_TRUE THEN

593: l_old_step_number := l_factors_rec.step_number;
594: GOTO factors_loop;
595: END IF;
596:
597: IF l_debug = FND_API.G_TRUE THEN
598: QP_PREQ_GRP.engine_debug('after skip check ');
599: QP_PREQ_GRP.engine_debug('l_factors_rec.step_number:'||l_factors_rec.step_number);--11898355
600: QP_PREQ_GRP.engine_debug('l_old_step_number:'|| l_old_step_number);--11898355
601: QP_PREQ_GRP.engine_debug('l_factors_rec.group_count :'|| l_factors_rec.group_count );--11898355

Line 628: IF l_debug = FND_API.G_TRUE THEN

624: l_factors_rec.list_line_id;
625: l_formula_line_tbl(l_factors_rec.step_number).list_line_type_code :=
626: p_list_line_type_code;
627:
628: IF l_debug = FND_API.G_TRUE THEN
629: QP_PREQ_GRP.engine_debug('In factors_cur, step = ' ||l_factors_rec.step_number);
630: QP_PREQ_GRP.engine_debug('Factor evaluated to = '||l_formula_line_tbl(l_factors_rec.step_number).component_value); --10273166
631: END IF;
632: l_skip_factor := TRUE;

Line 638: IF l_debug = FND_API.G_TRUE THEN

634: --added for formula messages
635: l_null_step_number_tbl.DELETE(l_factors_rec.step_number);
636:
637: ELSE --If l_factors_rec.group_count > 0
638: IF l_debug = FND_API.G_TRUE THEN
639: QP_PREQ_GRP.engine_debug('sub factors check1 ');--11898355
640: END IF;
641: --sub_factors_cur has to be fetched to determine if all attributes match
642: OPEN sub_factors_cur(p_price_formula_id,

Line 652: IF l_debug = FND_API.G_TRUE THEN

648: FETCH sub_factors_cur
649: INTO l_sub_factors_rec;
650:
651: IF sub_factors_cur%FOUND THEN
652: IF l_debug = FND_API.G_TRUE THEN
653: QP_PREQ_GRP.engine_debug('sub factors check2 ');--11898355
654: END IF;
655: l_formula_line_tbl(l_factors_rec.step_number).component_value :=
656: l_factors_rec.operand;

Line 675: IF l_debug = FND_API.G_TRUE THEN

671: l_factors_rec.list_line_id;
672: l_formula_line_tbl(l_factors_rec.step_number).list_line_type_code :=
673: p_list_line_type_code;
674:
675: IF l_debug = FND_API.G_TRUE THEN
676: QP_PREQ_GRP.engine_debug('In sub_factors_cur, step = ' ||l_factors_rec.step_number);
677: QP_PREQ_GRP.engine_debug('Sub Factor evaluated to = '||l_formula_line_tbl(l_factors_rec.step_number).component_value); --10273166
678: END IF;
679: l_skip_factor := TRUE;

Line 685: IF l_debug = FND_API.G_TRUE THEN

681: l_null_step_number_tbl.DELETE(l_factors_rec.step_number);
682: END IF;--sub_factors_cur%FOUND
683:
684: CLOSE sub_factors_cur;
685: IF l_debug = FND_API.G_TRUE THEN
686: QP_PREQ_GRP.engine_debug('sub factors check3 ');--11898355
687: END IF;
688: END IF; --If l_factors_rec.group_count = 0
689:

Line 691: IF l_debug = FND_API.G_TRUE THEN

687: END IF;
688: END IF; --If l_factors_rec.group_count = 0
689:
690: l_old_step_number := l_factors_rec.step_number;
691: IF l_debug = FND_API.G_TRUE THEN
692: QP_PREQ_GRP.engine_debug('factors check end');--11898355
693: END IF;
694:
695: <>

Line 698: IF l_debug = FND_API.G_TRUE THEN

694:
695: <>
696: null;
697:
698: IF l_debug = FND_API.G_TRUE THEN
699: QP_PREQ_GRP.engine_debug('exit factors_cur loop');
700:
701: END IF;
702: END LOOP; --Loop over factors_cur

Line 704: IF l_debug = FND_API.G_TRUE THEN

700:
701: END IF;
702: END LOOP; --Loop over factors_cur
703:
704: IF l_debug = FND_API.G_TRUE THEN
705: QP_PREQ_GRP.engine_debug('After populating plsql table of formula lines');
706:
707: END IF;
708: --process all factors before for bug 10273166 smbalara END

Line 719: IF l_debug = FND_API.G_TRUE THEN

715: LOOP
716:
717: IF l_rec.price_formula_line_type_code = 'NUM' THEN
718:
719: IF l_debug = FND_API.G_TRUE THEN
720: QP_PREQ_GRP.engine_debug('Formula Line Type = NUM, Step = '|| l_rec.step_number
721: || ', Value = ' || l_rec.numeric_constant);
722: END IF;
723: l_formula_line_tbl(l_rec.step_number).component_value :=

Line 741: IF l_debug = FND_API.G_TRUE THEN

737: p_list_line_type_code;
738:
739: ELSIF l_rec.price_formula_line_type_code = 'LP' THEN
740:
741: IF l_debug = FND_API.G_TRUE THEN
742: QP_PREQ_GRP.engine_debug('Formula Line Type = LP, Step = ' || l_rec.step_number
743: || ', Value = '|| p_list_price);
744: END IF;
745: l_formula_line_tbl(l_rec.step_number).component_value := p_list_price;

Line 766: IF l_debug = FND_API.G_TRUE THEN

762: END IF;
763:
764: ELSIF l_rec.price_formula_line_type_code = 'MV' THEN
765:
766: IF l_debug = FND_API.G_TRUE THEN
767: QP_PREQ_GRP.engine_debug('Formula Line Type = MV, Step = ' || l_rec.step_number || ', Value = '|| p_modifier_value);
768:
769: END IF;
770: l_formula_line_tbl(l_rec.step_number).component_value := p_modifier_value;

Line 792: IF l_debug = FND_API.G_TRUE THEN

788: END IF;
789:
790: ELSIF l_rec.price_formula_line_type_code = 'FUNC' THEN
791:
792: IF l_debug = FND_API.G_TRUE THEN
793: QP_PREQ_GRP.engine_debug('Formula Line Type = FUNC, Step = ' ||l_rec.step_number);
794: END IF;
795: l_customized := FND_PROFILE.VALUE('QP_GET_CUSTOM_PRICE_CUSTOMIZED');
796: IF l_customized = 'Y' THEN

Line 797: IF l_debug = FND_API.G_TRUE THEN

793: QP_PREQ_GRP.engine_debug('Formula Line Type = FUNC, Step = ' ||l_rec.step_number);
794: END IF;
795: l_customized := FND_PROFILE.VALUE('QP_GET_CUSTOM_PRICE_CUSTOMIZED');
796: IF l_customized = 'Y' THEN
797: IF l_debug = FND_API.G_TRUE THEN
798: QP_PREQ_GRP.engine_debug('l_customized is Y');
799:
800: END IF;
801: --Populate l_req_line_attrs_tbl

Line 856: x_return_status := FND_API.G_RET_STS_ERROR;

852: l_null_step_number_tbl(l_rec.step_number) := l_rec.step_number;
853: END;
854:
855: ELSE --If customized = 'N'
856: x_return_status := FND_API.G_RET_STS_ERROR;
857: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
858: THEN
859: RAISE E_CUSTOMIZE_GET_CUSTOM_PRICE;
860: END IF;

Line 865: IF l_debug = FND_API.G_TRUE THEN

861: END IF;
862:
863: ELSIF l_rec.price_formula_line_type_code = 'PRA' THEN
864:
865: IF l_debug = FND_API.G_TRUE THEN
866: QP_PREQ_GRP.engine_debug('Formula Line Type = PRA, Step = ' ||l_rec.step_number);
867:
868: END IF;
869: OPEN pra_cur(l_rec.pricing_attribute_context, l_rec.pricing_attribute,

Line 877: IF l_debug = FND_API.G_TRUE THEN

873: IF pra_cur%FOUND THEN
874: --Return the matching pricing attribute value that is found.
875: BEGIN
876: -- bug 2195879
877: IF l_debug = FND_API.G_TRUE THEN
878: QP_PREQ_GRP.engine_debug('l_pra_rec.value_from = '||l_pra_rec.value_from);
879: END IF;
880: l_formula_line_tbl(l_rec.step_number).component_value :=
881: qp_number.canonical_to_number(l_pra_rec.value_from);

Line 885: IF l_debug = FND_API.G_TRUE THEN

881: qp_number.canonical_to_number(l_pra_rec.value_from);
882:
883: l_Operand_Tbl(l_rec.step_number) := l_formula_line_tbl(l_rec.step_number).component_value;
884:
885: IF l_debug = FND_API.G_TRUE THEN
886: QP_PREQ_GRP.engine_debug('Just after pra cur value from to number conversion');
887: END IF;
888: EXCEPTION
889: WHEN OTHERS THEN

Line 890: x_return_status := FND_API.G_RET_STS_ERROR;

886: QP_PREQ_GRP.engine_debug('Just after pra cur value from to number conversion');
887: END IF;
888: EXCEPTION
889: WHEN OTHERS THEN
890: x_return_status := FND_API.G_RET_STS_ERROR;
891: IF l_debug = FND_API.G_TRUE THEN
892: QP_PREQ_GRP.engine_debug('Error converting PRA value to number');
893: END IF;
894: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 891: IF l_debug = FND_API.G_TRUE THEN

887: END IF;
888: EXCEPTION
889: WHEN OTHERS THEN
890: x_return_status := FND_API.G_RET_STS_ERROR;
891: IF l_debug = FND_API.G_TRUE THEN
892: QP_PREQ_GRP.engine_debug('Error converting PRA value to number');
893: END IF;
894: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
895: THEN

Line 923: IF l_debug = FND_API.G_TRUE THEN

919: p_list_line_type_code;
920:
921: ELSIF l_rec.price_formula_line_type_code = 'PLL' THEN
922:
923: IF l_debug = FND_API.G_TRUE THEN
924: QP_PREQ_GRP.engine_debug('Formula Line Type = PLL, Step = ' ||l_rec.step_number);
925: END IF;
926: /*
927: INDX,QP_FORMULA_PRICE_CALC_PVT.calculate.sel2,QP_LIST_LINES_PK,LIST_LINE_ID,1

Line 958: IF l_debug = FND_API.G_TRUE THEN

954: p_list_line_type_code;
955:
956: ELSIF l_rec.price_formula_line_type_code = 'ML' THEN
957:
958: IF l_debug = FND_API.G_TRUE THEN
959: QP_PREQ_GRP.engine_debug('Formula Line Type = ML, Step = ' ||l_rec.step_number);
960: END IF;
961: --null; --Do nothing here. All factor lists will be processed together later
962: --l_Operand_Tbl(l_rec.step_number) :=null;----6726052,7249280 smbalara 10273166-commenting as factor list is processed above

Line 978: x_return_status := FND_API.G_RET_STS_ERROR;

974: l_formula_line_tbl(l_rec.step_number).list_line_type_code := p_list_line_type_code;
975: --smbalara 11898355 end
976: ELSE --if price_formula_line_type_code is not one of the expected values.
977:
978: x_return_status := FND_API.G_RET_STS_ERROR;
979: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
980: THEN
981: FND_MESSAGE.SET_NAME('QP','QP_INVALID_FORMULA_LINE_TYPE');
982: END IF;

Line 989: IF l_debug = FND_API.G_TRUE THEN

985: l_req_line_attrs_tbl.delete; --3531890 attribute were getting accumulated for every step
986: -- smbalara bug 7188211
987: --Based on a profile option,formula step values will be inserted into qp_nformula_step_values_tmp
988: IF QP_PREQ_GRP.G_INSERT_FORMULA_STEP_VALUES = 'Y' THEN
989: IF l_debug = FND_API.G_TRUE THEN
990: QP_PREQ_GRP.engine_debug('Before populating formula stepvalues temp table');
991: QP_PREQ_GRP.engine_debug('Value price_formula_id ='||l_formula_line_tbl(l_rec.step_number).price_formula_id );
992: QP_PREQ_GRP.engine_debug('Value step_number ='||l_formula_line_tbl(l_rec.step_number).step_number );
993: QP_PREQ_GRP.engine_debug('Value component_value ='||l_formula_line_tbl(l_rec.step_number).component_value );

Line 1021: IF l_debug = FND_API.G_TRUE THEN

1017: l_formula_line_tbl(l_rec.step_number).list_line_type_code,
1018: l_formula_line_tbl(l_rec.step_number).list_header_id,
1019: l_formula_line_tbl(l_rec.step_number).list_line_id
1020: );
1021: IF l_debug = FND_API.G_TRUE THEN
1022: QP_PREQ_GRP.engine_debug('After populating formula step values temp table');
1023: END IF;
1024: END IF;
1025: -- smbalara bug 7188211

Line 1033: /* IF l_debug = FND_API.G_TRUE THEN

1029: 'FM999999999999999999999.9999999999999999999999999999999999999999';
1030: --commenting below for bug 10273166 smbalara START
1031: -- Now Process all Factor Lists in the formula
1032:
1033: /* IF l_debug = FND_API.G_TRUE THEN
1034: QP_PREQ_GRP.engine_debug('Before populating plsql table of formula lines');
1035:
1036: END IF;
1037: --Populate l_formula_line_tbl for all factor lists in the formula

Line 1042: IF l_debug = FND_API.G_TRUE THEN

1038: FOR l_factors_rec IN factors_cur (p_price_formula_id, p_line_index,
1039: p_price_effective_date)
1040: LOOP
1041:
1042: IF l_debug = FND_API.G_TRUE THEN
1043: QP_PREQ_GRP.engine_debug('enter factors_cur loop');
1044:
1045: END IF;
1046: IF l_skip_factor AND

Line 1053: IF l_debug = FND_API.G_TRUE THEN

1049: l_old_step_number := l_factors_rec.step_number;
1050: GOTO factors_loop;
1051: END IF;
1052:
1053: IF l_debug = FND_API.G_TRUE THEN
1054: QP_PREQ_GRP.engine_debug('after skip check ');
1055:
1056: END IF;
1057: l_skip_factor := FALSE;

Line 1082: IF l_debug = FND_API.G_TRUE THEN

1078: l_factors_rec.list_line_id;
1079: l_formula_line_tbl(l_factors_rec.step_number).list_line_type_code :=
1080: p_list_line_type_code;
1081:
1082: IF l_debug = FND_API.G_TRUE THEN
1083: QP_PREQ_GRP.engine_debug('In factors_cur, step = ' ||l_factors_rec.step_number);
1084:
1085: END IF;
1086: l_skip_factor := TRUE;

Line 1124: IF l_debug = FND_API.G_TRUE THEN

1120: l_factors_rec.list_line_id;
1121: l_formula_line_tbl(l_factors_rec.step_number).list_line_type_code :=
1122: p_list_line_type_code;
1123:
1124: IF l_debug = FND_API.G_TRUE THEN
1125: QP_PREQ_GRP.engine_debug('In sub_factors_cur, step = ' ||l_factors_rec.step_number);
1126:
1127: END IF;
1128: l_skip_factor := TRUE;

Line 1142: IF l_debug = FND_API.G_TRUE THEN

1138:
1139: <>
1140: null;
1141:
1142: IF l_debug = FND_API.G_TRUE THEN
1143: QP_PREQ_GRP.engine_debug('exit factors_cur loop');
1144:
1145: END IF;
1146: END LOOP; --Loop over factors_cur

Line 1148: IF l_debug = FND_API.G_TRUE THEN

1144:
1145: END IF;
1146: END LOOP; --Loop over factors_cur
1147:
1148: IF l_debug = FND_API.G_TRUE THEN
1149: QP_PREQ_GRP.engine_debug('After populating plsql table of formula lines');
1150:
1151: END IF;*/
1152: --commenting above for bug 10273166 smbalara END

Line 1158: IF l_debug = FND_API.G_TRUE THEN

1154: --populate qp_nformula_step_values_tmp table
1155: /* commented for bug 7188211 - temp table insert moved above
1156: IF QP_PREQ_GRP.G_INSERT_FORMULA_STEP_VALUES = 'Y' THEN
1157:
1158: IF l_debug = FND_API.G_TRUE THEN
1159: QP_PREQ_GRP.engine_debug('Before populating formula stepvalues temp table');
1160:
1161: END IF;
1162: i:= l_formula_line_tbl.FIRST; --set loop index to first element in plsql tbl

Line 1197: IF l_debug = FND_API.G_TRUE THEN

1193: END IF; --If list_line_type_code = 'PLL'
1194:
1195: EXCEPTION
1196: WHEN OTHERS THEN
1197: IF l_debug = FND_API.G_TRUE THEN
1198: QP_PREQ_GRP.engine_debug(substr(sqlerrm, 1, 240));
1199: END IF;
1200: END;
1201:

Line 1206: IF l_debug = FND_API.G_TRUE THEN

1202: i := l_formula_line_tbl.NEXT(i);--set i to next notnull position in plsql
1203:
1204: END LOOP; --loop over l_formula_line_tbl
1205:
1206: IF l_debug = FND_API.G_TRUE THEN
1207: QP_PREQ_GRP.engine_debug('After populating formula step values temp table');
1208:
1209: END IF;
1210: END IF; --If profile option is set

Line 1212: IF l_debug = FND_API.G_TRUE THEN

1208:
1209: END IF;
1210: END IF; --If profile option is set
1211: commented for bug 7188211*/
1212: IF l_debug = FND_API.G_TRUE THEN
1213: QP_PREQ_GRP.engine_debug('Before Calling - QP_BUILD_FORMULA_RULES.Get_Formula_Values');
1214: QP_PREQ_GRP.engine_debug('For Formula : '||l_formula);----6726052,7249280 smbalara
1215: QP_PREQ_GRP.engine_debug('Maintain Dynamic pkgs profile is :'||L_MAINT_DYN_SRC_VER);
1216: END IF;

Line 1227: IF l_debug = FND_API.G_TRUE THEN

1223: l_return_status);
1224: ELSE
1225: BEGIN
1226: SELECT SEEDED_VALUE INTO l_pkg_ver FROM qp_parameters_b WHERE PARAMETER_CODE='BLD_FORMULA_ACTV_VER' AND ROWNUM=1;
1227: IF l_debug = FND_API.G_TRUE THEN
1228: QP_PREQ_GRP.engine_debug('1. found row in qp_params for code BLD_FORMULA_ACTV_VER pkg ver : ' || l_pkg_ver);
1229: END IF;
1230: EXCEPTION
1231: WHEN OTHERS THEN

Line 1233: IF l_debug = FND_API.G_TRUE THEN

1229: END IF;
1230: EXCEPTION
1231: WHEN OTHERS THEN
1232: l_pkg_ver:='0';
1233: IF l_debug = FND_API.G_TRUE THEN
1234: QP_PREQ_GRP.engine_debug('1. when others row in qp_params for code BLD_FORMULA_ACTV_VER pkg ver: ' || l_pkg_ver);
1235: END IF;
1236: END;
1237: IF (l_pkg_ver='5') THEN

Line 1277: IF l_debug = FND_API.G_TRUE THEN

1273: END IF;
1274: END IF;
1275: -- 13638721
1276:
1277: IF l_debug = FND_API.G_TRUE THEN
1278: QP_PREQ_GRP.engine_debug('After Calling - QP_BUILD_FORMULA_RULES.Get_Formula_Values');
1279:
1280: QP_PREQ_GRP.engine_debug('Return Status from Get_Formula_Values ' || l_return_status);
1281:

Line 1283: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) OR (l_formula_value IS NULL) THEN

1279:
1280: QP_PREQ_GRP.engine_debug('Return Status from Get_Formula_Values ' || l_return_status);
1281:
1282: END IF;
1283: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) OR (l_formula_value IS NULL) THEN
1284: l_formula_value := Select_From_Dual(l_formula, l_operand_tbl);
1285:
1286: IF l_formula_value IS NULL THEN
1287: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1287: x_return_status := FND_API.G_RET_STS_ERROR;

1283: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) OR (l_formula_value IS NULL) THEN
1284: l_formula_value := Select_From_Dual(l_formula, l_operand_tbl);
1285:
1286: IF l_formula_value IS NULL THEN
1287: x_return_status := FND_API.G_RET_STS_ERROR;
1288: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1289: THEN
1290: Set_Message( p_price_formula_id => p_price_formula_id,
1291: p_formula_name => l_formula_name,

Line 1299: IF l_debug = FND_API.G_TRUE THEN

1295: END IF;
1296:
1297: END IF;
1298:
1299: IF l_debug = FND_API.G_TRUE THEN
1300: QP_PREQ_GRP.engine_debug('Formula evaluated to ' || l_formula_value);
1301:
1302: QP_PREQ_GRP.engine_debug('Formula Return Status ' || l_return_status);
1303:

Line 1310: IF l_debug = FND_API.G_TRUE THEN

1306:
1307: l_formula_end_time := dbms_utility.get_time;
1308: l_time_difference := (l_formula_end_time - l_formula_start_time)/100 ;
1309:
1310: IF l_debug = FND_API.G_TRUE THEN
1311: QP_PREQ_GRP.engine_debug('##### Total Time in QP_FORMULA_PRICE_CALC_PVT(in sec) : ' || l_time_difference || ' #####');
1312:
1313: END IF;
1314: RETURN l_formula_value;

Line 1320: x_return_status := FND_API.G_RET_STS_ERROR;

1316:
1317: EXCEPTION
1318:
1319: WHEN E_FORMULA_NOT_FOUND THEN
1320: x_return_status := FND_API.G_RET_STS_ERROR;
1321: fnd_message.set_name('QP','QP_FORMULA_NOT_FOUND');
1322: fnd_message.set_token('FORMULA_NAME',l_formula_name);
1323: -- Change mask back to flexible mask
1324: qp_number.canonical_mask := 'FM999999999999999999999.9999999999999999999999999999999999999999';

Line 1328: x_return_status := FND_API.G_RET_STS_ERROR;

1324: qp_number.canonical_mask := 'FM999999999999999999999.9999999999999999999999999999999999999999';
1325: RETURN l_formula_value;
1326:
1327: WHEN E_INVALID_FORMULA THEN
1328: x_return_status := FND_API.G_RET_STS_ERROR;
1329: fnd_message.set_name('QP','QP_INVALID_FORMULA');
1330: fnd_message.set_token('FORMULA_NAME',l_formula_name);
1331: -- Change mask back to flexible mask
1332: qp_number.canonical_mask := 'FM999999999999999999999.9999999999999999999999999999999999999999';

Line 1336: x_return_status := FND_API.G_RET_STS_ERROR;

1332: qp_number.canonical_mask := 'FM999999999999999999999.9999999999999999999999999999999999999999';
1333: RETURN l_formula_value;
1334:
1335: WHEN E_FORMULA_COMPONENTS_REQ THEN
1336: x_return_status := FND_API.G_RET_STS_ERROR;
1337: fnd_message.set_name('QP','QP_FORMULA_COMPONENTS_REQ');
1338: fnd_message.set_token('FORMULA_NAME',l_formula_name);
1339: -- Change mask back to flexible mask
1340: qp_number.canonical_mask := 'FM999999999999999999999.9999999999999999999999999999999999999999';

Line 1344: x_return_status := FND_API.G_RET_STS_ERROR;

1340: qp_number.canonical_mask := 'FM999999999999999999999.9999999999999999999999999999999999999999';
1341: RETURN l_formula_value;
1342:
1343: WHEN E_CUSTOMIZE_GET_CUSTOM_PRICE THEN
1344: x_return_status := FND_API.G_RET_STS_ERROR;
1345: fnd_message.set_name('QP','QP_CUSTOMIZE_GET_CUSTOM_PRICE');
1346: fnd_message.set_token('FORMULA_NAME',l_formula_name);
1347: -- Change mask back to flexible mask
1348: qp_number.canonical_mask := 'FM999999999999999999999.9999999999999999999999999999999999999999';

Line 1352: x_return_status := FND_API.G_RET_STS_ERROR;

1348: qp_number.canonical_mask := 'FM999999999999999999999.9999999999999999999999999999999999999999';
1349: RETURN l_formula_value;
1350:
1351: WHEN E_INVALID_NUMBER THEN
1352: x_return_status := FND_API.G_RET_STS_ERROR;
1353: fnd_message.set_name('QP','QP_INVALID_NUMBER');
1354: fnd_message.set_token('FORMULA_NAME',l_formula_name);
1355: -- Change mask back to flexible mask
1356: qp_number.canonical_mask := 'FM999999999999999999999.9999999999999999999999999999999999999999';

Line 1359: WHEN FND_API.G_EXC_ERROR THEN

1355: -- Change mask back to flexible mask
1356: qp_number.canonical_mask := 'FM999999999999999999999.9999999999999999999999999999999999999999';
1357: RETURN l_formula_value;
1358:
1359: WHEN FND_API.G_EXC_ERROR THEN
1360:
1361: x_return_status := FND_API.G_RET_STS_ERROR;
1362:
1363: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 1361: x_return_status := FND_API.G_RET_STS_ERROR;

1357: RETURN l_formula_value;
1358:
1359: WHEN FND_API.G_EXC_ERROR THEN
1360:
1361: x_return_status := FND_API.G_RET_STS_ERROR;
1362:
1363: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1364: THEN
1365: FND_MESSAGE.SET_NAME('QP','QP_FORMULA_FAILED');

Line 1367: IF l_debug = FND_API.G_TRUE THEN

1363: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1364: THEN
1365: FND_MESSAGE.SET_NAME('QP','QP_FORMULA_FAILED');
1366: END IF;
1367: IF l_debug = FND_API.G_TRUE THEN
1368: QP_PREQ_GRP.engine_debug('Exception '||substr(sqlerrm, 1, 240));
1369: QP_PREQ_GRP.engine_debug('Exception occurred. Formula value returned is ' ||
1370: l_formula_value);
1371: END IF;

Line 1380: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1376: qp_number.canonical_mask := 'FM999999999999999999999.9999999999999999999999999999999999999999';
1377:
1378: RETURN l_formula_value;
1379:
1380: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1381:
1382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1383: IF l_debug = FND_API.G_TRUE THEN
1384: QP_PREQ_GRP.engine_debug('Unexpected Exception '||substr(sqlerrm, 1, 240));

Line 1382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1378: RETURN l_formula_value;
1379:
1380: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1381:
1382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1383: IF l_debug = FND_API.G_TRUE THEN
1384: QP_PREQ_GRP.engine_debug('Unexpected Exception '||substr(sqlerrm, 1, 240));
1385: QP_PREQ_GRP.engine_debug('Exception occurred. Formula value returned is ' ||
1386: l_formula_value);

Line 1383: IF l_debug = FND_API.G_TRUE THEN

1379:
1380: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1381:
1382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1383: IF l_debug = FND_API.G_TRUE THEN
1384: QP_PREQ_GRP.engine_debug('Unexpected Exception '||substr(sqlerrm, 1, 240));
1385: QP_PREQ_GRP.engine_debug('Exception occurred. Formula value returned is ' ||
1386: l_formula_value);
1387:

Line 1398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1394: RETURN l_formula_value;
1395:
1396: WHEN OTHERS THEN
1397:
1398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1399:
1400: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1401: THEN
1402: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,

Line 1406: IF l_debug = FND_API.G_TRUE THEN

1402: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
1403: 'Calculate:'||sqlerrm);
1404: END IF;
1405:
1406: IF l_debug = FND_API.G_TRUE THEN
1407: QP_PREQ_GRP.engine_debug('Other Exception '||substr(sqlerrm, 1, 240));
1408: QP_PREQ_GRP.engine_debug('Exception occurred. Formula value returned is ' ||
1409: l_formula_value);
1410:

Line 1582: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) OR (x_formula_value IS NULL) THEN

1578:
1579: QP_Build_Formula_Rules.Get_Formula_Values(p_formula, l_operand_tbl, p_procedure_type,
1580: x_formula_value, x_return_status);
1581:
1582: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) OR (x_formula_value IS NULL) THEN
1583: x_formula_value := Select_From_Dual(p_formula, l_operand_tbl);
1584:
1585: IF x_formula_value IS NULL THEN
1586: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1586: x_return_status := FND_API.G_RET_STS_ERROR;

1582: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) OR (x_formula_value IS NULL) THEN
1583: x_formula_value := Select_From_Dual(p_formula, l_operand_tbl);
1584:
1585: IF x_formula_value IS NULL THEN
1586: x_return_status := FND_API.G_RET_STS_ERROR;
1587: ELSE
1588: x_return_status := FND_API.G_RET_STS_SUCCESS;
1589: END IF;
1590: END IF;

Line 1588: x_return_status := FND_API.G_RET_STS_SUCCESS;

1584:
1585: IF x_formula_value IS NULL THEN
1586: x_return_status := FND_API.G_RET_STS_ERROR;
1587: ELSE
1588: x_return_status := FND_API.G_RET_STS_SUCCESS;
1589: END IF;
1590: END IF;
1591: END Java_Get_Formula_Values;
1592: