DBA Data[Home] [Help]

APPS.QP_PRC_UTIL dependencies on QP_PRC_UTIL

Line 1: PACKAGE BODY QP_PRC_UTIL AS

1: PACKAGE BODY QP_PRC_UTIL AS
2: /* $Header: QPXUPRCB.pls 120.2 2005/10/03 23:26:50 srashmi noship $ */
3:
4: -- Global constants holding the package name.
5:

Line 6: G_PKG_NAME CONSTANT VARCHAR2(30):='QP_PRC_UTIL';

2: /* $Header: QPXUPRCB.pls 120.2 2005/10/03 23:26:50 srashmi noship $ */
3:
4: -- Global constants holding the package name.
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30):='QP_PRC_UTIL';
7:
8: -- Global variables and tables to keep track if attribute data
9: -- has been queried yet in the Attribute_Used procedure
10:

Line 54: oe_debug_pub.add('Entering QP_PRC_UTIL.EQUAL', 1);

50: ) RETURN BOOLEAN
51: IS
52: BEGIN
53:
54: oe_debug_pub.add('Entering QP_PRC_UTIL.EQUAL', 1);
55:
56: RETURN ( p_attr1 IS NULL AND
57: p_attr2 IS NULL ) OR
58: ( p_attr1 IS NOT NULL AND

Line 62: oe_debug_pub.add('Exiting QP_PRC_UTIL.EQUAL', 1);

58: ( p_attr1 IS NOT NULL AND
59: p_attr2 IS NOT NULL AND
60: p_attr1 = p_attr2 );
61:
62: oe_debug_pub.add('Exiting QP_PRC_UTIL.EQUAL', 1);
63:
64: END Equal;
65:
66: FUNCTION Equal

Line 107: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_HDR_ADJ_TOTAL', 1);

103: IS
104: l_adj_total NUMBER := 0;
105: BEGIN
106:
107: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_HDR_ADJ_TOTAL', 1);
108:
109: -- If p_header_id is NULL, return 0
110:
111: IF p_header_id IS NULL THEN

Line 113: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_HDR_ADJ_TOTAL', 1);

109: -- If p_header_id is NULL, return 0
110:
111: IF p_header_id IS NULL THEN
112:
113: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_HDR_ADJ_TOTAL', 1);
114:
115: RETURN 0;
116: END IF;
117:

Line 132: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_HDR_ADJ_TOTAL', 1);

128: l_adj_total := 0;
129:
130: END IF;
131:
132: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_HDR_ADJ_TOTAL', 1);
133:
134: RETURN l_adj_total;
135:
136: EXCEPTION

Line 163: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_AGR_TYPE', 1);

159: IS
160: l_agr_type_code VARCHAR2(30);
161: BEGIN
162:
163: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_AGR_TYPE', 1);
164:
165: -- If p_agreement_id is NULL, return NULL
166:
167: IF p_agreement_id IS NULL THEN

Line 169: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_AGR_TYPE', 1);

165: -- If p_agreement_id is NULL, return NULL
166:
167: IF p_agreement_id IS NULL THEN
168:
169: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_AGR_TYPE', 1);
170:
171: RETURN NULL;
172: END IF;
173:

Line 181: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_AGR_TYPE', 1);

177: INTO l_agr_type_code
178: FROM OE_AGREEMENTS
179: WHERE AGREEMENT_ID = p_agreement_id;
180:
181: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_AGR_TYPE', 1);
182:
183: RETURN l_agr_type_code;
184:
185: EXCEPTION

Line 221: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_ITEM_CATEGORY', 1);

217: l_org_id NUMBER := NULL;
218: l_item_category_id NUMBER := NULL;
219: BEGIN
220:
221: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_ITEM_CATEGORY', 1);
222:
223: IF p_item_id IS NOT NULL THEN
224:
225: -- Fetch validation org.

Line 244: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_ITEM_CATEGORY', 1);

240: END IF;
241:
242: END IF;
243:
244: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_ITEM_CATEGORY', 1);
245:
246: RETURN l_item_category_id;
247:
248:

Line 283: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_CUST_CLASS', 1);

279: IS
280: l_class_code VARCHAR2(30);
281: BEGIN
282:
283: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_CUST_CLASS', 1);
284:
285: -- If p_customer_id is NULL, return NULL
286:
287: IF p_sold_to_org_id IS NULL THEN

Line 289: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_CUST_CLASS', 1);

285: -- If p_customer_id is NULL, return NULL
286:
287: IF p_sold_to_org_id IS NULL THEN
288:
289: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_CUST_CLASS', 1);
290:
291: RETURN NULL;
292: END IF;
293:

Line 301: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_CUST_CLASS', 1);

297: INTO l_class_code
298: FROM HZ_CUST_ACCOUNTS
299: WHERE CUST_ACCOUNT_ID = p_sold_to_org_id;
300:
301: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_CUST_CLASS', 1);
302:
303: RETURN l_class_code;
304:
305: EXCEPTION

Line 351: p_adj_tbl OUT NOCOPY /* file.sql.39 change */ QP_PRC_UTIL.Adj_Short_Tbl_Type

347:
348: PROCEDURE Query_Adjustments
349: ( p_header_id IN NUMBER := NULL ,
350: p_line_id IN NUMBER := NULL ,
351: p_adj_tbl OUT NOCOPY /* file.sql.39 change */ QP_PRC_UTIL.Adj_Short_Tbl_Type
352: )
353: IS
354:
355: CURSOR l_line_adj_csr IS

Line 382: l_adj_rec QP_PRC_UTIL.Adj_Short_Rec_Type;

378: AND LINE_ID IS NULL
379: AND P.DISCOUNT_ID = D.LIST_HEADER_ID;
380: -- QP END
381:
382: l_adj_rec QP_PRC_UTIL.Adj_Short_Rec_Type;
383: temp_num NUMBER;
384: adj_number NUMBER := 0;
385:
386: BEGIN

Line 388: oe_debug_pub.add('Entering QP_PRC_UTIL.QUERY_ADJUSTMENTS', 1);

384: adj_number NUMBER := 0;
385:
386: BEGIN
387:
388: oe_debug_pub.add('Entering QP_PRC_UTIL.QUERY_ADJUSTMENTS', 1);
389:
390: -- Header level adjustments.
391:
392: IF p_header_id IS NOT NULL THEN

Line 453: oe_debug_pub.add('Exiting QP_PRC_UTIL.QUERY_ADJUSTMENTS', 1);

449: CLOSE l_line_adj_csr;
450:
451: END IF;
452:
453: oe_debug_pub.add('Exiting QP_PRC_UTIL.QUERY_ADJUSTMENTS', 1);
454:
455: EXCEPTION
456:
457: WHEN OTHERS THEN

Line 543: oe_debug_pub.add('Entering QP_PRC_UTIL.ATTRIBUTE_USED', 1);

539: --QP END
540:
541: BEGIN
542:
543: oe_debug_pub.add('Entering QP_PRC_UTIL.ATTRIBUTE_USED', 1);
544:
545: IF NOT G_ATTRIBUTES_QUERIED THEN
546:
547: -- First time to call this function. Fetch values from DB.

Line 619: oe_debug_pub.add('Exiting QP_PRC_UTIL.ATTRIBUTE_USED', 1);

615: END IF;
616:
617: END IF;
618:
619: oe_debug_pub.add('Exiting QP_PRC_UTIL.ATTRIBUTE_USED', 1);
620:
621: RETURN G_ATTRIBUTE_USED(p_attribute_id);
622:
623: EXCEPTION

Line 695: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_ADJUSTMENT', 1);

691: l_qp_discount_line_rec QP_PRICING_ENGINE_PVT.l_discount_line_rec;
692:
693: BEGIN
694:
695: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_ADJUSTMENT', 1);
696:
697:
698:
699: IF p_list_price = 0 THEN

Line 1194: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_ADJUSTMENT', 1);

1190:
1191:
1192: END IF;
1193:
1194: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_ADJUSTMENT', 1);
1195:
1196: EXCEPTION
1197:
1198: WHEN OTHERS THEN

Line 1230: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_GSA', 1);

1226: l_error_msg VARCHAR2(240);
1227:
1228: BEGIN
1229:
1230: oe_debug_pub.add('Entering QP_PRC_UTIL.GET_GSA', 1);
1231:
1232: -- If the invoice to is NULL, then the order is automatically not GSA
1233:
1234: IF p_invoice_to_id IS NULL THEN

Line 1236: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_GSA', 1);

1232: -- If the invoice to is NULL, then the order is automatically not GSA
1233:
1234: IF p_invoice_to_id IS NULL THEN
1235:
1236: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_GSA', 1);
1237:
1238: RETURN 'N';
1239:
1240: ELSE

Line 1279: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_GSA', 1);

1275:
1276:
1277: -- Return the GSA Value
1278:
1279: oe_debug_pub.add('Exiting QP_PRC_UTIL.GET_GSA', 1);
1280:
1281: RETURN l_gsa;
1282:
1283: EXCEPTION

Line 1387: oe_debug_pub.add('Entering QP_PRC_UTIL.FETCH_BEST_ADJUSTMENT', 1);

1383: l_adj_rec Adj_Short_Rec_Type;
1384:
1385: BEGIN
1386:
1387: oe_debug_pub.add('Entering QP_PRC_UTIL.FETCH_BEST_ADJUSTMENT', 1);
1388:
1389: -- Price list and list price are required
1390:
1391: IF p_price_list_id IS NULL OR

Line 2106: oe_debug_pub.add('Exiting QP_PRC_UTIL.FETCH_BEST_ADJUSTMENT', 1);

2102: -- Return values collected in l_adj_rec to p_adj_rec out variable
2103:
2104: p_adj_rec := l_adj_rec;
2105: --DBMS_output.put_line('In Fetch Best Adjustment percent :'||p_adj_rec.percent);
2106: oe_debug_pub.add('Exiting QP_PRC_UTIL.FETCH_BEST_ADJUSTMENT', 1);
2107:
2108: EXCEPTION
2109:
2110: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2202: oe_debug_pub.add('Entering QP_PRC_UTIL.CALCULATE_SELLING_PRICE', 1);

2198: l_rounding_factor NUMBER;
2199:
2200: BEGIN
2201:
2202: oe_debug_pub.add('Entering QP_PRC_UTIL.CALCULATE_SELLING_PRICE', 1);
2203:
2204: -- p_price_list_id and p_pricing_method_code are required. If
2205: -- either is null, set all out parameters to NULL and return.
2206: --DBMS_output.put_line('In cal selling price--price_list_id: '||p_price_list_id);

Line 2328: oe_debug_pub.add('Exiting QP_PRC_UTIL.CALCULATE_SELLING_PRICE', 1);

2324: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2325:
2326: END IF;
2327:
2328: oe_debug_pub.add('Exiting QP_PRC_UTIL.CALCULATE_SELLING_PRICE', 1);
2329:
2330: EXCEPTION
2331:
2332: WHEN OTHERS THEN

Line 2411: oe_debug_pub.add('Entering QP_PRC_UTIL.PRICE_ITEM', 1);

2407: BEGIN
2408:
2409: --DBMS_output.put_line('I am in Price Item');
2410:
2411: oe_debug_pub.add('Entering QP_PRC_UTIL.PRICE_ITEM', 1);
2412:
2413: -- Initialize p_return_status
2414:
2415: p_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2679: oe_debug_pub.add('Exiting QP_PRC_UTIL.PRICE_ITEM', 1);

2675: p_selling_percent => p_selling_percent ,
2676: p_list_price_out => p_list_price_out
2677: );
2678:
2679: oe_debug_pub.add('Exiting QP_PRC_UTIL.PRICE_ITEM', 1);
2680:
2681: EXCEPTION
2682:
2683: WHEN FND_API.G_EXC_ERROR THEN

Line 2758: END QP_PRC_UTIL;

2754: ,G_PRICE_LIST_NAME);
2755:
2756:
2757: -- END QP
2758: END QP_PRC_UTIL;
2759: