DBA Data[Home] [Help]

APPS.INV_WIP_PICKING_PVT dependencies on FND_API

Line 27: , p_allow_partial_pick IN VARCHAR2 DEFAULT fnd_api.g_true

23:
24: -- Forward declarations
25: PROCEDURE process_line(
26: p_mo_line_rec IN OUT NOCOPY inv_move_order_pub.trolin_rec_type
27: , p_allow_partial_pick IN VARCHAR2 DEFAULT fnd_api.g_true
28: , p_grouping_rule_id IN NUMBER DEFAULT NULL
29: , p_plan_tasks IN BOOLEAN
30: , p_call_wip_api IN BOOLEAN --Added bug 4634522
31: , x_return_status OUT NOCOPY VARCHAR2

Line 101: , p_print_pick_slip => FND_API.G_FALSE

97: , p_mo_line_rec_tbl => p_mo_line_rec_tbl
98: , p_auto_detail_flag => p_auto_detail_flag
99: , p_auto_pick_confirm_flag => p_auto_pick_confirm_flag
100: , p_allow_partial_pick => p_allow_partial_pick
101: , p_print_pick_slip => FND_API.G_FALSE
102: , p_plan_tasks => FALSE
103: , p_commit => p_commit
104: , p_init_msg_lst => p_init_msg_lst
105: , x_return_status => l_api_return_status

Line 129: x_return_status := fnd_api.g_ret_sts_error;

125: WHEN OTHERS THEN
126: IF (l_debug = 1) THEN
127: print_debug('Error: ' || SQLCODE || ', ' || SQLERRM, 'RELEASE_PICK_BATCH');
128: END IF;
129: x_return_status := fnd_api.g_ret_sts_error;
130: END release_pick_batch;
131:
132:
133:

Line 156: l_commit VARCHAR2(1) := fnd_api.g_false;

152: ) IS
153:
154: l_api_version_number NUMBER := 1.0;
155: l_api_return_status VARCHAR2(1);
156: l_commit VARCHAR2(1) := fnd_api.g_false;
157: l_temp BOOLEAN;
158: l_trohdr_val_rec inv_move_order_pub.trohdr_val_rec_type;
159: l_trolin_val_tbl inv_move_order_pub.trolin_val_tbl_type;
160: l_organization_id NUMBER;

Line 161: l_auto_pick_confirm VARCHAR2(1) := fnd_api.g_false;

157: l_temp BOOLEAN;
158: l_trohdr_val_rec inv_move_order_pub.trohdr_val_rec_type;
159: l_trolin_val_tbl inv_move_order_pub.trolin_val_tbl_type;
160: l_organization_id NUMBER;
161: l_auto_pick_confirm VARCHAR2(1) := fnd_api.g_false;
162: l_entity_type NUMBER;
163: l_max_batch NUMBER;
164: l_counter NUMBER;
165: l_last_rec NUMBER;

Line 209: IF fnd_api.to_boolean(p_init_msg_lst) THEN

205: SAVEPOINT inv_wip_pick_release;
206: l_savept_exists := TRUE;
207:
208: -- Initialize message list.
209: IF fnd_api.to_boolean(p_init_msg_lst) THEN
210: fnd_msg_pub.initialize;
211: END IF;
212:
213: -- Validate parameter for allowing partial pick release

Line 214: IF p_allow_partial_pick NOT IN (fnd_api.g_true, fnd_api.g_false) THEN

210: fnd_msg_pub.initialize;
211: END IF;
212:
213: -- Validate parameter for allowing partial pick release
214: IF p_allow_partial_pick NOT IN (fnd_api.g_true, fnd_api.g_false) THEN
215: IF (l_debug = 1) THEN
216: print_debug('Error: invalid partial pick parameter','RELEASE_PICK_BATCH');
217: END IF;
218: fnd_message.set_name('INV', 'INV_INVALID_PARTIAL_PICK_PARAM');

Line 220: RAISE fnd_api.g_exc_unexpected_error;

216: print_debug('Error: invalid partial pick parameter','RELEASE_PICK_BATCH');
217: END IF;
218: fnd_message.set_name('INV', 'INV_INVALID_PARTIAL_PICK_PARAM');
219: fnd_msg_pub.ADD;
220: RAISE fnd_api.g_exc_unexpected_error;
221: END IF;
222:
223: IF (l_debug = 1) THEN
224: print_debug('p_allow_partial_pick is '|| p_allow_partial_pick, 'RELEASE_PICK_BATCH');

Line 238: x_return_status := fnd_api.g_ret_sts_success;

234:
235: l_is_wms_org := inv_install.adv_inv_installed(l_organization_id);
236:
237: -- Initialize API return status to success
238: x_return_status := fnd_api.g_ret_sts_success;
239:
240: -- Determine whether or not to automatically pick confirm
241: IF p_auto_pick_confirm_flag <> fnd_api.g_miss_char THEN
242: IF (p_auto_pick_confirm_flag NOT IN (fnd_api.g_true, fnd_api.g_false) ) THEN

Line 241: IF p_auto_pick_confirm_flag <> fnd_api.g_miss_char THEN

237: -- Initialize API return status to success
238: x_return_status := fnd_api.g_ret_sts_success;
239:
240: -- Determine whether or not to automatically pick confirm
241: IF p_auto_pick_confirm_flag <> fnd_api.g_miss_char THEN
242: IF (p_auto_pick_confirm_flag NOT IN (fnd_api.g_true, fnd_api.g_false) ) THEN
243: IF (l_debug = 1) THEN
244: print_debug('Error: Invalid auto_pick_confirm flag', 'RELEASE_PICK_BATCH');
245: END IF;

Line 242: IF (p_auto_pick_confirm_flag NOT IN (fnd_api.g_true, fnd_api.g_false) ) THEN

238: x_return_status := fnd_api.g_ret_sts_success;
239:
240: -- Determine whether or not to automatically pick confirm
241: IF p_auto_pick_confirm_flag <> fnd_api.g_miss_char THEN
242: IF (p_auto_pick_confirm_flag NOT IN (fnd_api.g_true, fnd_api.g_false) ) THEN
243: IF (l_debug = 1) THEN
244: print_debug('Error: Invalid auto_pick_confirm flag', 'RELEASE_PICK_BATCH');
245: END IF;
246: fnd_message.set_name('INV', 'INV_AUTO_PICK_CONFIRM_PARAM');

Line 248: RAISE fnd_api.g_exc_unexpected_error;

244: print_debug('Error: Invalid auto_pick_confirm flag', 'RELEASE_PICK_BATCH');
245: END IF;
246: fnd_message.set_name('INV', 'INV_AUTO_PICK_CONFIRM_PARAM');
247: fnd_msg_pub.ADD;
248: RAISE fnd_api.g_exc_unexpected_error;
249: ELSE
250: l_auto_pick_confirm := p_auto_pick_confirm_flag;
251: END IF;
252: ELSE

Line 257: SELECT DECODE(NVL(mo_pick_confirm_required, 2), 1, fnd_api.g_false, 2, fnd_api.g_true, fnd_api.g_true)

253: -- Retrieve the org-level parameter for auto-pick confirm
254: BEGIN
255: -- The parameter is for whether pick confirm is required or not,
256: -- so the auto-pick confirm flag is the opposite of this.
257: SELECT DECODE(NVL(mo_pick_confirm_required, 2), 1, fnd_api.g_false, 2, fnd_api.g_true, fnd_api.g_true)
258: INTO l_auto_pick_confirm
259: FROM mtl_parameters
260: WHERE organization_id = l_organization_id;
261: EXCEPTION

Line 268: RAISE fnd_api.g_exc_unexpected_error;

