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);
1626:
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);
1626:
1627: 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);
1626:
1627: END IF;
1628: IF l_pricing_effective_date IS NULL THEN
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);
1626:
1627: END IF;
1628: IF l_pricing_effective_date IS NULL THEN
1629: l_temp_date := TRUNC(SYSDATE);
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:
1774: l_temp_date := TRUNC(SYSDATE);
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:
1774: l_temp_date := TRUNC(SYSDATE);
1775:
1971: l_agreement c_agreement%ROWTYPE;
1972: l_counter NUMBER := 0;
1973:
1974: BEGIN
1975: Oe_Debug_Pub.ADD('QP_UTIL_PUB.Get_Agreement BEGIN ');
1976: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' ||p_pricing_effective_date);
1977:
1978: IF p_pricing_effective_date IS NULL THEN
1979: l_temp_date := TRUNC(SYSDATE);
1972: l_counter NUMBER := 0;
1973:
1974: BEGIN
1975: Oe_Debug_Pub.ADD('QP_UTIL_PUB.Get_Agreement BEGIN ');
1976: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' ||p_pricing_effective_date);
1977:
1978: IF p_pricing_effective_date IS NULL THEN
1979: l_temp_date := TRUNC(SYSDATE);
1980: ELSE
1983:
1984: IF p_sold_to_org_id IS NOT NULL AND p_transaction_type_id IS NOT NULL THEN
1985: -- calling program passed sold_to_org_id and transaction_type_id
1986:
1987: Oe_Debug_Pub.ADD('p_sold_to_org_id = ' || p_sold_to_org_id);
1988: Oe_Debug_Pub.ADD('p_transaction_type_id = ' || p_transaction_type_id);
1989:
1990:
1991: OPEN c_agreement;
1984: IF p_sold_to_org_id IS NOT NULL AND p_transaction_type_id IS NOT NULL THEN
1985: -- calling program passed sold_to_org_id and transaction_type_id
1986:
1987: Oe_Debug_Pub.ADD('p_sold_to_org_id = ' || p_sold_to_org_id);
1988: Oe_Debug_Pub.ADD('p_transaction_type_id = ' || p_transaction_type_id);
1989:
1990:
1991: OPEN c_agreement;
1992: LOOP
2011:
2012: ELSIF p_sold_to_org_id IS NULL and p_transaction_type_id IS NOT NULL THEN -- added condition for bug7192230
2013: -- calling program did not pass sold_to_org_id and passed only transaction_type_id
2014:
2015: oe_debug_pub.add('p_sold_to_org_id = ' || p_sold_to_org_id);
2016: oe_debug_pub.add('p_transaction_type_id = ' || p_transaction_type_id);
2017:
2018:
2019: OPEN c_agreement_no_org;
2012: ELSIF p_sold_to_org_id IS NULL and p_transaction_type_id IS NOT NULL THEN -- added condition for bug7192230
2013: -- calling program did not pass sold_to_org_id and passed only transaction_type_id
2014:
2015: oe_debug_pub.add('p_sold_to_org_id = ' || p_sold_to_org_id);
2016: oe_debug_pub.add('p_transaction_type_id = ' || p_transaction_type_id);
2017:
2018:
2019: OPEN c_agreement_no_org;
2020: LOOP
2039:
2040: ELSIF p_sold_to_org_id IS NOT NULL and p_transaction_type_id IS NULL THEN -- added condition for bug7192230
2041: -- calling program passed sold_to_org_id and did not pass transaction_type_id
2042:
2043: oe_debug_pub.add('p_sold_to_org_id = ' || p_sold_to_org_id);
2044: oe_debug_pub.add('p_transaction_type_id = ' || p_transaction_type_id);
2045:
2046:
2047: OPEN c_agreement_no_trtype;
2040: ELSIF p_sold_to_org_id IS NOT NULL and p_transaction_type_id IS NULL THEN -- added condition for bug7192230
2041: -- calling program passed sold_to_org_id and did not pass transaction_type_id
2042:
2043: oe_debug_pub.add('p_sold_to_org_id = ' || p_sold_to_org_id);
2044: oe_debug_pub.add('p_transaction_type_id = ' || p_transaction_type_id);
2045:
2046:
2047: OPEN c_agreement_no_trtype;
2048: LOOP
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);
2139: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' || p_pricing_effective_date);
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);
2139: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' || p_pricing_effective_date);
2140:
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);
2139: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' || p_pricing_effective_date);
2140:
2141: END IF;
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);
2139: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' || p_pricing_effective_date);
2140:
2141: END IF;
2142: round_price(p_operand => NULL
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);
2139: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' || p_pricing_effective_date);
2140:
2141: END IF;
2142: round_price(p_operand => NULL
2143: ,p_rounding_factor => NULL
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:
2161: END IF;
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:
2161: END IF;
2162: RETURN(l_rounding_factor);
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:
2161: END IF;
2162: RETURN(l_rounding_factor);
2163:
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);
2199: Oe_Debug_Pub.ADD('p_price_list_id = ' || p_price_list_id);
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);
2199: Oe_Debug_Pub.ADD('p_price_list_id = ' || p_price_list_id);
2200: Oe_Debug_Pub.ADD('p_currency_code = ' || p_currency_code);
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);
2199: Oe_Debug_Pub.ADD('p_price_list_id = ' || p_price_list_id);
2200: Oe_Debug_Pub.ADD('p_currency_code = ' || p_currency_code);
2201: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' || p_pricing_effective_date);
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);
2199: Oe_Debug_Pub.ADD('p_price_list_id = ' || p_price_list_id);
2200: Oe_Debug_Pub.ADD('p_currency_code = ' || p_currency_code);
2201: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' || p_pricing_effective_date);
2202: Oe_Debug_Pub.ADD('p_operand_type = ' || p_operand_type);
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);
2199: Oe_Debug_Pub.ADD('p_price_list_id = ' || p_price_list_id);
2200: Oe_Debug_Pub.ADD('p_currency_code = ' || p_currency_code);
2201: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' || p_pricing_effective_date);
2202: Oe_Debug_Pub.ADD('p_operand_type = ' || p_operand_type);
2203:
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);
2199: Oe_Debug_Pub.ADD('p_price_list_id = ' || p_price_list_id);
2200: Oe_Debug_Pub.ADD('p_currency_code = ' || p_currency_code);
2201: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' || p_pricing_effective_date);
2202: Oe_Debug_Pub.ADD('p_operand_type = ' || p_operand_type);
2203:
2204: END IF;
2197: Oe_Debug_Pub.ADD('p_rounding_factor = ' || p_rounding_factor);
2198: Oe_Debug_Pub.ADD('p_use_multi_currency = ' || p_use_multi_currency);
2199: Oe_Debug_Pub.ADD('p_price_list_id = ' || p_price_list_id);
2200: Oe_Debug_Pub.ADD('p_currency_code = ' || p_currency_code);
2201: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' || p_pricing_effective_date);
2202: Oe_Debug_Pub.ADD('p_operand_type = ' || p_operand_type);
2203:
2204: END IF;
2205: IF p_operand_type <> 'R' AND p_operand IS NULL THEN
2198: Oe_Debug_Pub.ADD('p_use_multi_currency = ' || p_use_multi_currency);
2199: Oe_Debug_Pub.ADD('p_price_list_id = ' || p_price_list_id);
2200: Oe_Debug_Pub.ADD('p_currency_code = ' || p_currency_code);
2201: Oe_Debug_Pub.ADD('p_pricing_effective_date = ' || p_pricing_effective_date);
2202: Oe_Debug_Pub.ADD('p_operand_type = ' || p_operand_type);
2203:
2204: END IF;
2205: IF p_operand_type <> 'R' AND p_operand IS NULL THEN
2206: IF Oe_Msg_Pub.Check_Msg_Level(Oe_Msg_Pub.G_MSG_LVL_ERROR) THEN
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
2225: -- in scenario like this file is shipped to customer but the corresponding OM change is not shipped
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')
2238: OR
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:
2252: IF p_rounding_factor IS NOT NULL THEN
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:
2279: IF p_use_multi_currency = 'Y' THEN
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
2295: -- using rownum < 2 because there could be more than 1 effective records for a
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
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
2312: IF l_debug = Fnd_Api.G_TRUE THEN
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
2317: INTO l_rounding_factor
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
2341: IF p_price_list_id = G_PRICE_LIST_ID THEN
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
2347: IF l_debug = Fnd_Api.G_TRUE THEN
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
2352: INTO l_rounding_factor
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
2375: IF p_operand_type = 'R' THEN
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;
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;
2399: EXCEPTION
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;
2399: EXCEPTION
2400: WHEN NO_DATA_FOUND THEN
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;
2399: EXCEPTION
2400: WHEN NO_DATA_FOUND THEN
2401: IF l_debug = Fnd_Api.G_TRUE THEN
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
2406: Fnd_Message.SET_NAME('QP','QP_NO_RECORD_FOR_ROUNDING');
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:
2418: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
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;
2424:
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:
2431: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
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');
2532:
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');
2532:
2533: /* profile settings */
2746: p_related_lines_tbl(i).STATUS_TEXT :=cl.PRICING_STATUS_TEXT;
2747: END LOOP;
2748:
2749: /* debug info */
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
2747: END LOOP;
2748:
2749: /* debug info */
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);
2748:
2749: /* debug info */
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:
2749: /* debug info */
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;
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'));
2759: --dbms_output.put_line('The debug is ' || oe_debug_pub.g_debug);
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'));
2759: --dbms_output.put_line('The debug is ' || oe_debug_pub.g_debug);
2760: --l_version := qp_preq_grp.GET_VERSION;
2761: --dbms_output.put_line('Testing version '||l_version);
2762: --dbms_output.put_line('Debug2: ' || oe_debug_pub.g_debug);
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'));
2759: --dbms_output.put_line('The debug is ' || oe_debug_pub.g_debug);
2760: --l_version := qp_preq_grp.GET_VERSION;
2761: --dbms_output.put_line('Testing version '||l_version);
2762: --dbms_output.put_line('Debug2: ' || oe_debug_pub.g_debug);
2763: --dbms_output.put_line('Debug2: ');
2758: --dbms_output.put_line('The File is'|| oe_debug_pub.Set_Debug_Mode('FILE'));
2759: --dbms_output.put_line('The debug is ' || oe_debug_pub.g_debug);
2760: --l_version := qp_preq_grp.GET_VERSION;
2761: --dbms_output.put_line('Testing version '||l_version);
2762: --dbms_output.put_line('Debug2: ' || oe_debug_pub.g_debug);
2763: --dbms_output.put_line('Debug2: ');
2764:
2765: /* call engine pub API */
2766: Qp_Preq_Pub.PRICE_REQUEST
3031: ( p_count => x_msg_count
3032: , p_data => x_msg_data
3033: );
3034:
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;
3052: ( p_count => x_msg_count
3053: , p_data => x_msg_data
3054: );
3055:
3056: Oe_Debug_Pub.ADD('END Get_Blanket_Pricelist_Modifier in QPXRTCNB');
3057: END Get_Blanket_Pricelist_Modifier;
3058:
3059: PROCEDURE Check_Pricing_Attributes (
3060: P_Api_Version_Number IN NUMBER := 1,
3318:
3319:
3320: EXCEPTION
3321: WHEN OTHERS THEN
3322: Oe_Debug_Pub.ADD('Error in Get_Pricing_attributes');
3323:
3324: END Check_Pricing_Attributes;
3325:
3326: