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 1248: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN

1244: , NULL);
1245: END IF;
1246:
1247: -- Start API initialization
1248: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN
1249: FND_MSG_PUB.initialize;
1250: END IF;
1251:
1252: IF NOT FND_API.Compatible_API_Call( l_api_version

Line 1252: IF NOT FND_API.Compatible_API_Call( l_api_version

1248: IF FND_API.to_boolean(NVL(p_init_msg_list, FND_API.G_FALSE)) THEN
1249: FND_MSG_PUB.initialize;
1250: END IF;
1251:
1252: IF NOT FND_API.Compatible_API_Call( l_api_version
1253: , p_api_version
1254: , l_api_name
1255: , G_PKG_NAME
1256: )

Line 1258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1254: , l_api_name
1255: , G_PKG_NAME
1256: )
1257: THEN
1258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1259: END IF;
1260:
1261: x_return_status := FND_API.G_RET_STS_ERROR;
1262:

Line 1261: x_return_status := FND_API.G_RET_STS_ERROR;

1257: THEN
1258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1259: END IF;
1260:
1261: x_return_status := FND_API.G_RET_STS_ERROR;
1262:
1263: -- End API initialization
1264:
1265: -- get the replenishment SO line id referenced by the rma line

Line 1523: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1519: , x_msg_data => x_msg_data
1520: , p_replen_order_line_id => l_replen_so_line_id
1521: , p_excess_qty => l_returned_qty
1522: );
1523: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1524: p_status := 'DA_ERROR';
1525: END IF;
1526:
1527: IF g_proc_level >= g_debug_level

Line 1541: x_return_status := FND_API.G_RET_STS_ERROR;

1537: ( p_count => x_msg_count
1538: , p_data => x_msg_data
1539: );
1540:
1541: x_return_status := FND_API.G_RET_STS_ERROR;
1542: IF g_excep_level >= g_debug_level
1543: THEN
1544: FND_LOG.string(g_excep_level
1545: , G_MODULE_PREFIX || l_api_name || '.RTV_Failed'

Line 1555: x_return_status := FND_API.G_RET_STS_ERROR;

1551: ( p_count => x_msg_count
1552: , p_data => x_msg_data
1553: );
1554:
1555: x_return_status := FND_API.G_RET_STS_ERROR;
1556: IF g_excep_level >= g_debug_level
1557: THEN
1558: FND_LOG.string(g_excep_level
1559: , G_MODULE_PREFIX || l_api_name || '.No_Date_Found'

Line 1563: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1559: , G_MODULE_PREFIX || l_api_name || '.No_Date_Found'
1560: , 'Exception - Replenishment Sales Order Line: ' || l_replen_so_line_id);
1561: END IF;
1562:
1563: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1564: FND_MSG_PUB.Count_And_Get
1565: ( p_count => x_msg_count
1566: , p_data => x_msg_data
1567: );

Line 1569: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1565: ( p_count => x_msg_count
1566: , p_data => x_msg_data
1567: );
1568:
1569: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1570: IF g_unexp_level >= g_debug_level
1571: THEN
1572: FND_LOG.string(g_unexp_level
1573: , G_MODULE_PREFIX || l_api_name || '.unexpected_exception'

Line 1582: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1578: ( p_count => x_msg_count
1579: , p_data => x_msg_data
1580: );
1581:
1582: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1583: IF g_unexp_level >= g_debug_level
1584: THEN
1585: FND_LOG.string(g_unexp_level
1586: , G_MODULE_PREFIX || l_api_name || '.others_exception'

Line 1653: x_return_status := FND_API.G_RET_STS_ERROR;

1649: and jso.subcontract_po_shipment_id = jsc.SUBCONTRACT_PO_SHIPMENT_ID;
1650:
1651: BEGIN
1652:
1653: x_return_status := FND_API.G_RET_STS_ERROR;
1654: x_return_flag := 0;
1655:
1656: SELECT interlock_status
1657: into l_interlock_status

Line 1665: x_return_status := FND_API.G_RET_STS_SUCCESS;

1661: -- AND NVL(project_id, -1)= NVL(p_project_id, -1)
1662: -- AND NVL(task_id, -1)= NVL(p_task_id, -1);
1663:
1664: IF l_interlock_status = 'C' THEN
1665: x_return_status := FND_API.G_RET_STS_SUCCESS;
1666: ELSE
1667: -- Check if allocation is needed against OSA receipt
1668: select ALLOCATABLE_FLAG
1669: into l_allocable_flag

Line 1730: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1726: , x_available_replen_tbl => l_available_replen_so_qty_tbl
1727: , x_remaining_qty => l_remaining_qty
1728: );
1729:
1730: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1731: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1732: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1733: raise FND_API.G_EXC_ERROR;
1734: -- Raise an exception if there is not enough existing replenishments

Line 1731: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1727: , x_remaining_qty => l_remaining_qty
1728: );
1729:
1730: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1731: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1732: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1733: raise FND_API.G_EXC_ERROR;
1734: -- Raise an exception if there is not enough existing replenishments
1735: ELSIF l_remaining_qty > 0 THEN

Line 1732: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

1728: );
1729:
1730: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1731: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1732: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1733: raise FND_API.G_EXC_ERROR;
1734: -- Raise an exception if there is not enough existing replenishments
1735: ELSIF l_remaining_qty > 0 THEN
1736: raise l_not_enough_replen_excep;