264: print_debug('Error: Invalid auto_pick_confirm flag', 'RELEASE_PICK_BATCH');
265: END IF;
266: fnd_message.set_name('INV', 'INV-NO ORG INFORMATION');
267: fnd_msg_pub.ADD;
268: RAISE fnd_api.g_exc_unexpected_error;
269: END;
270: END IF;
271:
272: IF (l_debug = 1) THEN

Line 279: IF nvl(p_mo_header_rec.grouping_rule_id,fnd_api.g_miss_num) = fnd_api.g_miss_num THEN

275:
276: -- Bug 2666620: Grouping Rule ID has to be stamped
277: -- Bug 2844622: Skip this check if WIP patch level is below 11.5.9
278: IF g_wip_patch_level >= 1159 THEN
279: IF nvl(p_mo_header_rec.grouping_rule_id,fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
280: IF (l_debug = 1) THEN
281: print_debug('No Pick Slip Grouping Rule ID specified', 'RELEASE_PICK_BATCH');
282: END IF;
283: fnd_message.set_name('INV', 'INV_NO_PICK_SLIP_NUMBER');

Line 285: RAISE fnd_api.g_exc_unexpected_error;

281: print_debug('No Pick Slip Grouping Rule ID specified', 'RELEASE_PICK_BATCH');
282: END IF;
283: fnd_message.set_name('INV', 'INV_NO_PICK_SLIP_NUMBER');
284: fnd_msg_pub.ADD;
285: RAISE fnd_api.g_exc_unexpected_error;
286: END IF;
287: ELSE
288: IF (l_debug = 1) THEN
289: print_debug('WIP patch level is ' || to_char(g_wip_patch_level) ||

Line 300: , p_init_msg_list => fnd_api.g_false

296: END IF;
297:
298: inv_move_order_pub.create_move_order_header(
299: p_api_version_number => l_api_version_number
300: , p_init_msg_list => fnd_api.g_false
301: , p_return_values => fnd_api.g_true
302: , p_commit => l_commit
303: , x_return_status => l_api_return_status
304: , x_msg_count => x_msg_count

Line 301: , p_return_values => fnd_api.g_true

297:
298: inv_move_order_pub.create_move_order_header(
299: p_api_version_number => l_api_version_number
300: , p_init_msg_list => fnd_api.g_false
301: , p_return_values => fnd_api.g_true
302: , p_commit => l_commit
303: , x_return_status => l_api_return_status
304: , x_msg_count => x_msg_count
305: , x_msg_data => x_msg_data

Line 312: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN

308: , x_trohdr_rec => p_mo_header_rec
309: , x_trohdr_val_rec => l_trohdr_val_rec
310: );
311:
312: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
313: IF (l_debug = 1) THEN
314: print_debug('Error occurred in Create_Move_Order_Header', 'RELEASE_PICK_BATCH');
315: END IF;
316: RAISE fnd_api.g_exc_unexpected_error;

Line 316: RAISE fnd_api.g_exc_unexpected_error;

312: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
313: IF (l_debug = 1) THEN
314: print_debug('Error occurred in Create_Move_Order_Header', 'RELEASE_PICK_BATCH');
315: END IF;
316: RAISE fnd_api.g_exc_unexpected_error;
317: ELSE
318: IF (l_debug = 1) THEN
319: print_debug('Created MO Header successfully: '|| p_mo_header_rec.header_id, 'RELEASE_PICK_BATCH');
320: END IF;

Line 331: RAISE fnd_api.g_exc_unexpected_error;

327: ELSE
328: IF (l_debug = 1) THEN
329: print_debug('No MO Lines to create!', 'RELEASE_PICK_BATCH');
330: END IF;
331: RAISE fnd_api.g_exc_unexpected_error;
332: END IF;
333:
334: --
335: -- Bug 2844622: Skip performance changes (breaking up move order lines

Line 404: , p_init_msg_list => fnd_api.g_true

400: END IF;
401:
402: inv_move_order_pub.create_move_order_lines(
403: p_api_version_number => l_api_version_number
404: , p_init_msg_list => fnd_api.g_true
405: , p_return_values => fnd_api.g_true
406: , p_commit => l_commit
407: , x_return_status => l_api_return_status
408: , x_msg_count => x_msg_count

Line 405: , p_return_values => fnd_api.g_true

401:
402: inv_move_order_pub.create_move_order_lines(
403: p_api_version_number => l_api_version_number
404: , p_init_msg_list => fnd_api.g_true
405: , p_return_values => fnd_api.g_true
406: , p_commit => l_commit
407: , x_return_status => l_api_return_status
408: , x_msg_count => x_msg_count
409: , x_msg_data => x_msg_data

Line 416: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN

412: , x_trolin_tbl => l_line_tbl
413: , x_trolin_val_tbl => l_trolin_val_tbl
414: );
415:
416: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
417: IF (l_debug = 1) THEN
418: print_debug('Error occurred in Create_Move_Order_Lines = '||l_api_return_status
419: ,'RELEASE_PICK_BATCH');
420: END IF;

Line 422: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN

418: print_debug('Error occurred in Create_Move_Order_Lines = '||l_api_return_status
419: ,'RELEASE_PICK_BATCH');
420: END IF;
421: -- Bug 4288399, Filtering the errored records and continuing
422: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
423: RAISE fnd_api.g_exc_unexpected_error;
424: ELSIF (g_conc_mode) THEN
425: l_wip_err_count := 0;
426: l_err_start_index := l_wip_error_table.COUNT;

Line 423: RAISE fnd_api.g_exc_unexpected_error;

419: ,'RELEASE_PICK_BATCH');
420: END IF;
421: -- Bug 4288399, Filtering the errored records and continuing
422: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
423: RAISE fnd_api.g_exc_unexpected_error;
424: ELSIF (g_conc_mode) THEN
425: l_wip_err_count := 0;
426: l_err_start_index := l_wip_error_table.COUNT;
427: IF (l_debug = 1) THEN

Line 433: IF l_line_tbl(i).return_status = fnd_api.g_ret_sts_error THEN

429: print_debug('Number of records currently in error table: ' || l_err_start_index,
430: 'RELEASE_PICK_BATCH');
431: END IF;
432: FOR i in 1..l_line_tbl.COUNT LOOP
433: IF l_line_tbl(i).return_status = fnd_api.g_ret_sts_error THEN
434: IF (l_debug = 1) THEN
435: print_debug('Delete Line '||l_line_tbl(i).line_id, 'RELEASE_PICK_BATCH');
436: END IF;
437:

Line 439: IF l_line_tbl(i).line_id = fnd_api.g_miss_num THEN

435: print_debug('Delete Line '||l_line_tbl(i).line_id, 'RELEASE_PICK_BATCH');
436: END IF;
437:
438: -- Bug 5469486: handle the case where line ID is g_miss_num
439: IF l_line_tbl(i).line_id = fnd_api.g_miss_num THEN
440: g_mol_fail_count := g_mol_fail_count + 1;
441: ELSE
442: g_mo_line_stat_tbl(l_line_tbl(i).line_id) := g_not_allocated;
443: END IF;

Line 510: RAISE fnd_api.g_exc_unexpected_error;

506: ELSE
507: IF (l_debug = 1) THEN
508: print_debug('Conc_mode is False', 'RELEASE_PICK_BATCH');
509: END IF;
510: RAISE fnd_api.g_exc_unexpected_error;
511: END IF;
512: ELSE
513: IF (l_debug = 1) THEN
514: print_debug('Created MO Lines successfully', 'RELEASE_PICK_BATCH');

Line 523: IF p_auto_detail_flag = fnd_api.g_true AND l_line_tbl.COUNT > 0 THEN

519: print_debug('MO line creation complete, before calling pick release..',
520: 'RELEASE_PICK_BATCH');
521: END IF;
522:
523: IF p_auto_detail_flag = fnd_api.g_true AND l_line_tbl.COUNT > 0 THEN
524: IF (l_debug = 1) THEN
525: print_debug('Calling pick_release', 'RELEASE_PICK_BATCH');
526: END IF;
527: l_api_return_status := fnd_api.g_ret_sts_success;

Line 527: l_api_return_status := fnd_api.g_ret_sts_success;

523: IF p_auto_detail_flag = fnd_api.g_true AND l_line_tbl.COUNT > 0 THEN
524: IF (l_debug = 1) THEN
525: print_debug('Calling pick_release', 'RELEASE_PICK_BATCH');
526: END IF;
527: l_api_return_status := fnd_api.g_ret_sts_success;
528: pick_release(
529: x_return_status => l_api_return_status
530: , x_msg_count => x_msg_count
531: , x_msg_data => x_msg_data

Line 533: , p_init_msg_lst => fnd_api.g_true

529: x_return_status => l_api_return_status
530: , x_msg_count => x_msg_count
531: , x_msg_data => x_msg_data
532: , p_commit => l_commit
533: , p_init_msg_lst => fnd_api.g_true
534: , p_mo_line_tbl => l_line_tbl
535: , p_allow_partial_pick => p_allow_partial_pick
536: , p_grouping_rule_id => p_mo_header_rec.grouping_rule_id
537: , p_plan_tasks => p_plan_tasks

Line 541: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN

537: , p_plan_tasks => p_plan_tasks
538: , p_call_wip_api => TRUE
539: );
540:
541: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
542: IF (l_debug = 1) THEN
543: print_debug('Error occurred in Pick_Release', 'RELEASE_PICK_BATCH');
544: END IF;
545: RAISE fnd_api.g_exc_unexpected_error;

Line 545: RAISE fnd_api.g_exc_unexpected_error;

541: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
542: IF (l_debug = 1) THEN
543: print_debug('Error occurred in Pick_Release', 'RELEASE_PICK_BATCH');
544: END IF;
545: RAISE fnd_api.g_exc_unexpected_error;
546: END IF;
547: END IF; -- end if auto detail flag is true
548:
549: COMMIT;

Line 568: , p_init_msg_list => fnd_api.g_false

564: END LOOP;
565:
566: inv_move_order_pub.create_move_order_lines(
567: p_api_version_number => l_api_version_number
568: , p_init_msg_list => fnd_api.g_false
569: , p_return_values => fnd_api.g_true
570: , p_commit => l_commit
571: , x_return_status => l_api_return_status
572: , x_msg_count => x_msg_count

Line 569: , p_return_values => fnd_api.g_true

565:
566: inv_move_order_pub.create_move_order_lines(
567: p_api_version_number => l_api_version_number
568: , p_init_msg_list => fnd_api.g_false
569: , p_return_values => fnd_api.g_true
570: , p_commit => l_commit
571: , x_return_status => l_api_return_status
572: , x_msg_count => x_msg_count
573: , x_msg_data => x_msg_data

Line 580: IF l_api_return_status <> FND_API.G_RET_STS_SUCCESS THEN

576: , x_trolin_tbl => l_line_tbl
577: , x_trolin_val_tbl => l_trolin_val_tbl
578: );
579:
580: IF l_api_return_status <> FND_API.G_RET_STS_SUCCESS THEN
581: print_debug ('Error occurred in INV_Move_Order_PUB.Create_Move_Order_Lines', 'RELEASE_PICK_BATCH');
582: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
583: ELSE
584: print_debug ('Created MO Lines successfully', 'RELEASE_PICK_BATCH');

Line 582: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

578: );
579:
580: IF l_api_return_status <> FND_API.G_RET_STS_SUCCESS THEN
581: print_debug ('Error occurred in INV_Move_Order_PUB.Create_Move_Order_Lines', 'RELEASE_PICK_BATCH');
582: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
583: ELSE
584: print_debug ('Created MO Lines successfully', 'RELEASE_PICK_BATCH');
585: END IF;
586:

Line 587: IF p_auto_detail_flag = FND_API.G_TRUE THEN

583: ELSE
584: print_debug ('Created MO Lines successfully', 'RELEASE_PICK_BATCH');
585: END IF;
586:
587: IF p_auto_detail_flag = FND_API.G_TRUE THEN
588: pick_release(
589: x_return_status => l_api_return_status
590: , x_msg_count => x_msg_count
591: , x_msg_data => x_msg_data

Line 593: , p_init_msg_lst => fnd_api.g_false

589: x_return_status => l_api_return_status
590: , x_msg_count => x_msg_count
591: , x_msg_data => x_msg_data
592: , p_commit => l_commit
593: , p_init_msg_lst => fnd_api.g_false
594: , p_mo_line_tbl => l_line_tbl
595: , p_allow_partial_pick => p_allow_partial_pick
596: , p_grouping_rule_id => NULL
597: , p_plan_tasks => p_plan_tasks

Line 601: IF l_api_return_status <> FND_API.G_RET_STS_SUCCESS AND

597: , p_plan_tasks => p_plan_tasks
598: , p_call_wip_api => TRUE
599: );
600:
601: IF l_api_return_status <> FND_API.G_RET_STS_SUCCESS AND
602: l_api_return_status <> 'P' THEN
603: print_debug ('Error occurred in Pick_Release', 'RELEASE_PICK_BATCH');
604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
605: ELSIF l_api_return_status = 'P' THEN

Line 604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

600:
601: IF l_api_return_status <> FND_API.G_RET_STS_SUCCESS AND
602: l_api_return_status <> 'P' THEN
603: print_debug ('Error occurred in Pick_Release', 'RELEASE_PICK_BATCH');
604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
605: ELSIF l_api_return_status = 'P' THEN
606: print_debug ('One or more lines failed to allocate fully', 'RELEASE_PICK_BATCH');
607: x_return_status := 'P';
608: ELSE

Line 624: IF p_print_pick_slip = FND_API.G_TRUE AND l_mo_allocation_status <> g_not_allocated THEN

620: l_savept_exists := TRUE;
621: END IF;
622:
623: -- Printing the Pick Slip
624: IF p_print_pick_slip = FND_API.G_TRUE AND l_mo_allocation_status <> g_not_allocated THEN
625: x_conc_req_id := inv_pr_pick_slip_number.print_pick_slip(
626: x_return_status => l_api_return_status
627: , x_msg_data => x_msg_data
628: , x_msg_count => x_msg_count

Line 634: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN

630: , p_mo_request_number => p_mo_header_rec.request_number
631: , p_plan_tasks => p_plan_tasks
632: );
633:
634: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
635: IF (l_debug = 1) THEN
636: print_debug('Unable to submit Pick Slip Report Request','RELEASE_PICK_BATCH');
637: END IF;
638: RAISE fnd_api.g_exc_unexpected_error;

Line 638: RAISE fnd_api.g_exc_unexpected_error;

634: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
635: IF (l_debug = 1) THEN
636: print_debug('Unable to submit Pick Slip Report Request','RELEASE_PICK_BATCH');
637: END IF;
638: RAISE fnd_api.g_exc_unexpected_error;
639: END IF;
640: IF (l_debug = 1) THEN
641: print_debug('Pick Slip Report Request ID = ' || x_conc_req_id,'RELEASE_PICK_BATCH');
642: END IF;

Line 677: IF p_commit = fnd_api.g_true THEN

673: END IF;
674: END IF;
675:
676: -- Standard call to commit
677: IF p_commit = fnd_api.g_true THEN
678: COMMIT;
679: l_savept_exists := FALSE;
680: END IF;
681:

Line 689: x_return_status := fnd_api.g_ret_sts_error;

685: x_mo_line_errrec_tbl := l_wip_error_table;
686:
687: EXCEPTION
688: WHEN OTHERS THEN
689: x_return_status := fnd_api.g_ret_sts_error;
690: /*Bug8585819,when pick_release raise exception,it is neccessary
691: to return the table of errored records back to the calling program.*/
692: x_mo_line_errrec_tbl := l_wip_error_table;
693: IF l_debug = 1 THEN

Line 696: fnd_msg_pub.count_and_get( p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);

692: x_mo_line_errrec_tbl := l_wip_error_table;
693: IF l_debug = 1 THEN
694: print_debug ('Release_pick_batch Error: ' || SQLERRM, 'RELEASE_PICK_BATCH');
695: END IF;
696: fnd_msg_pub.count_and_get( p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
697: IF (l_savept_exists) THEN
698: ROLLBACK TO inv_wip_pick_release;
699: END IF;
700: IF g_conc_mode THEN

Line 773: x_return_status := fnd_api.g_ret_sts_success;

769: print_debug('Inside Pick_Release', 'PICK_RELEASE');
770: END IF;
771: SAVEPOINT pick_release;
772: -- Initialize API return status to success
773: x_return_status := fnd_api.g_ret_sts_success;
774:
775: -- Initialize message list.
776: IF fnd_api.to_boolean(p_init_msg_lst) THEN
777: fnd_msg_pub.initialize;

Line 776: IF fnd_api.to_boolean(p_init_msg_lst) THEN

772: -- Initialize API return status to success
773: x_return_status := fnd_api.g_ret_sts_success;
774:
775: -- Initialize message list.
776: IF fnd_api.to_boolean(p_init_msg_lst) THEN
777: fnd_msg_pub.initialize;
778: END IF;
779:
780: --Added bug 4634522

Line 794: RAISE fnd_api.g_exc_unexpected_error;

790: print_debug('No Lines to pick', 'PICK_RELEASE');
791: END IF;
792: fnd_message.set_name('INV', 'INV_NO_LINES_TO_PICK');
793: fnd_msg_pub.ADD;
794: RAISE fnd_api.g_exc_unexpected_error;
795: END IF;
796:
797: -- Bug 2038564: Clearing Qty Tree
798: inv_quantity_tree_pvt.clear_quantity_cache;

Line 829: RAISE fnd_api.g_exc_unexpected_error;

825: END IF;
826: fnd_message.set_name('INV', 'INV_NO_HEADER_FOUND');
827: fnd_message.set_token('MO_LINE_ID', TO_CHAR(p_mo_line_tbl(l_line_index).line_id));
828: fnd_msg_pub.ADD;
829: RAISE fnd_api.g_exc_unexpected_error;
830: END;
831:
832: IF l_mo_type <> inv_globals.g_move_order_mfg_pick THEN
833: IF (l_debug = 1) THEN

Line 839: RAISE fnd_api.g_exc_unexpected_error;

835: END IF;
836: fnd_message.set_name('INV', 'INV_NOT_WIP_MOVE_ORDER');
837: fnd_message.set_token('MO_NUMBER', l_mo_number);
838: fnd_msg_pub.ADD;
839: RAISE fnd_api.g_exc_unexpected_error;
840: END IF;
841:
842: LOOP
843: l_mo_line := p_mo_line_tbl(l_line_index);

Line 845: IF (l_mo_line.return_status NOT IN (fnd_api.g_ret_sts_unexp_error, fnd_api.g_ret_sts_error) ) THEN

841:
842: LOOP
843: l_mo_line := p_mo_line_tbl(l_line_index);
844:
845: IF (l_mo_line.return_status NOT IN (fnd_api.g_ret_sts_unexp_error, fnd_api.g_ret_sts_error) ) THEN
846: -- Verify that the lines are all for the same organization
847: IF l_mo_line.organization_id <> l_organization_id THEN
848: IF (l_debug = 1) THEN
849: print_debug('Error: Trying to pick for different org', 'PICK_RELEASE');

Line 853: RAISE fnd_api.g_exc_unexpected_error;

849: print_debug('Error: Trying to pick for different org', 'PICK_RELEASE');
850: END IF;
851: fnd_message.set_name('INV', 'INV_PICK_DIFFERENT_ORG');
852: fnd_msg_pub.ADD;
853: RAISE fnd_api.g_exc_unexpected_error;
854: END IF;
855:
856: -- Verify that the line status is approved or pre-approved
857: IF (l_mo_line.line_status NOT IN (3,7)) THEN

Line 863: RAISE fnd_api.g_exc_unexpected_error;

859: print_debug('Error: Invalid Move Order Line Status', 'PICK_RELEASE');
860: END IF;
861: fnd_message.set_name('INV', 'INV_PICK_LINE_STATUS');
862: fnd_msg_pub.ADD;
863: RAISE fnd_api.g_exc_unexpected_error;
864: END IF;
865:
866: -- Carton Grouping ID has to be stamped.
867: -- Bug 2844622: Skip this check if WIP patch level is below 11.5.9

Line 869: IF (l_is_wms_org AND NVL(l_mo_line.carton_grouping_id, fnd_api.g_miss_num) = fnd_api.g_miss_num) THEN

865:
866: -- Carton Grouping ID has to be stamped.
867: -- Bug 2844622: Skip this check if WIP patch level is below 11.5.9
868: IF g_wip_patch_level >= 1159 THEN
869: IF (l_is_wms_org AND NVL(l_mo_line.carton_grouping_id, fnd_api.g_miss_num) = fnd_api.g_miss_num) THEN
870: IF (l_debug = 1) THEN
871: print_debug('Error: No Carton Grouping ID specified', 'PICK_RELEASE');
872: END IF;
873: fnd_message.set_name('WMS', 'WMS_NO_CARTON_GROUP_ID');

Line 875: RAISE fnd_api.g_exc_unexpected_error;

871: print_debug('Error: No Carton Grouping ID specified', 'PICK_RELEASE');
872: END IF;
873: fnd_message.set_name('WMS', 'WMS_NO_CARTON_GROUP_ID');
874: fnd_msg_pub.ADD;
875: RAISE fnd_api.g_exc_unexpected_error;
876: END IF;
877: ELSE
878: IF (l_debug = 1) THEN
879: print_debug('WIP Patch Level = ' || g_wip_patch_level ||' so skipping Carton Group ID check', 'PICK_RELEASE');

Line 911: RAISE fnd_api.g_exc_unexpected_error;

907: WHEN NO_DATA_FOUND THEN
908: IF (l_debug = 1) THEN
909: print_debug('No Item Info found', 'PICK_RELEASE');
910: END IF;
911: RAISE fnd_api.g_exc_unexpected_error;
912: END;
913:
914: inv_quantity_tree_pvt.create_tree
915: ( p_api_version_number => 1.0

Line 916: , p_init_msg_lst => fnd_api.g_false

912: END;
913:
914: inv_quantity_tree_pvt.create_tree
915: ( p_api_version_number => 1.0
916: , p_init_msg_lst => fnd_api.g_false
917: , x_return_status => l_api_return_status
918: , x_msg_count => x_msg_count
919: , x_msg_data => x_msg_data
920: , p_organization_id => l_organization_id

Line 939: IF l_api_return_status = fnd_api.g_ret_sts_error THEN

935: , p_exclusive => inv_quantity_tree_pvt.g_exclusive
936: , p_pick_release => inv_quantity_tree_pvt.g_pick_release_yes
937: );
938:
939: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
940: RAISE fnd_api.g_exc_error;
941: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
942: RAISE fnd_api.g_exc_unexpected_error;
943: END IF;

Line 940: RAISE fnd_api.g_exc_error;

936: , p_pick_release => inv_quantity_tree_pvt.g_pick_release_yes
937: );
938:
939: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
940: RAISE fnd_api.g_exc_error;
941: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
942: RAISE fnd_api.g_exc_unexpected_error;
943: END IF;
944:

Line 941: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN

937: );
938:
939: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
940: RAISE fnd_api.g_exc_error;
941: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
942: RAISE fnd_api.g_exc_unexpected_error;
943: END IF;
944:
945: l_quantity_tree_tbl(l_mo_line.inventory_item_id) := l_tree_id;

Line 942: RAISE fnd_api.g_exc_unexpected_error;

938:
939: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
940: RAISE fnd_api.g_exc_error;
941: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
942: RAISE fnd_api.g_exc_unexpected_error;
943: END IF;
944:
945: l_quantity_tree_tbl(l_mo_line.inventory_item_id) := l_tree_id;
946: END IF; -- not exist in quantity tree tbl

Line 966: IF (l_mo_line.return_status <> fnd_api.g_ret_sts_unexp_error

962: print_debug('Item : ' || TO_CHAR(l_mo_line.inventory_item_id), 'PICK_RELEASE');
963: print_debug('Quantity : ' || TO_CHAR(l_mo_line.quantity), 'PICK_RELEASE');
964: END IF;
965:
966: IF (l_mo_line.return_status <> fnd_api.g_ret_sts_unexp_error
967: AND l_mo_line.return_status <> fnd_api.g_ret_sts_error)
968: THEN
969: IF l_mo_line.ship_set_id IS NOT NULL
970: AND (l_cur_ship_set_id IS NULL OR l_cur_ship_set_id <> l_mo_line.ship_set_id)

Line 967: AND l_mo_line.return_status <> fnd_api.g_ret_sts_error)

963: print_debug('Quantity : ' || TO_CHAR(l_mo_line.quantity), 'PICK_RELEASE');
964: END IF;
965:
966: IF (l_mo_line.return_status <> fnd_api.g_ret_sts_unexp_error
967: AND l_mo_line.return_status <> fnd_api.g_ret_sts_error)
968: THEN
969: IF l_mo_line.ship_set_id IS NOT NULL
970: AND (l_cur_ship_set_id IS NULL OR l_cur_ship_set_id <> l_mo_line.ship_set_id)
971: THEN

Line 996: IF l_api_return_status = fnd_api.g_ret_sts_error THEN

992: END IF;
993: l_tree_id := l_quantity_tree_tbl(l_mo_line.inventory_item_id);
994: inv_quantity_tree_pvt.backup_tree(x_return_status => l_api_return_status, p_tree_id => l_tree_id);
995:
996: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
997: RAISE fnd_api.g_exc_error;
998: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
999: RAISE fnd_api.g_exc_unexpected_error;
1000: END IF;

Line 997: RAISE fnd_api.g_exc_error;

993: l_tree_id := l_quantity_tree_tbl(l_mo_line.inventory_item_id);
994: inv_quantity_tree_pvt.backup_tree(x_return_status => l_api_return_status, p_tree_id => l_tree_id);
995:
996: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
997: RAISE fnd_api.g_exc_error;
998: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
999: RAISE fnd_api.g_exc_unexpected_error;
1000: END IF;
1001:

Line 998: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN

994: inv_quantity_tree_pvt.backup_tree(x_return_status => l_api_return_status, p_tree_id => l_tree_id);
995:
996: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
997: RAISE fnd_api.g_exc_error;
998: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
999: RAISE fnd_api.g_exc_unexpected_error;
1000: END IF;
1001:
1002: l_qtree_backup_tbl(l_mo_line.inventory_item_id) := l_tree_id;

Line 999: RAISE fnd_api.g_exc_unexpected_error;

995:
996: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
997: RAISE fnd_api.g_exc_error;
998: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
999: RAISE fnd_api.g_exc_unexpected_error;
1000: END IF;
1001:
1002: l_qtree_backup_tbl(l_mo_line.inventory_item_id) := l_tree_id;
1003: END IF; -- Pick set NOT NULL

Line 1022: IF l_api_return_status <> fnd_api.g_ret_sts_success AND p_allow_partial_pick = fnd_api.g_false THEN

1018: print_debug('Process Line Return Status = '|| l_api_return_status ||
1019: ' : Detail Rec Count = ' || to_char(l_detail_rec_count), 'PICK_RELEASE');
1020: END IF;
1021:
1022: IF l_api_return_status <> fnd_api.g_ret_sts_success AND p_allow_partial_pick = fnd_api.g_false THEN
1023: fnd_message.set_name('INV', 'INV_COULD_NOT_PICK_FULL');
1024: fnd_msg_pub.ADD;
1025: RAISE fnd_api.g_exc_unexpected_error;
1026: END IF;

Line 1025: RAISE fnd_api.g_exc_unexpected_error;

1021:
1022: IF l_api_return_status <> fnd_api.g_ret_sts_success AND p_allow_partial_pick = fnd_api.g_false THEN
1023: fnd_message.set_name('INV', 'INV_COULD_NOT_PICK_FULL');
1024: fnd_msg_pub.ADD;
1025: RAISE fnd_api.g_exc_unexpected_error;
1026: END IF;
1027:
1028: g_mo_line_stat_tbl(l_mo_line.line_id) := l_api_return_status;
1029:

Line 1083: IF (l_api_return_status = fnd_api.g_ret_sts_error) THEN

1079: ( x_return_status => l_api_return_status
1080: , p_tree_id => l_tree_id
1081: );
1082:
1083: IF (l_api_return_status = fnd_api.g_ret_sts_error) THEN
1084: IF (l_debug = 1) THEN
1085: print_debug('Error in Restore_Tree', 'Pick_Release');
1086: END IF;
1087: RAISE fnd_api.g_exc_error;

Line 1087: RAISE fnd_api.g_exc_error;

1083: IF (l_api_return_status = fnd_api.g_ret_sts_error) THEN
1084: IF (l_debug = 1) THEN
1085: print_debug('Error in Restore_Tree', 'Pick_Release');
1086: END IF;
1087: RAISE fnd_api.g_exc_error;
1088: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
1089: IF (l_debug = 1) THEN
1090: print_debug('Unexpected error in Restore_tree', 'PICK_RELEASE');
1091: END IF;

Line 1088: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN

1084: IF (l_debug = 1) THEN
1085: print_debug('Error in Restore_Tree', 'Pick_Release');
1086: END IF;
1087: RAISE fnd_api.g_exc_error;
1088: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
1089: IF (l_debug = 1) THEN
1090: print_debug('Unexpected error in Restore_tree', 'PICK_RELEASE');
1091: END IF;
1092: RAISE fnd_api.g_exc_unexpected_error;

Line 1092: RAISE fnd_api.g_exc_unexpected_error;

1088: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
1089: IF (l_debug = 1) THEN
1090: print_debug('Unexpected error in Restore_tree', 'PICK_RELEASE');
1091: END IF;
1092: RAISE fnd_api.g_exc_unexpected_error;
1093: END IF;
1094:
1095: -- delete entry, so we don't restore tree more than once
1096: l_qtree_backup_tbl.DELETE(l_mo_line.inventory_item_id);

Line 1198: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN

1194: , x_return_status => l_api_return_status
1195: , x_msg_data => x_msg_data
1196: );
1197:
1198: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1199: IF (l_debug = 1) THEN
1200: print_debug('Error in wip_picking_pub.allocate_material', 'PICK_RELEASE');
1201: print_debug('WIP entity ID: ' || TO_CHAR(l_mo_line.txn_source_id), 'PICK_RELEASE');
1202: print_debug('Op seq num : ' || TO_CHAR(l_mo_line.txn_source_line_id), 'PICK_RELEASE');

Line 1206: RAISE fnd_api.g_exc_error;

1202: print_debug('Op seq num : ' || TO_CHAR(l_mo_line.txn_source_line_id), 'PICK_RELEASE');
1203: print_debug('Rep sch ID : ' || TO_CHAR(l_mo_line.reference_id), 'PICK_RELEASE');
1204: print_debug('Item ID : ' || TO_CHAR(l_mo_line.inventory_item_id), 'PICK_RELEASE');
1205: END IF;
1206: RAISE fnd_api.g_exc_error;
1207: END IF;
1208: END IF;
1209: END IF; -- mo line return status <> ERROR
1210:

Line 1234: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1230: IF (l_debug = 1) THEN
1231: print_debug('Error in Deleting Move Order Lines: ' || sqlerrm
1232: ,'PICK_RELEASE');
1233: END IF;
1234: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1235: END;
1236:
1237: --Added for bug 13702075
1238: l_api_return_status := '';

Line 1269: , p_init_msg_list => fnd_api.g_false

1265: END IF;
1266:
1267: wms_cartnzn_wrap.cartonize
1268: ( p_api_version => l_api_version_number
1269: , p_init_msg_list => fnd_api.g_false
1270: , p_commit => fnd_api.g_false
1271: , p_validation_level => fnd_api.g_valid_level_full
1272: , x_return_status => l_api_return_status
1273: , x_msg_count => x_msg_count

Line 1270: , p_commit => fnd_api.g_false

1266:
1267: wms_cartnzn_wrap.cartonize
1268: ( p_api_version => l_api_version_number
1269: , p_init_msg_list => fnd_api.g_false
1270: , p_commit => fnd_api.g_false
1271: , p_validation_level => fnd_api.g_valid_level_full
1272: , x_return_status => l_api_return_status
1273: , x_msg_count => x_msg_count
1274: , x_msg_data => x_msg_data

Line 1271: , p_validation_level => fnd_api.g_valid_level_full

1267: wms_cartnzn_wrap.cartonize
1268: ( p_api_version => l_api_version_number
1269: , p_init_msg_list => fnd_api.g_false
1270: , p_commit => fnd_api.g_false
1271: , p_validation_level => fnd_api.g_valid_level_full
1272: , x_return_status => l_api_return_status
1273: , x_msg_count => x_msg_count
1274: , x_msg_data => x_msg_data
1275: , p_out_bound => 'Y'

Line 1282: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN

1278: , p_disable_cartonization => l_disable_cartonization
1279: , p_packaging_mode => wms_cartnzn_wrap.mfg_pr_pkg_mode
1280: );
1281:
1282: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1283: IF (l_debug = 1) THEN
1284: print_debug('Cartonization returned with an error status: '||l_api_return_status, 'Pick_Release');
1285: END IF;
1286: RAISE fnd_api.g_exc_unexpected_error;

Line 1286: RAISE fnd_api.g_exc_unexpected_error;

1282: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1283: IF (l_debug = 1) THEN
1284: print_debug('Cartonization returned with an error status: '||l_api_return_status, 'Pick_Release');
1285: END IF;
1286: RAISE fnd_api.g_exc_unexpected_error;
1287: END IF;
1288: END IF;
1289:
1290: -- Standard call to commit

Line 1291: IF p_commit = fnd_api.g_true THEN

1287: END IF;
1288: END IF;
1289:
1290: -- Standard call to commit
1291: IF p_commit = fnd_api.g_true THEN
1292: COMMIT;
1293: END IF;
1294:
1295: IF (l_debug = 1) THEN

Line 1300: WHEN fnd_api.g_exc_error THEN

1296: print_debug('x_return_status = '|| x_return_status, 'PICK_RELEASE');
1297: END IF;
1298:
1299: EXCEPTION
1300: WHEN fnd_api.g_exc_error THEN
1301: ROLLBACK TO pick_release;
1302: inv_quantity_tree_pvt.clear_quantity_cache;
1303: x_return_status := fnd_api.g_ret_sts_error;
1304: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);

Line 1303: x_return_status := fnd_api.g_ret_sts_error;

1299: EXCEPTION
1300: WHEN fnd_api.g_exc_error THEN
1301: ROLLBACK TO pick_release;
1302: inv_quantity_tree_pvt.clear_quantity_cache;
1303: x_return_status := fnd_api.g_ret_sts_error;
1304: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1305: WHEN OTHERS THEN
1306: ROLLBACK TO pick_release;
1307: inv_quantity_tree_pvt.clear_quantity_cache;

Line 1304: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);

1300: WHEN fnd_api.g_exc_error THEN
1301: ROLLBACK TO pick_release;
1302: inv_quantity_tree_pvt.clear_quantity_cache;
1303: x_return_status := fnd_api.g_ret_sts_error;
1304: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1305: WHEN OTHERS THEN
1306: ROLLBACK TO pick_release;
1307: inv_quantity_tree_pvt.clear_quantity_cache;
1308: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 1308: x_return_status := fnd_api.g_ret_sts_unexp_error;

1304: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1305: WHEN OTHERS THEN
1306: ROLLBACK TO pick_release;
1307: inv_quantity_tree_pvt.clear_quantity_cache;
1308: x_return_status := fnd_api.g_ret_sts_unexp_error;
1309: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1310: END pick_release;
1311:
1312:

Line 1309: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);

1305: WHEN OTHERS THEN
1306: ROLLBACK TO pick_release;
1307: inv_quantity_tree_pvt.clear_quantity_cache;
1308: x_return_status := fnd_api.g_ret_sts_unexp_error;
1309: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1310: END pick_release;
1311:
1312:
1313:

Line 1337: -- FND_API.G_RET_STS_SUCCESS;

1333: --
1334: -- Output Parameters
1335: -- x_return_status
1336: -- if the process succeeds, the value is
1337: -- FND_API.G_RET_STS_SUCCESS;
1338: -- if there is an expected error, the value is
1339: -- fnd_api.g_ret_sts_error;
1340: -- if there is an unexpected error, the value is
1341: -- fnd_api.g_ret_sts_unexp_error;

Line 1339: -- fnd_api.g_ret_sts_error;

1335: -- x_return_status
1336: -- if the process succeeds, the value is
1337: -- FND_API.G_RET_STS_SUCCESS;
1338: -- if there is an expected error, the value is
1339: -- fnd_api.g_ret_sts_error;
1340: -- if there is an unexpected error, the value is
1341: -- fnd_api.g_ret_sts_unexp_error;
1342: -- x_msg_count
1343: -- if there is one or more errors, the number of error messages

Line 1341: -- fnd_api.g_ret_sts_unexp_error;

1337: -- FND_API.G_RET_STS_SUCCESS;
1338: -- if there is an expected error, the value is
1339: -- fnd_api.g_ret_sts_error;
1340: -- if there is an unexpected error, the value is
1341: -- fnd_api.g_ret_sts_unexp_error;
1342: -- x_msg_count
1343: -- if there is one or more errors, the number of error messages
1344: -- in the buffer
1345: -- x_msg_data

Line 1348: -- (See FND_API package for more details about the above output parameters)

1344: -- in the buffer
1345: -- x_msg_data
1346: -- if there is one and only one error, the error message
1347: --
1348: -- (See FND_API package for more details about the above output parameters)
1349: --
1350:
1351: PROCEDURE process_line
1352: ( p_mo_line_rec IN OUT NOCOPY inv_move_order_pub.trolin_rec_type

Line 1353: , p_allow_partial_pick IN VARCHAR2 DEFAULT fnd_api.g_true

1349: --
1350:
1351: PROCEDURE process_line
1352: ( p_mo_line_rec IN OUT NOCOPY inv_move_order_pub.trolin_rec_type
1353: , p_allow_partial_pick IN VARCHAR2 DEFAULT fnd_api.g_true
1354: , p_grouping_rule_id IN NUMBER
1355: , p_plan_tasks IN BOOLEAN
1356: , p_call_wip_api IN BOOLEAN --Added bug 4634522
1357: , x_return_status OUT NOCOPY VARCHAR2

Line 1393: x_return_status := fnd_api.g_ret_sts_success;

1389: SAVEPOINT process_line_pvt;
1390: x_detail_rec_count := 0;
1391: l_num_detail_recs := 0;
1392: -- Initialize API return status to success
1393: x_return_status := fnd_api.g_ret_sts_success;
1394:
1395: -- Bug 4880578: return if MO line has 0 qty
1396: IF NVL(p_mo_line_rec.quantity,0) = 0 THEN
1397: IF (l_debug = 1) THEN

Line 1442: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN

1438: , p_allocate_quantity => l_allocate_quantity
1439: , x_return_status => l_api_return_status
1440: , x_msg_data => x_msg_data
1441: );
1442: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1443: IF (l_debug = 1) THEN
1444: print_debug('Error in pre_allocate_material','PROCESS_LINE');
1445: END IF;
1446: RAISE fnd_api.g_exc_unexpected_error;

Line 1446: RAISE fnd_api.g_exc_unexpected_error;

1442: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1443: IF (l_debug = 1) THEN
1444: print_debug('Error in pre_allocate_material','PROCESS_LINE');
1445: END IF;
1446: RAISE fnd_api.g_exc_unexpected_error;
1447: END IF;
1448: ELSE
1449: IF (l_debug = 1) THEN
1450: print_debug('WIP Patch Level = ' || g_wip_patch_level || ', so skipping pre_allocate_material', 'PROCESS_LINE');

Line 1459: , p_init_msg_list => fnd_api.g_false

1455: print_debug('Calling Create Suggestions for MOLine: '|| p_mo_line_rec.line_id, 'PROCESS_LINE');
1456: END IF;
1457: inv_ppengine_pvt.create_suggestions
1458: ( p_api_version => 1.0
1459: , p_init_msg_list => fnd_api.g_false
1460: , p_commit => fnd_api.g_false
1461: , x_return_status => l_api_return_status
1462: , x_msg_count => x_msg_count
1463: , x_msg_data => x_msg_data

Line 1460: , p_commit => fnd_api.g_false

1456: END IF;
1457: inv_ppengine_pvt.create_suggestions
1458: ( p_api_version => 1.0
1459: , p_init_msg_list => fnd_api.g_false
1460: , p_commit => fnd_api.g_false
1461: , x_return_status => l_api_return_status
1462: , x_msg_count => x_msg_count
1463: , x_msg_data => x_msg_data
1464: , p_transaction_temp_id => p_mo_line_rec.line_id

Line 1470: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN

1466: , p_suggest_serial => 'T'
1467: , p_plan_tasks => p_plan_tasks
1468: );
1469:
1470: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1471: IF (l_debug = 1) THEN
1472: print_debug('Ret stat: '|| l_api_return_status || ', INV detailing failed', 'PROCESS_LINE');
1473: END IF;
1474: fnd_msg_pub.count_and_get(p_count => l_count, p_data => l_message, p_encoded => 'F');

Line 1502: RAISE fnd_api.g_exc_unexpected_error;

1498: FROM mtl_txn_request_lines_v
1499: WHERE line_id = p_mo_line_rec.line_id;
1500: EXCEPTION
1501: WHEN NO_DATA_FOUND THEN
1502: RAISE fnd_api.g_exc_unexpected_error;
1503: END;
1504:
1505: fnd_message.set_name('INV', 'INV_DETAILING_FAILED');
1506: fnd_message.set_token('LINE_NUM', TO_CHAR(p_mo_line_rec.line_number));

Line 1509: RAISE fnd_api.g_exc_unexpected_error;

1505: fnd_message.set_name('INV', 'INV_DETAILING_FAILED');
1506: fnd_message.set_token('LINE_NUM', TO_CHAR(p_mo_line_rec.line_number));
1507: fnd_message.set_token('MO_NUMBER', l_request_number);
1508: fnd_msg_pub.ADD;
1509: RAISE fnd_api.g_exc_unexpected_error;
1510: END IF;
1511:
1512: IF (l_debug = 1) THEN
1513: print_debug('After calling Create Suggestions: Ret Status = '|| l_api_return_status, 'PROCESS_LINE');

Line 1527: IF l_quantity_detailed < p_mo_line_rec.primary_quantity AND p_allow_partial_pick = fnd_api.g_false THEN

1523: print_debug('Qty detailed = '|| l_quantity_detailed || ' : Num of Details = ' || l_num_detail_recs, 'PROCESS_LINE');
1524: END IF;
1525:
1526: -- If the move order line is not fully detailed, update the return status as appropriate.
1527: IF l_quantity_detailed < p_mo_line_rec.primary_quantity AND p_allow_partial_pick = fnd_api.g_false THEN
1528: fnd_message.set_name('INV', 'INV_COULD_NOT_PICK_FULL');
1529: fnd_msg_pub.ADD;
1530: RAISE fnd_api.g_exc_unexpected_error;
1531: END IF;

Line 1530: RAISE fnd_api.g_exc_unexpected_error;

1526: -- If the move order line is not fully detailed, update the return status as appropriate.
1527: IF l_quantity_detailed < p_mo_line_rec.primary_quantity AND p_allow_partial_pick = fnd_api.g_false THEN
1528: fnd_message.set_name('INV', 'INV_COULD_NOT_PICK_FULL');
1529: fnd_msg_pub.ADD;
1530: RAISE fnd_api.g_exc_unexpected_error;
1531: END IF;
1532:
1533: IF (l_num_detail_recs = 0) THEN
1534: p_mo_line_rec.quantity_detailed := NVL(l_quantity_detailed, 0) + NVL(p_mo_line_rec.quantity_delivered, 0);

Line 1572: RAISE fnd_api.g_exc_unexpected_error;

1568: fnd_message.set_name('INV', 'INV-CANNOT CONVERT');
1569: fnd_message.set_token('UOM', p_mo_line_rec.uom_code);
1570: fnd_message.set_token('ROUTINE', 'Pick Release process');
1571: fnd_msg_pub.ADD;
1572: RAISE fnd_api.g_exc_unexpected_error;
1573: END IF;
1574: ELSE
1575: l_quantity_detailed_conv := l_quantity_detailed;
1576: END IF;

Line 1611: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1607: print_debug('Updating Move Order Line', 'PROCESS_LINE');
1608: END IF;
1609: inv_trolin_util.update_row(p_mo_line_rec);
1610: update_mmtt_for_wip(x_return_status, p_mo_line_rec, p_grouping_rule_id);
1611: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1612: print_debug('Error occurred while updating MMTT with WIP Attributes','PROCESS_LINE');
1613: RAISE fnd_api.g_exc_unexpected_error;
1614: END IF;
1615: END IF; -- if l_num_detail_rec > 0

Line 1613: RAISE fnd_api.g_exc_unexpected_error;

1609: inv_trolin_util.update_row(p_mo_line_rec);
1610: update_mmtt_for_wip(x_return_status, p_mo_line_rec, p_grouping_rule_id);
1611: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1612: print_debug('Error occurred while updating MMTT with WIP Attributes','PROCESS_LINE');
1613: RAISE fnd_api.g_exc_unexpected_error;
1614: END IF;
1615: END IF; -- if l_num_detail_rec > 0
1616:
1617: -- If the line was only partially detailed and the API was about to return success,

Line 1631: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);

1627: IF l_debug = 1 THEN
1628: print_debug('Error in process line: ' || sqlcode || ', ' || sqlerrm,'PROCESS_LINE');
1629: END IF;
1630: x_return_status := g_not_allocated;
1631: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1632: END process_line;
1633:
1634: PROCEDURE update_mol_for_wip
1635: ( x_return_status OUT NOCOPY VARCHAR2

Line 1643: x_return_status := fnd_api.g_ret_sts_success;

1639: , p_op_seq_num IN NUMBER
1640: ) IS
1641: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1642: BEGIN
1643: x_return_status := fnd_api.g_ret_sts_success;
1644: IF (l_debug = 1) THEN
1645: print_debug('p_move_order_line_id => '|| p_move_order_line_id, 'update_mol_for_wip');
1646: print_debug('p_op_seq_num => '|| p_op_seq_num, 'update_mol_for_wip');
1647: END IF;

Line 1661: x_return_status := fnd_api.g_ret_sts_error;

1657: IF SQL%NOTFOUND THEN
1658: IF (l_debug = 1) THEN
1659: print_debug('No move order lines being updated', 'update_mol_for_wip');
1660: END IF;
1661: x_return_status := fnd_api.g_ret_sts_error;
1662: RETURN;
1663: END IF;
1664:
1665: UPDATE mtl_material_transactions_temp mmtt

Line 1675: x_return_status := fnd_api.g_ret_sts_unexp_error;

1671: AND mol.header_id = moh.header_id
1672: AND move_order_type = 5);
1673: EXCEPTION
1674: WHEN OTHERS THEN
1675: x_return_status := fnd_api.g_ret_sts_unexp_error;
1676: END update_mol_for_wip;
1677:
1678: PROCEDURE update_mmtt_for_wip(
1679: x_return_status OUT NOCOPY VARCHAR2

Line 1715: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1711: , p_transaction_type_id => p_mo_line_rec.transaction_type_id
1712: , p_get_pick_slip_number => FALSE
1713: );
1714:
1715: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1716: print_debug('Error Occurred while getting WIP Attributes','UPDATE_MMTT_FOR_WIP');
1717: RAISE fnd_api.g_exc_unexpected_error;
1718: END IF;
1719:

Line 1717: RAISE fnd_api.g_exc_unexpected_error;

1713: );
1714:
1715: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1716: print_debug('Error Occurred while getting WIP Attributes','UPDATE_MMTT_FOR_WIP');
1717: RAISE fnd_api.g_exc_unexpected_error;
1718: END IF;
1719:
1720: FOR c_mmtt_rec IN c_mmtt LOOP
1721: l_index := l_index + 1;

Line 1747: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1743: , x_api_status => x_return_status
1744: , x_error_message => l_msg_data
1745: );
1746:
1747: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1748: IF (l_debug = 1) THEN
1749: print_debug('Error occurred in getting the Pick Slip Number: '|| l_msg_data, 'UPDATE_WITH_PICK_SLIP');
1750: END IF;
1751: fnd_message.set_name('INV','INV_NO_PICK_SLIP_NUMBER');

