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.JMF_PROCESS_SHIKYU_RCV_TRX_PVT dependencies on FND_API

Line 227: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN

223: , NULL);
224: END IF;
225:
226: -- Start API initialization
227: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN
228: FND_MSG_PUB.initialize;
229: END IF;
230:
231: IF NOT FND_API.Compatible_API_Call( l_api_version

Line 231: IF NOT FND_API.Compatible_API_Call( l_api_version

227: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN
228: FND_MSG_PUB.initialize;
229: END IF;
230:
231: IF NOT FND_API.Compatible_API_Call( l_api_version
232: , p_api_version
233: , l_api_name
234: , G_PKG_NAME
235: )

Line 237: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

233: , l_api_name
234: , G_PKG_NAME
235: )
236: THEN
237: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
238: END IF;
239: /* vmutyala changed the following initialization for Bug 4670527 */
240:
241: x_return_status := FND_API.G_RET_STS_ERROR;

Line 241: x_return_status := FND_API.G_RET_STS_ERROR;

237: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
238: END IF;
239: /* vmutyala changed the following initialization for Bug 4670527 */
240:
241: x_return_status := FND_API.G_RET_STS_ERROR;
242:
243: -- End API initialization
244:
245: -- collect relevant records from rcv_transactions in table data type.

Line 380: x_return_status := fnd_api.g_ret_sts_success;

376: -- process clubbed transactions based on transaction_type.
377: FOR i IN 1 .. l_rcv_pending_clubbed_trx_tbl.COUNT LOOP
378: BEGIN
379: IF l_rcv_pending_clubbed_trx_tbl(i).primary_quantity = 0 THEN
380: x_return_status := fnd_api.g_ret_sts_success;
381: ELSIF l_rcv_pending_clubbed_trx_tbl(i).source_document_code = 'PO' THEN
382: IF (l_rcv_pending_clubbed_trx_tbl(i).transaction_type = 'RECEIVE' OR
383: l_rcv_pending_clubbed_trx_tbl(i).transaction_type = 'DELIVER' OR
384: (l_rcv_pending_clubbed_trx_tbl(i).transaction_type = 'CORRECT' AND

Line 470: IF (x_return_status = fnd_api.g_ret_sts_success) THEN

466: -- If return status is not successful then add transaction in error
467: -- transaction list.
468: /*vmutyala changed the following code to make a note of the transactions which are successful along with the erroneous ones Bug 4670527*/
469:
470: IF (x_return_status = fnd_api.g_ret_sts_success) THEN
471: rcv_success_trx_ids(rcv_success_trx_ids.COUNT + 1) :=
472: l_rcv_pending_clubbed_trx_tbl(i).transaction_id;
473: ELSE
474: rcv_error_trx_ids(rcv_error_trx_ids.COUNT + 1) := i;

Line 490: x_return_status := fnd_api.g_ret_sts_error;

486: END LOOP; -- FOR i IN 1 .. l_rcv_pending_clubbed_trx_tbl.COUNT LOOP
487:
488: -- If even a single transaction fails then return status should be Error.
489: IF (rcv_error_trx_ids.COUNT > 0) THEN
490: x_return_status := fnd_api.g_ret_sts_error;
491: ELSE
492: x_return_status := fnd_api.g_ret_sts_success;
493: END IF;
494:

Line 492: x_return_status := fnd_api.g_ret_sts_success;

488: -- If even a single transaction fails then return status should be Error.
489: IF (rcv_error_trx_ids.COUNT > 0) THEN
490: x_return_status := fnd_api.g_ret_sts_error;
491: ELSE
492: x_return_status := fnd_api.g_ret_sts_success;
493: END IF;
494:
495: -- Find related failed records in case of clubbing.
496: IF (rcv_error_trx_ids.COUNT > 0) THEN

Line 600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

596: END IF;
597:
598: EXCEPTION
599: WHEN OTHERS THEN
600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
601: END Process_Shikyu_Rcv_trx;
602:
603:
604: --========================================================================

Line 680: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN

676: , NULL);
677: END IF;
678:
679: -- Start API initialization
680: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN
681: FND_MSG_PUB.initialize;
682: END IF;
683:
684: IF NOT FND_API.Compatible_API_Call( l_api_version

Line 684: IF NOT FND_API.Compatible_API_Call( l_api_version

680: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN
681: FND_MSG_PUB.initialize;
682: END IF;
683:
684: IF NOT FND_API.Compatible_API_Call( l_api_version
685: , p_api_version
686: , l_api_name
687: , G_PKG_NAME
688: )

Line 690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

686: , l_api_name
687: , G_PKG_NAME
688: )
689: THEN
690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
691: END IF;
692:
693: x_return_status := FND_API.G_RET_STS_ERROR;
694:

Line 693: x_return_status := FND_API.G_RET_STS_ERROR;

689: THEN
690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
691: END IF;
692:
693: x_return_status := FND_API.G_RET_STS_ERROR;
694:
695: -- End API initialization
696:
697: -- These conversions to primary UOM are done in caller program to avoid same in

Line 733: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

729: , p_po_shipment_id => p_po_shipment_id
730: , p_project_id => p_project_id
731: , p_task_id => p_task_id
732: );
733: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
734: raise FND_API.G_EXC_UNEXPECTED_ERROR;
735: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
736: IF l_return_flag = 0 THEN
737: raise FND_API.G_EXC_ERROR;

Line 734: raise FND_API.G_EXC_UNEXPECTED_ERROR;

730: , p_project_id => p_project_id
731: , p_task_id => p_task_id
732: );
733: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
734: raise FND_API.G_EXC_UNEXPECTED_ERROR;
735: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
736: IF l_return_flag = 0 THEN
737: raise FND_API.G_EXC_ERROR;
738: ELSIF l_return_flag = 1 THEN

Line 735: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

731: , p_task_id => p_task_id
732: );
733: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
734: raise FND_API.G_EXC_UNEXPECTED_ERROR;
735: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
736: IF l_return_flag = 0 THEN
737: raise FND_API.G_EXC_ERROR;
738: ELSIF l_return_flag = 1 THEN
739: raise l_not_enough_replen_excep;

Line 737: raise FND_API.G_EXC_ERROR;

733: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
734: raise FND_API.G_EXC_UNEXPECTED_ERROR;
735: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
736: IF l_return_flag = 0 THEN
737: raise FND_API.G_EXC_ERROR;
738: ELSIF l_return_flag = 1 THEN
739: raise l_not_enough_replen_excep;
740: ELSE
741: raise l_not_allocated_completely;

Line 743: END IF; -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

739: raise l_not_enough_replen_excep;
740: ELSE
741: raise l_not_allocated_completely;
742: END IF; --IF l_return_flag = 0 THEN
743: END IF; -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
744:
745: END IF; -- IF p_quantity > 0 THEN
746:
747: /* ERROR status means that the program has failed in the previous run before or in Validate and allocate. If the issue

Line 765: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

761: JMF_SHIKYU_INV_PVT.Process_WIP_Completion(p_subcontract_po_shipment_id => p_po_shipment_id
762: , p_osa_quantity => l_osa_primary_uom_receipt_qty
763: , p_uom => l_osa_item_primary_uom
764: , x_return_status => x_return_status);
765: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
766: p_status := 'WC_ERROR';
767: ELSE
768: p_status := 'PENDING'; --so that next operation can be performed.
769: END IF;

Line 776: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

772: JMF_SHIKYU_INV_PVT.Process_Misc_Issue(p_subcontract_po_shipment_id => p_po_shipment_id
773: , p_osa_quantity => l_osa_primary_uom_receipt_qty
774: , p_uom => l_osa_item_primary_uom
775: , x_return_status => x_return_status);
776: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
777: p_status := 'MI_ERROR';
778: END IF;
779: END IF;
780:

Line 788: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

784: JMF_SHIKYU_INV_PVT.Process_Misc_rcpt(p_subcontract_po_shipment_id => p_po_shipment_id
785: , p_osa_quantity => ABS(l_osa_primary_uom_receipt_qty)
786: , p_uom => l_osa_item_primary_uom
787: , x_return_status => x_return_status);
788: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
789: p_status := 'MR_ERROR';
790: ELSE
791: p_status := 'PENDING'; --so that next operation can be performed.
792: END IF;

Line 799: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

795: JMF_SHIKYU_INV_PVT.Process_WIP_Assy_Return(p_subcontract_po_shipment_id => p_po_shipment_id
796: , p_osa_quantity => ABS(l_osa_primary_uom_receipt_qty)
797: , p_uom => l_osa_item_primary_uom
798: , x_return_status => x_return_status);
799: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
800: p_status := 'AR_ERROR';
801: END IF;
802: END IF;
803: END IF; -- IF p_quantity > 0 THEN

Line 812: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

808: JMF_SHIKYU_INV_PVT.Process_WIP_Completion(p_subcontract_po_shipment_id => p_po_shipment_id
809: , p_osa_quantity => l_osa_primary_uom_receipt_qty
810: , p_uom => l_osa_item_primary_uom
811: , x_return_status => x_return_status);
812: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
813: p_status := 'WC_ERROR';
814: ELSE
815: p_status := 'PENDING'; --so that next operation can be performed.
816: END IF;

Line 823: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

819: JMF_SHIKYU_INV_PVT.Process_Misc_Issue(p_subcontract_po_shipment_id => p_po_shipment_id
820: , p_osa_quantity => l_osa_primary_uom_receipt_qty
821: , p_uom => l_osa_item_primary_uom
822: , x_return_status => x_return_status);
823: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
824: p_status := 'MI_ERROR';
825: END IF;
826: END IF;
827: END IF; -- IF p_transaction_type = 'CORRECT' THEN

Line 831: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

827: END IF; -- IF p_transaction_type = 'CORRECT' THEN
828:
829: -- If any of the above activity is unsuccessful then throw exception
830: -- so that interlock SHIKYU status can be updated with Error.
831: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
832: raise FND_API.G_EXC_UNEXPECTED_ERROR;
833: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
834: raise FND_API.G_EXC_ERROR;
835: END IF;

Line 832: raise FND_API.G_EXC_UNEXPECTED_ERROR;

828:
829: -- If any of the above activity is unsuccessful then throw exception
830: -- so that interlock SHIKYU status can be updated with Error.
831: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
832: raise FND_API.G_EXC_UNEXPECTED_ERROR;
833: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
834: raise FND_API.G_EXC_ERROR;
835: END IF;
836:

Line 833: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

829: -- If any of the above activity is unsuccessful then throw exception
830: -- so that interlock SHIKYU status can be updated with Error.
831: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
832: raise FND_API.G_EXC_UNEXPECTED_ERROR;
833: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
834: raise FND_API.G_EXC_ERROR;
835: END IF;
836:
837: -- Update Interlock Shikyu status as Completed in JMF_SUBCONTRACT_ORDERS

Line 834: raise FND_API.G_EXC_ERROR;

830: -- so that interlock SHIKYU status can be updated with Error.
831: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
832: raise FND_API.G_EXC_UNEXPECTED_ERROR;
833: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
834: raise FND_API.G_EXC_ERROR;
835: END IF;
836:
837: -- Update Interlock Shikyu status as Completed in JMF_SUBCONTRACT_ORDERS
838: UPDATE JMF_SUBCONTRACT_ORDERS SET interlock_status = 'C'

Line 861: x_return_status := FND_API.G_RET_STS_ERROR;

857: FND_MSG_PUB.Count_And_Get
858: ( p_count => x_msg_count
859: , p_data => x_msg_data
860: );
861: x_return_status := FND_API.G_RET_STS_ERROR;
862:
863:
864: IF g_excep_level >= g_debug_level
865: THEN

Line 876: x_return_status := FND_API.G_RET_STS_ERROR;

872: FND_MSG_PUB.Count_And_Get
873: ( p_count => x_msg_count
874: , p_data => x_msg_data
875: );
876: x_return_status := FND_API.G_RET_STS_ERROR;
877:
878:
879: IF g_excep_level >= g_debug_level
880: THEN

Line 892: x_return_status := FND_API.G_RET_STS_ERROR;

888: ( p_count => x_msg_count
889: , p_data => x_msg_data
890: );
891:
892: x_return_status := FND_API.G_RET_STS_ERROR;
893:
894:
895:
896: IF g_excep_level >= g_debug_level

Line 903: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

899: , G_MODULE_PREFIX || l_api_name || '.No Date Found'
900: , 'Exception - Subcontract Purchase Order Shipment: ' || p_po_shipment_id);
901: END IF;
902:
903: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
904: FND_MSG_PUB.Count_And_Get
905: ( p_count => x_msg_count
906: , p_data => x_msg_data
907: );

Line 909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

905: ( p_count => x_msg_count
906: , p_data => x_msg_data
907: );
908:
909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
910:
911:
912: IF g_unexp_level >= g_debug_level
913: THEN

Line 918: WHEN FND_API.G_EXC_ERROR THEN

914: FND_LOG.string(g_unexp_level
915: , G_MODULE_PREFIX || l_api_name || '.unexpected_exception'
916: , 'Exception');
917: END IF;
918: WHEN FND_API.G_EXC_ERROR THEN
919: FND_MSG_PUB.Count_And_Get
920: ( p_count => x_msg_count
921: , p_data => x_msg_data
922: );

Line 924: x_return_status := FND_API.G_RET_STS_ERROR;

920: ( p_count => x_msg_count
921: , p_data => x_msg_data
922: );
923:
924: x_return_status := FND_API.G_RET_STS_ERROR;
925:
926:
927: IF g_unexp_level >= g_debug_level
928: THEN

Line 939: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

935: ( p_count => x_msg_count
936: , p_data => x_msg_data
937: );
938:
939: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
940:
941: IF g_unexp_level >= g_debug_level
942: THEN
943: FND_LOG.string(g_unexp_level

Line 1012: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN

1008: , NULL);
1009: END IF;
1010:
1011: -- Start API initialization
1012: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN
1013: FND_MSG_PUB.initialize;
1014: END IF;
1015:
1016: IF NOT FND_API.Compatible_API_Call( l_api_version

Line 1016: IF NOT FND_API.Compatible_API_Call( l_api_version

1012: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN
1013: FND_MSG_PUB.initialize;
1014: END IF;
1015:
1016: IF NOT FND_API.Compatible_API_Call( l_api_version
1017: , p_api_version
1018: , l_api_name
1019: , G_PKG_NAME
1020: )

Line 1022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1018: , l_api_name
1019: , G_PKG_NAME
1020: )
1021: THEN
1022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1023: END IF;
1024:
1025: x_return_status := FND_API.G_RET_STS_ERROR;
1026:

Line 1025: x_return_status := FND_API.G_RET_STS_ERROR;

1021: THEN
1022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1023: END IF;
1024:
1025: x_return_status := FND_API.G_RET_STS_ERROR;
1026:
1027: -- End API initialization
1028:
1029: -- Perform WIP Completion/Return and Misc Issue/Receipt based on transaction type.

Line 1039: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1035: JMF_SHIKYU_INV_PVT.Process_Misc_rcpt(p_subcontract_po_shipment_id => p_po_shipment_id
1036: , p_osa_quantity => p_quantity
1037: , p_uom => p_uom
1038: , x_return_status => x_return_status);
1039: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1040: p_status := 'MR_ERROR';
1041: ELSE
1042: p_status := 'PENDING'; --so that next operation can be performed.
1043: END IF;

Line 1050: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1046: JMF_SHIKYU_INV_PVT.Process_WIP_Assy_Return(p_subcontract_po_shipment_id => p_po_shipment_id
1047: , p_osa_quantity => p_quantity
1048: , p_uom => p_uom
1049: , x_return_status => x_return_status);
1050: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1051: p_status := 'AR_ERROR';
1052: END IF;
1053: END IF;
1054:

Line 1062: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1058: JMF_SHIKYU_INV_PVT.Process_WIP_Completion(p_subcontract_po_shipment_id => p_po_shipment_id
1059: , p_osa_quantity => ABS(p_quantity)
1060: , p_uom => p_uom
1061: , x_return_status => x_return_status);
1062: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1063: p_status := 'WC_ERROR';
1064: ELSE
1065: p_status := 'PENDING'; --so that next operation can be performed.
1066: END IF;

Line 1073: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1069: JMF_SHIKYU_INV_PVT.Process_Misc_Issue(p_subcontract_po_shipment_id => p_po_shipment_id
1070: , p_osa_quantity => ABS(p_quantity)
1071: , p_uom => p_uom
1072: , x_return_status => x_return_status);
1073: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1074: p_status := 'MI_ERROR';
1075: END IF;
1076: END IF;
1077: END IF; -- IF p_quantity > 0 THEN

Line 1086: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1082: JMF_SHIKYU_INV_PVT.Process_Misc_rcpt(p_subcontract_po_shipment_id => p_po_shipment_id
1083: , p_osa_quantity => p_quantity
1084: , p_uom => p_uom
1085: , x_return_status => x_return_status);
1086: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1087: p_status := 'MR_ERROR';
1088: ELSE
1089: p_status := 'PENDING'; --so that next operation can be performed.
1090: END IF;

Line 1097: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1093: JMF_SHIKYU_INV_PVT.Process_WIP_Assy_Return(p_subcontract_po_shipment_id => p_po_shipment_id
1094: , p_osa_quantity => p_quantity
1095: , p_uom => p_uom
1096: , x_return_status => x_return_status);
1097: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1098: p_status := 'AR_ERROR';
1099: END IF;
1100: END IF;
1101: END IF; -- IF p_transaction_type = 'CORRECT' THEN

Line 1112: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1108: END IF;
1109:
1110: EXCEPTION
1111:
1112: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1113: FND_MSG_PUB.Count_And_Get
1114: ( p_count => x_msg_count
1115: , p_data => x_msg_data
1116: );

Line 1118: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1114: ( p_count => x_msg_count
1115: , p_data => x_msg_data
1116: );
1117:
1118: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1119: IF g_unexp_level >= g_debug_level
1120: THEN
1121: FND_LOG.string(g_unexp_level
1122: , G_MODULE_PREFIX || l_api_name || '.unexpected_exception'

Line 1132: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1128: ( p_count => x_msg_count
1129: , p_data => x_msg_data
1130: );
1131:
1132: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1133: IF g_unexp_level >= g_debug_level
1134: THEN
1135: FND_LOG.string(g_unexp_level
1136: , G_MODULE_PREFIX || l_api_name || '.others_exception'

Line 1242: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN

1238: , NULL);
1239: END IF;
1240:
1241: -- Start API initialization
1242: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN
1243: FND_MSG_PUB.initialize;
1244: END IF;
1245:
1246: IF NOT FND_API.Compatible_API_Call( l_api_version

Line 1246: IF NOT FND_API.Compatible_API_Call( l_api_version

1242: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN
1243: FND_MSG_PUB.initialize;
1244: END IF;
1245:
1246: IF NOT FND_API.Compatible_API_Call( l_api_version
1247: , p_api_version
1248: , l_api_name
1249: , G_PKG_NAME
1250: )

Line 1252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1248: , l_api_name
1249: , G_PKG_NAME
1250: )
1251: THEN
1252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1253: END IF;
1254:
1255: x_return_status := FND_API.G_RET_STS_ERROR;
1256:

Line 1255: x_return_status := FND_API.G_RET_STS_ERROR;

1251: THEN
1252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1253: END IF;
1254:
1255: x_return_status := FND_API.G_RET_STS_ERROR;
1256:
1257: -- End API initialization
1258:
1259: -- get the replenishment SO line id referenced by the rma line

Line 1478: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1474: , x_msg_data => x_msg_data
1475: , p_replen_order_line_id => l_replen_so_line_id
1476: , p_excess_qty => l_returned_qty
1477: );
1478: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1479: p_status := 'DA_ERROR';
1480: END IF;
1481:
1482: IF g_proc_level >= g_debug_level

Line 1496: x_return_status := FND_API.G_RET_STS_ERROR;

1492: ( p_count => x_msg_count
1493: , p_data => x_msg_data
1494: );
1495:
1496: x_return_status := FND_API.G_RET_STS_ERROR;
1497: IF g_excep_level >= g_debug_level
1498: THEN
1499: FND_LOG.string(g_excep_level
1500: , G_MODULE_PREFIX || l_api_name || '.RTV_Failed'

Line 1510: x_return_status := FND_API.G_RET_STS_ERROR;

1506: ( p_count => x_msg_count
1507: , p_data => x_msg_data
1508: );
1509:
1510: x_return_status := FND_API.G_RET_STS_ERROR;
1511: IF g_excep_level >= g_debug_level
1512: THEN
1513: FND_LOG.string(g_excep_level
1514: , G_MODULE_PREFIX || l_api_name || '.No_Date_Found'

Line 1518: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1514: , G_MODULE_PREFIX || l_api_name || '.No_Date_Found'
1515: , 'Exception - Replenishment Sales Order Line: ' || l_replen_so_line_id);
1516: END IF;
1517:
1518: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1519: FND_MSG_PUB.Count_And_Get
1520: ( p_count => x_msg_count
1521: , p_data => x_msg_data
1522: );

Line 1524: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1520: ( p_count => x_msg_count
1521: , p_data => x_msg_data
1522: );
1523:
1524: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1525: IF g_unexp_level >= g_debug_level
1526: THEN
1527: FND_LOG.string(g_unexp_level
1528: , G_MODULE_PREFIX || l_api_name || '.unexpected_exception'

Line 1537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1533: ( p_count => x_msg_count
1534: , p_data => x_msg_data
1535: );
1536:
1537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1538: IF g_unexp_level >= g_debug_level
1539: THEN
1540: FND_LOG.string(g_unexp_level
1541: , G_MODULE_PREFIX || l_api_name || '.others_exception'

Line 1608: x_return_status := FND_API.G_RET_STS_ERROR;

1604: and jso.subcontract_po_shipment_id = jsc.SUBCONTRACT_PO_SHIPMENT_ID;
1605:
1606: BEGIN
1607:
1608: x_return_status := FND_API.G_RET_STS_ERROR;
1609: x_return_flag := 0;
1610:
1611: SELECT interlock_status
1612: into l_interlock_status

Line 1620: x_return_status := FND_API.G_RET_STS_SUCCESS;

1616: -- AND NVL(project_id, -1)= NVL(p_project_id, -1)
1617: -- AND NVL(task_id, -1)= NVL(p_task_id, -1);
1618:
1619: IF l_interlock_status = 'C' THEN
1620: x_return_status := FND_API.G_RET_STS_SUCCESS;
1621: ELSE
1622: -- Check if allocation is needed against OSA receipt
1623: select ALLOCATABLE_FLAG
1624: into l_allocable_flag

Line 1685: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1681: , x_available_replen_tbl => l_available_replen_so_qty_tbl
1682: , x_remaining_qty => l_remaining_qty
1683: );
1684:
1685: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1686: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1687: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1688: raise FND_API.G_EXC_ERROR;
1689: -- Raise an exception if there is not enough existing replenishments

Line 1686: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1682: , x_remaining_qty => l_remaining_qty
1683: );
1684:
1685: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1686: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1687: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1688: raise FND_API.G_EXC_ERROR;
1689: -- Raise an exception if there is not enough existing replenishments
1690: ELSIF l_remaining_qty > 0 THEN

Line 1687: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

1683: );
1684:
1685: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1686: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1687: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1688: raise FND_API.G_EXC_ERROR;
1689: -- Raise an exception if there is not enough existing replenishments
1690: ELSIF l_remaining_qty > 0 THEN
1691: raise l_not_enough_replen_excep;

Line 1688: raise FND_API.G_EXC_ERROR;

1684:
1685: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1686: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1687: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1688: raise FND_API.G_EXC_ERROR;
1689: -- Raise an exception if there is not enough existing replenishments
1690: ELSIF l_remaining_qty > 0 THEN
1691: raise l_not_enough_replen_excep;
1692: -- Allocate if there is enough existing replenishments

Line 1696: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

1692: -- Allocate if there is enough existing replenishments
1693: END IF;
1694:
1695: -- Allocate SHIKYU components from available Replenishments.
1696: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1697: JMF_SHIKYU_ALLOCATION_PVT.Allocate_Quantity
1698: ( p_api_version => 1.0
1699: , p_init_msg_list => p_init_msg_list
1700: , x_return_status => x_return_status

Line 1712: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1708: , x_qty_allocated => l_actual_qty_allocated
1709: );
1710:
1711: -- Raise an exception if actual quantity allocated is not same as requested quantity.
1712: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1713: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1714: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1715: raise FND_API.G_EXC_ERROR;
1716: ELSIF l_actual_qty_allocated < l_shikyu_qty_to_allocate THEN

Line 1713: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1709: );
1710:
1711: -- Raise an exception if actual quantity allocated is not same as requested quantity.
1712: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1713: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1714: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1715: raise FND_API.G_EXC_ERROR;
1716: ELSIF l_actual_qty_allocated < l_shikyu_qty_to_allocate THEN
1717: raise l_not_allocated_completely;

Line 1714: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

1710:
1711: -- Raise an exception if actual quantity allocated is not same as requested quantity.
1712: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1713: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1714: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1715: raise FND_API.G_EXC_ERROR;
1716: ELSIF l_actual_qty_allocated < l_shikyu_qty_to_allocate THEN
1717: raise l_not_allocated_completely;
1718: END IF; -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

Line 1715: raise FND_API.G_EXC_ERROR;

1711: -- Raise an exception if actual quantity allocated is not same as requested quantity.
1712: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1713: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1714: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1715: raise FND_API.G_EXC_ERROR;
1716: ELSIF l_actual_qty_allocated < l_shikyu_qty_to_allocate THEN
1717: raise l_not_allocated_completely;
1718: END IF; -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1719: END IF; --IF x_return_status = success THEN

Line 1718: END IF; -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1714: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1715: raise FND_API.G_EXC_ERROR;
1716: ELSIF l_actual_qty_allocated < l_shikyu_qty_to_allocate THEN
1717: raise l_not_allocated_completely;
1718: END IF; -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1719: END IF; --IF x_return_status = success THEN
1720: ELSIF l_required_quantity = l_total_allocated_Qty THEN
1721: x_return_status := FND_API.G_RET_STS_SUCCESS;
1722: END IF; --IF (l_required_quantity > l_total_allocated_Qty) THEN

Line 1721: x_return_status := FND_API.G_RET_STS_SUCCESS;

1717: raise l_not_allocated_completely;
1718: END IF; -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1719: END IF; --IF x_return_status = success THEN
1720: ELSIF l_required_quantity = l_total_allocated_Qty THEN
1721: x_return_status := FND_API.G_RET_STS_SUCCESS;
1722: END IF; --IF (l_required_quantity > l_total_allocated_Qty) THEN
1723:
1724:
1725: END LOOP; -- FOR l_subcontract_po_shikyu_comp IN c_subcontract_po_shikyu_comp

Line 1727: x_return_status := FND_API.G_RET_STS_SUCCESS;

1723:
1724:
1725: END LOOP; -- FOR l_subcontract_po_shikyu_comp IN c_subcontract_po_shikyu_comp
1726: ELSIF l_allocable_flag = 'N' THEN
1727: x_return_status := FND_API.G_RET_STS_SUCCESS;
1728: END IF; -- IF l_allocable_flag = 'Y' THEN
1729: END IF; -- IF l_interlock_status = 'C' THEN
1730:
1731: EXCEPTION

Line 1736: x_return_status := FND_API.G_RET_STS_ERROR;

1732: WHEN l_not_enough_replen_excep THEN
1733:
1734:
1735: x_return_flag := 1;
1736: x_return_status := FND_API.G_RET_STS_ERROR;
1737: WHEN l_not_allocated_completely THEN
1738:
1739: x_return_flag := 2;
1740: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1740: x_return_status := FND_API.G_RET_STS_ERROR;

1736: x_return_status := FND_API.G_RET_STS_ERROR;
1737: WHEN l_not_allocated_completely THEN
1738:
1739: x_return_flag := 2;
1740: x_return_status := FND_API.G_RET_STS_ERROR;
1741: WHEN OTHERS THEN
1742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1743: END Validate_And_Allocate;
1744: --=============================================================================

Line 1742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1738:
1739: x_return_flag := 2;
1740: x_return_status := FND_API.G_RET_STS_ERROR;
1741: WHEN OTHERS THEN
1742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1743: END Validate_And_Allocate;
1744: --=============================================================================
1745: -- PROCEDURE NAME: Init
1746: -- TYPE : PRIVATE