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 FND_API

Line 194: x_return_status := FND_API.G_RET_STS_SUCCESS;

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:
197: --===================================================================
198: --

Line 241: RAISE FND_API.G_EXC_ERROR;

237: IF (g_from_ou is null OR g_to_ou IS NULL) OR
238: (g_from_organization_id is NULL OR g_to_organization_id IS NULL)
239: THEN
240: print_debug('Invalid parameters to transfer price API: From/To OUs or From/To Orgs should be passed');
241: RAISE FND_API.G_EXC_ERROR;
242: END IF;
243:
244: print_debug(' ' || l_api_name || ': Get price for item: ' || g_inventory_item_id ||
245: ' org: ' || g_from_organization_id || ' Dest. Org.: ' || g_to_organization_id ||

Line 294: , p_init_msg_list => fnd_api.g_false

290: , x_incr_transfer_price => x_incr_transfer_price
291: , x_incr_currency_code => x_incr_currency_code
292:
293: , p_api_version => 1.0
294: , p_init_msg_list => fnd_api.g_false
295:
296: , p_from_org_id => p_from_ou
297: , p_to_org_id => p_to_ou
298: , p_transaction_uom => p_transaction_uom

Line 309: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

305: -- , p_process_discrete_xfer_flag => 'Y' Bug 5171637: replaced with above line.
306: );
307:
308: print_debug(l_api_name || ': return status from INV_TRANSACTION_FLOW_PUB.get_transfer_price: ' || x_return_status);
309: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
310: THEN
311:
312: --
313: -- Bug 5136335

Line 363: RAISE FND_API.G_EXC_ERROR;

359: x_msg_data := FND_MESSAGE.get;
360: IF (l_debug = 1) THEN
361: print_debug('INV_TRANSACTION_FLOW_PUB.get_transfer_price: Error = '|| x_msg_data );
362: END IF;
363: RAISE FND_API.G_EXC_ERROR;
364:
365: ELSE
366:
367: IF l_transfer_price IS NULL

Line 387: , p_init_msg_list => fnd_api.g_false

383: --===================================================================
384: print_debug(l_api_name || ': calling user hook');
385: GMF_get_xfer_price_hook_PUB.Get_xfer_price_user_hook (
386: p_api_version => 1.0
387: , p_init_msg_list => fnd_api.g_false
388:
389: , p_transaction_uom => p_transaction_uom
390: , p_inventory_item_id => p_inventory_item_id
391: , p_transaction_id => p_transaction_id

Line 466: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

462: , x_msg_count => x_msg_count
463: );
464:
465: print_debug(l_api_name || ': Basic Pricing status: ' || x_return_status);
466: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
467: THEN
468:
469: x_msg_data := FND_MESSAGE.get;
470: IF (l_debug = 1) THEN

Line 473: RAISE FND_API.G_EXC_ERROR;

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
476:
477: IF l_transfer_price IS NULL

Line 510: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

506: );
507:
508: print_debug(l_api_name || ': After Advanced Pricing. status: ' || x_return_status);
509:
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 );

Line 516: RAISE FND_API.G_EXC_ERROR;

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
519:
520: IF l_transfer_price IS NULL

Line 628: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS )

624:
625: x_transfer_price := round(l_curr_rate * x_transfer_price, l_ext_precision);
626: x_transfer_price_priuom := round(l_curr_rate * x_transfer_price_priuom, l_ext_precision);
627:
628: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS )
629: THEN
630: --
631: -- currency conversion error
632: --

Line 653: x_return_status := FND_API.G_RET_STS_ERROR;

649: FND_MESSAGE.SET_TOKEN('VALUE1', p_transaction_uom);
650: FND_MESSAGE.SET_TOKEN('VALUE2', g_primary_uom);
651: FND_MSG_PUB.ADD;
652:
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');

Line 658: 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:
662:

Line 660: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

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:
662:
663: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
664: THEN

Line 663: WHEN FND_API.G_EXC_UNEXPECTED_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:
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);

Line 666: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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:
670: WHEN FND_API.G_EXC_ERROR

Line 668: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

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:
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);

Line 670: WHEN FND_API.G_EXC_ERROR

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:
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

Line 673: x_return_status := FND_API.G_RET_STS_ERROR;

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);
677: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

Line 677: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

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);
677: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
678: END IF;
679:
680: WHEN e_user_hook_error
681: THEN

