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 203: x_return_status := FND_API.G_RET_STS_SUCCESS;

199: BEGIN
200:
201: l_api_name := 'GMF_get_transfer_price_PUB.get_transfer_price';
202: l_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
203: x_return_status := FND_API.G_RET_STS_SUCCESS;
204:
205: print_debug(l_api_name || ' Begin Input Parameters ');
206: print_debug(l_api_name || ' p_inventory_item_id: ' || p_inventory_item_id);
207: print_debug(l_api_name || ' p_transaction_qty: ' || p_transaction_qty);

Line 265: RAISE FND_API.G_EXC_ERROR;

261: IF (g_from_ou is null OR g_to_ou IS NULL) OR
262: (g_from_organization_id is NULL OR g_to_organization_id IS NULL)
263: THEN
264: print_debug('Invalid parameters to transfer price API: From/To OUs or From/To Orgs should be passed');
265: RAISE FND_API.G_EXC_ERROR;
266: END IF;
267:
268: --Begin Bug 7713946
269: SELECT to_number(src.org_information3) src_ou

Line 350: , p_init_msg_list => fnd_api.g_false

346: , x_incr_transfer_price => x_incr_transfer_price
347: , x_incr_currency_code => x_incr_currency_code
348:
349: , p_api_version => 1.0
350: , p_init_msg_list => fnd_api.g_false
351:
352: --Bug 7713946 Replaced p_from_ou with g_from_ou and p_to_ou with g_to_ou
353: , p_from_org_id => g_from_ou
354: , p_to_org_id => g_to_ou

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

364: , p_txn_date => p_transaction_date /* Bug 9189961 */
365: );
366:
367: print_debug(l_api_name || ': return status from INV_TRANSACTION_FLOW_PUB.get_transfer_price: ' || x_return_status);
368: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
369: THEN
370:
371: --
372: -- Bug 5136335

Line 422: RAISE FND_API.G_EXC_ERROR;

418: x_msg_data := FND_MESSAGE.get;
419: IF (l_debug = 1) THEN
420: print_debug('INV_TRANSACTION_FLOW_PUB.get_transfer_price: Error = '|| x_msg_data );
421: END IF;
422: RAISE FND_API.G_EXC_ERROR;
423:
424: ELSE
425:
426: IF l_transfer_price IS NULL

Line 446: , p_init_msg_list => fnd_api.g_false

442: --===================================================================
443: print_debug(l_api_name || ': calling user hook');
444: GMF_get_xfer_price_hook_PUB.Get_xfer_price_user_hook (
445: p_api_version => 1.0
446: , p_init_msg_list => fnd_api.g_false
447:
448: , p_transaction_uom => p_transaction_uom
449: , p_inventory_item_id => p_inventory_item_id
450: , p_transaction_id => p_transaction_id

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

522: , x_msg_count => x_msg_count
523: );
524:
525: print_debug(l_api_name || ': Basic Pricing status: ' || x_return_status);
526: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
527: THEN
528:
529: x_msg_data := FND_MESSAGE.get;
530: IF (l_debug = 1) THEN

Line 533: RAISE FND_API.G_EXC_ERROR;

529: x_msg_data := FND_MESSAGE.get;
530: IF (l_debug = 1) THEN
531: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_basic: Error = '|| x_msg_data );
532: END IF;
533: RAISE FND_API.G_EXC_ERROR;
534:
535: ELSE
536:
537: IF l_transfer_price IS NULL

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

566: );
567:
568: print_debug(l_api_name || ': After Advanced Pricing. status: ' || x_return_status);
569:
570: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
571: THEN
572:
573: IF (l_debug = 1) THEN
574: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Error = '|| x_msg_data );

Line 576: RAISE FND_API.G_EXC_ERROR;

572:
573: IF (l_debug = 1) THEN
574: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Error = '|| x_msg_data );
575: END IF;
576: RAISE FND_API.G_EXC_ERROR;
577:
578: ELSE
579:
580: IF l_transfer_price IS NULL

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

