DBA Data[Home] [Help]

APPS.MTL_QP_PRICE dependencies on MTL_QP_PRICE

Line 1: PACKAGE BODY mtl_qp_price AS

1: PACKAGE BODY mtl_qp_price AS
2: /* $Header: INVVICAB.pls 120.11.12020000.2 2012/07/26 10:42:38 rkatoori ship $ */
3: g_pkg_name CONSTANT VARCHAR2(30) := 'MTL_QP_PRICE';
4:
5: TYPE pls_integer_type IS TABLE OF PLS_INTEGER

Line 3: g_pkg_name CONSTANT VARCHAR2(30) := 'MTL_QP_PRICE';

1: PACKAGE BODY mtl_qp_price AS
2: /* $Header: INVVICAB.pls 120.11.12020000.2 2012/07/26 10:42:38 rkatoori ship $ */
3: g_pkg_name CONSTANT VARCHAR2(30) := 'MTL_QP_PRICE';
4:
5: TYPE pls_integer_type IS TABLE OF PLS_INTEGER
6: INDEX BY BINARY_INTEGER;
7:

Line 158: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Line Identifier...');

154: l_pricing_event := p_pricing_event;
155:
156:
157: IF (l_debug = 1) THEN
158: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Line Identifier...');
159: print_debug('MTL_QP_PRICE.get_Transfer_price: p_transaction_id = ' || p_transaction_id);
160: print_debug('MTL_QP_PRICE.get_Transfer_price: p_order_line_id = ' || p_order_line_id);
161: print_debug('MTL_QP_PRICE.get_Transfer_price: p_inventory_item_id = ' || p_inventory_item_id);
162: print_debug('MTL_QP_PRICE.get_Transfer_price: p_uom_code = ' || p_uom_code);

Line 159: print_debug('MTL_QP_PRICE.get_Transfer_price: p_transaction_id = ' || p_transaction_id);

155:
156:
157: IF (l_debug = 1) THEN
158: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Line Identifier...');
159: print_debug('MTL_QP_PRICE.get_Transfer_price: p_transaction_id = ' || p_transaction_id);
160: print_debug('MTL_QP_PRICE.get_Transfer_price: p_order_line_id = ' || p_order_line_id);
161: print_debug('MTL_QP_PRICE.get_Transfer_price: p_inventory_item_id = ' || p_inventory_item_id);
162: print_debug('MTL_QP_PRICE.get_Transfer_price: p_uom_code = ' || p_uom_code);
163: print_debug('MTL_QP_PRICE.get_Transfer_price: p_cto_item_flag = ' || p_cto_item_flag);

Line 160: print_debug('MTL_QP_PRICE.get_Transfer_price: p_order_line_id = ' || p_order_line_id);

156:
157: IF (l_debug = 1) THEN
158: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Line Identifier...');
159: print_debug('MTL_QP_PRICE.get_Transfer_price: p_transaction_id = ' || p_transaction_id);
160: print_debug('MTL_QP_PRICE.get_Transfer_price: p_order_line_id = ' || p_order_line_id);
161: print_debug('MTL_QP_PRICE.get_Transfer_price: p_inventory_item_id = ' || p_inventory_item_id);
162: print_debug('MTL_QP_PRICE.get_Transfer_price: p_uom_code = ' || p_uom_code);
163: print_debug('MTL_QP_PRICE.get_Transfer_price: p_cto_item_flag = ' || p_cto_item_flag);
164: print_debug('MTL_QP_PRICE.get_Transfer_price: p_organization_id = ' || p_organization_id);

Line 161: print_debug('MTL_QP_PRICE.get_Transfer_price: p_inventory_item_id = ' || p_inventory_item_id);

157: IF (l_debug = 1) THEN
158: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Line Identifier...');
159: print_debug('MTL_QP_PRICE.get_Transfer_price: p_transaction_id = ' || p_transaction_id);
160: print_debug('MTL_QP_PRICE.get_Transfer_price: p_order_line_id = ' || p_order_line_id);
161: print_debug('MTL_QP_PRICE.get_Transfer_price: p_inventory_item_id = ' || p_inventory_item_id);
162: print_debug('MTL_QP_PRICE.get_Transfer_price: p_uom_code = ' || p_uom_code);
163: print_debug('MTL_QP_PRICE.get_Transfer_price: p_cto_item_flag = ' || p_cto_item_flag);
164: print_debug('MTL_QP_PRICE.get_Transfer_price: p_organization_id = ' || p_organization_id);
165: END IF;

Line 162: print_debug('MTL_QP_PRICE.get_Transfer_price: p_uom_code = ' || p_uom_code);

158: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Line Identifier...');
159: print_debug('MTL_QP_PRICE.get_Transfer_price: p_transaction_id = ' || p_transaction_id);
160: print_debug('MTL_QP_PRICE.get_Transfer_price: p_order_line_id = ' || p_order_line_id);
161: print_debug('MTL_QP_PRICE.get_Transfer_price: p_inventory_item_id = ' || p_inventory_item_id);
162: print_debug('MTL_QP_PRICE.get_Transfer_price: p_uom_code = ' || p_uom_code);
163: print_debug('MTL_QP_PRICE.get_Transfer_price: p_cto_item_flag = ' || p_cto_item_flag);
164: print_debug('MTL_QP_PRICE.get_Transfer_price: p_organization_id = ' || p_organization_id);
165: END IF;
166:

Line 163: print_debug('MTL_QP_PRICE.get_Transfer_price: p_cto_item_flag = ' || p_cto_item_flag);

159: print_debug('MTL_QP_PRICE.get_Transfer_price: p_transaction_id = ' || p_transaction_id);
160: print_debug('MTL_QP_PRICE.get_Transfer_price: p_order_line_id = ' || p_order_line_id);
161: print_debug('MTL_QP_PRICE.get_Transfer_price: p_inventory_item_id = ' || p_inventory_item_id);
162: print_debug('MTL_QP_PRICE.get_Transfer_price: p_uom_code = ' || p_uom_code);
163: print_debug('MTL_QP_PRICE.get_Transfer_price: p_cto_item_flag = ' || p_cto_item_flag);
164: print_debug('MTL_QP_PRICE.get_Transfer_price: p_organization_id = ' || p_organization_id);
165: END IF;
166:
167: --l_inventory_item_id := p_inventory_item_id;