Line 683: x_return_status := FND_API.G_RET_STS_ERROR;

679:
680: WHEN e_user_hook_error
681: THEN
682: print_debug('user hook returned Error: ' || x_msg_data);
683: x_return_status := FND_API.G_RET_STS_ERROR;
684: IF x_msg_data IS NULL
685: THEN
686: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
687: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

Line 687: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

683: x_return_status := FND_API.G_RET_STS_ERROR;
684: IF x_msg_data IS NULL
685: THEN
686: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
687: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
688: END IF;
689:
690:
691: WHEN e_transfer_price_null_error

Line 694: x_return_status := FND_API.G_RET_STS_ERROR;

690:
691: WHEN e_transfer_price_null_error
692: THEN
693: print_debug('transfer price is null: ' || x_msg_data);
694: x_return_status := FND_API.G_RET_STS_ERROR;
695: IF x_msg_data IS NULL
696: THEN
697: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
698: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

Line 698: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

694: x_return_status := FND_API.G_RET_STS_ERROR;
695: IF x_msg_data IS NULL
696: THEN
697: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
698: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
699: END IF;
700:
701: WHEN e_ignore_error
702: THEN

Line 703: x_return_status := FND_API.G_RET_STS_SUCCESS;

699: END IF;
700:
701: WHEN e_ignore_error
702: THEN
703: x_return_status := FND_API.G_RET_STS_SUCCESS;
704:
705:
706: WHEN OTHERS THEN
707: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 707: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

703: x_return_status := FND_API.G_RET_STS_SUCCESS;
704:
705:
706: WHEN OTHERS THEN
707: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
708: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data);
709: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
710:
711: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 709: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

705:
706: WHEN OTHERS THEN
707: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
708: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data);
709: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
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;

Line 887: x_return_status := FND_API.G_RET_STS_SUCCESS;

883:
884: x_transfer_price := l_transfer_price;
885: x_transfer_price_code := l_transfer_price_code;
886: x_pricelist_currency := l_pricelist_currency;
887: x_return_status := FND_API.G_RET_STS_SUCCESS;
888:
889: print_debug(' ' || l_api_name || ': PriceList Currency: ' || l_pricelist_currency);
890: print_debug(' ' || l_api_name || ': exiting...');
891:

Line 897: x_return_status := FND_API.G_RET_STS_ERROR;

893: WHEN e_price_list_not_found
894: THEN
895: print_debug(' ' || l_api_name || ': PriceList not found!');
896: -- l_transfer_price := -99;
897: x_return_status := FND_API.G_RET_STS_ERROR;
898:
899: FND_MESSAGE.SET_NAME('GMF', 'IC-Price List Not Found');
900: FND_MESSAGE.SET_TOKEN('FROM_ORG', g_from_organization_id);
901: FND_MESSAGE.SET_TOKEN('TO_ORG', g_to_organization_id);

Line 904: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

900: FND_MESSAGE.SET_TOKEN('FROM_ORG', g_from_organization_id);
901: FND_MESSAGE.SET_TOKEN('TO_ORG', g_to_organization_id);
902: FND_MSG_PUB.ADD;
903: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
904: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
905: RAISE FND_API.G_EXC_ERROR;
906:
907: WHEN e_item_not_on_pricelist
908: THEN

Line 905: RAISE FND_API.G_EXC_ERROR;

901: FND_MESSAGE.SET_TOKEN('TO_ORG', g_to_organization_id);
902: FND_MSG_PUB.ADD;
903: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
904: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
905: RAISE FND_API.G_EXC_ERROR;
906:
907: WHEN e_item_not_on_pricelist
908: THEN
909: print_debug(' ' || l_api_name || ': Item is not on price list!');

Line 911: x_return_status := FND_API.G_RET_STS_ERROR;

907: WHEN e_item_not_on_pricelist
908: THEN
909: print_debug(' ' || l_api_name || ': Item is not on price list!');
910: -- l_transfer_price := -99;
911: x_return_status := FND_API.G_RET_STS_ERROR;
912:
913: SELECT concatenated_segments
914: INTO l_item_description
915: FROM mtl_system_items_kfv

Line 930: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

926: FND_MESSAGE.SET_TOKEN('UNIT', g_primary_uom);
927: FND_MESSAGE.SET_TOKEN('PRICE_LIST', l_pricelist_name);
928: FND_MSG_PUB.ADD;
929: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
930: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
931: RAISE FND_API.G_EXC_ERROR;
932:
933: WHEN OTHERS then
934: print_debug(' ' || l_api_name || ': in When Others (sqlerrm): ' || substr(sqlerrm, 1, 200));

Line 931: RAISE FND_API.G_EXC_ERROR;

927: FND_MESSAGE.SET_TOKEN('PRICE_LIST', l_pricelist_name);
928: FND_MSG_PUB.ADD;
929: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
930: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
931: RAISE FND_API.G_EXC_ERROR;
932:
933: WHEN OTHERS then
934: print_debug(' ' || l_api_name || ': in When Others (sqlerrm): ' || substr(sqlerrm, 1, 200));
935: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 935: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

931: RAISE FND_API.G_EXC_ERROR;
932:
933: WHEN OTHERS then
934: print_debug(' ' || l_api_name || ': in When Others (sqlerrm): ' || substr(sqlerrm, 1, 200));
935: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
936: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data);
937: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
938: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
939: FND_MSG_PUB.Add_Exc_Msg(G_PACKAGE_NAME, l_api_name);

Line 937: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

933: WHEN OTHERS then
934: print_debug(' ' || l_api_name || ': in When Others (sqlerrm): ' || substr(sqlerrm, 1, 200));
935: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
936: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data);
937: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
938: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
939: FND_MSG_PUB.Add_Exc_Msg(G_PACKAGE_NAME, l_api_name);
940: end if;
941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

937: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
938: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
939: FND_MSG_PUB.Add_Exc_Msg(G_PACKAGE_NAME, l_api_name);
940: end if;
941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
942:
943: /*
944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

940: end if;
941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
942:
943: /*
944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
946: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
947: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
948:

Line 945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
942:
943: /*
944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
946: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
947: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
948:
949: WHEN FND_API.G_EXC_ERROR THEN

Line 947: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

943: /*
944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
946: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
947: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
948:
949: WHEN FND_API.G_EXC_ERROR THEN
950: x_return_status := FND_API.G_RET_STS_ERROR;
951: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);

Line 949: WHEN FND_API.G_EXC_ERROR THEN

945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
946: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
947: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
948:
949: WHEN FND_API.G_EXC_ERROR THEN
950: x_return_status := FND_API.G_RET_STS_ERROR;
951: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
952: print_debug('In EXC_ERROR ' || l_progress, 'Get_Transfer_Price');
953: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

Line 950: x_return_status := FND_API.G_RET_STS_ERROR;

946: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
947: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
948:
949: WHEN FND_API.G_EXC_ERROR THEN
950: x_return_status := FND_API.G_RET_STS_ERROR;
951: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
952: print_debug('In EXC_ERROR ' || l_progress, 'Get_Transfer_Price');
953: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
954: */

Line 953: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

949: WHEN FND_API.G_EXC_ERROR THEN
950: x_return_status := FND_API.G_RET_STS_ERROR;
951: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
952: print_debug('In EXC_ERROR ' || l_progress, 'Get_Transfer_Price');
953: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
954: */
955: END get_xfer_price_basic;
956:
957: --

Line 1084: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1080: x_msg_count => x_msg_count,
1081: x_msg_data => x_msg_data
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;

Line 1089: RAISE FND_API.G_EXC_ERROR;

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:
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);

Line 1202: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1198: QP_PREQ_PUB.PRICE_REQUEST( p_control_rec => l_control_rec
1199: , x_return_status => x_return_status
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;

Line 1210: RAISE FND_API.G_EXC_ERROR;

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) );
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 ...');

Line 1222: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

1218: -- Populating results
1219: --
1220: Populate_Results (l_line_index, x_return_status, x_msg_data);
1221:
1222: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1223: THEN
1224: RAISE FND_API.G_EXC_ERROR;
1225: END IF;
1226:

Line 1224: RAISE FND_API.G_EXC_ERROR;

1220: Populate_Results (l_line_index, x_return_status, x_msg_data);
1221:
1222: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1223: THEN
1224: RAISE FND_API.G_EXC_ERROR;
1225: END IF;
1226:
1227: x_currency_code := G_CURRENCY_CODE_TBL(l_line_index);
1228: x_transfer_price := G_UNIT_SELLING_PRICE_TBL(l_line_index);

Line 1259: WHEN FND_API.G_EXC_ERROR

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
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 ' );

Line 1265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR

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)
1268: THEN
1269: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP G_EXC_UNEXPECTED_ERROR ' );