708: x_transfer_price_priuom := l_curr_rate * x_transfer_price_priuom;
709:
710: /* End Bug 13896833. */
711:
712: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS )
713: THEN
714: --
715: -- currency conversion error
716: --

Line 737: x_return_status := FND_API.G_RET_STS_ERROR;

733: FND_MESSAGE.SET_TOKEN('VALUE1', p_transaction_uom);
734: FND_MESSAGE.SET_TOKEN('VALUE2', g_primary_uom);
735: FND_MSG_PUB.ADD;
736:
737: x_return_status := FND_API.G_RET_STS_ERROR;
738:
739: WHEN e_currency_conversion_error
740: THEN
741: print_debug('GMF_get_transfer_price_PUB.get_transfer_price: currency conversion error');

Line 742: x_return_status := FND_API.G_RET_STS_ERROR;

738:
739: WHEN e_currency_conversion_error
740: THEN
741: print_debug('GMF_get_transfer_price_PUB.get_transfer_price: currency conversion error');
742: x_return_status := FND_API.G_RET_STS_ERROR;
743: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
744: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
745:
746:

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

740: THEN
741: print_debug('GMF_get_transfer_price_PUB.get_transfer_price: currency conversion error');
742: x_return_status := FND_API.G_RET_STS_ERROR;
743: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
744: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
745:
746:
747: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
748: THEN

Line 747: WHEN FND_API.G_EXC_UNEXPECTED_ERROR

743: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
744: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
745:
746:
747: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
748: THEN
749: print_debug('Exc_Unexpected_Error in GMF_get_transfer_price_PUB.get_transfer_price');
750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);

Line 750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

746:
747: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
748: THEN
749: print_debug('Exc_Unexpected_Error in GMF_get_transfer_price_PUB.get_transfer_price');
750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
752: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
753:
754: WHEN FND_API.G_EXC_ERROR

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

748: THEN
749: print_debug('Exc_Unexpected_Error in GMF_get_transfer_price_PUB.get_transfer_price');
750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
752: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
753:
754: WHEN FND_API.G_EXC_ERROR
755: THEN
756: print_debug('EXC_ERROR in GMF_get_transfer_price_PUB.get_transfer_price: ' || x_msg_data);

Line 754: WHEN FND_API.G_EXC_ERROR

750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
752: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
753:
754: WHEN FND_API.G_EXC_ERROR
755: THEN
756: print_debug('EXC_ERROR in GMF_get_transfer_price_PUB.get_transfer_price: ' || x_msg_data);
757: x_return_status := FND_API.G_RET_STS_ERROR;
758: IF x_msg_data IS NULL

Line 757: x_return_status := FND_API.G_RET_STS_ERROR;

753:
754: WHEN FND_API.G_EXC_ERROR
755: THEN
756: print_debug('EXC_ERROR in GMF_get_transfer_price_PUB.get_transfer_price: ' || x_msg_data);
757: x_return_status := FND_API.G_RET_STS_ERROR;
758: IF x_msg_data IS NULL
759: THEN
760: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
761: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

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

757: x_return_status := FND_API.G_RET_STS_ERROR;
758: IF x_msg_data IS NULL
759: THEN
760: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
761: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
762: END IF;
763:
764: WHEN e_user_hook_error
765: THEN

Line 767: x_return_status := FND_API.G_RET_STS_ERROR;

763:
764: WHEN e_user_hook_error
765: THEN
766: print_debug('user hook returned Error: ' || x_msg_data);
767: x_return_status := FND_API.G_RET_STS_ERROR;
768: IF x_msg_data IS NULL
769: THEN
770: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
771: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

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

767: x_return_status := FND_API.G_RET_STS_ERROR;
768: IF x_msg_data IS NULL
769: THEN
770: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
771: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
772: END IF;
773:
774:
775: WHEN e_transfer_price_null_error

Line 778: x_return_status := FND_API.G_RET_STS_ERROR;

774:
775: WHEN e_transfer_price_null_error
776: THEN
777: print_debug('transfer price is null: ' || x_msg_data);
778: x_return_status := FND_API.G_RET_STS_ERROR;
779: IF x_msg_data IS NULL
780: THEN
781: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
782: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

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

778: x_return_status := FND_API.G_RET_STS_ERROR;
779: IF x_msg_data IS NULL
780: THEN
781: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
782: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
783: END IF;
784:
785: WHEN e_ignore_error
786: THEN

Line 787: x_return_status := FND_API.G_RET_STS_SUCCESS;

783: END IF;
784:
785: WHEN e_ignore_error
786: THEN
787: x_return_status := FND_API.G_RET_STS_SUCCESS;
788:
789:
790: WHEN OTHERS THEN
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

787: x_return_status := FND_API.G_RET_STS_SUCCESS;
788:
789:
790: WHEN OTHERS THEN
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data);
793: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
794:
795: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

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

789:
790: WHEN OTHERS THEN
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data);
793: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
794:
795: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
796: FND_MSG_PUB.Add_Exc_Msg(G_PACKAGE_NAME, l_api_name);
797: end if;

Line 971: x_return_status := FND_API.G_RET_STS_SUCCESS;

967:
968: x_transfer_price := l_transfer_price;
969: x_transfer_price_code := l_transfer_price_code;
970: x_pricelist_currency := l_pricelist_currency;
971: x_return_status := FND_API.G_RET_STS_SUCCESS;
972:
973: print_debug(' ' || l_api_name || ': PriceList Currency: ' || l_pricelist_currency);
974: print_debug(' ' || l_api_name || ': exiting...');
975:

Line 981: x_return_status := FND_API.G_RET_STS_ERROR;

977: WHEN e_price_list_not_found
978: THEN
979: print_debug(' ' || l_api_name || ': PriceList not found!');
980: -- l_transfer_price := -99;
981: x_return_status := FND_API.G_RET_STS_ERROR;
982:
983: FND_MESSAGE.SET_NAME('GMF', 'IC-Price List Not Found');
984: FND_MESSAGE.SET_TOKEN('FROM_ORG', g_from_organization_id);
985: FND_MESSAGE.SET_TOKEN('TO_ORG', g_to_organization_id);

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

984: FND_MESSAGE.SET_TOKEN('FROM_ORG', g_from_organization_id);
985: FND_MESSAGE.SET_TOKEN('TO_ORG', g_to_organization_id);
986: FND_MSG_PUB.ADD;
987: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
988: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
989: RAISE FND_API.G_EXC_ERROR;
990:
991: WHEN e_item_not_on_pricelist
992: THEN

Line 989: RAISE FND_API.G_EXC_ERROR;

985: FND_MESSAGE.SET_TOKEN('TO_ORG', g_to_organization_id);
986: FND_MSG_PUB.ADD;
987: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
988: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
989: RAISE FND_API.G_EXC_ERROR;
990:
991: WHEN e_item_not_on_pricelist
992: THEN
993: print_debug(' ' || l_api_name || ': Item is not on price list!');

Line 995: x_return_status := FND_API.G_RET_STS_ERROR;

991: WHEN e_item_not_on_pricelist
992: THEN
993: print_debug(' ' || l_api_name || ': Item is not on price list!');
994: -- l_transfer_price := -99;
995: x_return_status := FND_API.G_RET_STS_ERROR;
996:
997: SELECT concatenated_segments
998: INTO l_item_description
999: FROM mtl_system_items_kfv

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

1010: FND_MESSAGE.SET_TOKEN('UNIT', g_primary_uom);
1011: FND_MESSAGE.SET_TOKEN('PRICE_LIST', l_pricelist_name);
1012: FND_MSG_PUB.ADD;
1013: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1014: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1015: RAISE FND_API.G_EXC_ERROR;
1016:
1017: WHEN OTHERS then
1018: print_debug(' ' || l_api_name || ': in When Others (sqlerrm): ' || substr(sqlerrm, 1, 200));

Line 1015: RAISE FND_API.G_EXC_ERROR;

1011: FND_MESSAGE.SET_TOKEN('PRICE_LIST', l_pricelist_name);
1012: FND_MSG_PUB.ADD;
1013: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1014: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1015: RAISE FND_API.G_EXC_ERROR;
1016:
1017: WHEN OTHERS then
1018: print_debug(' ' || l_api_name || ': in When Others (sqlerrm): ' || substr(sqlerrm, 1, 200));
1019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1015: RAISE FND_API.G_EXC_ERROR;
1016:
1017: WHEN OTHERS then
1018: print_debug(' ' || l_api_name || ': in When Others (sqlerrm): ' || substr(sqlerrm, 1, 200));
1019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1020: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data);
1021: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1022: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1023: FND_MSG_PUB.Add_Exc_Msg(G_PACKAGE_NAME, l_api_name);

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

1017: WHEN OTHERS then
1018: print_debug(' ' || l_api_name || ': in When Others (sqlerrm): ' || substr(sqlerrm, 1, 200));
1019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1020: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data);
1021: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1022: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1023: FND_MSG_PUB.Add_Exc_Msg(G_PACKAGE_NAME, l_api_name);
1024: end if;
1025: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1025: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1021: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1022: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1023: FND_MSG_PUB.Add_Exc_Msg(G_PACKAGE_NAME, l_api_name);
1024: end if;
1025: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1026:
1027: /*
1028: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1028: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1024: end if;
1025: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1026:
1027: /*
1028: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1030: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1031: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1032:

Line 1029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1025: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1026:
1027: /*
1028: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1030: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1031: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1032:
1033: WHEN FND_API.G_EXC_ERROR THEN

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

1027: /*
1028: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1030: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1031: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1032:
1033: WHEN FND_API.G_EXC_ERROR THEN
1034: x_return_status := FND_API.G_RET_STS_ERROR;
1035: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);

Line 1033: WHEN FND_API.G_EXC_ERROR THEN

1029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1030: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1031: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1032:
1033: WHEN FND_API.G_EXC_ERROR THEN
1034: x_return_status := FND_API.G_RET_STS_ERROR;
1035: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1036: print_debug('In EXC_ERROR ' || l_progress, 'Get_Transfer_Price');
1037: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);

Line 1034: x_return_status := FND_API.G_RET_STS_ERROR;

1030: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1031: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1032:
1033: WHEN FND_API.G_EXC_ERROR THEN
1034: x_return_status := FND_API.G_RET_STS_ERROR;
1035: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1036: print_debug('In EXC_ERROR ' || l_progress, 'Get_Transfer_Price');
1037: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1038: */

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

1033: WHEN FND_API.G_EXC_ERROR THEN
1034: x_return_status := FND_API.G_RET_STS_ERROR;
1035: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1036: print_debug('In EXC_ERROR ' || l_progress, 'Get_Transfer_Price');
1037: x_msg_data := fnd_msg_pub.get(p_msg_index => x_msg_count, p_encoded => fnd_api.g_false);
1038: */
1039: END get_xfer_price_basic;
1040:
1041: --

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

1164: x_msg_count => x_msg_count,
1165: x_msg_data => x_msg_data
1166: );
1167:
1168: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1169: IF (l_debug = 1) THEN
1170: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: MTL_QP_PRICE.get_transfer_price error ' );
1171: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Error ='|| x_msg_data );
1172: END IF;

Line 1173: RAISE FND_API.G_EXC_ERROR;

1169: IF (l_debug = 1) THEN
1170: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: MTL_QP_PRICE.get_transfer_price error ' );
1171: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Error ='|| x_msg_data );
1172: END IF;
1173: RAISE FND_API.G_EXC_ERROR;
1174: END IF;
1175:
1176: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: ' ||
1177: 'Transfer Price from MTL_QP_PRICE.get_transfer_price: ' || x_transfer_price);

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

1282: QP_PREQ_PUB.PRICE_REQUEST( p_control_rec => l_control_rec
1283: , x_return_status => x_return_status
1284: , x_return_status_Text => l_return_status_Text);
1285:
1286: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1287: IF (l_debug = 1) THEN
1288: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: QP_PREQ_PUB.PRICE_REQUEST error ' );
1289: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: x_return_status_text='|| l_return_status_text );
1290: END IF;

Line 1294: RAISE FND_API.G_EXC_ERROR;

1290: END IF;
1291: fnd_message.set_name('INV', 'INV_UNHANDLED_ERR');
1292: fnd_message.set_token('ENTITY1', 'QP_PREQ_PUB.PRICE_REQUEST');
1293: fnd_message.set_token('ENTITY2', substr(l_return_status_text, 1, 150) );
1294: RAISE FND_API.G_EXC_ERROR;
1295: END IF;
1296:
1297: IF (l_debug = 1) THEN
1298: Print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: Populating QP results ...');

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

1302: -- Populating results
1303: --
1304: Populate_Results (l_line_index, x_return_status, x_msg_data);
1305:
1306: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1307: THEN
1308: RAISE FND_API.G_EXC_ERROR;
1309: END IF;
1310:

Line 1308: RAISE FND_API.G_EXC_ERROR;

1304: Populate_Results (l_line_index, x_return_status, x_msg_data);
1305:
1306: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1307: THEN
1308: RAISE FND_API.G_EXC_ERROR;
1309: END IF;
1310:
1311: x_currency_code := G_CURRENCY_CODE_TBL(l_line_index);
1312: x_transfer_price := G_UNIT_SELLING_PRICE_TBL(l_line_index);

Line 1343: WHEN FND_API.G_EXC_ERROR

1339: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP NO_DATA_FOUND ' );
1340: END IF;
1341: fnd_message.set_name('INV', 'INV_NO_DATA_EXISTS');
1342:
1343: WHEN FND_API.G_EXC_ERROR
1344: THEN
1345: IF (l_debug = 1)
1346: THEN
1347: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP G_EXC_ERROR ' );

Line 1349: WHEN FND_API.G_EXC_UNEXPECTED_ERROR

1345: IF (l_debug = 1)
1346: THEN
1347: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP G_EXC_ERROR ' );
1348: END IF;
1349: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
1350: THEN
1351: IF (l_debug = 1)
1352: THEN
1353: print_debug('GMF_get_transfer_price_PUB.get_xfer_price_qp: EXCEP G_EXC_UNEXPECTED_ERROR ' );

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

1366: PROCEDURE G_Hdr_Initialize
1367: IS
1368: BEGIN
1369:
1370: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
1371:
1372: -- Header population
1373: IF (l_debug = 1) THEN
1374: print_debug('GMF_get_transfer_price_PUB.G_Hdr_Initialize: Populating G_HDR...');

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

1382: -- INV_IC_ORDER_PUB.G_TXN_HDR.dummy := 1;
1383:
1384: EXCEPTION
1385: WHEN OTHERS THEN
1386: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1387: IF (l_debug = 1) THEN
1388: print_debug('GMF_get_transfer_price_PUB.G_Hdr_Initialize: EXCEP UNEXP OTHERS - ' || sqlerrm);
1389: END IF;
1390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1386: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1387: IF (l_debug = 1) THEN
1388: print_debug('GMF_get_transfer_price_PUB.G_Hdr_Initialize: EXCEP UNEXP OTHERS - ' || sqlerrm);
1389: END IF;
1390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1391:
1392: END G_Hdr_Initialize;
1393:
1394:

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

1422:
1423: EXCEPTION
1424:
1425: WHEN NO_DATA_FOUND THEN
1426: -- x_return_status := FND_API.G_RET_STS_ERROR;
1427: IF (l_debug = 1) THEN
1428: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: EXCEP NO_DATA_FOUND ' );
1429: END IF;
1430: RAISE NO_DATA_FOUND;

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

1428: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: EXCEP NO_DATA_FOUND ' );
1429: END IF;
1430: RAISE NO_DATA_FOUND;
1431: WHEN OTHERS THEN
1432: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1433: IF (l_debug = 1) THEN
1434: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: EXCEP UNEXP OTHERS - ' || sqlerrm);
1435: END IF;
1436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1432: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1433: IF (l_debug = 1) THEN
1434: print_debug('GMF_get_transfer_price_PUB.G_Line_Initialize: EXCEP UNEXP OTHERS - ' || sqlerrm);
1435: END IF;
1436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1437:
1438: END G_Line_Initialize;
1439:
1440:

Line 1563: x_return_status := FND_API.G_RET_STS_SUCCESS;

1559: l_return_status_Text VARCHAR2(2000) ;
1560: i number :=0;
1561: BEGIN
1562:
1563: x_return_status := FND_API.G_RET_STS_SUCCESS;
1564: l_return_status := FND_API.G_RET_STS_SUCCESS;
1565:
1566: print_debug('G_LINE_INDEX_TBL.count: ' || G_LINE_INDEX_TBL.count);
1567: FOR i IN G_LINE_INDEX_TBL.FIRST..G_LINE_INDEX_TBL.LAST

Line 1564: l_return_status := FND_API.G_RET_STS_SUCCESS;

1560: i number :=0;
1561: BEGIN
1562:
1563: x_return_status := FND_API.G_RET_STS_SUCCESS;
1564: l_return_status := FND_API.G_RET_STS_SUCCESS;
1565:
1566: print_debug('G_LINE_INDEX_TBL.count: ' || G_LINE_INDEX_TBL.count);
1567: FOR i IN G_LINE_INDEX_TBL.FIRST..G_LINE_INDEX_TBL.LAST
1568: LOOP

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

1647: x_status_text => l_return_status_text );
1648:
1649: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: after QP:Bulk insert routine...' );
1650:
1651: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1652: IF (l_debug = 1) THEN
1653: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: QP_PREQ_GRP.INSERT_LINES2 error ' );
1654: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: x_return_status_text='|| l_return_status_text );
1655: END IF;

Line 1660: RAISE FND_API.G_EXC_ERROR;

1656: x_return_status := l_return_status;
1657: fnd_message.set_name('INV', 'INV_UNHANDLED_ERR');
1658: fnd_message.set_token('ENTITY1', 'QP_PREQ_GRP.INSERT_LINES2');
1659: fnd_message.set_token('ENTITY2', substr(l_return_status_text, 1, 150) );
1660: RAISE FND_API.G_EXC_ERROR;
1661: END IF;
1662:
1663: SELECT count(*)
1664: INTO i

Line 1672: WHEN FND_API.G_EXC_ERROR THEN

1668: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: No. of records inserted in QP_PREQ_LINES_TMP=' || to_char(i));
1669: END IF;
1670:
1671: EXCEPTION
1672: WHEN FND_API.G_EXC_ERROR THEN
1673: RAISE FND_API.G_EXC_ERROR;
1674: WHEN OTHERS THEN
1675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1676: IF (l_debug = 1) THEN

Line 1673: RAISE FND_API.G_EXC_ERROR;

1669: END IF;
1670:
1671: EXCEPTION
1672: WHEN FND_API.G_EXC_ERROR THEN
1673: RAISE FND_API.G_EXC_ERROR;
1674: WHEN OTHERS THEN
1675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1676: IF (l_debug = 1) THEN
1677: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: EXCEP UNEXP OTHERS - ' || sqlerrm);

Line 1675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1671: EXCEPTION
1672: WHEN FND_API.G_EXC_ERROR THEN
1673: RAISE FND_API.G_EXC_ERROR;
1674: WHEN OTHERS THEN
1675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1676: IF (l_debug = 1) THEN
1677: print_debug('GMF_get_transfer_price_PUB.Populate_Temp_Table: EXCEP UNEXP OTHERS - ' || sqlerrm);
1678: END IF;
1679:

Line 1692: x_return_status := FND_API.G_RET_STS_SUCCESS;

1688: IS
1689: i number :=0;
1690: BEGIN
1691:
1692: x_return_status := FND_API.G_RET_STS_SUCCESS;
1693:
1694: FOR i IN G_LINE_INDEX_TBL.FIRST..G_LINE_INDEX_TBL.LAST
1695: LOOP
1696: BEGIN

Line 1729: x_return_status := FND_API.G_RET_STS_ERROR;

