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.GMF_GET_TRANSFER_PRICE_PUB dependencies on GMF_GET_TRANSFER_PRICE_PUB

Line 1: PACKAGE BODY GMF_get_transfer_price_PUB AS

1: PACKAGE BODY GMF_get_transfer_price_PUB AS
2: /* $Header: GMFGXFRB.pls 120.13 2006/11/21 22:26:06 umoogala noship $ */
3:
4: G_PACKAGE_NAME VARCHAR2(50) := 'GMF_get_transfer_price_PUB';
5: --===================================================================

Line 4: G_PACKAGE_NAME VARCHAR2(50) := 'GMF_get_transfer_price_PUB';

1: PACKAGE BODY GMF_get_transfer_price_PUB AS
2: /* $Header: GMFGXFRB.pls 120.13 2006/11/21 22:26:06 umoogala noship $ */
3:
4: G_PACKAGE_NAME VARCHAR2(50) := 'GMF_get_transfer_price_PUB';
5: --===================================================================
6: --
7: -- Following G_ global variables will be used for Advanced Pricing
8: --

Line 192: l_api_name := 'GMF_get_transfer_price_PUB.get_transfer_price';

188: l_exists NUMBER(1);
189:
190: BEGIN
191:
192: l_api_name := 'GMF_get_transfer_price_PUB.get_transfer_price';
193: l_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
194: x_return_status := FND_API.G_RET_STS_SUCCESS;
195:
196:

Line 456: GMF_get_transfer_price_PUB.get_xfer_price_basic (

452: --===================================================================
453:
454: print_debug(l_api_name || ': Calling Basic Pricing...');
455:
456: GMF_get_transfer_price_PUB.get_xfer_price_basic (
457: x_transfer_price => l_transfer_price
458: , x_transfer_price_code => l_transfer_price_code
459: , x_pricelist_currency => l_pricelist_currency
460: , x_return_status => x_return_status

Line 471: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_basic: Error = '|| x_msg_data );

467: THEN
468:
469: x_msg_data := FND_MESSAGE.get;
470: IF (l_debug = 1) THEN
471: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_basic: Error = '|| x_msg_data );
472: END IF;
473: RAISE FND_API.G_EXC_ERROR;
474:
475: ELSE

Line 479: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_basic: Transfer Price is NULL: '|| x_msg_data );

475: ELSE
476:
477: IF l_transfer_price IS NULL
478: THEN
479: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_basic: Transfer Price is NULL: '|| x_msg_data );
480: RAISE e_transfer_price_null_error;
481: END IF;
482:
483: END IF;

Line 499: GMF_get_transfer_price_PUB.get_xfer_price_qp (

495: --
496: --===================================================================
497:
498: print_debug(l_api_name || ': Calling Advanced Pricing...');
499: GMF_get_transfer_price_PUB.get_xfer_price_qp (
500: x_transfer_price => l_transfer_price
501: , x_currency_code => l_pricelist_currency
502: , x_transfer_price_code => l_transfer_price_code
503: , x_return_status => x_return_status

Line 514: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Error = '|| x_msg_data );

510: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
511: THEN
512:
513: IF (l_debug = 1) THEN
514: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Error = '|| x_msg_data );
515: END IF;
516: RAISE FND_API.G_EXC_ERROR;
517:
518: ELSE

Line 522: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Transfer Price is NULL: '|| x_msg_data );

518: ELSE
519:
520: IF l_transfer_price IS NULL
521: THEN
522: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Transfer Price is NULL: '|| x_msg_data );
523: RAISE e_transfer_price_null_error;
524: END IF;
525:
526: END IF;

Line 657: print_debug('GMF_get_transfer_price_PUB.get_transfer_price: currency conversion error');

653: x_return_status := FND_API.G_RET_STS_ERROR;
654:
655: WHEN e_currency_conversion_error
656: THEN
657: print_debug('GMF_get_transfer_price_PUB.get_transfer_price: currency conversion error');
658: x_return_status := FND_API.G_RET_STS_ERROR;
659: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
660: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
661:

Line 665: print_debug('Exc_Unexpected_Error in GMF_get_transfer_price_PUB.get_transfer_price');

661:
662:
663: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
664: THEN
665: print_debug('Exc_Unexpected_Error in GMF_get_transfer_price_PUB.get_transfer_price');
666: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
667: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
668: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
669:

Line 672: print_debug('EXC_ERROR in GMF_get_transfer_price_PUB.get_transfer_price: ' || x_msg_data);

668: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
669:
670: WHEN FND_API.G_EXC_ERROR
671: THEN
672: print_debug('EXC_ERROR in GMF_get_transfer_price_PUB.get_transfer_price: ' || x_msg_data);
673: x_return_status := FND_API.G_RET_STS_ERROR;
674: IF x_msg_data IS NULL
675: THEN
676: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);

Line 714: print_debug('When Other in GMF_get_transfer_price_PUB.get_transfer_price (sqlerrm): ' || sqlerrm);

710:
711: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
712: FND_MSG_PUB.Add_Exc_Msg(G_PACKAGE_NAME, l_api_name);
713: end if;
714: print_debug('When Other in GMF_get_transfer_price_PUB.get_transfer_price (sqlerrm): ' || sqlerrm);
715: print_debug('When Other in GMF_get_transfer_price_PUB.get_transfer_price (backtrace): ' || DBMS_UTILITY.FORMAT_ERROR_BACKTRACE);
716:
717: END get_transfer_price;
718:

Line 715: print_debug('When Other in GMF_get_transfer_price_PUB.get_transfer_price (backtrace): ' || DBMS_UTILITY.FORMAT_ERROR_BACKTRACE);

711: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
712: FND_MSG_PUB.Add_Exc_Msg(G_PACKAGE_NAME, l_api_name);
713: end if;
714: print_debug('When Other in GMF_get_transfer_price_PUB.get_transfer_price (sqlerrm): ' || sqlerrm);
715: print_debug('When Other in GMF_get_transfer_price_PUB.get_transfer_price (backtrace): ' || DBMS_UTILITY.FORMAT_ERROR_BACKTRACE);
716:
717: END get_transfer_price;
718:
719: --

Line 788: l_api_name := 'GMF_get_transfer_price_PUB.get_xfer_price_basic';

784: e_item_not_on_pricelist exception;
785:
786: BEGIN
787:
788: l_api_name := 'GMF_get_transfer_price_PUB.get_xfer_price_basic';
789:
790: print_debug(' ' || l_api_name || ': Basic pricing. Get price for item: ' || g_inventory_item_id ||
791: ' org: ' || g_from_organization_id);
792: --

Line 1034: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: xfr source: ' || g_xfer_source);

1030:
1031: begin
1032:
1033: IF (l_debug = 1) THEN
1034: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: xfr source: ' || g_xfer_source);
1035: END IF;
1036:
1037: -- QP: Pricing Transaction Entity => Inter Organization Transfers for Internal Orders
1038: -- QP: Source System Code => Oracle Inventory

Line 1058: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Calling MTL_QP_PRICE.get_transfer_price' ||

1054:
1055: INV_IC_ORDER_PUB.G_LINE.from_organization_id := g_from_organization_id;
1056: INV_IC_ORDER_PUB.G_LINE.to_organization_id := g_to_organization_id;
1057:
1058: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Calling MTL_QP_PRICE.get_transfer_price' ||
1059: ' with From Orgn: ' || g_from_organization_id ||
1060: ' To Orgn: ' || g_to_organization_id ||
1061: ' for order line id: ' || g_transaction_id ||
1062: ' itemID: ' || g_inventory_item_id);

Line 1086: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: MTL_QP_PRICE.get_transfer_price error ' );

1082: );
1083:
1084: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1085: IF (l_debug = 1) THEN
1086: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: MTL_QP_PRICE.get_transfer_price error ' );
1087: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Error ='|| x_msg_data );
1088: END IF;
1089: RAISE FND_API.G_EXC_ERROR;
1090: END IF;

Line 1087: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Error ='|| x_msg_data );

1083:
1084: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1085: IF (l_debug = 1) THEN
1086: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: MTL_QP_PRICE.get_transfer_price error ' );
1087: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Error ='|| x_msg_data );
1088: END IF;
1089: RAISE FND_API.G_EXC_ERROR;
1090: END IF;
1091:

Line 1092: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: ' ||

1088: END IF;
1089: RAISE FND_API.G_EXC_ERROR;
1090: END IF;
1091:
1092: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: ' ||
1093: 'Transfer Price from MTL_QP_PRICE.get_transfer_price: ' || x_transfer_price);
1094:
1095: ELSIF g_xfer_source in ('INTORG', 'INTREQ')
1096: THEN

