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_UTIL_PUB dependencies on FND_API

Line 17: IF l_debug = Fnd_Api.G_TRUE THEN

13: IS
14: PRAGMA AUTONOMOUS_TRANSACTION;
15: BEGIN
16:
17: IF l_debug = Fnd_Api.G_TRUE THEN
18: Qp_Preq_Grp.engine_debug('***Begin Update_Balance***');
19:
20: END IF;
21: UPDATE qp_limit_balances

Line 30: IF l_debug = Fnd_Api.G_TRUE THEN

26: WHERE limit_balance_id = p_limit_balance_id;
27:
28: COMMIT;
29:
30: IF l_debug = Fnd_Api.G_TRUE THEN
31: Qp_Preq_Grp.engine_debug('***End Update_Balance***');
32:
33: END IF;
34: END Update_Balance;

Line 69: IF l_debug = Fnd_Api.G_TRUE THEN

65: --bug 13521835
66: BEGIN
67:
68: l_debug := Qp_Preq_Grp.G_DEBUG_ENGINE;
69: IF l_debug = Fnd_Api.G_TRUE THEN
70: Qp_Preq_Grp.engine_debug('***Begin Procedure Reverse_Limit *** ');
71:
72: END IF;
73: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 73: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

69: IF l_debug = Fnd_Api.G_TRUE THEN
70: Qp_Preq_Grp.engine_debug('***Begin Procedure Reverse_Limit *** ');
71:
72: END IF;
73: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
74:
75: --Price Request Code corresponding to the consuming order line is mandatory.
76: IF p_cons_price_request_code IS NULL THEN
77: Fnd_Message.SET_NAME('QP','QP_PARAMETER_REQUIRED');

Line 80: RAISE Fnd_Api.G_EXC_ERROR;

76: IF p_cons_price_request_code IS NULL THEN
77: Fnd_Message.SET_NAME('QP','QP_PARAMETER_REQUIRED');
78: Fnd_Message.SET_TOKEN('PARAMETER',p_cons_price_request_code);
79: x_return_message := Fnd_Message.GET;
80: RAISE Fnd_Api.G_EXC_ERROR;
81:
82: END IF;
83:
84: --Action Code is mandatory.

Line 90: RAISE Fnd_Api.G_EXC_ERROR;

86:
87: Fnd_Message.SET_NAME('QP','QP_PARAMETER_REQUIRED');
88: Fnd_Message.SET_TOKEN('PARAMETER',p_action_code);
89: x_return_message := Fnd_Message.GET;
90: RAISE Fnd_Api.G_EXC_ERROR;
91:
92: END IF;
93:
94: --Originally ordered qty must be not-null and non-zero.

Line 101: RAISE Fnd_Api.G_EXC_ERROR;

97:
98: Fnd_Message.SET_NAME('QP','QP_NONZERO_PARAMETER_REQD');
99: Fnd_Message.SET_TOKEN('PARAMETER',p_orig_ordered_qty);
100: x_return_message := Fnd_Message.GET;
101: RAISE Fnd_Api.G_EXC_ERROR;
102:
103: END IF;
104:
105: --If Action Code is 'RETURN' then the returned qty must be not null.

Line 111: RAISE Fnd_Api.G_EXC_ERROR;

107:
108: Fnd_Message.SET_NAME('QP','QP_PARAMETER_REQUIRED');
109: Fnd_Message.SET_TOKEN('PARAMETER',p_returned_qty);
110: x_return_message := Fnd_Message.GET;
111: RAISE Fnd_Api.G_EXC_ERROR;
112:
113: END IF;
114:
115: --If Action Code is 'RETURN' then the price_request_code of the return

Line 122: RAISE Fnd_Api.G_EXC_ERROR;

118:
119: Fnd_Message.SET_NAME('QP','QP_PARAMETER_REQUIRED');
120: Fnd_Message.SET_TOKEN('PARAMETER',p_ret_price_request_code);
121: x_return_message := Fnd_Message.GET;
122: RAISE Fnd_Api.G_EXC_ERROR;
123:
124: END IF;
125:
126: --If Action Code is 'AMEND' then the amended qty must be not null.

Line 132: RAISE Fnd_Api.G_EXC_ERROR;

128:
129: Fnd_Message.SET_NAME('QP','QP_PARAMETER_REQUIRED');
130: Fnd_Message.SET_TOKEN('PARAMETER',p_amended_qty);
131: x_return_message := Fnd_Message.GET;
132: RAISE Fnd_Api.G_EXC_ERROR;
133:
134: END IF;
135:
136: --If Action Code is 'AMEND' then the amended qty must not be greater

Line 144: RAISE Fnd_Api.G_EXC_ERROR;

140: Fnd_Message.SET_NAME('QP','QP_PARAMETER_MUST_BE_LESSER');
141: Fnd_Message.SET_TOKEN('PARAMETER1',p_amended_qty);
142: Fnd_Message.SET_TOKEN('PARAMETER2',p_orig_ordered_qty);
143: x_return_message := Fnd_Message.GET;
144: RAISE Fnd_Api.G_EXC_ERROR;
145:
146: END IF;
147:
148: --Proration Ratio Calculation

Line 164: RAISE Fnd_Api.G_EXC_ERROR;

160: --bug#7540503
161: ELSE
162: Fnd_Message.SET_NAME('QP','QP_INVALID_ACTION_CODE');
163: x_return_message := Fnd_Message.GET;
164: RAISE Fnd_Api.G_EXC_ERROR;
165: END IF;
166:
167:
168: --For each Limit Transaction Record for Consuming line's price_request_code,