1725:
1726: EXCEPTION
1727: WHEN NO_DATA_FOUND THEN
1728: IF G_LINE_TYPE_CODE_TBL(i) = 'LINE' THEN
1729: x_return_status := FND_API.G_RET_STS_ERROR;
1730: IF (l_debug = 1) THEN
1731: print_debug('GMF_get_transfer_price_PUB.Populate_Results: UNIT PRICE NOT POPULATED');
1732: END IF;
1733: ELSE

Line 1740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1736: END IF;
1737: END IF;
1738:
1739: WHEN OTHERS THEN
1740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1741: IF (l_debug = 1) THEN
1742: print_debug('GMF_get_transfer_price_PUB.Populate_Results: ' || sqlerrm );
1743: END IF;
1744: RAISE;

Line 1753: x_return_status := FND_API.G_RET_STS_ERROR;

1749: IF (l_debug = 1) THEN
1750: print_debug('GMF_get_transfer_price_PUB.Populate_Results: Unit_Price=' || G_UNIT_SELLING_PRICE_TBL(i));
1751: END IF;
1752: ELSE
1753: x_return_status := FND_API.G_RET_STS_ERROR;
1754: x_msg_data := G_PRICING_STATUS_TEXT_TBL(i);
1755:
1756: IF (l_debug = 1) THEN
1757: print_debug('GMF_get_transfer_price_PUB.Populate_Results: Status_Code=' || G_PRICING_STATUS_CODE_TBL(i) ||

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

1761: END IF;
1762:
1763: END LOOP;
1764:
1765: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1766: RAISE FND_API.G_EXC_ERROR;
1767: END IF;
1768:
1769: FOR i IN G_LINE_INDEX_TBL.FIRST..G_LINE_INDEX_TBL.LAST

Line 1766: RAISE FND_API.G_EXC_ERROR;

1762:
1763: END LOOP;
1764:
1765: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1766: RAISE FND_API.G_EXC_ERROR;
1767: END IF;
1768:
1769: FOR i IN G_LINE_INDEX_TBL.FIRST..G_LINE_INDEX_TBL.LAST
1770: LOOP

Line 1790: WHEN FND_API.G_EXC_ERROR

1786: END IF;
1787: END LOOP;
1788:
1789: EXCEPTION
1790: WHEN FND_API.G_EXC_ERROR
1791: THEN
1792: print_debug('EXC_ERROR in GMF_get_transfer_price_PUB.Populate_Results');
1793: x_return_status := FND_API.G_RET_STS_ERROR;
1794: RAISE FND_API.G_EXC_ERROR;

Line 1793: x_return_status := FND_API.G_RET_STS_ERROR;

1789: EXCEPTION
1790: WHEN FND_API.G_EXC_ERROR
1791: THEN
1792: print_debug('EXC_ERROR in GMF_get_transfer_price_PUB.Populate_Results');
1793: x_return_status := FND_API.G_RET_STS_ERROR;
1794: RAISE FND_API.G_EXC_ERROR;
1795:
1796: WHEN OTHERS
1797: THEN

Line 1794: RAISE FND_API.G_EXC_ERROR;

1790: WHEN FND_API.G_EXC_ERROR
1791: THEN
1792: print_debug('EXC_ERROR in GMF_get_transfer_price_PUB.Populate_Results');
1793: x_return_status := FND_API.G_RET_STS_ERROR;
1794: RAISE FND_API.G_EXC_ERROR;
1795:
1796: WHEN OTHERS
1797: THEN
1798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1794: RAISE FND_API.G_EXC_ERROR;
1795:
1796: WHEN OTHERS
1797: THEN
1798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1799: IF (l_debug = 1) THEN
1800: print_debug('GMF_get_transfer_price_PUB.Populate_Results: EXCEP UNEXP OTHERS - ' || sqlerrm);
1801: END IF;
1802: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1802: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1799: IF (l_debug = 1) THEN
1800: print_debug('GMF_get_transfer_price_PUB.Populate_Results: EXCEP UNEXP OTHERS - ' || sqlerrm);
1801: END IF;
1802: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1803: END Populate_Results;
1804:
1805: END GMF_get_transfer_price_PUB;