Line 1286: -- x_return_status := FND_API.G_RET_STS_SUCCESS;

1282: PROCEDURE G_Hdr_Initialize
1283: IS
1284: BEGIN
1285:
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...');

Line 1302: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1298: -- INV_IC_ORDER_PUB.G_TXN_HDR.dummy := 1;
1299:
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;

Line 1306: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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;
1309:
1310:

Line 1342: -- x_return_status := FND_API.G_RET_STS_ERROR;

1338:
1339: EXCEPTION
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;

Line 1348: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

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 ;
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;

Line 1352: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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;
1355:
1356:

Line 1479: x_return_status := FND_API.G_RET_STS_SUCCESS;

1475: l_return_status_Text VARCHAR2(2000) ;
1476: i number :=0;
1477: BEGIN
1478:
1479: x_return_status := FND_API.G_RET_STS_SUCCESS;
1480: l_return_status := FND_API.G_RET_STS_SUCCESS;
1481:
1482: print_debug('G_LINE_INDEX_TBL.count: ' || G_LINE_INDEX_TBL.count);
1483: FOR i IN G_LINE_INDEX_TBL.FIRST..G_LINE_INDEX_TBL.LAST

Line 1480: l_return_status := FND_API.G_RET_STS_SUCCESS;

1476: i number :=0;
1477: BEGIN
1478:
1479: x_return_status := FND_API.G_RET_STS_SUCCESS;
1480: l_return_status := FND_API.G_RET_STS_SUCCESS;
1481:
1482: print_debug('G_LINE_INDEX_TBL.count: ' || G_LINE_INDEX_TBL.count);
1483: FOR i IN G_LINE_INDEX_TBL.FIRST..G_LINE_INDEX_TBL.LAST
1484: LOOP

Line 1567: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

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 ' );
1570: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: x_return_status_text='|| l_return_status_text );
1571: END IF;

Line 1576: RAISE FND_API.G_EXC_ERROR;

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');
1575: fnd_message.set_token('ENTITY2', substr(l_return_status_text, 1, 150) );
1576: RAISE FND_API.G_EXC_ERROR;
1577: END IF;
1578:
1579: SELECT count(*)
1580: INTO i

Line 1588: WHEN FND_API.G_EXC_ERROR 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
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

Line 1589: RAISE FND_API.G_EXC_ERROR;

1585: END IF;
1586:
1587: EXCEPTION
1588: WHEN FND_API.G_EXC_ERROR THEN
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);

Line 1591: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1587: EXCEPTION
1588: WHEN FND_API.G_EXC_ERROR THEN
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:

Line 1608: x_return_status := FND_API.G_RET_STS_SUCCESS;

1604: IS
1605: i number :=0;
1606: BEGIN
1607:
1608: x_return_status := FND_API.G_RET_STS_SUCCESS;
1609:
1610: FOR i IN G_LINE_INDEX_TBL.FIRST..G_LINE_INDEX_TBL.LAST
1611: LOOP
1612: BEGIN

Line 1645: x_return_status := FND_API.G_RET_STS_ERROR;

1641:
1642: EXCEPTION
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

Line 1656: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1652: END IF;
1653: END IF;
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;

Line 1669: x_return_status := FND_API.G_RET_STS_ERROR;

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);
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) ||

Line 1681: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1677: END IF;
1678:
1679: END LOOP;
1680:
1681: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1682: RAISE FND_API.G_EXC_ERROR;
1683: END IF;
1684:
1685: FOR i IN G_LINE_INDEX_TBL.FIRST..G_LINE_INDEX_TBL.LAST

Line 1682: RAISE FND_API.G_EXC_ERROR;

1678:
1679: END LOOP;
1680:
1681: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1682: RAISE FND_API.G_EXC_ERROR;
1683: END IF;
1684:
1685: FOR i IN G_LINE_INDEX_TBL.FIRST..G_LINE_INDEX_TBL.LAST
1686: LOOP

Line 1706: WHEN FND_API.G_EXC_ERROR

1702: END IF;
1703: END LOOP;
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;

Line 1709: x_return_status := FND_API.G_RET_STS_ERROR;

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
1713: THEN

Line 1710: RAISE FND_API.G_EXC_ERROR;

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
1713: THEN
1714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1710: RAISE FND_API.G_EXC_ERROR;
1711:
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;

Line 1718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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:
1721: END GMF_get_transfer_price_PUB;