DBA Data[Home] [Help]

APPS.GME_UNRELEASE_BATCH_PVT dependencies on FND_API

Line 73: x_return_status := fnd_api.g_ret_sts_success;

69: || p_batch_header_rec.batch_id);
70: END IF;
71:
72: /* Set the return status to success initially */
73: x_return_status := fnd_api.g_ret_sts_success;
74:
75: -- set output structure
76: x_batch_header_rec := p_batch_header_rec;
77:

Line 92: gme_common_pvt.g_batch_status_check := fnd_api.g_false;

88: CLOSE cur_get_and_lock_mtls;
89:
90: -- set batch status
91: x_batch_header_rec.batch_status := gme_common_pvt.g_batch_pending;
92: gme_common_pvt.g_batch_status_check := fnd_api.g_false;
93: -- set actual start date to NULL...
94: x_batch_header_rec.actual_start_date := NULL;
95:
96: -- Update the batch header

Line 116: IF x_return_status <> fnd_api.g_ret_sts_success THEN

112: ,p_create_resv_pend_lots => p_create_resv_pend_lots
113: ,p_from_batch => TRUE
114: ,x_return_status => x_return_status);
115:
116: IF x_return_status <> fnd_api.g_ret_sts_success THEN
117: RAISE error_unrelease_matl;
118: END IF;
119: END LOOP;
120:

Line 141: IF x_return_status <> fnd_api.g_ret_sts_success THEN

137: ,p_from_unrelease_batch => 1
138: ,x_batch_step_rec => l_batch_step_rec
139: ,x_return_status => x_return_status);
140:
141: IF x_return_status <> fnd_api.g_ret_sts_success THEN
142: RAISE error_unrelease_step;
143: END IF;
144: END LOOP; -- FOR i IN 1 .. l_batch_step_tbl.COUNT LOOP
145:

Line 152: p_init_msg_list => FND_API.G_FALSE,

148: -- Bug 5903208 - GMF Call to delete batch requirements
149: --
150: GMF_VIB.Delete_Batch_Requirements
151: ( p_api_version => 1.0,
152: p_init_msg_list => FND_API.G_FALSE,
153: p_batch_id => x_batch_header_rec.batch_id,
154: x_return_status => x_return_status,
155: x_msg_count => l_message_count,
156: x_msg_data => l_message_list);

Line 158: IF x_return_status <> FND_API.G_RET_STS_SUCCESS

154: x_return_status => x_return_status,
155: x_msg_count => l_message_count,
156: x_msg_data => l_message_list);
157:
158: IF x_return_status <> FND_API.G_RET_STS_SUCCESS
159: THEN
160: RAISE gmf_cost_failure;
161: END IF;
162: -- End Bug 5903208

Line 183: x_return_status := FND_API.G_RET_STS_ERROR;

179: END IF;
180: EXCEPTION
181: WHEN gmf_cost_failure THEN
182: -- Bug 5043868
183: x_return_status := FND_API.G_RET_STS_ERROR;
184:
185: WHEN error_mtls_locked THEN
186: gme_common_pvt.log_message ('GME_API_BATCH_LINES_LOCKED');
187: x_return_status := FND_API.G_RET_STS_ERROR;

Line 187: x_return_status := FND_API.G_RET_STS_ERROR;

183: x_return_status := FND_API.G_RET_STS_ERROR;
184:
185: WHEN error_mtls_locked THEN
186: gme_common_pvt.log_message ('GME_API_BATCH_LINES_LOCKED');
187: x_return_status := FND_API.G_RET_STS_ERROR;
188: WHEN error_update_row THEN
189: gme_common_pvt.log_message ('GME_UNEXPECTED_ERROR', 'ERROR'
190: ,SQLERRM);
191: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 191: x_return_status := fnd_api.g_ret_sts_unexp_error;

187: x_return_status := FND_API.G_RET_STS_ERROR;
188: WHEN error_update_row THEN
189: gme_common_pvt.log_message ('GME_UNEXPECTED_ERROR', 'ERROR'
190: ,SQLERRM);
191: x_return_status := fnd_api.g_ret_sts_unexp_error;
192: WHEN error_unrelease_matl OR error_unrelease_step THEN
193: NULL;
194: WHEN OTHERS THEN
195: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);

Line 206: x_return_status := fnd_api.g_ret_sts_unexp_error;

202: || ': '
203: || SQLERRM);
204: END IF;
205:
206: x_return_status := fnd_api.g_ret_sts_unexp_error;
207: END unrelease_batch;
208:
209: PROCEDURE unrelease_material (
210: p_material_detail_rec IN gme_material_details%ROWTYPE

Line 243: x_return_status := fnd_api.g_ret_sts_success;

239: || p_material_detail_rec.material_detail_id);
240: END IF;
241:
242: -- Set the return status to success initially
243: x_return_status := fnd_api.g_ret_sts_success;
244: l_material_detail_rec := p_material_detail_rec;
245:
246: IF l_material_detail_rec.phantom_id IS NOT NULL THEN
247: -- phantom -> unrelease the phantom batch

Line 272: IF x_return_status <> fnd_api.g_ret_sts_success THEN

268: ,p_create_resv_pend_lots => p_create_resv_pend_lots
269: ,x_batch_header_rec => l_phantom_batch_rec
270: ,x_return_status => x_return_status);
271:
272: IF x_return_status <> fnd_api.g_ret_sts_success THEN
273: RAISE error_unrelease_batch;
274: END IF;
275: END IF;
276: -- IF l_phantom_batch_rec.batch_status = gme_common_pvt.g_batch_wip THEN

Line 286: IF x_return_status <> fnd_api.g_ret_sts_success THEN

282: ,p_item_id => l_material_detail_rec.inventory_item_id
283: ,x_item_rec => l_item_rec
284: ,x_return_status => x_return_status);
285:
286: IF x_return_status <> fnd_api.g_ret_sts_success THEN
287: RAISE error_get_item;
288: END IF;
289:
290: IF p_update_inventory_ind = 'Y'

Line 309: IF x_return_status <> fnd_api.g_ret_sts_success THEN

305: -- return status and raise an exception; also, l_exception_material_tbl won't
306: -- contain anything because of same reason; if the transactions can't be reversed,
307: -- it's an error here
308:
309: IF x_return_status <> fnd_api.g_ret_sts_success THEN
310: RAISE error_revert_material;
311: END IF;
312: END IF; -- IF x_batch_header_rec.update_inventory_ind = 'Y' AND
313: END IF; -- IF l_material_detail_rec.phantom_id IS NOT NULL THEN

Line 333: x_return_status := fnd_api.g_ret_sts_unexp_error;

329: EXCEPTION
330: WHEN error_update_row OR error_fetch_batch THEN
331: gme_common_pvt.log_message ('GME_UNEXPECTED_ERROR', 'ERROR'
332: ,SQLERRM);
333: x_return_status := fnd_api.g_ret_sts_unexp_error;
334: WHEN error_get_item OR error_unrelease_batch OR error_revert_material THEN
335: NULL;
336: WHEN OTHERS THEN
337: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);

Line 348: x_return_status := fnd_api.g_ret_sts_unexp_error;

344: || ': '
345: || SQLERRM);
346: END IF;
347:
348: x_return_status := fnd_api.g_ret_sts_unexp_error;
349: END unrelease_material;
350:
351: PROCEDURE revert_material_full (
352: p_material_detail_rec IN gme_material_details%ROWTYPE

Line 393: x_return_status := fnd_api.g_ret_sts_success;

389: END IF;
390: END IF;
391:
392: -- Set the return status to success initially
393: x_return_status := fnd_api.g_ret_sts_success;
394: gme_transactions_pvt.get_mat_trans
395: (p_mat_det_id => p_material_detail_rec.material_detail_id
396: ,p_batch_id => p_material_detail_rec.batch_id
397: ,x_mmt_tbl => l_mmt_tbl

Line 400: IF x_return_status <> fnd_api.g_ret_sts_success THEN

396: ,p_batch_id => p_material_detail_rec.batch_id
397: ,x_mmt_tbl => l_mmt_tbl
398: ,x_return_status => x_return_status);
399:
400: IF x_return_status <> fnd_api.g_ret_sts_success THEN
401: RAISE error_get_trans;
402: END IF;
403:
404: x_actual_qty := p_material_detail_rec.actual_qty;

Line 423: IF x_return_status <> fnd_api.g_ret_sts_success THEN

419: gme_transactions_pvt.get_lot_trans
420: (p_transaction_id => l_mmt_rec.transaction_id
421: ,x_mmln_tbl => l_mmln_tbl
422: ,x_return_status => x_return_status);
423: IF x_return_status <> fnd_api.g_ret_sts_success THEN
424: RAISE error_get_trans;
425: END IF;
426: END IF;
427: /* Bug 5021522 Added logic to see if inventory will go negative when opposite txn is created */

Line 432: RAISE fnd_api.g_exc_error;

428: IF (l_mmt_rec.transaction_type_id IN (gme_common_pvt.g_ing_return, gme_common_pvt.g_prod_completion, gme_common_pvt.g_byprod_completion)) THEN
429: IF check_inv_negative(p_mmt_rec => l_mmt_rec,
430: p_mmln_tbl => l_mmln_tbl,
431: p_item_no => l_item_rec.concatenated_segments) THEN
432: RAISE fnd_api.g_exc_error;
433: END IF;
434: END IF;
435: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
436: gme_debug.put_line(g_pkg_name|| '.'|| l_api_name||

Line 445: IF x_return_status <> fnd_api.g_ret_sts_success THEN

441: (p_transaction_id => l_mmt_rec.transaction_id
442: ,p_txns_pair => NULL
443: ,x_return_status => x_return_status);
444:
445: IF x_return_status <> fnd_api.g_ret_sts_success THEN
446: IF x_return_status = gme_common_pvt.g_not_transactable AND p_ignore_transactable THEN
447: -- don't do anything... move to the next...
448: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
449: gme_debug.put_line(g_pkg_name|| '.'|| l_api_name

Line 519: ,p_force_unconsumed => fnd_api.g_true

515: ,p_pending_move_order_ind => NULL
516: ,p_pending_rsrv_ind => NULL
517: ,p_transacted_qty => p_material_detail_rec.actual_qty - x_actual_qty
518: ,p_exception_qty => x_actual_qty
519: ,p_force_unconsumed => fnd_api.g_true
520: ,x_exception_material_tbl => x_exception_material_tbl
521: ,x_return_status => x_return_status);
522: END IF;
523:

Line 529: WHEN fnd_api.g_exc_error THEN

525: gme_debug.g_log_procedure THEN
526: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name|| ' with return_status = '||x_return_status||' and x_actual_qty='||x_actual_qty);
527: END IF;
528: EXCEPTION
529: WHEN fnd_api.g_exc_error THEN
530: x_return_status := fnd_api.g_ret_sts_error;
531: WHEN error_get_trans OR error_del_trans THEN
532: NULL;
533: WHEN OTHERS THEN

Line 530: x_return_status := fnd_api.g_ret_sts_error;

526: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name|| ' with return_status = '||x_return_status||' and x_actual_qty='||x_actual_qty);
527: END IF;
528: EXCEPTION
529: WHEN fnd_api.g_exc_error THEN
530: x_return_status := fnd_api.g_ret_sts_error;
531: WHEN error_get_trans OR error_del_trans THEN
532: NULL;
533: WHEN OTHERS THEN
534: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);

Line 545: x_return_status := fnd_api.g_ret_sts_unexp_error;

541: || ': '
542: || SQLERRM);
543: END IF;
544:
545: x_return_status := fnd_api.g_ret_sts_unexp_error;
546: END revert_material_full;
547:
548: -- nsinghi bug#5176319. Created this proc. It will create ingredient reservation during batch/step unrelease.
549: -- Bug 6997483 01-May-2008 Archana Mundhe Added parameter transaction_id.

Line 576: x_return_status := fnd_api.g_ret_sts_success;

572: IF (NVL (g_debug, 0) IN (gme_debug.g_log_statement, gme_debug.g_log_procedure) ) THEN
573: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':' || 'Entering');
574: END IF;
575:
576: x_return_status := fnd_api.g_ret_sts_success;
577:
578: IF (NVL (g_debug, 0) = gme_debug.g_log_statement) THEN
579: gme_debug.put_line ( g_pkg_name|| '.'|| l_api_name|| ':'||'p_material_dtl_id = '
580: ||p_material_dtl_id);

Line 603: RAISE fnd_api.g_exc_error;

599:
600: IF NOT gme_material_details_dbl.fetch_row
601: (p_material_detail => l_mat_dtl_rec
602: ,x_material_detail => l_mat_dtl_rec) THEN
603: RAISE fnd_api.g_exc_error;
604: END IF;
605:
606:
607: gme_transactions_pvt.get_mmt_transactions (

Line 667: x_return_status := fnd_api.g_ret_sts_success;

663: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'|| l_api_name);
664: END IF;
665:
666: -- Set the return status to success initially
667: x_return_status := fnd_api.g_ret_sts_success;
668:
669: l_mmt_rec := p_mmt_rec;
670: l_mmln_tbl := p_mmln_tbl;
671: l_material_detail_rec := p_material_detail_rec;

Line 688: IF l_return_status <> fnd_api.g_ret_sts_success THEN

684: ,p_subinventory => l_mmt_rec.subinventory_code
685: ,p_locator_id => l_mmt_rec.locator_id
686: ,p_lot_number => l_mmln_tbl (j).lot_number
687: ,x_return_status => l_return_status);
688: IF l_return_status <> fnd_api.g_ret_sts_success THEN
689: x_return_status := l_return_status;
690: -- don't error out if the reservation was not created... just set the return status
691: END IF;
692: END IF;

Line 705: IF l_return_status <> fnd_api.g_ret_sts_success THEN

701: ,p_subinventory => l_mmt_rec.subinventory_code
702: ,p_locator_id => l_mmt_rec.locator_id
703: ,p_lot_number => NULL
704: ,x_return_status => l_return_status);
705: IF l_return_status <> fnd_api.g_ret_sts_success THEN
706: x_return_status := l_return_status;
707: -- don't error out if the reservation was not created... just set the return status
708: END IF;
709: END IF;

Line 740: IF l_return_status <> fnd_api.g_ret_sts_success THEN

736: gme_pending_product_lots_pvt.create_pending_product_lot
737: (p_pending_product_lots_rec => l_pplot_rec
738: ,x_pending_product_lots_rec => l_out_pplot_rec
739: ,x_return_status => l_return_status);
740: IF l_return_status <> fnd_api.g_ret_sts_success THEN
741: x_return_status := l_return_status;
742: -- don't error out if the reservation was not created... just set the return status
743: END IF;
744: END LOOP;

Line 764: x_return_status := fnd_api.g_ret_sts_unexp_error;

760: || ': '
761: || SQLERRM);
762: END IF;
763:
764: x_return_status := fnd_api.g_ret_sts_unexp_error;
765: END create_resv_pplot;
766:
767: PROCEDURE validate_batch_for_unrelease
768: (p_batch_hdr_rec IN gme_batch_header%ROWTYPE

Line 820: x_return_status := FND_API.G_RET_STS_ERROR;

816: END IF;
817: EXCEPTION
818: WHEN error_phantom THEN
819: gme_common_pvt.log_message ('PM_INVALID_PHANTOM_ACTION');
820: x_return_status := FND_API.G_RET_STS_ERROR;
821: WHEN error_batch_type OR error_batch_status THEN
822: gme_common_pvt.log_message('GME_API_INVALID_BATCH_UNREL');
823: x_return_status := fnd_api.g_ret_sts_error;
824: WHEN error_step_status THEN

Line 823: x_return_status := fnd_api.g_ret_sts_error;

819: gme_common_pvt.log_message ('PM_INVALID_PHANTOM_ACTION');
820: x_return_status := FND_API.G_RET_STS_ERROR;
821: WHEN error_batch_type OR error_batch_status THEN
822: gme_common_pvt.log_message('GME_API_INVALID_BATCH_UNREL');
823: x_return_status := fnd_api.g_ret_sts_error;
824: WHEN error_step_status THEN
825: gme_common_pvt.log_message('GME_API_INVALID_STEP_UNREL');
826: x_return_status := fnd_api.g_ret_sts_error;
827: WHEN OTHERS THEN

Line 826: x_return_status := fnd_api.g_ret_sts_error;

822: gme_common_pvt.log_message('GME_API_INVALID_BATCH_UNREL');
823: x_return_status := fnd_api.g_ret_sts_error;
824: WHEN error_step_status THEN
825: gme_common_pvt.log_message('GME_API_INVALID_STEP_UNREL');
826: x_return_status := fnd_api.g_ret_sts_error;
827: WHEN OTHERS THEN
828: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
829:
830: IF g_debug <= gme_debug.g_log_procedure THEN

Line 839: x_return_status := fnd_api.g_ret_sts_unexp_error;

835: || ': '
836: || SQLERRM);
837: END IF;
838:
839: x_return_status := fnd_api.g_ret_sts_unexp_error;
840: END validate_batch_for_unrelease;
841:
842: /* Bug 5021522 added function RETURNS TRUE if inv will go negative and org control does not allow it */
843: FUNCTION check_inv_negative(p_mmt_rec IN mtl_material_transactions%ROWTYPE,