Line 263: RAISE Fnd_Api.G_EXC_ERROR;

259: EXCEPTION
260: WHEN NO_DATA_FOUND THEN
261: Fnd_Message.SET_NAME('QP','QP_LIMIT_TXN_NOT_FOUND');
262: x_return_message := Fnd_Message.GET;
263: RAISE Fnd_Api.G_EXC_ERROR;
264: END;
265: --Transaction Record to be cancelled/amended exists. Update trxn amount.
266: --bug 13521835
267: BEGIN

Line 394: RAISE FND_API.G_EXC_ERROR;

390: EXCEPTION
391: WHEN NO_DATA_FOUND THEN
392: FND_MESSAGE.SET_NAME('QP','QP_LIMIT_TXN_NOT_FOUND');
393: x_return_message := FND_MESSAGE.GET;
394: RAISE FND_API.G_EXC_ERROR;
395: END;
396: qp_Preq_Grp.engine_debug('l_consumed_amount :'||l_consumed_amount);
397: --bug13521835
398: BEGIN

Line 439: IF l_debug = Fnd_Api.G_TRUE THEN

435: <>
436: NULL;
437: END LOOP;--Loop over limit trxn records of consuming price_request_code
438:
439: IF l_debug = Fnd_Api.G_TRUE THEN
440: Qp_Preq_Grp.engine_debug('***End Procedure Reverse_Limit*** ');
441:
442: END IF;
443: EXCEPTION

Line 444: WHEN Fnd_Api.G_EXC_ERROR THEN

440: Qp_Preq_Grp.engine_debug('***End Procedure Reverse_Limit*** ');
441:
442: END IF;
443: EXCEPTION
444: WHEN Fnd_Api.G_EXC_ERROR THEN
445: x_return_status := Fnd_Api.G_RET_STS_ERROR;
446:
447: WHEN OTHERS THEN
448: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 445: x_return_status := Fnd_Api.G_RET_STS_ERROR;

441:
442: END IF;
443: EXCEPTION
444: WHEN Fnd_Api.G_EXC_ERROR THEN
445: x_return_status := Fnd_Api.G_RET_STS_ERROR;
446:
447: WHEN OTHERS THEN
448: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
449: x_return_message := SUBSTR(SQLERRM,1,2000);

Line 448: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

444: WHEN Fnd_Api.G_EXC_ERROR THEN
445: x_return_status := Fnd_Api.G_RET_STS_ERROR;
446:
447: WHEN OTHERS THEN
448: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
449: x_return_message := SUBSTR(SQLERRM,1,2000);
450:
451: END Reverse_Limits;
452:

Line 669: IF l_debug = FND_API.G_TRUE THEN

665: x_order_status_rec := l_order_status_rec;
666:
667: EXCEPTION
668: WHEN OTHERS THEN
669: IF l_debug = FND_API.G_TRUE THEN
670: qp_preq_grp.engine_debug('Error in Procedure Get_Order_Lines_Status');
671:
672: END IF;
673: END Get_Order_Lines_Status;

Line 926: IF l_debug = Fnd_Api.G_TRUE THEN

922: x_order_status_rec := l_order_status_rec;
923:
924: EXCEPTION
925: WHEN OTHERS THEN
926: IF l_debug = Fnd_Api.G_TRUE THEN
927: Qp_Preq_Grp.engine_debug('Error in Procedure Get_Order_Lines_Status');
928:
929: END IF;
930: END Get_Order_Lines_Status;

Line 979: IF l_debug = FND_API.G_TRUE THEN

975: l_manual_grpline_profile_value Varchar2(1):= Nvl(Fnd_Profile.Value('QP_MANUAL_LINEGROUP'),'N');
976: BEGIN
977: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
978:
979: IF l_debug = FND_API.G_TRUE THEN
980: QP_PREQ_GRP.engine_debug(' Inside Get_Manual_All_Lines_Status ');
981: END IF;
982:
983: x_manual_all_lines_status := 'N';

Line 993: IF l_debug = FND_API.G_TRUE THEN

989: ELSE
990: x_manual_all_lines_status := 'N';
991: END IF;
992:
993: IF l_debug = FND_API.G_TRUE THEN
994: QP_PREQ_GRP.engine_debug(' x_manual_all_lines_status :'||x_manual_all_lines_status);
995: QP_PREQ_GRP.engine_debug(' Leaving Get_Manual_All_Lines_Status ');
996: END IF;
997:

Line 1001: IF l_debug = FND_API.G_TRUE THEN

997:
998: EXCEPTION
999: WHEN OTHERS THEN
1000:
1001: IF l_debug = FND_API.G_TRUE THEN
1002: QP_PREQ_GRP.engine_debug('Error in Procedure Get_Manual_All_Lines_Status');
1003: END IF;
1004:
1005: END Get_Manual_All_Lines_Status;

Line 1060: IF l_debug = Fnd_Api.G_TRUE THEN

1056: -- Added new profile (QP_MULTI_CURRENCY_USAGE) with default value 'Y' to maintain current behaviour,
1057: -- bug 2943033
1058: IF UPPER(Fnd_Profile.value('QP_MULTI_CURRENCY_INSTALLED')) IN ('Y', 'YES') AND
1059: (NVL(Fnd_Profile.value('QP_MULTI_CURRENCY_USAGE'), 'Y') = 'Y') THEN
1060: IF l_debug = Fnd_Api.G_TRUE THEN
1061: Qp_Preq_Grp.engine_debug('validate price list - multi-currency');
1062:
1063: END IF;
1064:

Line 1082: IF l_debug = Fnd_Api.G_TRUE THEN

1078: END IF;
1079:
1080: ELSE --Multi-Currency is not installed
1081:
1082: IF l_debug = Fnd_Api.G_TRUE THEN
1083: Qp_Preq_Grp.engine_debug('validate price list - no multi-currency');
1084:
1085: END IF;
1086: OPEN c_validate_pl_curr_no_multi;

Line 1103: IF l_debug = Fnd_Api.G_TRUE THEN

1099:
1100: END IF; --Multi-Currency is installed
1101:
1102:
1103: IF l_debug = Fnd_Api.G_TRUE THEN
1104: Qp_Preq_Grp.engine_debug('validate price list - result is ' || l_validate_result);
1105:
1106: END IF;
1107: EXCEPTION

Line 1621: IF l_debug = Fnd_Api.G_TRUE THEN

1617: ELSE
1618: l_cust_relation_flag := '';
1619: END IF;
1620: l_debug := Qp_Preq_Grp.G_DEBUG_ENGINE;
1621: IF l_debug = Fnd_Api.G_TRUE THEN
1622: Oe_Debug_Pub.ADD('QP_UTIL_PUB.Get_Price_List BEGIN ');
1623: Oe_Debug_Pub.ADD('l_currency_code = ' || l_currency_code);
1624: Oe_Debug_Pub.ADD('l_pricing_effective_date = ' ||l_pricing_effective_date);
1625: Oe_Debug_Pub.ADD('l_agreement_id = ' || l_agreement_id);

Line 1769: IF l_debug = Fnd_Api.G_TRUE THEN

1765:
1766: BEGIN
1767:
1768: l_debug := Qp_Preq_Grp.G_DEBUG_ENGINE;
1769: IF l_debug = Fnd_Api.G_TRUE THEN
1770: Oe_Debug_Pub.ADD('QP_UTIL_PUB.Get_Price_Lists BEGIN ');
1771: Oe_Debug_Pub.ADD('p_currency_code = ' || p_currency_code);
1772: END IF;
1773:

Line 2134: IF l_debug = Fnd_Api.G_TRUE THEN

2130: l_rounding_factor NUMBER;
2131: l_status_code VARCHAR2(1);
2132: BEGIN
2133: l_debug := Qp_Preq_Grp.G_DEBUG_ENGINE;
2134: IF l_debug = Fnd_Api.G_TRUE THEN
2135: Oe_Debug_Pub.ADD('BEGIN qp_util_pub.get_rounding_factor');
2136: Oe_Debug_Pub.ADD('p_use_multi_currency = ' || p_use_multi_currency);
2137: Oe_Debug_Pub.ADD('p_price_list_id = ' || p_price_list_id);
2138: Oe_Debug_Pub.ADD('p_currency_code = ' || p_currency_code);

Line 2153: IF l_status_code = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

2149: ,x_status_code => l_status_code
2150: ,p_operand_type => 'R'
2151: );
2152:
2153: IF l_status_code = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2154: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2155: END IF;
2156: IF l_debug = Fnd_Api.G_TRUE THEN
2157: Oe_Debug_Pub.ADD('l_rounding_factor = ' || l_rounding_factor);

Line 2154: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2150: ,p_operand_type => 'R'
2151: );
2152:
2153: IF l_status_code = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2154: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2155: END IF;
2156: IF l_debug = Fnd_Api.G_TRUE THEN
2157: Oe_Debug_Pub.ADD('l_rounding_factor = ' || l_rounding_factor);
2158: Oe_Debug_Pub.ADD('l_status_code = ' || l_status_code);

Line 2156: IF l_debug = Fnd_Api.G_TRUE THEN

2152:
2153: IF l_status_code = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2154: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2155: END IF;
2156: IF l_debug = Fnd_Api.G_TRUE THEN
2157: Oe_Debug_Pub.ADD('l_rounding_factor = ' || l_rounding_factor);
2158: Oe_Debug_Pub.ADD('l_status_code = ' || l_status_code);
2159: Oe_Debug_Pub.ADD('END qp_util_pub.get_rounding_factor');
2160:

Line 2194: IF l_debug = Fnd_Api.G_TRUE THEN

2190: l_oe_unit_price_rounding VARCHAR2(30);
2191:
2192: BEGIN
2193: l_debug := Qp_Preq_Grp.G_DEBUG_ENGINE;
2194: IF l_debug = Fnd_Api.G_TRUE THEN
2195: Oe_Debug_Pub.ADD('BEGIN round_price');
2196: Oe_Debug_Pub.ADD('p_operand = ' || p_operand);
2197: Oe_Debug_Pub.ADD('p_rounding_factor = ' || p_rounding_factor);
2198: Oe_Debug_Pub.ADD('p_use_multi_currency = ' || p_use_multi_currency);

Line 2211: RAISE Fnd_Api.G_EXC_ERROR;

2207: Fnd_Message.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2208: Fnd_Message.SET_TOKEN('ATTRIBUTE','Operand');
2209: Oe_Msg_Pub.ADD;
2210: END IF;
2211: RAISE Fnd_Api.G_EXC_ERROR;
2212: END IF;
2213:
2214: IF p_operand_type <> 'R' AND G_ROUNDING_OPTIONS IS NULL THEN
2215: G_ROUNDING_OPTIONS := NVL(Fnd_Profile.Value('QP_SELLING_PRICE_ROUNDING_OPTIONS'), 'NO_ROUND');

Line 2220: IF l_debug = Fnd_Api.G_TRUE THEN

2216: END IF;
2217:
2218: l_rounding_options := G_ROUNDING_OPTIONS;
2219:
2220: IF l_debug = Fnd_Api.G_TRUE THEN
2221: Oe_Debug_Pub.ADD('Profile : rounding options = ' || l_rounding_options);
2222:
2223: END IF;
2224: -- check the Om profile for backward compatibility

Line 2233: IF l_debug = Fnd_Api.G_TRUE THEN

2229: END IF;
2230:
2231: l_oe_unit_price_rounding := G_OE_UNIT_PRICE_ROUNDING;
2232:
2233: IF l_debug = Fnd_Api.G_TRUE THEN
2234: Oe_Debug_Pub.ADD('Profile : OE unit price rounding = ' || l_oe_unit_price_rounding);
2235:
2236: END IF;
2237: IF ( (p_operand_type = 'A' AND l_rounding_options = 'ROUND_ADJ')

Line 2247: IF l_debug = Fnd_Api.G_TRUE THEN

2243: (p_operand_type = 'R')
2244: OR
2245: (l_oe_unit_price_rounding = 'Y')
2246: ) THEN
2247: IF l_debug = Fnd_Api.G_TRUE THEN
2248: Oe_Debug_Pub.ADD('Do rounding ');
2249: END IF;
2250: --dbms_output.put_line('Do rounding ');
2251:

Line 2274: IF l_debug = Fnd_Api.G_TRUE THEN

2270: G_MULTI_CURRENCY := l_multi_currency_installed;
2271: END IF;
2272:
2273: l_multi_currency_installed := G_MULTI_CURRENCY;
2274: IF l_debug = Fnd_Api.G_TRUE THEN
2275: Oe_Debug_Pub.ADD('l_multi_currency_installed = ' || l_multi_currency_installed);
2276:
2277: END IF;
2278:

Line 2290: IF l_debug = Fnd_Api.G_TRUE THEN

2286: END IF;
2287: l_use_multi_currency := G_MULTI_CURRENCY_USAGE;
2288: END IF;
2289:
2290: IF l_debug = Fnd_Api.G_TRUE THEN
2291: Oe_Debug_Pub.ADD('l_use_multi_currency = ' || l_use_multi_currency);
2292: END IF;
2293:
2294: IF l_multi_currency_installed = 'Y' AND l_use_multi_currency = 'Y' THEN

Line 2298: IF l_debug = Fnd_Api.G_TRUE THEN

2294: IF l_multi_currency_installed = 'Y' AND l_use_multi_currency = 'Y' THEN
2295: -- using rownum < 2 because there could be more than 1 effective records for a
2296: -- to_currency_code but note that selling_rounding_factor will be same
2297:
2298: IF l_debug = Fnd_Api.G_TRUE THEN
2299: Oe_Debug_Pub.ADD('round_price - multi-currency installed');
2300:
2301: END IF;
2302: -- cache the rounding_factor for price list id, currency and date

Line 2307: IF l_debug = Fnd_Api.G_TRUE THEN

2303: IF p_price_list_id = G_PRICE_LIST_ID AND
2304: p_currency_code = G_CURRENCY_CODE AND
2305: l_pricing_effective_date = G_PRICING_EFF_DATE THEN
2306:
2307: IF l_debug = Fnd_Api.G_TRUE THEN
2308: Oe_Debug_Pub.ADD('round_price - getting rounding factor from cache');
2309: END IF;
2310: l_rounding_factor := G_ROUNDING_FACTOR;
2311: ELSE

Line 2312: IF l_debug = Fnd_Api.G_TRUE THEN

2308: Oe_Debug_Pub.ADD('round_price - getting rounding factor from cache');
2309: END IF;
2310: l_rounding_factor := G_ROUNDING_FACTOR;
2311: ELSE
2312: IF l_debug = Fnd_Api.G_TRUE THEN
2313: Oe_Debug_Pub.ADD('round_price - getting rounding factor from database');
2314:
2315: END IF;
2316: SELECT qcdt.selling_rounding_factor

Line 2336: IF l_debug = Fnd_Api.G_TRUE THEN

2332: END IF;
2333:
2334: ELSE -- multi_currency not installed, not used
2335:
2336: IF l_debug = Fnd_Api.G_TRUE THEN
2337: Oe_Debug_Pub.ADD('round_price - multi-currency NOT installed');
2338:
2339: END IF;
2340: -- cache the rounding_factor for price list id

Line 2342: IF l_debug = Fnd_Api.G_TRUE THEN

2338:
2339: END IF;
2340: -- cache the rounding_factor for price list id
2341: IF p_price_list_id = G_PRICE_LIST_ID THEN
2342: IF l_debug = Fnd_Api.G_TRUE THEN
2343: Oe_Debug_Pub.ADD('round_price - getting rounding factor from cache');
2344: END IF;
2345: l_rounding_factor := G_ROUNDING_FACTOR;
2346: ELSE

Line 2347: IF l_debug = Fnd_Api.G_TRUE THEN

2343: Oe_Debug_Pub.ADD('round_price - getting rounding factor from cache');
2344: END IF;
2345: l_rounding_factor := G_ROUNDING_FACTOR;
2346: ELSE
2347: IF l_debug = Fnd_Api.G_TRUE THEN
2348: Oe_Debug_Pub.ADD('round_price - getting rounding factor from database');
2349:
2350: END IF;
2351: SELECT qb.rounding_factor

Line 2370: IF l_debug = Fnd_Api.G_TRUE THEN

2366: END IF;
2367:
2368: END IF; --p_price_list_id, p_currency_code values not null
2369:
2370: IF l_debug = Fnd_Api.G_TRUE THEN
2371: Oe_Debug_Pub.ADD('l_rounding_factor = ' || l_rounding_factor);
2372:
2373: END IF;
2374: IF l_rounding_factor IS NOT NULL THEN

Line 2385: IF l_debug = Fnd_Api.G_TRUE THEN

2381: x_rounded_operand := p_operand;
2382: END IF;
2383:
2384: ELSE /* if p_operand_type = 'A' .......*/
2385: IF l_debug = Fnd_Api.G_TRUE THEN
2386: Oe_Debug_Pub.ADD('NO rounding');
2387: END IF;
2388: --dbms_output.put_line('NO rounding');
2389: x_rounded_operand := p_operand;

Line 2392: x_status_code := Fnd_Api.G_RET_STS_SUCCESS;

2388: --dbms_output.put_line('NO rounding');
2389: x_rounded_operand := p_operand;
2390: END IF; /* p_operand_type */
2391:
2392: x_status_code := Fnd_Api.G_RET_STS_SUCCESS;
2393:
2394: IF l_debug = Fnd_Api.G_TRUE THEN
2395: Oe_Debug_Pub.ADD('x_rounded_operand = ' || x_rounded_operand);
2396: Oe_Debug_Pub.ADD('x_status_code = ' || x_status_code);

Line 2394: IF l_debug = Fnd_Api.G_TRUE THEN

2390: END IF; /* p_operand_type */
2391:
2392: x_status_code := Fnd_Api.G_RET_STS_SUCCESS;
2393:
2394: IF l_debug = Fnd_Api.G_TRUE THEN
2395: Oe_Debug_Pub.ADD('x_rounded_operand = ' || x_rounded_operand);
2396: Oe_Debug_Pub.ADD('x_status_code = ' || x_status_code);
2397: Oe_Debug_Pub.ADD('END round_price');
2398: END IF;

Line 2401: IF l_debug = Fnd_Api.G_TRUE THEN

2397: Oe_Debug_Pub.ADD('END round_price');
2398: END IF;
2399: EXCEPTION
2400: WHEN NO_DATA_FOUND THEN
2401: IF l_debug = Fnd_Api.G_TRUE THEN
2402: Oe_Debug_Pub.ADD('round_price - NO_DATA_FOUND exception');
2403: END IF;
2404: x_status_code := Fnd_Api.G_RET_STS_ERROR;
2405: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN

Line 2404: x_status_code := Fnd_Api.G_RET_STS_ERROR;

2400: WHEN NO_DATA_FOUND THEN
2401: IF l_debug = Fnd_Api.G_TRUE THEN
2402: Oe_Debug_Pub.ADD('round_price - NO_DATA_FOUND exception');
2403: END IF;
2404: x_status_code := Fnd_Api.G_RET_STS_ERROR;
2405: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
2406: Fnd_Message.SET_NAME('QP','QP_NO_RECORD_FOR_ROUNDING');
2407: Fnd_Message.SET_TOKEN('PRICE_LIST', p_price_list_id);
2408: Fnd_Message.SET_TOKEN('CURRENCY', p_currency_code);

Line 2411: WHEN Fnd_Api.G_EXC_ERROR THEN

2407: Fnd_Message.SET_TOKEN('PRICE_LIST', p_price_list_id);
2408: Fnd_Message.SET_TOKEN('CURRENCY', p_currency_code);
2409: END IF;
2410:
2411: WHEN Fnd_Api.G_EXC_ERROR THEN
2412:
2413: IF l_debug = Fnd_Api.G_TRUE THEN
2414: Oe_Debug_Pub.ADD('round_price - EXPECTED exception');
2415: END IF;

Line 2413: IF l_debug = Fnd_Api.G_TRUE THEN

2409: END IF;
2410:
2411: WHEN Fnd_Api.G_EXC_ERROR THEN
2412:
2413: IF l_debug = Fnd_Api.G_TRUE THEN
2414: Oe_Debug_Pub.ADD('round_price - EXPECTED exception');
2415: END IF;
2416: x_status_code := Fnd_Api.G_RET_STS_ERROR;
2417:

Line 2416: x_status_code := Fnd_Api.G_RET_STS_ERROR;

2412:
2413: IF l_debug = Fnd_Api.G_TRUE THEN
2414: Oe_Debug_Pub.ADD('round_price - EXPECTED exception');
2415: END IF;
2416: x_status_code := Fnd_Api.G_RET_STS_ERROR;
2417:
2418: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2419: IF l_debug = Fnd_Api.G_TRUE THEN
2420: Oe_Debug_Pub.ADD('round_price - UNEXPECTED exception');

Line 2418: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2414: Oe_Debug_Pub.ADD('round_price - EXPECTED exception');
2415: END IF;
2416: x_status_code := Fnd_Api.G_RET_STS_ERROR;
2417:
2418: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2419: IF l_debug = Fnd_Api.G_TRUE THEN
2420: Oe_Debug_Pub.ADD('round_price - UNEXPECTED exception');
2421:
2422: END IF;

Line 2419: IF l_debug = Fnd_Api.G_TRUE THEN

