eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.QP_CALCULATE_PRICE_PUB dependencies on QP_CALCULATE_PRICE_PUB

Line 1: PACKAGE BODY QP_Calculate_Price_PUB AS

1: PACKAGE BODY QP_Calculate_Price_PUB AS
2: /* $Header: QPXPCLPB.pls 120.28.12020000.5 2013/01/22 07:09:44 smbalara ship $ */
3:
4: l_debug VARCHAR2(3);
5: l_line_index NUMBER; -- for accum range break

Line 76: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Calculate_List_Price';

72: x_percent_price OUT NOCOPY NUMBER,
73: x_return_status OUT NOCOPY VARCHAR2,
74: x_return_status_txt OUT NOCOPY VARCHAR2) AS
75:
76: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Calculate_List_Price';
77: v_price_round_options VARCHAR2(30) := NULL; --shu, new rounding
78:
79: BEGIN
80: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;

Line 122: v_price_round_options := nvl(FND_PROFILE.VALUE('QP_SELLING_PRICE_ROUNDING_OPTIONS'), QP_Calculate_Price_PUB.G_NO_ROUND); --shu, new rounding

118: ELSIF (QP_PREQ_GRP.G_ROUNDING_FLAG = G_CHAR_Q) THEN -- check v_selling_price_rounding_options profile
119: IF l_debug = FND_API.G_TRUE THEN
120: QP_PREQ_GRP.engine_debug('are we here 2?');
121: END IF;
122: v_price_round_options := nvl(FND_PROFILE.VALUE('QP_SELLING_PRICE_ROUNDING_OPTIONS'), QP_Calculate_Price_PUB.G_NO_ROUND); --shu, new rounding
123: IF l_debug = FND_API.G_TRUE THEN
124: QP_PREQ_GRP.engine_debug('selling_price_rounding_options: '|| v_price_round_options );
125: END IF;
126: IF (v_price_round_options = G_ROUND_ADJ AND p_rounding_factor IS NOT NULL) THEN

Line 161: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Calculate_List_Price_PVT';

157: x_extended_price OUT NOCOPY NUMBER, -- block pricing
158: x_return_status OUT NOCOPY VARCHAR2,
159: x_return_status_txt OUT NOCOPY VARCHAR2) AS
160:
161: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Calculate_List_Price_PVT';
162: v_price_round_options VARCHAR2(30) := NULL; --shu, new rounding
163:
164: BEGIN
165: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;

Line 219: v_price_round_options := nvl(FND_PROFILE.VALUE('QP_SELLING_PRICE_ROUNDING_OPTIONS'), QP_Calculate_Price_PUB.G_NO_ROUND); --shu, new rounding

215: x_percent_price := ROUND(x_percent_price, p_rounding_factor);
216:
217: ELSIF (QP_PREQ_GRP.G_ROUNDING_FLAG = G_CHAR_Q) THEN -- check v_selling_price_rounding_options profile
218:
219: v_price_round_options := nvl(FND_PROFILE.VALUE('QP_SELLING_PRICE_ROUNDING_OPTIONS'), QP_Calculate_Price_PUB.G_NO_ROUND); --shu, new rounding
220: IF l_debug = FND_API.G_TRUE THEN
221: QP_PREQ_GRP.engine_debug('selling_price_rounding_options: '|| v_price_round_options );
222: END IF;
223:

Line 263: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Calculate_Adjusted_Price';

259: x_return_status OUT NOCOPY VARCHAR2,
260: x_return_status_txt OUT NOCOPY VARCHAR2) AS
261:
262: v_list_price NUMBER;
263: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Calculate_Adjusted_Price';
264: v_price_round_options VARCHAR2(30) := NULL; --shu, new rounding
265:
266: BEGIN
267: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;

Line 718: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Process_Price_Break';

714:
715: l_continuous_flag VARCHAR2(1) := 'N';
716: l_prorated_flag VARCHAR2(1) := 'N';
717:
718: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Process_Price_Break';
719:
720: BEGIN
721:
722: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;

Line 1325: l_price_round_options := nvl(FND_PROFILE.VALUE('QP_SELLING_PRICE_ROUNDING_OPTIONS'), QP_Calculate_Price_PUB.G_NO_ROUND);