Line 164: print_debug('MTL_QP_PRICE.get_Transfer_price: p_organization_id = ' || p_organization_id);

160: print_debug('MTL_QP_PRICE.get_Transfer_price: p_order_line_id = ' || p_order_line_id);
161: print_debug('MTL_QP_PRICE.get_Transfer_price: p_inventory_item_id = ' || p_inventory_item_id);
162: print_debug('MTL_QP_PRICE.get_Transfer_price: p_uom_code = ' || p_uom_code);
163: print_debug('MTL_QP_PRICE.get_Transfer_price: p_cto_item_flag = ' || p_cto_item_flag);
164: print_debug('MTL_QP_PRICE.get_Transfer_price: p_organization_id = ' || p_organization_id);
165: END IF;
166:
167: --l_inventory_item_id := p_inventory_item_id;
168: l_organization_id := p_organization_id;

Line 181: print_debug('MTL_QP_PRICE.get_Transfer_price:..transaction_uom IS NULL');

177: where transaction_id = p_transaction_id;
178: EXCEPTION
179: WHEN NO_DATA_FOUND THEN
180: IF (l_debug = 1) THEN
181: print_debug('MTL_QP_PRICE.get_Transfer_price:..transaction_uom IS NULL');
182: END IF;
183: WHEN OTHERS THEN
184: IF (l_debug = 1) THEN
185: print_debug('MTL_QP_PRICE.get_Transfer_price:..transaction_uom IS NULL');

Line 185: print_debug('MTL_QP_PRICE.get_Transfer_price:..transaction_uom IS NULL');

181: print_debug('MTL_QP_PRICE.get_Transfer_price:..transaction_uom IS NULL');
182: END IF;
183: WHEN OTHERS THEN
184: IF (l_debug = 1) THEN
185: print_debug('MTL_QP_PRICE.get_Transfer_price:..transaction_uom IS NULL');
186: END IF;
187: END;
188: END IF;
189: /* End of changes for bug 8881690 */

Line 268: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Header Identifier...');

264: END IF;
265: -- END IF; /* OPM Bug 2865040 */ -- OPM INVCONV umoogala
266:
267: IF (l_debug = 1) THEN
268: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Header Identifier...');
269: END IF;
270:
271: SELECT header_id
272: INTO l_header_id

Line 277: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Primary UOM...');

273: FROM oe_order_lines_all
274: WHERE line_id = l_line_id;
275:
276: IF (l_debug = 1) THEN
277: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Primary UOM...');
278: END IF;
279:
280: SELECT primary_uom_code
281: , NVL(base_item_id, 0)

Line 289: print_debug('MTL_QP_PRICE.get_transfer_price: Building Global Structure...');

285: WHERE inventory_item_id = l_inventory_item_id
286: AND organization_id = l_organization_id;
287:
288: IF (l_debug = 1) THEN
289: print_debug('MTL_QP_PRICE.get_transfer_price: Building Global Structure...');
290: print_debug('l_base_item_id is ' || l_base_item_id);
291: print_debug('p_cto_item_flag is ' || p_cto_item_flag);
292: END IF;
293:

Line 376: Print_debug('MTL_QP_PRICE.get_transfer_price: Build Context for header...');

372: , px_line_index => l_line_index);
373:
374: /*
375: IF (l_debug = 1) THEN
376: Print_debug('MTL_QP_PRICE.get_transfer_price: Build Context for header...');
377: END IF;*/
378:
379: qp_attr_mapping_pub.build_contexts(p_request_type_code => l_request_type_code, p_pricing_type_code => 'H'
380: , p_line_index => inv_ic_order_pub.g_hdr.header_id);

Line 394: print_debug('MTL_QP_PRICE.get_transfer_price: Build Context for line...');

390: print_debug('Ship To=' || TO_CHAR(inv_ic_order_pub.g_line.ship_to_org_id));
391: END IF;
392:
393: IF (l_debug = 1) THEN
394: print_debug('MTL_QP_PRICE.get_transfer_price: Build Context for line...');
395: END IF;
396:
397: qp_attr_mapping_pub.build_contexts(
398: p_request_type_code => l_request_type_code

Line 406: print_debug('MTL_QP_PRICE.get_transfer_price: Populating Lines temp table...');

402: /* Added mod function for bug 8534865 */
403:
404: IF l_line_index > 0 THEN
405: IF (l_debug = 1) THEN
406: print_debug('MTL_QP_PRICE.get_transfer_price: Populating Lines temp table...');
407: END IF;
408:
409: populate_temp_table(x_return_status);
410: END IF;

Line 413: print_debug('MTL_QP_PRICE.get_transfer_price: Initializing control record...');

409: populate_temp_table(x_return_status);
410: END IF;
411:
412: IF (l_debug = 1) THEN
413: print_debug('MTL_QP_PRICE.get_transfer_price: Initializing control record...');
414: END IF;
415:
416: l_control_rec.pricing_event := l_pricing_event;
417: l_control_rec.calculate_flag := qp_preq_grp.g_search_n_calculate;

Line 424: print_debug('MTL_QP_PRICE.get_transfer_price: Assigning value of org_id to l_control_rec...'||p_ship_ou_id);

420: l_control_rec.rounding_flag := 'Y';
421: -- Bug 3070474 (porting from bug 3027452) : added the following statement
422: l_control_rec.use_multi_currency := 'Y';
423:
424: print_debug('MTL_QP_PRICE.get_transfer_price: Assigning value of org_id to l_control_rec...'||p_ship_ou_id);
425: --MOAC Changes: Passing the Shipping Operating unit to QP API.
426: l_control_rec.org_id := p_ship_ou_id;
427: print_debug('MTL_QP_PRICE.get_transfer_price: After assigning the value of org_id to l_control_rec...'||l_control_rec.org_id);
428:

Line 427: print_debug('MTL_QP_PRICE.get_transfer_price: After assigning the value of org_id to l_control_rec...'||l_control_rec.org_id);

423:
424: print_debug('MTL_QP_PRICE.get_transfer_price: Assigning value of org_id to l_control_rec...'||p_ship_ou_id);
425: --MOAC Changes: Passing the Shipping Operating unit to QP API.
426: l_control_rec.org_id := p_ship_ou_id;
427: print_debug('MTL_QP_PRICE.get_transfer_price: After assigning the value of org_id to l_control_rec...'||l_control_rec.org_id);
428:
429: IF (l_debug = 1) THEN
430: print_debug('MTL_QP_PRICE.get_transfer_price: Calling QP:Price Request routine ...');
431: END IF;

Line 430: print_debug('MTL_QP_PRICE.get_transfer_price: Calling QP:Price Request routine ...');

426: l_control_rec.org_id := p_ship_ou_id;
427: print_debug('MTL_QP_PRICE.get_transfer_price: After assigning the value of org_id to l_control_rec...'||l_control_rec.org_id);
428:
429: IF (l_debug = 1) THEN
430: print_debug('MTL_QP_PRICE.get_transfer_price: Calling QP:Price Request routine ...');
431: END IF;
432:
433: qp_preq_pub.price_request(p_control_rec => l_control_rec, x_return_status => x_return_status
434: , x_return_status_text => l_return_status_text);

Line 438: print_debug('MTL_QP_PRICE.get_transfer_price: QP_PREQ_PUB.PRICE_REQUEST error ');

434: , x_return_status_text => l_return_status_text);
435:
436: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
437: IF (l_debug = 1) THEN
438: print_debug('MTL_QP_PRICE.get_transfer_price: QP_PREQ_PUB.PRICE_REQUEST error ');
439: print_debug('MTL_QP_PRICE.get_transfer_price: x_return_status_text=' || l_return_status_text);
440: END IF;
441:
442: fnd_message.set_name('INV', 'INV_UNHANDLED_ERR');

Line 439: print_debug('MTL_QP_PRICE.get_transfer_price: x_return_status_text=' || l_return_status_text);

435:
436: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
437: IF (l_debug = 1) THEN
438: print_debug('MTL_QP_PRICE.get_transfer_price: QP_PREQ_PUB.PRICE_REQUEST error ');
439: print_debug('MTL_QP_PRICE.get_transfer_price: x_return_status_text=' || l_return_status_text);
440: END IF;
441:
442: fnd_message.set_name('INV', 'INV_UNHANDLED_ERR');
443: fnd_message.set_token('ENTITY1', 'QP_PREQ_PUB.PRICE_REQUEST');

Line 449: print_debug('MTL_QP_PRICE.get_transfer_price: Populating QP results ...');

445: RAISE fnd_api.g_exc_error;
446: END IF;
447:
448: IF (l_debug = 1) THEN
449: print_debug('MTL_QP_PRICE.get_transfer_price: Populating QP results ...');
450: END IF;
451:
452: populate_results(l_line_index, x_return_status);
453: x_currency_code := g_currency_code_tbl(l_line_index);

Line 491: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP NO_DATA_FOUND ');

487: RETURN(l_tfrprice);
488: EXCEPTION
489: WHEN NO_DATA_FOUND THEN
490: IF (l_debug = 1) THEN
491: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP NO_DATA_FOUND ');
492: END IF;
493:
494: fnd_message.set_name('INV', 'INV_NO_DATA_EXISTS');
495: RETURN(g_unit_selling_price_tbl(l_line_index));

Line 498: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP G_EXC_ERROR ');

494: fnd_message.set_name('INV', 'INV_NO_DATA_EXISTS');
495: RETURN(g_unit_selling_price_tbl(l_line_index));
496: WHEN fnd_api.g_exc_error THEN
497: IF (l_debug = 1) THEN
498: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP G_EXC_ERROR ');
499: END IF;
500:
501: RETURN(g_unit_selling_price_tbl(l_line_index));
502: WHEN fnd_api.g_exc_unexpected_error THEN

Line 504: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP G_EXC_UNEXPECTED_ERROR ');

500:
501: RETURN(g_unit_selling_price_tbl(l_line_index));
502: WHEN fnd_api.g_exc_unexpected_error THEN
503: IF (l_debug = 1) THEN
504: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP G_EXC_UNEXPECTED_ERROR ');
505: END IF;
506:
507: RETURN(g_unit_selling_price_tbl(l_line_index));
508: WHEN OTHERS THEN

Line 510: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP UNEXP OTHERS - ' || SQLERRM);

506:
507: RETURN(g_unit_selling_price_tbl(l_line_index));
508: WHEN OTHERS THEN
509: IF (l_debug = 1) THEN
510: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP UNEXP OTHERS - ' || SQLERRM);
511: END IF;
512:
513: RETURN(g_unit_selling_price_tbl(l_line_index));
514: END get_transfer_price;

Line 523: print_debug('MTL_QP_PRICE.G_Hdr_Initialize: Populating G_HDR...');

519: x_return_status := fnd_api.g_ret_sts_success;
520:
521: -- Header population
522: IF (l_debug = 1) THEN
523: print_debug('MTL_QP_PRICE.G_Hdr_Initialize: Populating G_HDR...');
524: END IF;
525:
526: SELECT accounting_rule_id
527: , agreement_id

Line 811: print_debug('MTL_QP_PRICE.G_Hdr_Initialize: EXCEP NO_DATA_FOUND ');

807: WHEN NO_DATA_FOUND THEN
808: x_return_status := fnd_api.g_ret_sts_error;
809:
810: IF (l_debug = 1) THEN
811: print_debug('MTL_QP_PRICE.G_Hdr_Initialize: EXCEP NO_DATA_FOUND ');
812: END IF;
813:
814: fnd_message.set_name('INV', 'INV_NO_DATA_EXISTS');
815: RAISE NO_DATA_FOUND;

Line 820: print_debug('MTL_QP_PRICE.G_Hdr_Initialize: EXCEP UNEXP OTHERS - ' || SQLERRM);