2415: END IF;
2416: x_status_code := Fnd_Api.G_RET_STS_ERROR;
2417:
2418: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2419: IF l_debug = Fnd_Api.G_TRUE THEN
2420: Oe_Debug_Pub.ADD('round_price - UNEXPECTED exception');
2421:
2422: END IF;
2423: x_status_code := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2423: x_status_code := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2419: IF l_debug = Fnd_Api.G_TRUE THEN
2420: Oe_Debug_Pub.ADD('round_price - UNEXPECTED exception');
2421:
2422: END IF;
2423: x_status_code := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2424:
2425: WHEN OTHERS THEN
2426: IF l_debug = Fnd_Api.G_TRUE THEN
2427: Oe_Debug_Pub.ADD('round_price - OTHERS exception');

Line 2426: IF l_debug = Fnd_Api.G_TRUE THEN

2422: END IF;
2423: x_status_code := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2424:
2425: WHEN OTHERS THEN
2426: IF l_debug = Fnd_Api.G_TRUE THEN
2427: Oe_Debug_Pub.ADD('round_price - OTHERS exception');
2428: END IF;
2429: x_status_code := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2430:

Line 2429: x_status_code := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2425: WHEN OTHERS THEN
2426: IF l_debug = Fnd_Api.G_TRUE THEN
2427: Oe_Debug_Pub.ADD('round_price - OTHERS exception');
2428: END IF;
2429: x_status_code := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2430:
2431: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
2432: THEN
2433: Fnd_Msg_Pub.Add_Exc_Msg

Line 2527: IF l_debug = Fnd_Api.G_TRUE THEN

2523:
2524: I NUMBER;
2525: BEGIN
2526: l_debug := Qp_Preq_Grp.G_DEBUG_ENGINE;
2527: IF l_debug = Fnd_Api.G_TRUE THEN
2528: Oe_Debug_Pub.ADD('QP_UTIL_PUB.Reprice_Debug_Engine_Request BEGIN');
2529: Oe_Debug_Pub.ADD('p_request_id = ' || p_request_id);
2530: END IF;
2531: --dbms_output.put_line('Reprice_Debug_Engine_Request Begins');

Line 2535: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

2531: --dbms_output.put_line('Reprice_Debug_Engine_Request Begins');
2532:
2533: /* profile settings */
2534: Fnd_Profile.PUT('QP_DEBUG','Y');
2535: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2536: x_return_status_text := 'Routine: QP_UTIL_PUB.Reprice_Debug_Engine_Request SUCCESS';
2537:
2538: IF ( p_request_id IS NULL) THEN
2539: x_return_status := Fnd_Api.G_RET_STS_ERROR;

Line 2539: x_return_status := Fnd_Api.G_RET_STS_ERROR;

2535: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2536: x_return_status_text := 'Routine: QP_UTIL_PUB.Reprice_Debug_Engine_Request SUCCESS';
2537:
2538: IF ( p_request_id IS NULL) THEN
2539: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2540: x_return_status_text := 'Need request_id for Reprice_Debug_Engine_Request API';
2541: RETURN;
2542: END IF;
2543:

Line 2550: x_return_status := Fnd_Api.G_RET_STS_ERROR;

2546: FETCH cl_req_dbg INTO l_dbg_req_rec;
2547: CLOSE cl_req_dbg;
2548:
2549: IF (l_dbg_req_rec.request_id IS NULL) THEN
2550: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2551: x_return_status_text := 'No debug record exists for request_id'||p_request_id;
2552: RETURN;
2553: END IF;
2554:

Line 2754: IF l_debug = Fnd_Api.G_TRUE THEN

2750: Oe_Debug_Pub.G_DIR :='/sqlcom/log';
2751: Oe_Debug_Pub.Initialize;
2752: Oe_Debug_Pub.debug_on;
2753: Oe_Debug_Pub.SetDebugLevel(10);
2754: IF l_debug = Fnd_Api.G_TRUE THEN
2755: Oe_Debug_Pub.ADD('Before Process_Order',1);
2756:
2757: END IF;
2758: --dbms_output.put_line('The File is'|| oe_debug_pub.Set_Debug_Mode('FILE'));

Line 2788: IF l_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN

2784: --dbms_output.put_line('Return Status l_return_status '|| l_return_status);
2785: --dbms_output.put_line('Return Status text l_return_status_text '|| l_return_status_text);
2786: --dbms_output.put_line('+-----Information returned to caller:----------+ ');
2787:
2788: IF l_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
2789: x_return_status := l_return_status;
2790: x_return_status_text := l_return_status_text;
2791: END IF;
2792:

Line 2797: x_return_status := Fnd_Api.G_RET_STS_ERROR;

2793: x_request_id := Qp_Copy_Debug_Pvt.REQUEST_ID;
2794:
2795: EXCEPTION
2796: WHEN OTHERS THEN
2797: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2798: x_return_status_text := 'Routine: QP_UTIL_PUB.Reprice_Debug_Engine_Request ERROR'||SQLERRM;
2799: END Reprice_Debug_Engine_Request;
2800:
2801: -- New procedure as per bug 2943038, required by Quoting

Line 2872: IF l_debug = Fnd_Api.G_TRUE THEN

2868: PROCEDURE RESET_HVOP_PRICING_ON IS
2869: BEGIN
2870: l_debug := Qp_Preq_Grp.G_DEBUG_ENGINE;
2871: IF HVOP_Pricing_ON = 'Y' THEN
2872: IF l_debug = Fnd_Api.G_TRUE THEN
2873: Qp_Preq_Grp.Engine_debug('HVOP_Pricing_On is: '||Qp_Bulk_Preq_Grp.G_HVOP_pricing_ON);
2874: Qp_Preq_Grp.Engine_debug('Resetting HVOP_Pricing_On at the end');
2875: END IF;--l_debug
2876: Qp_Bulk_Preq_Grp.G_HVOP_pricing_ON := 'N';