Line 1733: raise FND_API.G_EXC_ERROR;

1729:
1730: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1731: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1732: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1733: raise FND_API.G_EXC_ERROR;
1734: -- Raise an exception if there is not enough existing replenishments
1735: ELSIF l_remaining_qty > 0 THEN
1736: raise l_not_enough_replen_excep;
1737: -- Allocate if there is enough existing replenishments

Line 1741: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

1737: -- Allocate if there is enough existing replenishments
1738: END IF;
1739:
1740: -- Allocate SHIKYU components from available Replenishments.
1741: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1742: JMF_SHIKYU_ALLOCATION_PVT.Allocate_Quantity
1743: ( p_api_version => 1.0
1744: , p_init_msg_list => p_init_msg_list
1745: , x_return_status => x_return_status

Line 1757: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1753: , x_qty_allocated => l_actual_qty_allocated
1754: );
1755:
1756: -- Raise an exception if actual quantity allocated is not same as requested quantity.
1757: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1758: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1759: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1760: raise FND_API.G_EXC_ERROR;
1761: ELSIF l_actual_qty_allocated < l_shikyu_qty_to_allocate THEN

Line 1758: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1754: );
1755:
1756: -- Raise an exception if actual quantity allocated is not same as requested quantity.
1757: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1758: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1759: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1760: raise FND_API.G_EXC_ERROR;
1761: ELSIF l_actual_qty_allocated < l_shikyu_qty_to_allocate THEN
1762: raise l_not_allocated_completely;

Line 1759: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

1755:
1756: -- Raise an exception if actual quantity allocated is not same as requested quantity.
1757: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1758: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1759: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1760: raise FND_API.G_EXC_ERROR;
1761: ELSIF l_actual_qty_allocated < l_shikyu_qty_to_allocate THEN
1762: raise l_not_allocated_completely;
1763: END IF; -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

Line 1760: raise FND_API.G_EXC_ERROR;

1756: -- Raise an exception if actual quantity allocated is not same as requested quantity.
1757: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1758: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1759: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1760: raise FND_API.G_EXC_ERROR;
1761: ELSIF l_actual_qty_allocated < l_shikyu_qty_to_allocate THEN
1762: raise l_not_allocated_completely;
1763: END IF; -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1764: END IF; --IF x_return_status = success THEN

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

1759: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1760: raise FND_API.G_EXC_ERROR;
1761: ELSIF l_actual_qty_allocated < l_shikyu_qty_to_allocate THEN
1762: raise l_not_allocated_completely;
1763: END IF; -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1764: END IF; --IF x_return_status = success THEN
1765: ELSIF l_required_quantity = l_total_allocated_Qty THEN
1766: x_return_status := FND_API.G_RET_STS_SUCCESS;
1767: END IF; --IF (l_required_quantity > l_total_allocated_Qty) THEN

Line 1766: x_return_status := FND_API.G_RET_STS_SUCCESS;

1762: raise l_not_allocated_completely;
1763: END IF; -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1764: END IF; --IF x_return_status = success THEN
1765: ELSIF l_required_quantity = l_total_allocated_Qty THEN
1766: x_return_status := FND_API.G_RET_STS_SUCCESS;
1767: END IF; --IF (l_required_quantity > l_total_allocated_Qty) THEN
1768:
1769:
1770: END LOOP; -- FOR l_subcontract_po_shikyu_comp IN c_subcontract_po_shikyu_comp

Line 1772: x_return_status := FND_API.G_RET_STS_SUCCESS;

1768:
1769:
1770: END LOOP; -- FOR l_subcontract_po_shikyu_comp IN c_subcontract_po_shikyu_comp
1771: ELSIF l_allocable_flag = 'N' THEN
1772: x_return_status := FND_API.G_RET_STS_SUCCESS;
1773: END IF; -- IF l_allocable_flag = 'Y' THEN
1774: END IF; -- IF l_interlock_status = 'C' THEN
1775:
1776: EXCEPTION

Line 1781: x_return_status := FND_API.G_RET_STS_ERROR;

1777: WHEN l_not_enough_replen_excep THEN
1778:
1779:
1780: x_return_flag := 1;
1781: x_return_status := FND_API.G_RET_STS_ERROR;
1782: WHEN l_not_allocated_completely THEN
1783:
1784: x_return_flag := 2;
1785: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1785: x_return_status := FND_API.G_RET_STS_ERROR;

1781: x_return_status := FND_API.G_RET_STS_ERROR;
1782: WHEN l_not_allocated_completely THEN
1783:
1784: x_return_flag := 2;
1785: x_return_status := FND_API.G_RET_STS_ERROR;
1786: WHEN OTHERS THEN
1787: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1788: END Validate_And_Allocate;
1789: --=============================================================================

Line 1787: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1783:
1784: x_return_flag := 2;
1785: x_return_status := FND_API.G_RET_STS_ERROR;
1786: WHEN OTHERS THEN
1787: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1788: END Validate_And_Allocate;
1789: --=============================================================================
1790: -- PROCEDURE NAME: Init
1791: -- TYPE : PRIVATE