816: WHEN OTHERS THEN
817: x_return_status := fnd_api.g_ret_sts_unexp_error;
818:
819: IF (l_debug = 1) THEN
820: print_debug('MTL_QP_PRICE.G_Hdr_Initialize: EXCEP UNEXP OTHERS - ' || SQLERRM);
821: END IF;
822:
823: RAISE fnd_api.g_exc_unexpected_error;
824: END g_hdr_initialize;

Line 1195: print_debug('MTL_QP_PRICE.G_Line_Initialize: Populating IC fields...');

1191: inv_ic_order_pub.g_line.split_action_code := fnd_api.g_miss_char;
1192:
1193: -- Intercompany fields population
1194: IF (l_debug = 1) THEN
1195: print_debug('MTL_QP_PRICE.G_Line_Initialize: Populating IC fields...');
1196: END IF;
1197:
1198: --
1199: -- OPM INVCONV umoogala Process Discrete Transfers Enh.

Line 1235: print_debug('MTL_QP_PRICE.G_Line_Initialize: IC fields NO_DATA_FOUND...');

1231: WHEN NO_DATA_FOUND THEN
1232: x_return_status := fnd_api.g_ret_sts_error;
1233:
1234: IF (l_debug = 1) THEN
1235: print_debug('MTL_QP_PRICE.G_Line_Initialize: IC fields NO_DATA_FOUND...');
1236: END IF;
1237: WHEN OTHERS THEN
1238: x_return_status := fnd_api.g_ret_sts_unexp_error;
1239:

Line 1241: print_debug('MTL_QP_PRICE.G_Line_Initialize: IC fields EXCEP UNEXP OTHERS - ' || SQLERRM);

1237: WHEN OTHERS THEN
1238: x_return_status := fnd_api.g_ret_sts_unexp_error;
1239:
1240: IF (l_debug = 1) THEN
1241: print_debug('MTL_QP_PRICE.G_Line_Initialize: IC fields EXCEP UNEXP OTHERS - ' || SQLERRM);
1242: END IF;
1243: END;
1244:
1245: inv_ic_order_pub.g_line.ic_selling_org_id := l_sell_org_id;

Line 1252: print_debug('MTL_QP_PRICE.G_Line_Initialize: Populating G_LINE...');

1248: END IF; -- OPM INVCONV umoogala (if p_request_type_code = 'IC')
1249:
1250: -- Line population
1251: IF (l_debug = 1) THEN
1252: print_debug('MTL_QP_PRICE.G_Line_Initialize: Populating G_LINE...');
1253: END IF;
1254:
1255: SELECT accounting_rule_id
1256: , actual_arrival_date

Line 1847: print_debug('MTL_QP_PRICE.G_Line_Initialize: InventoryItemId=' || TO_CHAR(inv_ic_order_pub.g_line.inventory_item_id));

1843:
1844: inv_ic_order_pub.g_line.calculate_price_flag := 'Y';
1845:
1846: IF (l_debug = 1) THEN
1847: print_debug('MTL_QP_PRICE.G_Line_Initialize: InventoryItemId=' || TO_CHAR(inv_ic_order_pub.g_line.inventory_item_id));
1848: END IF;
1849: EXCEPTION
1850: WHEN NO_DATA_FOUND THEN
1851: x_return_status := fnd_api.g_ret_sts_error;

Line 1854: print_debug('MTL_QP_PRICE.G_Line_Initialize: EXCEP NO_DATA_FOUND ');

1850: WHEN NO_DATA_FOUND THEN
1851: x_return_status := fnd_api.g_ret_sts_error;
1852:
1853: IF (l_debug = 1) THEN
1854: print_debug('MTL_QP_PRICE.G_Line_Initialize: EXCEP NO_DATA_FOUND ');
1855: END IF;
1856:
1857: fnd_message.set_name('INV', 'INV_NO_DATA_EXISTS');
1858: RAISE NO_DATA_FOUND;

Line 1863: print_debug('MTL_QP_PRICE.G_Line_Initialize: EXCEP UNEXP OTHERS - ' || SQLERRM);

1859: WHEN OTHERS THEN
1860: x_return_status := fnd_api.g_ret_sts_unexp_error;
1861:
1862: IF (l_debug = 1) THEN
1863: print_debug('MTL_QP_PRICE.G_Line_Initialize: EXCEP UNEXP OTHERS - ' || SQLERRM);
1864: END IF;
1865:
1866: RAISE fnd_api.g_exc_unexpected_error;
1867: END g_line_initialize;

Line 1968: print_debug('MTL_QP_PRICE.copy_line_to_request: Calling get_transfer_price_date');