Line 1106: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp:: Selecting Line Identifier...');

1102:
1103: -- l_request_type_code := 'INVXFR';
1104:
1105: IF (l_debug = 1) THEN
1106: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp:: Selecting Line Identifier...');
1107: END IF;
1108:
1109: -- l_organization_id := g_from_organization_id;
1110: l_transaction_uom := g_transaction_uom;

Line 1125: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Build Context for header...');

1121: , p_Request_Type_Code => l_request_type_code
1122: , px_line_index => l_line_index );
1123:
1124: IF (l_debug = 1) THEN
1125: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Build Context for header...');
1126: END IF;
1127:
1128: QP_Attr_Mapping_PUB.Build_Contexts(
1129: p_request_type_code => l_request_type_code

Line 1135: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: calling G_Line_Initialize...');

1131: , p_line_index => INV_IC_ORDER_PUB.g_txn_hdr.dummy );
1132: */
1133:
1134: IF (l_debug = 1) THEN
1135: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: calling G_Line_Initialize...');
1136: END IF;
1137:
1138: G_Line_Initialize;
1139: QP_price_request_context.set_request_id;

Line 1142: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: calling copy_Line_to_request...');

1138: G_Line_Initialize;
1139: QP_price_request_context.set_request_id;
1140:
1141: IF (l_debug = 1) THEN
1142: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: calling copy_Line_to_request...');
1143: END IF;
1144:
1145: --
1146: -- Copy line to request

Line 1158: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Build Context for line...');

1154: --
1155: -- Build Context
1156: --
1157: IF (l_debug = 1) THEN
1158: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Build Context for line...');
1159: END IF;
1160:
1161: QP_Attr_Mapping_PUB.Build_Contexts(
1162: p_request_type_code => l_request_type_code

Line 1172: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Populating Lines temp table...');

1168: -- Populate temp table
1169: --
1170: IF l_line_index > 0 THEN
1171: IF (l_debug = 1) THEN
1172: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Populating Lines temp table...');
1173: END IF;
1174: Populate_Temp_Table(x_return_status);
1175: END IF;
1176:

Line 1181: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Initializing control record...');

1177: --
1178: -- Initializing control record
1179: --
1180: IF (l_debug = 1) THEN
1181: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Initializing control record...');
1182: END IF;
1183:
1184: l_control_rec.pricing_event := l_pricing_event;
1185: l_control_rec.calculate_flag := qp_preq_grp.G_SEARCH_N_CALCULATE;

Line 1195: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Calling QP:Price Request routine ...');

1191: --
1192: -- All set. Call Adv. Pricing Engine.
1193: --
1194: IF (l_debug = 1) THEN
1195: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Calling QP:Price Request routine ...');
1196: END IF;
1197:
1198: QP_PREQ_PUB.PRICE_REQUEST( p_control_rec => l_control_rec
1199: , x_return_status => x_return_status

Line 1204: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: QP_PREQ_PUB.PRICE_REQUEST error ' );

1200: , x_return_status_Text => l_return_status_Text);
1201:
1202: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1203: IF (l_debug = 1) THEN
1204: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: QP_PREQ_PUB.PRICE_REQUEST error ' );
1205: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: x_return_status_text='|| l_return_status_text );
1206: END IF;
1207: fnd_message.set_name('INV', 'INV_UNHANDLED_ERR');
1208: fnd_message.set_token('ENTITY1', 'QP_PREQ_PUB.PRICE_REQUEST');

Line 1205: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: x_return_status_text='|| l_return_status_text );

1201:
1202: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1203: IF (l_debug = 1) THEN
1204: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: QP_PREQ_PUB.PRICE_REQUEST error ' );
1205: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: x_return_status_text='|| l_return_status_text );
1206: END IF;
1207: fnd_message.set_name('INV', 'INV_UNHANDLED_ERR');
1208: fnd_message.set_token('ENTITY1', 'QP_PREQ_PUB.PRICE_REQUEST');
1209: fnd_message.set_token('ENTITY2', substr(l_return_status_text, 1, 150) );

Line 1214: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Populating QP results ...');

1210: RAISE FND_API.G_EXC_ERROR;
1211: END IF;
1212:
1213: IF (l_debug = 1) THEN
1214: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Populating QP results ...');
1215: END IF;
1216:
1217: --
1218: -- Populating results

Line 1255: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP NO_DATA_FOUND ' );

1251: WHEN NO_DATA_FOUND
1252: THEN
1253: IF (l_debug = 1)
1254: THEN
1255: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP NO_DATA_FOUND ' );
1256: END IF;
1257: fnd_message.set_name('INV', 'INV_NO_DATA_EXISTS');
1258:
1259: WHEN FND_API.G_EXC_ERROR

Line 1263: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP G_EXC_ERROR ' );

1259: WHEN FND_API.G_EXC_ERROR
1260: THEN
1261: IF (l_debug = 1)
1262: THEN
1263: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP G_EXC_ERROR ' );
1264: END IF;
1265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
1266: THEN
1267: IF (l_debug = 1)

Line 1269: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP G_EXC_UNEXPECTED_ERROR ' );

1265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
1266: THEN
1267: IF (l_debug = 1)
1268: THEN
1269: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP G_EXC_UNEXPECTED_ERROR ' );
1270: END IF;
1271: WHEN OTHERS
1272: THEN
1273: IF (l_debug = 1)

Line 1275: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP UNEXP OTHERS - ' || sqlerrm);

1271: WHEN OTHERS
1272: THEN
1273: IF (l_debug = 1)
1274: THEN
1275: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP UNEXP OTHERS - ' || sqlerrm);
1276: END IF;
1277: END get_xfer_price_qp;
1278:
1279: --

Line 1290: print_debug('GMF_get_transfer_price_PUB.G_Hdr_Initialize: Populating G_HDR...');

1286: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
1287:
1288: -- Header population
1289: IF (l_debug = 1) THEN
1290: print_debug('GMF_get_transfer_price_PUB.G_Hdr_Initialize: Populating G_HDR...');
1291: END IF;
1292:
1293: --
1294: -- For InterOrg Transfers header is not supported.

Line 1304: print_debug('GMF_get_transfer_price_PUB.G_Hdr_Initialize: EXCEP UNEXP OTHERS - ' || sqlerrm);

1300: EXCEPTION
1301: WHEN OTHERS THEN
1302: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1303: IF (l_debug = 1) THEN
1304: print_debug('GMF_get_transfer_price_PUB.G_Hdr_Initialize: EXCEP UNEXP OTHERS - ' || sqlerrm);
1305: END IF;
1306: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1307:
1308: END G_Hdr_Initialize;

Line 1317: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: Populating G_LINE...');

1313: BEGIN
1314:
1315: -- Line population
1316: IF (l_debug = 1) THEN
1317: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: Populating G_LINE...');
1318: END IF;
1319:
1320: INV_IC_ORDER_PUB.G_LINE.from_organization_id := G_from_organization_id;
1321: INV_IC_ORDER_PUB.G_LINE.to_organization_id := G_to_organization_id;

Line 1334: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: item/qty/uom: ' ||

1330:
1331: INV_IC_ORDER_PUB.G_LINE.calculate_price_flag := 'Y';
1332:
1333: IF (l_debug = 1) THEN
1334: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: item/qty/uom: ' ||
1335: INV_IC_ORDER_PUB.G_LINE.inventory_item_id ||'/'|| INV_IC_ORDER_PUB.G_LINE.ordered_quantity ||'/'||
1336: INV_IC_ORDER_PUB.G_LINE.order_quantity_uom);
1337: END IF;
1338:

Line 1344: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: EXCEP NO_DATA_FOUND ' );

1340:
1341: WHEN NO_DATA_FOUND THEN
1342: -- x_return_status := FND_API.G_RET_STS_ERROR;
1343: IF (l_debug = 1) THEN
1344: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: EXCEP NO_DATA_FOUND ' );
1345: END IF;
1346: RAISE NO_DATA_FOUND;
1347: WHEN OTHERS THEN
1348: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1350: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: EXCEP UNEXP OTHERS - ' || sqlerrm);

1346: RAISE NO_DATA_FOUND;
1347: WHEN OTHERS THEN
1348: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1349: IF (l_debug = 1) THEN
1350: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: EXCEP UNEXP OTHERS - ' || sqlerrm);
1351: END IF;
1352: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1353:
1354: END G_Line_Initialize;

Line 1525: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: Calling QP:Bulk insert routine...' );

1521: END IF;
1522: END LOOP;
1523:
1524: IF (l_debug = 1) THEN
1525: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: Calling QP:Bulk insert routine...' );
1526: END IF;
1527:
1528: QP_PREQ_GRP.INSERT_LINES2 (
1529: p_LINE_INDEX => G_LINE_INDEX_TBL,

Line 1565: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: after QP:Bulk insert routine...' );

1561: p_LINE_CATEGORY => G_LINE_CATEGORY_TBL,
1562: x_status_code => l_return_status,
1563: x_status_text => l_return_status_text );
1564:
1565: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: after QP:Bulk insert routine...' );
1566:
1567: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1568: IF (l_debug = 1) THEN
1569: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: QP_PREQ_GRP.INSERT_LINES2 error ' );

Line 1569: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: QP_PREQ_GRP.INSERT_LINES2 error ' );

1565: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: after QP:Bulk insert routine...' );
1566:
1567: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1568: IF (l_debug = 1) THEN
1569: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: QP_PREQ_GRP.INSERT_LINES2 error ' );
1570: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: x_return_status_text='|| l_return_status_text );
1571: END IF;
1572: x_return_status := l_return_status;
1573: fnd_message.set_name('INV', 'INV_UNHANDLED_ERR');

Line 1570: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: x_return_status_text='|| l_return_status_text );

1566:
1567: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1568: IF (l_debug = 1) THEN
1569: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: QP_PREQ_GRP.INSERT_LINES2 error ' );
1570: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: x_return_status_text='|| l_return_status_text );
1571: END IF;
1572: x_return_status := l_return_status;
1573: fnd_message.set_name('INV', 'INV_UNHANDLED_ERR');
1574: fnd_message.set_token('ENTITY1', 'QP_PREQ_GRP.INSERT_LINES2');

Line 1584: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: No. of records inserted in QP_PREQ_LINES_TMP=' || to_char(i));

1580: INTO i
1581: FROM qp_preq_lines_tmp;
1582:
1583: IF (l_debug = 1) THEN
1584: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: No. of records inserted in QP_PREQ_LINES_TMP=' || to_char(i));
1585: END IF;
1586:
1587: EXCEPTION
1588: WHEN FND_API.G_EXC_ERROR THEN

Line 1593: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: EXCEP UNEXP OTHERS - ' || sqlerrm);

1589: RAISE FND_API.G_EXC_ERROR;
1590: WHEN OTHERS THEN
1591: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1592: IF (l_debug = 1) THEN
1593: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: EXCEP UNEXP OTHERS - ' || sqlerrm);
1594: END IF;
1595:
1596: END Populate_Temp_Table;
1597:

Line 1647: print_debug('GMF_get_transfer_price_PUB.Populate_Results: UNIT PRICE NOT POPULATED');

