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.22.12010000.2 2008/10/15 14:32:22 dnema 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 710: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Process_Price_Break';

706:
707: l_continuous_flag VARCHAR2(1) := 'N';
708: l_prorated_flag VARCHAR2(1) := 'N';
709:
710: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Process_Price_Break';
711:
712: BEGIN
713:
714: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;

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

1313:
1314: 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
1315: x_pbh_list_price := ROUND (x_pbh_list_price, p_rounding_factor); -- Divide by grp amount/unit or group quantity
1316: ELSIF (QP_PREQ_GRP.G_ROUNDING_FLAG = G_CHAR_Q) THEN -- check v_selling_price_rounding_options profile
1317: l_price_round_options := nvl(FND_PROFILE.VALUE('QP_SELLING_PRICE_ROUNDING_OPTIONS'), QP_Calculate_Price_PUB.G_NO_ROUND);
1318: IF (l_price_round_options = G_ROUND_ADJ AND p_rounding_factor IS NOT NULL) THEN
1319: x_pbh_list_price := ROUND (x_pbh_list_price, p_rounding_factor); -- Divide by grp amount/unit or group quantity
1320: END IF; -- end if G_ROUND_ADJ
1321: END IF; --end if rounding stuff

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

1390: , x_calc_adjustment OUT NOCOPY NUMBER
1391: , x_return_status OUT NOCOPY VARCHAR2
1392: , x_return_status_text OUT NOCOPY VARCHAR2) IS
1393:
1394: l_routine VARCHAR2(50) := 'QP_Calculate_Price_PUB.Calculate_Adjustment';
1395:
1396: BEGIN
1397: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
1398: IF l_debug = FND_API.G_TRUE THEN

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

1863: l_ord_qty_operand NUMBER := 0;
1864: l_ord_qty_adj_amt NUMBER := 0;
1865: v_attribute_value_per_unit NUMBER := 0; --2388011_latest
1866: l_priced_quantity NUMBER := 0; -- fte breakunit
1867: l_routine VARCHAR2(50) := 'QP_Calculate_Price_PUB.Price_Break_Calculation';
1868:
1869: -- 4061138, 5183755 continuous price breaks
1870: CURSOR get_continuous_flag_cur IS
1871: SELECT nvl(qpll.continuous_price_break_flag, 'N')

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

2338: l_qualifier_value NUMBER := 0;
2339: l_total_value NUMBER;
2340: l_satisfied_value NUMBER;
2341: l_range_adjustment NUMBER := 0;
2342: l_routine VARCHAR2(50) := 'QP_Calculate_Price_PUB.Price_Break_Calculation';
2343:
2344: -- 4061138, 5183755 continuous price breaks
2345: CURSOR get_continuous_flag_cur IS
2346: SELECT nvl(continuous_price_break_flag, 'N')

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

2589: x_return_status_txt OUT NOCOPY VARCHAR2) AS
2590:
2591: v_list_line_id NUMBER;
2592: v_operand NUMBER;
2593: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.GSA_Max_Discount_Check';
2594: v_source_system_code VARCHAR2(30);
2595:
2596: GSA_VIOLATION EXCEPTION;
2597:

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

2704: v_total_value NUMBER; -- end 2388011, LINEGROUP PBH
2705: x_ret_status VARCHAR2(30);
2706: x_ret_status_txt VARCHAR2(240);
2707:
2708: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Calculate_Price_PUB.Calculate_Price';
2709: --v_round_individual_adj_flag varchar2(3); --shu
2710: v_price_round_options VARCHAR2(30) := FND_PROFILE.VALUE('QP_SELLING_PRICE_ROUNDING_OPTIONS'); --shu, new rounding
2711:
2712: BEGIN

Line 3246: END QP_Calculate_Price_PUB;

3242: x_return_status_txt := v_routine_name || ' ' || SQLERRM;
3243:
3244: END Calculate_Price;
3245:
3246: END QP_Calculate_Price_PUB;