1964: g_price_list_id_tbl(px_line_index) := NULL;
1965:
1966: /* bug 6700919 Calling get_transfer_price_date to retreive the date
1967: by which price list price will be queried*/
1968: print_debug('MTL_QP_PRICE.copy_line_to_request: Calling get_transfer_price_date');
1969: g_pricing_effective_date_tbl(px_line_index) := INV_TRANSACTION_FLOW_PUB.get_transfer_price_date(
1970: p_call => 'E'
1971: ,p_order_line_id => p_line_rec.line_id
1972: ,p_global_procurement_flag => 'N'

Line 1979: print_debug('MTL_QP_PRICE.copy_line_to_request: Tranfer Price Date ='|| g_pricing_effective_date_tbl(px_line_index));

1975: ,x_return_status => l_return_status
1976: ,x_msg_data => l_msg_data
1977: ,x_msg_count => l_msg_count
1978: );
1979: print_debug('MTL_QP_PRICE.copy_line_to_request: Tranfer Price Date ='|| g_pricing_effective_date_tbl(px_line_index));
1980:
1981: if( l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
1982: print_debug('MTL_QP_PRICE.copy_line_to_request: Error from get_transfer_price_date');
1983: raise FND_API.G_EXC_ERROR;

Line 1982: print_debug('MTL_QP_PRICE.copy_line_to_request: Error from get_transfer_price_date');

1978: );
1979: print_debug('MTL_QP_PRICE.copy_line_to_request: Tranfer Price Date ='|| g_pricing_effective_date_tbl(px_line_index));
1980:
1981: if( l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
1982: print_debug('MTL_QP_PRICE.copy_line_to_request: Error from get_transfer_price_date');
1983: raise FND_API.G_EXC_ERROR;
1984: end if;
1985:
1986: /* IF p_line_rec.pricing_date IS NULL

Line 2069: print_debug('MTL_QP_PRICE.Populate_Temp_Table: Calling QP:Bulk insert routine...');

2065: END IF;
2066: END LOOP;
2067:
2068: IF (l_debug = 1) THEN
2069: print_debug('MTL_QP_PRICE.Populate_Temp_Table: Calling QP:Bulk insert routine...');
2070: END IF;
2071:
2072: qp_preq_grp.insert_lines2(
2073: p_line_index => g_line_index_tbl

Line 2112: print_debug('MTL_QP_PRICE.Populate_Temp_Table: QP_PREQ_GRP.INSERT_LINES2 error ');

2108: );
2109:
2110: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
2111: IF (l_debug = 1) THEN
2112: print_debug('MTL_QP_PRICE.Populate_Temp_Table: QP_PREQ_GRP.INSERT_LINES2 error ');
2113: print_debug('MTL_QP_PRICE.Populate_Temp_Table: x_return_status_text=' || l_return_status_text);
2114: END IF;
2115:
2116: x_return_status := l_return_status;

Line 2113: print_debug('MTL_QP_PRICE.Populate_Temp_Table: x_return_status_text=' || l_return_status_text);

2109:
2110: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
2111: IF (l_debug = 1) THEN
2112: print_debug('MTL_QP_PRICE.Populate_Temp_Table: QP_PREQ_GRP.INSERT_LINES2 error ');
2113: print_debug('MTL_QP_PRICE.Populate_Temp_Table: x_return_status_text=' || l_return_status_text);
2114: END IF;
2115:
2116: x_return_status := l_return_status;
2117: fnd_message.set_name('INV', 'INV_UNHANDLED_ERR');

Line 2128: print_debug('MTL_QP_PRICE.Populate_Temp_Table: No. of records inserted in QP_PREQ_LINES_TMP=' || TO_CHAR(i));

2124: INTO i
2125: FROM qp_preq_lines_tmp;
2126:
2127: IF (l_debug = 1) THEN
2128: print_debug('MTL_QP_PRICE.Populate_Temp_Table: No. of records inserted in QP_PREQ_LINES_TMP=' || TO_CHAR(i));
2129: END IF;
2130: EXCEPTION
2131: WHEN fnd_api.g_exc_error THEN
2132: RAISE fnd_api.g_exc_error;

Line 2137: print_debug('MTL_QP_PRICE.Populate_Temp_Table: EXCEP UNEXP OTHERS - ' || SQLERRM);

2133: WHEN OTHERS THEN
2134: x_return_status := fnd_api.g_ret_sts_unexp_error;
2135:
2136: IF (l_debug = 1) THEN
2137: print_debug('MTL_QP_PRICE.Populate_Temp_Table: EXCEP UNEXP OTHERS - ' || SQLERRM);
2138: END IF;
2139: END populate_temp_table;
2140:
2141: PROCEDURE populate_results(p_line_index NUMBER, x_return_status OUT NOCOPY VARCHAR2) IS

Line 2220: print_debug('MTL_QP_PRICE.Populate_Results: UNIT PRICE NOT POPULATED');

2216: IF g_line_type_code_tbl(i) = 'LINE' THEN
2217: x_return_status := fnd_api.g_ret_sts_error;
2218:
2219: IF (l_debug = 1) THEN
2220: print_debug('MTL_QP_PRICE.Populate_Results: UNIT PRICE NOT POPULATED');
2221: END IF;
2222: ELSE
2223: IF (l_debug = 1) THEN
2224: print_debug('MTL_QP_PRICE.Populate_Results: ' || g_line_type_code_tbl(i) || ' NO_DATA_FOUND');

Line 2224: print_debug('MTL_QP_PRICE.Populate_Results: ' || g_line_type_code_tbl(i) || ' NO_DATA_FOUND');

2220: print_debug('MTL_QP_PRICE.Populate_Results: UNIT PRICE NOT POPULATED');
2221: END IF;
2222: ELSE
2223: IF (l_debug = 1) THEN
2224: print_debug('MTL_QP_PRICE.Populate_Results: ' || g_line_type_code_tbl(i) || ' NO_DATA_FOUND');
2225: END IF;
2226: END IF;
2227: WHEN OTHERS THEN
2228: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 2231: print_debug('MTL_QP_PRICE.Populate_Results: ' || SQLERRM);

2227: WHEN OTHERS THEN
2228: x_return_status := fnd_api.g_ret_sts_unexp_error;
2229:
2230: IF (l_debug = 1) THEN
2231: print_debug('MTL_QP_PRICE.Populate_Results: ' || SQLERRM);
2232: END IF;
2233: END;
2234:
2235: IF g_line_type_code_tbl(i) = 'LINE' THEN

Line 2238: print_debug('MTL_QP_PRICE.Populate_Results: Unit_Price=' || g_unit_selling_price_tbl(i));

2234:
2235: IF g_line_type_code_tbl(i) = 'LINE' THEN
2236: IF g_pricing_status_code_tbl(i) = qp_preq_grp.g_status_updated THEN
2237: IF (l_debug = 1) THEN
2238: print_debug('MTL_QP_PRICE.Populate_Results: Unit_Price=' || g_unit_selling_price_tbl(i));
2239: END IF;
2240: ELSE
2241: x_return_status := fnd_api.g_ret_sts_error;
2242:

Line 2245: 'MTL_QP_PRICE.Populate_Results: Status_Code=' || g_pricing_status_code_tbl(i) || ' Status_Text='

2241: x_return_status := fnd_api.g_ret_sts_error;
2242:
2243: IF (l_debug = 1) THEN
2244: print_debug(
2245: 'MTL_QP_PRICE.Populate_Results: Status_Code=' || g_pricing_status_code_tbl(i) || ' Status_Text='
2246: || g_pricing_status_text_tbl(i)
2247: );
2248: END IF;
2249: END IF;

Line 2282: print_debug('MTL_QP_PRICE.Populate_Results: EXCEP UNEXP OTHERS - ' || SQLERRM);

2278: WHEN OTHERS THEN
2279: x_return_status := fnd_api.g_ret_sts_unexp_error;
2280:
2281: IF (l_debug = 1) THEN
2282: print_debug('MTL_QP_PRICE.Populate_Results: EXCEP UNEXP OTHERS - ' || SQLERRM);
2283: END IF;
2284:
2285: RAISE fnd_api.g_exc_unexpected_error;
2286: END populate_results;

Line 2403: print_debug('MTL_QP_PRICE.copy_proc_line_to_request: Calling get_transfer_price_date');

2399: g_price_list_id_tbl(px_line_index) := NULL;
2400:
2401: /* bug 6700919 Calling get_transfer_price_date to retreive the date
2402: by which price list price will be queried*/
2403: print_debug('MTL_QP_PRICE.copy_proc_line_to_request: Calling get_transfer_price_date');
2404: g_pricing_effective_date_tbl(px_line_index) := INV_TRANSACTION_FLOW_PUB.get_transfer_price_date(
2405: p_call => 'E'
2406: ,p_order_line_id => p_line_rec.po_line_id
2407: ,p_global_procurement_flag => 'Y'

Line 2414: print_debug('MTL_QP_PRICE.copy_proc_line_to_request: Tranfer Price Date ='|| g_pricing_effective_date_tbl(px_line_index));

2410: ,x_return_status => l_return_status
2411: ,x_msg_data => l_msg_data
2412: ,x_msg_count => l_msg_count
2413: );
2414: print_debug('MTL_QP_PRICE.copy_proc_line_to_request: Tranfer Price Date ='|| g_pricing_effective_date_tbl(px_line_index));
2415:
2416: if( l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2417: print_debug('MTL_QP_PRICE.copy_line_to_request: Error from get_transfer_price_date');
2418: raise FND_API.G_EXC_ERROR;

Line 2417: print_debug('MTL_QP_PRICE.copy_line_to_request: Error from get_transfer_price_date');

2413: );
2414: print_debug('MTL_QP_PRICE.copy_proc_line_to_request: Tranfer Price Date ='|| g_pricing_effective_date_tbl(px_line_index));
2415:
2416: if( l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2417: print_debug('MTL_QP_PRICE.copy_line_to_request: Error from get_transfer_price_date');
2418: raise FND_API.G_EXC_ERROR;
2419: end if;
2420:
2421: /* --IF p_Line_rec.pricing_date IS NULL OR p_Line_rec.pricing_date = fnd_api.g_miss_date THEN

Line 2488: print_debug('START MTL_QP_PRICE.Get_Transfer_Price_DS ');

2484: x_tfrpricecode := 1;
2485: x_msg_count := 0;
2486: x_msg_data := ' ';
2487: l_tfrprice := -1;
2488: print_debug('START MTL_QP_PRICE.Get_Transfer_Price_DS ');
2489: print_debug('Input Parameters are ');
2490: print_debug('p_transaction_id = ' || p_transaction_id);
2491: print_debug('p_sell_ou_id = ' || p_sell_ou_id || ' p_ship_ou_id = ' || p_ship_ou_id);
2492: print_debug('p_flow_type = ' || p_flow_type);

Line 2534: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Primary UOM...');

2530: AND rcv.unit_of_measure = um.unit_of_measure;
2531:
2532: IF (l_debug = 1) THEN
2533: print_debug('l_line_id = ' || l_line_id || ' l_header_id = ' || l_header_id);
2534: print_debug('MTL_QP_PRICE.get_transfer_price: Selecting Primary UOM...');
2535: END IF;
2536:
2537: SELECT primary_uom_code
2538: INTO l_primary_uom

Line 2544: print_debug('MTL_QP_PRICE.get_transfer_price: Building Global Structure...');

2540: WHERE inventory_item_id = l_inventory_item_id
2541: AND organization_id = l_organization_id;
2542:
2543: IF (l_debug = 1) THEN
2544: print_debug('MTL_QP_PRICE.get_transfer_price: Building Global Structure...');
2545: END IF;
2546:
2547: g_proc_hdr_initialize(l_header_id, p_incr_code, p_incrcurrency, x_return_status);
2548:

Line 2567: print_debug('MTL_QP_PRICE.get_transfer_price: Build Context for header...');

2563: copy_proc_header_to_request(p_header_rec => inv_ic_order_pub.g_proc_hdr, p_request_type_code => l_request_type_code
2564: , px_line_index => l_line_index);
2565:
2566: IF (l_debug = 1) THEN
2567: print_debug('MTL_QP_PRICE.get_transfer_price: Build Context for header...');
2568: END IF;
2569:
2570: qp_attr_mapping_pub.build_contexts(p_request_type_code => l_request_type_code, p_pricing_type_code => 'H'
2571: , p_line_index => inv_ic_order_pub.g_proc_hdr.po_header_id);

Line 2582: print_debug('MTL_QP_PRICE.get_transfer_price: Build Context for line...');

2578: );
2579: inv_ic_order_pub.g_proc_line.primary_uom := l_primary_uom;
2580:
2581: IF (l_debug = 1) THEN
2582: print_debug('MTL_QP_PRICE.get_transfer_price: Build Context for line...');
2583: END IF;
2584:
2585: qp_attr_mapping_pub.build_contexts(
2586: p_request_type_code => l_request_type_code

Line 2593: print_debug('MTL_QP_PRICE.get_transfer_price: Populating Lines temp table...');

2589: );
2590:
2591: IF l_line_index > 0 THEN
2592: IF (l_debug = 1) THEN
2593: print_debug('MTL_QP_PRICE.get_transfer_price: Populating Lines temp table...');
2594: END IF;
2595:
2596: populate_temp_table(x_return_status);
2597: END IF;

Line 2600: print_debug('MTL_QP_PRICE.get_transfer_price: Initializing control record...');

2596: populate_temp_table(x_return_status);
2597: END IF;
2598:
2599: IF (l_debug = 1) THEN
2600: print_debug('MTL_QP_PRICE.get_transfer_price: Initializing control record...');
2601: END IF;
2602:
2603: l_control_rec.pricing_event := l_pricing_event;
2604: l_control_rec.calculate_flag := qp_preq_grp.g_search_n_calculate;

Line 2611: print_debug('MTL_QP_PRICE.get_transfer_price: Assigning value of org_id to l_control_rec...'||p_ship_ou_id);

2607: l_control_rec.rounding_flag := 'Y';
2608: -- Bug 3070474 (Porting from Bug 3027452 ): added the following statement
2609: l_control_rec.use_multi_currency := 'Y';
2610:
2611: print_debug('MTL_QP_PRICE.get_transfer_price: Assigning value of org_id to l_control_rec...'||p_ship_ou_id);
2612: --MOAC Changes: Passing the Shipping Operating unit to QP API.
2613: l_control_rec.org_id := p_ship_ou_id;
2614: print_debug('MTL_QP_PRICE.get_transfer_price: After assigning the value of org_id to l_control_rec...'||l_control_rec.org_id);
2615:

Line 2614: print_debug('MTL_QP_PRICE.get_transfer_price: After assigning the value of org_id to l_control_rec...'||l_control_rec.org_id);

2610:
2611: print_debug('MTL_QP_PRICE.get_transfer_price: Assigning value of org_id to l_control_rec...'||p_ship_ou_id);
2612: --MOAC Changes: Passing the Shipping Operating unit to QP API.
2613: l_control_rec.org_id := p_ship_ou_id;
2614: print_debug('MTL_QP_PRICE.get_transfer_price: After assigning the value of org_id to l_control_rec...'||l_control_rec.org_id);
2615:
2616: IF (l_debug = 1) THEN
2617: print_debug('MTL_QP_PRICE.get_transfer_price: Calling QP:Price Request routine ...');
2618: END IF;

Line 2617: print_debug('MTL_QP_PRICE.get_transfer_price: Calling QP:Price Request routine ...');

2613: l_control_rec.org_id := p_ship_ou_id;
2614: print_debug('MTL_QP_PRICE.get_transfer_price: After assigning the value of org_id to l_control_rec...'||l_control_rec.org_id);
2615:
2616: IF (l_debug = 1) THEN
2617: print_debug('MTL_QP_PRICE.get_transfer_price: Calling QP:Price Request routine ...');
2618: END IF;
2619:
2620: qp_preq_pub.price_request(p_control_rec => l_control_rec, x_return_status => x_return_status
2621: , x_return_status_text => l_return_status_text);

Line 2625: print_debug('MTL_QP_PRICE.get_transfer_price: QP_PREQ_PUB.PRICE_REQUEST error ');

2621: , x_return_status_text => l_return_status_text);
2622:
2623: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
2624: IF (l_debug = 1) THEN
2625: print_debug('MTL_QP_PRICE.get_transfer_price: QP_PREQ_PUB.PRICE_REQUEST error ');
2626: print_debug('MTL_QP_PRICE.get_transfer_price: x_return_status_text=' || l_return_status_text);
2627: END IF;
2628:
2629: fnd_message.set_name('INV', 'INV_UNHANDLED_ERR');

Line 2626: print_debug('MTL_QP_PRICE.get_transfer_price: x_return_status_text=' || l_return_status_text);

2622:
2623: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
2624: IF (l_debug = 1) THEN
2625: print_debug('MTL_QP_PRICE.get_transfer_price: QP_PREQ_PUB.PRICE_REQUEST error ');
2626: print_debug('MTL_QP_PRICE.get_transfer_price: x_return_status_text=' || l_return_status_text);
2627: END IF;
2628:
2629: fnd_message.set_name('INV', 'INV_UNHANDLED_ERR');
2630: fnd_message.set_token('ENTITY1', 'QP_PREQ_PUB.PRICE_REQUEST');

Line 2636: print_debug('MTL_QP_PRICE.get_transfer_price: Populating QP results ...');

2632: RAISE fnd_api.g_exc_error;
2633: END IF;
2634:
2635: IF (l_debug = 1) THEN
2636: print_debug('MTL_QP_PRICE.get_transfer_price: Populating QP results ...');
2637: END IF;
2638:
2639: populate_results(l_line_index, x_return_status);
2640: x_currency_code := g_currency_code_tbl(l_line_index);

Line 2661: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP NO_DATA_FOUND ');

2657: END IF;
2658: EXCEPTION
2659: WHEN NO_DATA_FOUND THEN
2660: IF (l_debug = 1) THEN
2661: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP NO_DATA_FOUND ');
2662: print_debug('l_progress = ' || l_progress);
2663: END IF;
2664:
2665: fnd_message.set_name('INV', 'INV_NO_DATA_EXISTS');

Line 2670: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP G_EXC_ERROR ');

2666: x_currency_code := NULL;
2667: RETURN(g_unit_selling_price_tbl(l_line_index));
2668: WHEN fnd_api.g_exc_error THEN
2669: IF (l_debug = 1) THEN
2670: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP G_EXC_ERROR ');
2671: print_debug('l_progress = ' || l_progress);
2672: END IF;
2673:
2674: x_currency_code := NULL;

Line 2678: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP G_EXC_UNEXPECTED_ERROR ');

2674: x_currency_code := NULL;
2675: RETURN(g_unit_selling_price_tbl(l_line_index));
2676: WHEN fnd_api.g_exc_unexpected_error THEN
2677: IF (l_debug = 1) THEN
2678: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP G_EXC_UNEXPECTED_ERROR ');
2679: print_debug('l_progress = ' || l_progress);
2680: END IF;
2681:
2682: x_currency_code := NULL;

Line 2686: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP UNEXP OTHERS - ' || SQLERRM);

2682: x_currency_code := NULL;
2683: RETURN(g_unit_selling_price_tbl(l_line_index));
2684: WHEN OTHERS THEN
2685: IF (l_debug = 1) THEN
2686: print_debug('MTL_QP_PRICE.get_transfer_price: EXCEP UNEXP OTHERS - ' || SQLERRM);
2687: print_debug('l_progress = ' || l_progress);
2688: END IF;
2689:
2690: x_currency_code := NULL;

Line 2706: print_debug('MTL_QP_PRICE.G_Proc_Hdr_Initialize: Populating G_PROC_HDR... ');

2702: x_return_status := fnd_api.g_ret_sts_success;
2703:
2704: -- Header population
2705: IF (l_debug = 1) THEN
2706: print_debug('MTL_QP_PRICE.G_Proc_Hdr_Initialize: Populating G_PROC_HDR... ');
2707: END IF;
2708:
2709: SELECT po_header_id
2710: , agent_id

Line 2958: print_debug('MTL_QP_PRICE.G_Proc_Hdr_Initialize: EXCEP NO_DATA_FOUND ');

2954: WHEN NO_DATA_FOUND THEN
2955: x_return_status := fnd_api.g_ret_sts_error;
2956:
2957: IF (l_debug = 1) THEN
2958: print_debug('MTL_QP_PRICE.G_Proc_Hdr_Initialize: EXCEP NO_DATA_FOUND ');
2959: END IF;
2960:
2961: fnd_message.set_name('INV', 'INV_NO_DATA_EXISTS');
2962: RAISE NO_DATA_FOUND;

Line 2967: print_debug('MTL_QP_PRICE.G_Proc_Hdr_Initialize: EXCEP UNEXP OTHERS - ' || SQLERRM);

2963: WHEN OTHERS THEN
2964: x_return_status := fnd_api.g_ret_sts_unexp_error;
2965:
2966: IF (l_debug = 1) THEN
2967: print_debug('MTL_QP_PRICE.G_Proc_Hdr_Initialize: EXCEP UNEXP OTHERS - ' || SQLERRM);
2968: END IF;
2969:
2970: RAISE fnd_api.g_exc_unexpected_error;
2971: END g_proc_hdr_initialize;

Line 2989: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: Populating IC fields...');

2985: x_return_status := fnd_api.g_ret_sts_success;
2986:
2987: -- Intercompany fields population
2988: IF (l_debug = 1) THEN
2989: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: Populating IC fields...');
2990: print_debug('p_to_org_id = ' || p_to_org_id || ' p_from_org_id = ' || p_from_org_id);
2991: print_debug('p_line_id = ' || p_line_id || ' p_primary_uom = ' || p_primary_uom);
2992: print_debug('p_inventory_item_id = ' || p_inventory_item_id || ' p_cto_item_flag = ' || p_cto_item_flag);
2993: END IF;

Line 3029: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: IC fields NO_DATA_FOUND...');

3025: WHEN NO_DATA_FOUND THEN
3026: x_return_status := fnd_api.g_ret_sts_error;
3027:
3028: IF (l_debug = 1) THEN
3029: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: IC fields NO_DATA_FOUND...');
3030: END IF;
3031: WHEN OTHERS THEN
3032: x_return_status := fnd_api.g_ret_sts_unexp_error;
3033:

Line 3035: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: IC fields EXCEP UNEXP OTHERS - ' || SQLERRM);

3031: WHEN OTHERS THEN
3032: x_return_status := fnd_api.g_ret_sts_unexp_error;
3033:
3034: IF (l_debug = 1) THEN
3035: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: IC fields EXCEP UNEXP OTHERS - ' || SQLERRM);
3036: END IF;
3037: END;
3038:
3039: print_debug('after getting information from mtl_intercompany_parameters');

Line 3278: ('MTL_QP_PRICE.G_Proc_Line_Initialize: Done Populating G_LINE.inventory_Item_Id from inv_ic_order_pub.g_proc_line.item_id..');

3274:
3275: -- Line population
3276: IF (l_debug = 1) THEN
3277: print_debug
3278: ('MTL_QP_PRICE.G_Proc_Line_Initialize: Done Populating G_LINE.inventory_Item_Id from inv_ic_order_pub.g_proc_line.item_id..');
3279: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: Done Populating G_PROC_LINE structure...');
3280: END IF;
3281: EXCEPTION
3282: WHEN NO_DATA_FOUND THEN

Line 3279: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: Done Populating G_PROC_LINE structure...');

3275: -- Line population
3276: IF (l_debug = 1) THEN
3277: print_debug
3278: ('MTL_QP_PRICE.G_Proc_Line_Initialize: Done Populating G_LINE.inventory_Item_Id from inv_ic_order_pub.g_proc_line.item_id..');
3279: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: Done Populating G_PROC_LINE structure...');
3280: END IF;
3281: EXCEPTION
3282: WHEN NO_DATA_FOUND THEN
3283: x_return_status := fnd_api.g_ret_sts_error;

Line 3286: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: EXCEP NO_DATA_FOUND ');

3282: WHEN NO_DATA_FOUND THEN
3283: x_return_status := fnd_api.g_ret_sts_error;
3284:
3285: IF (l_debug = 1) THEN
3286: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: EXCEP NO_DATA_FOUND ');
3287: END IF;
3288:
3289: fnd_message.set_name('INV', 'INV_NO_DATA_EXISTS');
3290: RAISE NO_DATA_FOUND;

Line 3295: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: EXCEP UNEXP OTHERS - ' || SQLERRM);

3291: WHEN OTHERS THEN
3292: x_return_status := fnd_api.g_ret_sts_unexp_error;
3293:
3294: IF (l_debug = 1) THEN
3295: print_debug('MTL_QP_PRICE.G_Proc_Line_Initialize: EXCEP UNEXP OTHERS - ' || SQLERRM);
3296: END IF;
3297:
3298: RAISE fnd_api.g_exc_unexpected_error;
3299: END g_proc_line_initialize;

Line 3300: END mtl_qp_price;

3296: END IF;
3297:
3298: RAISE fnd_api.g_exc_unexpected_error;
3299: END g_proc_line_initialize;
3300: END mtl_qp_price;