Line 1753: RAISE fnd_api.g_exc_unexpected_error;

1749: print_debug('Error occurred in getting the Pick Slip Number: '|| l_msg_data, 'UPDATE_WITH_PICK_SLIP');
1750: END IF;
1751: fnd_message.set_name('INV','INV_NO_PICK_SLIP_NUMBER');
1752: fnd_msg_pub.add;
1753: RAISE fnd_api.g_exc_unexpected_error;
1754: END IF;
1755: ELSE
1756: BEGIN
1757: SELECT WSH_PICK_SLIP_NUMBERS_S.NEXTVAL INTO l_pick_slip_number FROM DUAL;

Line 1762: RAISE fnd_api.g_exc_unexpected_error;

1758: EXCEPTION
1759: WHEN OTHERS THEN
1760: fnd_message.set_name('INV','INV_NO_PICK_SLIP_NUMBER');
1761: fnd_msg_pub.add;
1762: RAISE fnd_api.g_exc_unexpected_error;
1763: END;
1764: END IF;
1765: ELSE
1766: l_pick_slip_number := c_mmtt_rec.pick_slip_number;

Line 1810: x_return_status := fnd_api.g_ret_sts_unexp_error;

1806: WHEN OTHERS THEN
1807: IF (l_debug = 1) THEN
1808: print_debug('Exception Occurred: Code = ' || SQLCODE || ' : Error '|| SQLERRM, 'UPDATE_MMTT_FOR_WIP');
1809: END IF;
1810: x_return_status := fnd_api.g_ret_sts_unexp_error;
1811: END update_mmtt_for_wip;
1812:
1813: PROCEDURE get_wip_attributes(
1814: x_return_status OUT NOCOPY VARCHAR2

Line 1898: x_return_status := fnd_api.g_ret_sts_success;

1894:
1895: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1896:
1897: BEGIN
1898: x_return_status := fnd_api.g_ret_sts_success;
1899:
1900: -- Entity type
1901: OPEN c_wip_entity_type;
1902: FETCH c_wip_entity_type INTO x_wip_entity_type;

Line 1908: RAISE fnd_api.g_exc_unexpected_error;

1904: IF (l_debug = 1) THEN
1905: print_debug('Couldnt determine Entity Type for EntityID = '|| p_wip_entity_id, 'UPDATE_MMTT_FOR_WIP');
1906: END IF;
1907: CLOSE c_wip_entity_type;
1908: RAISE fnd_api.g_exc_unexpected_error;
1909: END IF;
1910: CLOSE c_wip_entity_type;
1911:
1912: -- Departments

Line 1934: RAISE fnd_api.g_exc_unexpected_error;

1930: IF p_rep_schedule_id IS NULL THEN
1931: IF (l_debug = 1) THEN
1932: print_debug('Repetitive Schedule ID cannot be null for Entity Type 2', 'UPDATE_MMTT_FOR_WIP');
1933: END IF;
1934: RAISE fnd_api.g_exc_unexpected_error;
1935: ELSE
1936: OPEN c_repetitive_line_id;
1937: FETCH c_repetitive_line_id INTO x_repetitive_line_id;
1938: IF c_repetitive_line_id%NOTFOUND THEN

Line 1942: RAISE fnd_api.g_exc_unexpected_error;

1938: IF c_repetitive_line_id%NOTFOUND THEN
1939: IF (l_debug = 1) THEN
1940: print_debug('Unable to determine RepLineID for RepSchID '||p_rep_schedule_id, 'UPDATE_MMTT_FOR_WIP');
1941: END IF;
1942: RAISE fnd_api.g_exc_unexpected_error;
1943: END IF;
1944: CLOSE c_repetitive_line_id;
1945: END IF;
1946: END IF;

Line 1964: x_return_status := fnd_api.g_ret_sts_error;

1960: SELECT WSH_PICK_SLIP_NUMBERS_S.NEXTVAL INTO x_pick_slip_number FROM DUAL;
1961: END IF;
1962: EXCEPTION
1963: WHEN OTHERS THEN
1964: x_return_status := fnd_api.g_ret_sts_error;
1965: END get_wip_attributes;
1966:
1967: FUNCTION get_mo_alloc_stat RETURN VARCHAR2 IS
1968: l_mo_alloc_stat VARCHAR2(1) := g_not_allocated;