1643: WHEN NO_DATA_FOUND THEN
1644: IF G_LINE_TYPE_CODE_TBL(i) = 'LINE' THEN
1645: x_return_status := FND_API.G_RET_STS_ERROR;
1646: IF (l_debug = 1) THEN
1647: print_debug('GMF_get_transfer_price_PUB.Populate_Results: UNIT PRICE NOT POPULATED');
1648: END IF;
1649: ELSE
1650: IF (l_debug = 1) THEN
1651: print_debug('GMF_get_transfer_price_PUB.Populate_Results: ' || G_LINE_TYPE_CODE_TBL(i) || ' NO_DATA_FOUND');

Line 1651: print_debug('GMF_get_transfer_price_PUB.Populate_Results: ' || G_LINE_TYPE_CODE_TBL(i) || ' NO_DATA_FOUND');

1647: print_debug('GMF_get_transfer_price_PUB.Populate_Results: UNIT PRICE NOT POPULATED');
1648: END IF;
1649: ELSE
1650: IF (l_debug = 1) THEN
1651: print_debug('GMF_get_transfer_price_PUB.Populate_Results: ' || G_LINE_TYPE_CODE_TBL(i) || ' NO_DATA_FOUND');
1652: END IF;
1653: END IF;
1654:
1655: WHEN OTHERS THEN

Line 1658: print_debug('GMF_get_transfer_price_PUB.Populate_Results: ' || sqlerrm );

1654:
1655: WHEN OTHERS THEN
1656: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1657: IF (l_debug = 1) THEN
1658: print_debug('GMF_get_transfer_price_PUB.Populate_Results: ' || sqlerrm );
1659: END IF;
1660: RAISE;
1661: END;
1662:

Line 1666: print_debug('GMF_get_transfer_price_PUB.Populate_Results: Unit_Price=' || G_UNIT_SELLING_PRICE_TBL(i));

1662:
1663: IF G_LINE_TYPE_CODE_TBL(i) = 'LINE' THEN
1664: IF G_PRICING_STATUS_CODE_TBL(i) = QP_PREQ_GRP.G_STATUS_UPDATED THEN
1665: IF (l_debug = 1) THEN
1666: print_debug('GMF_get_transfer_price_PUB.Populate_Results: Unit_Price=' || G_UNIT_SELLING_PRICE_TBL(i));
1667: END IF;
1668: ELSE
1669: x_return_status := FND_API.G_RET_STS_ERROR;
1670: x_msg_data := G_PRICING_STATUS_TEXT_TBL(i);

Line 1673: print_debug('GMF_get_transfer_price_PUB.Populate_Results: Status_Code=' || G_PRICING_STATUS_CODE_TBL(i) ||

1669: x_return_status := FND_API.G_RET_STS_ERROR;
1670: x_msg_data := G_PRICING_STATUS_TEXT_TBL(i);
1671:
1672: IF (l_debug = 1) THEN
1673: print_debug('GMF_get_transfer_price_PUB.Populate_Results: Status_Code=' || G_PRICING_STATUS_CODE_TBL(i) ||
1674: ' Status_Text=' || G_PRICING_STATUS_TEXT_TBL(i));
1675: END IF;
1676: END IF;
1677: END IF;

Line 1708: print_debug('EXC_ERROR in GMF_get_transfer_price_PUB.Populate_Results');

1704:
1705: EXCEPTION
1706: WHEN FND_API.G_EXC_ERROR
1707: THEN
1708: print_debug('EXC_ERROR in GMF_get_transfer_price_PUB.Populate_Results');
1709: x_return_status := FND_API.G_RET_STS_ERROR;
1710: RAISE FND_API.G_EXC_ERROR;
1711:
1712: WHEN OTHERS

Line 1716: print_debug('GMF_get_transfer_price_PUB.Populate_Results: EXCEP UNEXP OTHERS - ' || sqlerrm);

1712: WHEN OTHERS
1713: THEN
1714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1715: IF (l_debug = 1) THEN
1716: print_debug('GMF_get_transfer_price_PUB.Populate_Results: EXCEP UNEXP OTHERS - ' || sqlerrm);
1717: END IF;
1718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1719: END Populate_Results;
1720:

Line 1721: END GMF_get_transfer_price_PUB;

1717: END IF;
1718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1719: END Populate_Results;
1720:
1721: END GMF_get_transfer_price_PUB;