Line 2877: IF l_debug = Fnd_Api.G_TRUE THEN

2873: Qp_Preq_Grp.Engine_debug('HVOP_Pricing_On is: '||Qp_Bulk_Preq_Grp.G_HVOP_pricing_ON);
2874: Qp_Preq_Grp.Engine_debug('Resetting HVOP_Pricing_On at the end');
2875: END IF;--l_debug
2876: Qp_Bulk_Preq_Grp.G_HVOP_pricing_ON := 'N';
2877: IF l_debug = Fnd_Api.G_TRUE THEN
2878: Qp_Preq_Grp.Engine_debug('HVOP_Pricing_On Now Reset to: '||Qp_Bulk_Preq_Grp.G_HVOP_pricing_ON);
2879: END IF;--l_debug
2880: END IF;--HVOP_Pricing_ON
2881: EXCEPTION

Line 3006: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

3002: x_MODIFIER_LIST_tbl := l_MODIFIER_LIST_tbl;
3003:
3004: -- Set return status.
3005:
3006: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3007:
3008: -- Get message count and data
3009:
3010: Oe_Msg_Pub.Count_And_Get

Line 3018: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3014:
3015:
3016: EXCEPTION
3017: WHEN NO_DATA_FOUND THEN
3018: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3019:
3020: IF Oe_Msg_Pub.Check_Msg_Level(Oe_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
3021: THEN
3022: Oe_Msg_Pub.Add_Exc_Msg

Line 3039: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3035: Oe_Debug_Pub.ADD('END Get_Blanket_Price in QPXRTCNB');
3036:
3037: WHEN OTHERS THEN
3038:
3039: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3040:
3041: IF Oe_Msg_Pub.Check_Msg_Level(Oe_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
3042: THEN
3043: Oe_Msg_Pub.Add_Exc_Msg

Line 3061: P_Init_Msg_List IN VARCHAR2 := Fnd_Api.G_FALSE,

3057: END Get_Blanket_Pricelist_Modifier;
3058:
3059: PROCEDURE Check_Pricing_Attributes (
3060: P_Api_Version_Number IN NUMBER := 1,
3061: P_Init_Msg_List IN VARCHAR2 := Fnd_Api.G_FALSE,
3062: P_Commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3063: P_Inventory_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3064: P_Price_List_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3065: X_Check_Return_Status_qp OUT NOCOPY VARCHAR2,

Line 3062: P_Commit IN VARCHAR2 := Fnd_Api.G_FALSE,

3058:
3059: PROCEDURE Check_Pricing_Attributes (
3060: P_Api_Version_Number IN NUMBER := 1,
3061: P_Init_Msg_List IN VARCHAR2 := Fnd_Api.G_FALSE,
3062: P_Commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3063: P_Inventory_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3064: P_Price_List_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3065: X_Check_Return_Status_qp OUT NOCOPY VARCHAR2,
3066: x_msg_count OUT NOCOPY NUMBER,

Line 3063: P_Inventory_Id IN NUMBER := Fnd_Api.G_MISS_NUM,

3059: PROCEDURE Check_Pricing_Attributes (
3060: P_Api_Version_Number IN NUMBER := 1,
3061: P_Init_Msg_List IN VARCHAR2 := Fnd_Api.G_FALSE,
3062: P_Commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3063: P_Inventory_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3064: P_Price_List_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3065: X_Check_Return_Status_qp OUT NOCOPY VARCHAR2,
3066: x_msg_count OUT NOCOPY NUMBER,
3067: x_msg_data OUT NOCOPY VARCHAR2)

Line 3064: P_Price_List_Id IN NUMBER := Fnd_Api.G_MISS_NUM,

3060: P_Api_Version_Number IN NUMBER := 1,
3061: P_Init_Msg_List IN VARCHAR2 := Fnd_Api.G_FALSE,
3062: P_Commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3063: P_Inventory_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3064: P_Price_List_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3065: X_Check_Return_Status_qp OUT NOCOPY VARCHAR2,
3066: x_msg_count OUT NOCOPY NUMBER,
3067: x_msg_data OUT NOCOPY VARCHAR2)
3068: IS

Line 3108: X_Check_Return_Status_qp := Fnd_Api.G_FALSE;

3104: l_list_line_id NUMBER;
3105: c_check_qpprc_atr_rec c_check_qpprc_atr%ROWTYPE;
3106:
3107: BEGIN
3108: X_Check_Return_Status_qp := Fnd_Api.G_FALSE;
3109:
3110: OPEN c_check_qpprc_atr;
3111: FETCH c_check_qpprc_atr INTO c_check_qpprc_atr_rec;
3112: IF c_check_qpprc_atr%FOUND THEN

Line 3113: X_Check_Return_Status_qp := Fnd_Api.G_TRUE;

3109:
3110: OPEN c_check_qpprc_atr;
3111: FETCH c_check_qpprc_atr INTO c_check_qpprc_atr_rec;
3112: IF c_check_qpprc_atr%FOUND THEN
3113: X_Check_Return_Status_qp := Fnd_Api.G_TRUE;
3114: END IF;
3115: CLOSE c_check_qpprc_atr;
3116:
3117: END Check_Pricing_Attributes;

Line 3122: P_Init_Msg_List IN VARCHAR2 := Fnd_Api.G_FALSE,

3118:
3119:
3120: PROCEDURE Check_Pricing_Attributes (
3121: P_Api_Version_Number IN NUMBER := 1,
3122: P_Init_Msg_List IN VARCHAR2 := Fnd_Api.G_FALSE,
3123: P_Commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3124: P_Inventory_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3125: P_Price_List_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3126: X_Check_Return_Status_qp OUT NOCOPY VARCHAR2,

Line 3123: P_Commit IN VARCHAR2 := Fnd_Api.G_FALSE,

3119:
3120: PROCEDURE Check_Pricing_Attributes (
3121: P_Api_Version_Number IN NUMBER := 1,
3122: P_Init_Msg_List IN VARCHAR2 := Fnd_Api.G_FALSE,
3123: P_Commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3124: P_Inventory_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3125: P_Price_List_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3126: X_Check_Return_Status_qp OUT NOCOPY VARCHAR2,
3127: x_return_status OUT NOCOPY VARCHAR2,

Line 3124: P_Inventory_Id IN NUMBER := Fnd_Api.G_MISS_NUM,

3120: PROCEDURE Check_Pricing_Attributes (
3121: P_Api_Version_Number IN NUMBER := 1,
3122: P_Init_Msg_List IN VARCHAR2 := Fnd_Api.G_FALSE,
3123: P_Commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3124: P_Inventory_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3125: P_Price_List_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3126: X_Check_Return_Status_qp OUT NOCOPY VARCHAR2,
3127: x_return_status OUT NOCOPY VARCHAR2,
3128: x_msg_count OUT NOCOPY NUMBER,

Line 3125: P_Price_List_Id IN NUMBER := Fnd_Api.G_MISS_NUM,

3121: P_Api_Version_Number IN NUMBER := 1,
3122: P_Init_Msg_List IN VARCHAR2 := Fnd_Api.G_FALSE,
3123: P_Commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3124: P_Inventory_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3125: P_Price_List_Id IN NUMBER := Fnd_Api.G_MISS_NUM,
3126: X_Check_Return_Status_qp OUT NOCOPY VARCHAR2,
3127: x_return_status OUT NOCOPY VARCHAR2,
3128: x_msg_count OUT NOCOPY NUMBER,
3129: x_msg_data OUT NOCOPY VARCHAR2)

Line 3256: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

3252:
3253: BEGIN
3254:
3255:
3256: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3257: X_Check_Return_Status_qp := Fnd_Api.G_FALSE;
3258:
3259: OPEN c_check_qpprc_atr;
3260: FETCH c_check_qpprc_atr INTO c_check_qpprc_atr_rec;

Line 3257: X_Check_Return_Status_qp := Fnd_Api.G_FALSE;

3253: BEGIN
3254:
3255:
3256: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3257: X_Check_Return_Status_qp := Fnd_Api.G_FALSE;
3258:
3259: OPEN c_check_qpprc_atr;
3260: FETCH c_check_qpprc_atr INTO c_check_qpprc_atr_rec;
3261: IF c_check_qpprc_atr%FOUND THEN

Line 3262: X_Check_Return_Status_qp := Fnd_Api.G_TRUE;

3258:
3259: OPEN c_check_qpprc_atr;
3260: FETCH c_check_qpprc_atr INTO c_check_qpprc_atr_rec;
3261: IF c_check_qpprc_atr%FOUND THEN
3262: X_Check_Return_Status_qp := Fnd_Api.G_TRUE;
3263: END IF;
3264: CLOSE c_check_qpprc_atr;
3265:
3266:

Line 3267: IF X_Check_Return_Status_qp = Fnd_Api.G_TRUE THEN

3263: END IF;
3264: CLOSE c_check_qpprc_atr;
3265:
3266:
3267: IF X_Check_Return_Status_qp = Fnd_Api.G_TRUE THEN
3268: l_found := 0;
3269: OPEN l_pricing_attribs;
3270: LOOP
3271: FETCH l_pricing_attribs INTO v_pricing_attr_ctxt, v_pricing_attr;

Line 3317: END IF;-- IF X_Check_Return_Status_qp = FND_API.G_TRUE

3313: X_Check_Return_Status_qp := 'NOT_SOURCED';
3314: END IF;
3315: ELSE
3316: X_Check_Return_Status_qp := 'NO_ATTRIBUTES';
3317: END IF;-- IF X_Check_Return_Status_qp = FND_API.G_TRUE
3318:
3319:
3320: EXCEPTION
3321: WHEN OTHERS THEN

Line 3336: IF l_debug = Fnd_Api.G_TRUE THEN

3332: p_line_index IN NUMBER, p_priced_quantity IN NUMBER) IS
3333: BEGIN
3334: l_debug := Qp_Preq_Grp.G_DEBUG_ENGINE;
3335: IF Qp_Java_Engine_Util_Pub.Java_Engine_Running = 'N' THEN
3336: IF l_debug = Fnd_Api.G_TRUE THEN
3337: Qp_Preq_Grp.engine_debug('Java engine not installed '
3338: ||' line_id '||p_line_id||' line_index '||p_line_index
3339: ||' p_priced_quantity '||p_priced_quantity||' p_update_type '||p_update_type);
3340: END IF;

Line 3358: IF l_debug = Fnd_Api.G_TRUE THEN

3354: WHERE line_id = p_line_id;
3355: END IF;--p_line_id IS NOT NULL
3356: END IF;
3357: ELSE
3358: IF l_debug = Fnd_Api.G_TRUE THEN
3359: Qp_Preq_Grp.engine_debug('Java engine installed '
3360: ||' line_id '||p_line_id||' line_index '||p_line_index
3361: ||' p_priced_quantity '||p_priced_quantity||' p_update_type '||p_update_type);
3362: END IF;