1321:
1322: IF (nvl(QP_PREQ_GRP.G_ROUNDING_FLAG, QP_PREQ_GRP.G_YES) = QP_PREQ_GRP.G_YES AND p_rounding_factor IS NOT NULL) THEN
1323: x_pbh_list_price := ROUND (x_pbh_list_price, p_rounding_factor); -- Divide by grp amount/unit or group quantity
1324: ELSIF (QP_PREQ_GRP.G_ROUNDING_FLAG = G_CHAR_Q) THEN -- check v_selling_price_rounding_options profile
1325: l_price_round_options := nvl(FND_PROFILE.VALUE('QP_SELLING_PRICE_ROUNDING_OPTIONS'), QP_Calculate_Price_PUB.G_NO_ROUND);
1326: IF (l_price_round_options = G_ROUND_ADJ AND p_rounding_factor IS NOT NULL) THEN
1327: x_pbh_list_price := ROUND (x_pbh_list_price, p_rounding_factor); -- Divide by grp amount/unit or group quantity
1328: END IF; -- end if G_ROUND_ADJ
1329: END IF; --end if rounding stuff

Line 1402: l_routine VARCHAR2(50) := 'QP_Calculate_Price_PUB.Calculate_Adjustment';

1398: , x_calc_adjustment OUT NOCOPY NUMBER
1399: , x_return_status OUT NOCOPY VARCHAR2
1400: , x_return_status_text OUT NOCOPY VARCHAR2) IS
1401:
1402: l_routine VARCHAR2(50) := 'QP_Calculate_Price_PUB.Calculate_Adjustment';
1403:
1404: BEGIN
1405: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
1406: IF l_debug = FND_API.G_TRUE THEN

Line 1904: l_routine VARCHAR2(50) := 'QP_Calculate_Price_PUB.Price_Break_Calculation';

1900: l_ord_qty_operand NUMBER := 0;
1901: l_ord_qty_adj_amt NUMBER := 0;
1902: v_attribute_value_per_unit NUMBER := 0; --2388011_latest
1903: l_priced_quantity NUMBER := 0; -- fte breakunit
1904: l_routine VARCHAR2(50) := 'QP_Calculate_Price_PUB.Price_Break_Calculation';
1905:
1906: -- 4061138, 5183755 continuous price breaks
1907: CURSOR get_continuous_flag_cur IS
1908: SELECT nvl(qpll.continuous_price_break_flag, 'N')

Line 2398: l_routine VARCHAR2(50) := 'QP_Calculate_Price_PUB.Price_Break_Calculation';

2394: l_qualifier_value NUMBER := 0;
2395: l_total_value NUMBER;
2396: l_satisfied_value NUMBER;
2397: l_range_adjustment NUMBER := 0;
2398: l_routine VARCHAR2(50) := 'QP_Calculate_Price_PUB.Price_Break_Calculation';
2399:
2400: -- 4061138, 5183755 continuous price breaks
2401: CURSOR get_continuous_flag_cur IS
2402: SELECT nvl(continuous_price_break_flag, 'N')

Line 2649: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.GSA_Max_Discount_Check';

2645: x_return_status_txt OUT NOCOPY VARCHAR2) AS
2646:
2647: v_list_line_id NUMBER;
2648: v_operand NUMBER;
2649: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.GSA_Max_Discount_Check';
2650: v_source_system_code VARCHAR2(30);
2651:
2652: GSA_VIOLATION EXCEPTION;
2653:

Line 2764: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Calculate_Price';

2760: v_total_value NUMBER; -- end 2388011, LINEGROUP PBH
2761: x_ret_status VARCHAR2(30);
2762: x_ret_status_txt VARCHAR2(240);
2763: l_pbh_rounding_fact NUMBER; --10093463
2764: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Calculate_Price';
2765: --v_round_individual_adj_flag varchar2(3); --shu
2766: v_price_round_options VARCHAR2(30) := FND_PROFILE.VALUE('QP_SELLING_PRICE_ROUNDING_OPTIONS'); --shu, new rounding
2767:
2768: BEGIN

Line 3308: END QP_Calculate_Price_PUB;

3304: x_return_status_txt := v_routine_name || ' ' || SQLERRM;
3305:
3306: END Calculate_Price;
3307:
3308: END QP_Calculate_Price_PUB;