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

Line 139: x_api_status := fnd_api.g_ret_sts_success;

135: j NUMBER;
136: l_temp_psr psrTyp;
137: l_ordered_psr psrtabtyp;
138: BEGIN
139: x_api_status := fnd_api.g_ret_sts_success;
140:
141: IF p_pick_seq_rule_id IS NULL THEN
142: FOR i IN 1 .. g_total_pick_criteria LOOP
143: l_ordered_psr(i).attribute_name := 'TEMP';

Line 212: x_api_status := FND_API.G_RET_STS_SUCCESS;

208: END LOOP;
209: END IF; -- for p_pick_seq_rule_id is null
210:
211: x_ordered_psr := l_ordered_psr;
212: x_api_status := FND_API.G_RET_STS_SUCCESS;
213:
214: EXCEPTION
215: --
216: WHEN OTHERS THEN

Line 218: x_api_status := fnd_api.g_ret_sts_unexp_error;

214: EXCEPTION
215: --
216: WHEN OTHERS THEN
217: --
218: x_api_status := fnd_api.g_ret_sts_unexp_error;
219: --
220: IF pick_seq_rule%ISOPEN THEN
221: CLOSE pick_seq_rule;
222: END IF;

Line 267: x_return_status := fnd_api.g_ret_sts_success;

263: L_INDEX NUMBER;
264: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
265:
266: BEGIN
267: x_return_status := fnd_api.g_ret_sts_success;
268:
269: -- Get the highest priority subinventory
270: L_INDEX := 0;
271: OPEN c_get_source_sub;

Line 299: x_return_status := FND_API.G_RET_STS_SUCCESS;

295: print_debug('x_MAX_MINMAX_QUANTITY :' || x_MAX_MINMAX_QUANTITY);
296: END IF;
297:
298:
299: x_return_status := FND_API.G_RET_STS_SUCCESS;
300:
301: EXCEPTION
302: WHEN OTHERS THEN
303: IF l_debug = 1 THEN

Line 311: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

307: IF c_get_source_sub%ISOPEN THEN
308: CLOSE c_get_source_sub;
309: END IF;
310:
311: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
312:
313: END Get_Source_Sub_Dest_Loc_Info;
314:
315:

Line 329: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

325: , x_return_status OUT NOCOPY VARCHAR2
326: )
327: IS
328:
329: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
330:
331: l_detail_info_tab WSH_INTERFACE_EXT_GRP.delivery_details_Attr_tbl_Type;
332: l_in_rec WSH_INTERFACE_EXT_GRP.detailInRecType;
333: l_out_rec WSH_INTERFACE_EXT_GRP.detailOutRecType;

Line 356: AND p_repl_status <> FND_API.G_MISS_CHAR THEN -- Added for bug 16197390

352: l_in_rec := NULL;
353:
354:
355: IF p_repl_status IS NOT NULL
356: AND p_repl_status <> FND_API.G_MISS_CHAR THEN -- Added for bug 16197390
357: -- call WSH to just update the replenishment status
358:
359: l_detail_info_tab(1).delivery_detail_id := p_deliv_detail_id;
360: l_detail_info_tab(1).replenishment_status := p_repl_status ;

Line 366: p_init_msg_list => fnd_api.g_false,

362: l_in_rec.action_code := 'UPDATE';
363:
364: WSH_INTERFACE_EXT_GRP.Create_Update_Delivery_Detail
365: (p_api_version_number => 1.0,
366: p_init_msg_list => fnd_api.g_false,
367: p_commit => fnd_api.g_false,
368: x_return_status => l_return_status,
369: x_msg_count => l_msg_count,
370: x_msg_data => l_msg_data,

Line 367: p_commit => fnd_api.g_false,

363:
364: WSH_INTERFACE_EXT_GRP.Create_Update_Delivery_Detail
365: (p_api_version_number => 1.0,
366: p_init_msg_list => fnd_api.g_false,
367: p_commit => fnd_api.g_false,
368: x_return_status => l_return_status,
369: x_msg_count => l_msg_count,
370: x_msg_data => l_msg_data,
371: p_detail_info_tab => l_detail_info_tab,

Line 380: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

376: IF (l_debug = 1) THEN
377: print_debug('Status after updating the Repl status '||l_return_status);
378: END IF;
379:
380: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
381: IF (l_debug = 1) THEN
382: print_debug('Error returned from Create_Update_Delivery_Detail IN api update_wdd_repl_status');
383: END IF;
384: RAISE FND_API.G_EXC_ERROR;

Line 384: RAISE FND_API.G_EXC_ERROR;

380: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
381: IF (l_debug = 1) THEN
382: print_debug('Error returned from Create_Update_Delivery_Detail IN api update_wdd_repl_status');
383: END IF;
384: RAISE FND_API.G_EXC_ERROR;
385: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
386: IF (l_debug = 1) THEN
387: print_debug('Unexpected errror from Create_Update_Delivery_Detail IN api update_wdd_repl_status');
388: END IF;

Line 385: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

381: IF (l_debug = 1) THEN
382: print_debug('Error returned from Create_Update_Delivery_Detail IN api update_wdd_repl_status');
383: END IF;
384: RAISE FND_API.G_EXC_ERROR;
385: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
386: IF (l_debug = 1) THEN
387: print_debug('Unexpected errror from Create_Update_Delivery_Detail IN api update_wdd_repl_status');
388: END IF;
389: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 389: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

385: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
386: IF (l_debug = 1) THEN
387: print_debug('Unexpected errror from Create_Update_Delivery_Detail IN api update_wdd_repl_status');
388: END IF;
389: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
390: END IF;
391:
392: ELSE -- p_repl_status IS NULL
393:

Line 439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

435: WHEN OTHERS THEN
436: IF l_debug = 1 THEN
437: print_debug('Error update_wdd_repl_status: ' || sqlcode || ',' || sqlerrm);
438: END IF;
439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
440:
441: END update_wdd_repl_status;
442:
443:

Line 454: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

450: IS
451:
452: l_deliv_detail_id_tab num_tab;
453:
454: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
455: l_detail_info_tab WSH_INTERFACE_EXT_GRP.delivery_details_Attr_tbl_Type;
456: l_in_rec WSH_INTERFACE_EXT_GRP.detailInRecType;
457: l_out_rec WSH_INTERFACE_EXT_GRP.detailOutRecType;
458: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);

Line 508: l_return_status := fnd_api.g_ret_sts_error;

504: WHEN OTHERS THEN
505: IF (l_debug = 1) THEN
506: print_debug('Exception retrieving item repl records for Dynamic');
507: END IF;
508: l_return_status := fnd_api.g_ret_sts_error;
509: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
510: END;
511:
512: l_detail_info_tab.DELETE;

Line 509: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

505: IF (l_debug = 1) THEN
506: print_debug('Exception retrieving item repl records for Dynamic');
507: END IF;
508: l_return_status := fnd_api.g_ret_sts_error;
509: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
510: END;
511:
512: l_detail_info_tab.DELETE;
513: IF (l_deliv_detail_id_tab.count>0) THEN --bug#10185153

Line 516: -- mark the demand lines for FND_API.g_miss_char replenishment status

512: l_detail_info_tab.DELETE;
513: IF (l_deliv_detail_id_tab.count>0) THEN --bug#10185153
514: FOR i IN l_deliv_detail_id_tab.FIRST..l_deliv_detail_id_tab.LAST LOOP
515: l_detail_info_tab(i).delivery_detail_id := l_deliv_detail_id_tab(i);
516: -- mark the demand lines for FND_API.g_miss_char replenishment status
517: l_detail_info_tab(i).replenishment_status := FND_API.g_miss_char;
518:
519: END LOOP;
520: END IF;

Line 517: l_detail_info_tab(i).replenishment_status := FND_API.g_miss_char;

513: IF (l_deliv_detail_id_tab.count>0) THEN --bug#10185153
514: FOR i IN l_deliv_detail_id_tab.FIRST..l_deliv_detail_id_tab.LAST LOOP
515: l_detail_info_tab(i).delivery_detail_id := l_deliv_detail_id_tab(i);
516: -- mark the demand lines for FND_API.g_miss_char replenishment status
517: l_detail_info_tab(i).replenishment_status := FND_API.g_miss_char;
518:
519: END LOOP;
520: END IF;
521:

Line 532: p_init_msg_list => fnd_api.g_false,

528: l_in_rec.action_code := 'UPDATE';
529:
530: WSH_INTERFACE_EXT_GRP.Create_Update_Delivery_Detail
531: (p_api_version_number => 1.0,
532: p_init_msg_list => fnd_api.g_false,
533: p_commit => fnd_api.g_false,
534: x_return_status => l_return_status,
535: x_msg_count => l_msg_count,
536: x_msg_data => l_msg_data,

Line 533: p_commit => fnd_api.g_false,

529:
530: WSH_INTERFACE_EXT_GRP.Create_Update_Delivery_Detail
531: (p_api_version_number => 1.0,
532: p_init_msg_list => fnd_api.g_false,
533: p_commit => fnd_api.g_false,
534: x_return_status => l_return_status,
535: x_msg_count => l_msg_count,
536: x_msg_data => l_msg_data,
537: p_detail_info_tab => l_detail_info_tab,

Line 546: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

542: IF (l_debug = 1) THEN
543: print_debug('AFTER Changing the line status to original release status');
544: END IF;
545:
546: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
547: IF (l_debug = 1) THEN
548: print_debug('Error returned from Create_Update_Delivery_Detail IN api Revert_ALL_WDD_dynamic_repl');
549: END IF;
550: RAISE FND_API.G_EXC_ERROR;

Line 550: RAISE FND_API.G_EXC_ERROR;

546: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
547: IF (l_debug = 1) THEN
548: print_debug('Error returned from Create_Update_Delivery_Detail IN api Revert_ALL_WDD_dynamic_repl');
549: END IF;
550: RAISE FND_API.G_EXC_ERROR;
551: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
552: IF (l_debug = 1) THEN
553: print_debug('Unexpected errror from Create_Update_Delivery_Detail api IN Revert_ALL_WDD_dynamic_repl');
554: END IF;

Line 551: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

547: IF (l_debug = 1) THEN
548: print_debug('Error returned from Create_Update_Delivery_Detail IN api Revert_ALL_WDD_dynamic_repl');
549: END IF;
550: RAISE FND_API.G_EXC_ERROR;
551: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
552: IF (l_debug = 1) THEN
553: print_debug('Unexpected errror from Create_Update_Delivery_Detail api IN Revert_ALL_WDD_dynamic_repl');
554: END IF;
555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

551: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
552: IF (l_debug = 1) THEN
553: print_debug('Unexpected errror from Create_Update_Delivery_Detail api IN Revert_ALL_WDD_dynamic_repl');
554: END IF;
555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
556: END IF;
557:
558: x_return_status := l_return_status ;
559:

Line 565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

561: WHEN OTHERS THEN
562: IF l_debug = 1 THEN
563: print_debug('Error In Revert_ALL_WDD_dynamic_repl: ' || sqlcode || ',' || sqlerrm);
564: END IF;
565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
566: END revert_all_wdd_dynamic_repl;
567:
568:
569: PROCEDURE Revert_Consol_item_changes ( p_repl_type IN NUMBER

Line 589: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

585:
586: l_msg_count NUMBER;
587: l_msg_data VARCHAR2(1000);
588:
589: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
590:
591: CURSOR c_demand_for_items IS
592: SELECT demand_line_detail_id
593: FROM wms_repl_demand_gtmp

Line 622: l_return_status := fnd_api.g_ret_sts_error;

618: WHEN OTHERS THEN
619: IF (l_debug = 1) THEN
620: print_debug('Exception retrieving repl records for consol item');
621: END IF;
622: l_return_status := fnd_api.g_ret_sts_error;
623: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
624: END;
625:
626: l_detail_info_tab.DELETE;

Line 623: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

619: IF (l_debug = 1) THEN
620: print_debug('Exception retrieving repl records for consol item');
621: END IF;
622: l_return_status := fnd_api.g_ret_sts_error;
623: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
624: END;
625:
626: l_detail_info_tab.DELETE;
627: IF (l_deliv_detail_id_tab.count>0) THEN --bug#10185153

Line 630: -- mark the demand lines for FND_API.g_miss_char replenishment status

626: l_detail_info_tab.DELETE;
627: IF (l_deliv_detail_id_tab.count>0) THEN --bug#10185153
628: FOR i IN l_deliv_detail_id_tab.FIRST..l_deliv_detail_id_tab.LAST LOOP
629: l_detail_info_tab(i).delivery_detail_id := l_deliv_detail_id_tab(i);
630: -- mark the demand lines for FND_API.g_miss_char replenishment status
631: l_detail_info_tab(i).replenishment_status := FND_API.g_miss_char;
632: END LOOP;
633: END IF;
634:

Line 631: l_detail_info_tab(i).replenishment_status := FND_API.g_miss_char;

627: IF (l_deliv_detail_id_tab.count>0) THEN --bug#10185153
628: FOR i IN l_deliv_detail_id_tab.FIRST..l_deliv_detail_id_tab.LAST LOOP
629: l_detail_info_tab(i).delivery_detail_id := l_deliv_detail_id_tab(i);
630: -- mark the demand lines for FND_API.g_miss_char replenishment status
631: l_detail_info_tab(i).replenishment_status := FND_API.g_miss_char;
632: END LOOP;
633: END IF;
634:
635: l_in_rec := NULL;

Line 641: p_init_msg_list => fnd_api.g_false,

637: l_in_rec.action_code := 'UPDATE';
638:
639: WSH_INTERFACE_EXT_GRP.Create_Update_Delivery_Detail
640: (p_api_version_number => 1.0,
641: p_init_msg_list => fnd_api.g_false,
642: p_commit => fnd_api.g_false,
643: x_return_status => l_return_status,
644: x_msg_count => l_msg_count,
645: x_msg_data => l_msg_data,

Line 642: p_commit => fnd_api.g_false,

638:
639: WSH_INTERFACE_EXT_GRP.Create_Update_Delivery_Detail
640: (p_api_version_number => 1.0,
641: p_init_msg_list => fnd_api.g_false,
642: p_commit => fnd_api.g_false,
643: x_return_status => l_return_status,
644: x_msg_count => l_msg_count,
645: x_msg_data => l_msg_data,
646: p_detail_info_tab => l_detail_info_tab,

Line 655: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

651: IF (l_debug = 1) THEN
652: print_debug('AFTER Changing the line status to original release status');
653: END IF;
654:
655: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
656: IF (l_debug = 1) THEN
657: print_debug('Error returned from Create_Update_Delivery_Detail IN api revert_consol_item_changes');
658: END IF;
659: RAISE FND_API.G_EXC_ERROR;

Line 659: RAISE FND_API.G_EXC_ERROR;

655: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
656: IF (l_debug = 1) THEN
657: print_debug('Error returned from Create_Update_Delivery_Detail IN api revert_consol_item_changes');
658: END IF;
659: RAISE FND_API.G_EXC_ERROR;
660: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
661: IF (l_debug = 1) THEN
662: print_debug('Unexpected errror from Create_Update_Delivery_Detail api IN revert_consol_item_changes');
663: END IF;

Line 660: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

656: IF (l_debug = 1) THEN
657: print_debug('Error returned from Create_Update_Delivery_Detail IN api revert_consol_item_changes');
658: END IF;
659: RAISE FND_API.G_EXC_ERROR;
660: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
661: IF (l_debug = 1) THEN
662: print_debug('Unexpected errror from Create_Update_Delivery_Detail api IN revert_consol_item_changes');
663: END IF;
664: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 664: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

660: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
661: IF (l_debug = 1) THEN
662: print_debug('Unexpected errror from Create_Update_Delivery_Detail api IN revert_consol_item_changes');
663: END IF;
664: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
665: END IF;
666:
667: END IF; -- for IF p_repl_type = g_dynamic_repl AND p_demand_type_id <> 4
668:

Line 682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

678: WHEN OTHERS THEN
679: IF l_debug = 1 THEN
680: print_debug('Error in Revert_Consol_item_changes: ' || sqlcode || ',' || sqlerrm);
681: END IF;
682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
683: END revert_consol_item_changes;
684:
685:
686:

Line 691: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

687:
688: PROCEDURE Backorder_wdd_for_repl( x_return_status OUT NOCOPY VARCHAR2
689: )
690: IS
691: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
692: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
693: l_out_rows WSH_UTIL_CORE.ID_TAB_TYPE;
694: BEGIN
695:

Line 720: IF l_return_status <> fnd_api.g_ret_sts_success THEN

716: IF (l_debug = 1) THEN
717: print_debug( 'After call to Backorder API Return Status :'||l_return_status);
718: END IF;
719:
720: IF l_return_status <> fnd_api.g_ret_sts_success THEN
721: RAISE fnd_api.g_exc_unexpected_error;
722: END IF;
723:
724: --Delete all entries in the pl/sql table

Line 721: RAISE fnd_api.g_exc_unexpected_error;

717: print_debug( 'After call to Backorder API Return Status :'||l_return_status);
718: END IF;
719:
720: IF l_return_status <> fnd_api.g_ret_sts_success THEN
721: RAISE fnd_api.g_exc_unexpected_error;
722: END IF;
723:
724: --Delete all entries in the pl/sql table
725: G_backorder_deliv_tab.DELETE;

Line 739: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

735: --Delete all entries in the pl/sql table
736: G_backorder_deliv_tab.DELETE;
737: G_backorder_qty_tab.DELETE;
738: G_dummy_table.DELETE;
739: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
740: END Backorder_wdd_for_repl ;
741:
742:
743:

Line 796: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

792: l_detail_id_tab WSH_UTIL_CORE.id_tab_type;
793: l_action_prms WSH_GLBL_VAR_STRCT_GRP.dd_action_parameters_rec_type;
794: l_action_out_rec WSH_GLBL_VAR_STRCT_GRP.dd_action_out_rec_type;
795:
796: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
797: l_split_wdd_id NUMBER;
798:
799: l_dyn_bkord_dd_id_tab num_tab;
800:

Line 897: , p_init_msg_lst => fnd_api.g_false

893: -- Check value passed in this call to QTY Tree
894: inv_quantity_tree_pub.query_quantities
895: (
896: p_api_version_number => 1.0
897: , p_init_msg_lst => fnd_api.g_false
898: , x_return_status => l_return_status
899: , x_msg_count => l_msg_count
900: , x_msg_data => l_msg_data
901: , p_organization_id => L_ORG_ID

Line 928: IF l_return_status <> fnd_api.g_ret_sts_success THEN

924: print_debug( 'Return status from QTY TREE:' ||l_return_status);
925: print_debug( '>>>> From Qrt Tree, Org Level atr for Item :'||L_item_id||' is : '||l_atr);
926: END IF;
927:
928: IF l_return_status <> fnd_api.g_ret_sts_success THEN
929: l_atr := 0;
930: END IF;
931:
932: ----------------------

Line 1180: p_init_msg_list => fnd_api.g_false,

1176: l_action_prms.split_quantity := (l_quantity - l_atr);
1177:
1178: WSH_INTERFACE_GRP.Delivery_Detail_Action
1179: (p_api_version_number => 1.0,
1180: p_init_msg_list => fnd_api.g_false,
1181: p_commit => fnd_api.g_false,
1182: x_return_status => l_return_status,
1183: x_msg_count => l_msg_count,
1184: x_msg_data => l_msg_data,

Line 1181: p_commit => fnd_api.g_false,

1177:
1178: WSH_INTERFACE_GRP.Delivery_Detail_Action
1179: (p_api_version_number => 1.0,
1180: p_init_msg_list => fnd_api.g_false,
1181: p_commit => fnd_api.g_false,
1182: x_return_status => l_return_status,
1183: x_msg_count => l_msg_count,
1184: x_msg_data => l_msg_data,
1185: p_detail_id_tab => l_detail_id_tab,

Line 1190: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1186: p_action_prms => l_action_prms,
1187: x_action_out_rec => l_action_out_rec
1188: );
1189:
1190: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1191: IF (l_debug = 1) THEN
1192: print_debug( 'Error returned from Split ADJUST_ATR_FOR_ITEM API..skip this demand');
1193: END IF;
1194: -- skip this demand line

Line 1196: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1192: print_debug( 'Error returned from Split ADJUST_ATR_FOR_ITEM API..skip this demand');
1193: END IF;
1194: -- skip this demand line
1195: GOTO next_dmd_rec;
1196: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1197: IF (l_debug = 1) THEN
1198: print_debug( 'Unexpected errror from Split ADJUST_ATR_FOR_ITEM API..skip this demand');
1199: END IF;
1200: -- skip this demand line

Line 1400: p_init_msg_list => fnd_api.g_false,

1396: l_in_rec.action_code := 'UPDATE';
1397:
1398: WSH_INTERFACE_EXT_GRP.Create_Update_Delivery_Detail
1399: (p_api_version_number => 1.0,
1400: p_init_msg_list => fnd_api.g_false,
1401: p_commit => fnd_api.g_false,
1402: x_return_status => l_return_status,
1403: x_msg_count => l_msg_count,
1404: x_msg_data => l_msg_data,

Line 1401: p_commit => fnd_api.g_false,

1397:
1398: WSH_INTERFACE_EXT_GRP.Create_Update_Delivery_Detail
1399: (p_api_version_number => 1.0,
1400: p_init_msg_list => fnd_api.g_false,
1401: p_commit => fnd_api.g_false,
1402: x_return_status => l_return_status,
1403: x_msg_count => l_msg_count,
1404: x_msg_data => l_msg_data,
1405: p_detail_info_tab => l_detail_info_tab,

Line 1414: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1410: IF (l_debug = 1) THEN
1411: print_debug('AFTER Changing the line status to original release status');
1412: END IF;
1413:
1414: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1415: IF (l_debug = 1) THEN
1416: print_debug('Error returned from Create_Update_Delivery_Detail IN api ADJUST_ATR_FOR_ITEM');
1417: END IF;
1418: RAISE FND_API.G_EXC_ERROR;

Line 1418: RAISE FND_API.G_EXC_ERROR;

1414: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1415: IF (l_debug = 1) THEN
1416: print_debug('Error returned from Create_Update_Delivery_Detail IN api ADJUST_ATR_FOR_ITEM');
1417: END IF;
1418: RAISE FND_API.G_EXC_ERROR;
1419: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1420: IF (l_debug = 1) THEN
1421: print_debug('Unexpected errror from Create_Update_Delivery_Detail api IN ADJUST_ATR_FOR_ITEM');
1422: END IF;

Line 1419: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1415: IF (l_debug = 1) THEN
1416: print_debug('Error returned from Create_Update_Delivery_Detail IN api ADJUST_ATR_FOR_ITEM');
1417: END IF;
1418: RAISE FND_API.G_EXC_ERROR;
1419: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1420: IF (l_debug = 1) THEN
1421: print_debug('Unexpected errror from Create_Update_Delivery_Detail api IN ADJUST_ATR_FOR_ITEM');
1422: END IF;
1423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1419: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1420: IF (l_debug = 1) THEN
1421: print_debug('Unexpected errror from Create_Update_Delivery_Detail api IN ADJUST_ATR_FOR_ITEM');
1422: END IF;
1423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1424: END IF;
1425:
1426: END IF;
1427:

Line 1448: x_return_status := FND_API.G_RET_STS_ERROR;

1444: WHEN OTHERS THEN
1445: IF (l_debug = 1) THEN
1446: print_debug('Exception in ADJUST_atr_for_item: ' || sqlcode || ', ' || sqlerrm);
1447: END IF;
1448: x_return_status := FND_API.G_RET_STS_ERROR;
1449: -- calling API will rollback
1450: END ADJUST_atr_for_item;
1451:
1452:

Line 1486: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;

1482: l_return_value BOOLEAN;
1483: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
1484: l_consol_item_repl_tbl CONSOL_ITEM_REPL_TBL;
1485:
1486: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;
1487: BEGIN
1488: x_return_status := l_return_status;
1489:
1490: SAVEPOINT push_replenishment_sp;

Line 1537: x_return_status := FND_API.G_RET_STS_ERROR;

1533: IF l_debug = 1 THEN
1534: print_debug(' ERROR: VALIDATION FAILED !' );
1535: END IF;
1536:
1537: x_return_status := FND_API.G_RET_STS_ERROR;
1538: x_msg_data := 'Missing Required Information';
1539: RETURN;
1540:
1541: END IF;

Line 1575: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN

1571: x_msg_count => x_msg_count,
1572: x_msg_data => x_msg_data);
1573:
1574:
1575: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN
1576: IF (l_debug = 1) THEN
1577: PRINT_DEBUG('Demand records populated successfully');
1578: END IF;
1579:

Line 1585: RAISE fnd_api.g_exc_unexpected_error;

1581: l_consol_item_repl_tbl.DELETE;
1582: IF (l_debug = 1) THEN
1583: PRINT_DEBUG('Error from API POPULATE_PUSH_REPL_DEMAND');
1584: END IF;
1585: RAISE fnd_api.g_exc_unexpected_error;
1586: END IF;
1587:
1588:
1589: -- ==========TEST CODE starts ===========

Line 1640: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN

1636: x_return_status => l_return_status,
1637: x_msg_count => x_msg_count,
1638: x_msg_data => x_msg_data);
1639:
1640: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN
1641: IF (l_debug = 1) THEN
1642: PRINT_DEBUG('processed replenishment successfully');
1643: END IF;
1644:

Line 1649: RAISE fnd_api.g_exc_unexpected_error;

1645: ELSE
1646: IF (l_debug = 1) THEN
1647: PRINT_DEBUG('Error from API process_replenishment');
1648: END IF;
1649: RAISE fnd_api.g_exc_unexpected_error;
1650: END IF;
1651: ELSE
1652: IF (l_debug = 1) THEN
1653: print_debug('No Demand Records Identified for Chosen Criteria..Exiting...');

Line 1668: IF l_RETURN_status <> fnd_api.g_ret_sts_success THEN

1664: END IF;
1665:
1666: IF g_backorder_deliv_tab.COUNT() <> 0 THEN
1667: Backorder_wdd_for_repl( l_return_status );
1668: IF l_RETURN_status <> fnd_api.g_ret_sts_success THEN
1669: IF (l_debug = 1) THEN
1670: PRINT_DEBUG('Call to Backorder_wdd_for_repl API returned failure..DO NOTHING');
1671: END IF;
1672: END IF;

Line 1677: x_return_status := FND_API.g_ret_sts_success;

1673: END IF;
1674:
1675:
1676: COMMIT; -- commit entire transaction
1677: x_return_status := FND_API.g_ret_sts_success;
1678:
1679: IF (l_debug = 1) THEN
1680: PRINT_DEBUG('Done with the Push Replenishment');
1681: END IF;

Line 1692: x_return_status:= FND_API.g_ret_sts_error;

1688: g_item_uom_conversion_tb.DELETE;
1689: IF l_debug = 1 THEN
1690: print_debug('Error in PUSH_REPLENISHMENT: ' || sqlcode || ', ' || sqlerrm);
1691: END IF;
1692: x_return_status:= FND_API.g_ret_sts_error;
1693:
1694: END PUSH_REPLENISHMENT;
1695:
1696:

Line 1710: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;

1706: l_return_value BOOLEAN;
1707: l_consol_item_repl_tbl CONSOL_ITEM_REPL_TBL;
1708: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
1709:
1710: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;
1711: BEGIN
1712:
1713: x_return_status := l_return_status;
1714: SAVEPOINT dynamic_replenishment_sp;

Line 1760: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN

1756: -- The API needs to revert the original status of WDD
1757: -- Even if it errors out for what ever reason, all WDDs
1758: -- should be reverted in the called API at the very least
1759: -- and return status of success with no records in consol table
1760: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN
1761: IF (l_debug = 1) THEN
1762: PRINT_DEBUG('Demand records populated successfully');
1763: END IF;
1764: ELSE

Line 1769: RAISE fnd_api.g_exc_unexpected_error;

1765: l_consol_item_repl_tbl.DELETE;
1766: IF (l_debug = 1) THEN
1767: PRINT_DEBUG('Error from API POPULATE_dynamic_REPL_DEMAND');
1768: END IF;
1769: RAISE fnd_api.g_exc_unexpected_error;
1770: END IF;
1771:
1772: -- To populate the demand table - WMS_REPL_DEMAND_GTMP - Get values in l_consol_item_repl_tbl
1773: -- Cache information about relevant items

Line 1817: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN

1813: x_return_status => l_return_status ,
1814: x_msg_count => x_msg_count ,
1815: x_msg_data => x_msg_data );
1816:
1817: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN
1818: IF (l_debug = 1) THEN
1819: PRINT_DEBUG('processed replenishment successfully');
1820: END IF;
1821:

Line 1827: RAISE fnd_api.g_exc_unexpected_error;

1823: IF (l_debug = 1) THEN
1824: PRINT_DEBUG('Error from API process_replenishment');
1825: END IF;
1826: -- To call revert of WDD status for all WDDs
1827: RAISE fnd_api.g_exc_unexpected_error;
1828: END IF;
1829: ELSE
1830:
1831: IF (l_debug = 1) THEN

Line 1846: IF l_RETURN_status <> fnd_api.g_ret_sts_success THEN

1842: END IF;
1843:
1844: IF g_backorder_deliv_tab.COUNT() <> 0 THEN
1845: Backorder_wdd_for_repl( l_return_status );
1846: IF l_RETURN_status <> fnd_api.g_ret_sts_success THEN
1847: IF (l_debug = 1) THEN
1848: PRINT_DEBUG('Call to Backorder_wdd_for_repl API returned failure..DO NOTHING');
1849: END IF;
1850: END IF;

Line 1855: x_return_status := FND_API.g_ret_sts_success;

1851: END IF;
1852:
1853:
1854: COMMIT;
1855: x_return_status := FND_API.g_ret_sts_success;
1856:
1857: IF (l_debug = 1) THEN
1858: PRINT_DEBUG('Done with the Pull/Dynamic Replenishment');
1859: END IF;

Line 1882: x_return_status:= FND_API.g_ret_sts_error;

1878: print_debug('status:'||l_return_status);
1879: END IF;
1880: COMMIT;
1881:
1882: x_return_status:= FND_API.g_ret_sts_error;
1883: END DYNAMIC_REPLENISHMENT;
1884:
1885:
1886:

Line 2286: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;

2282: l_total_demand_qty_tb num_tab;
2283: l_date_required_tb date_tab;
2284:
2285: l_temp_cnt NUMBER; -- for debugging only
2286: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;
2287: BEGIN
2288: x_return_status := l_return_status;
2289:
2290: IF (l_debug = 1) THEN

Line 2311: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN

2307:
2308: IF (l_debug = 1) THEN
2309: print_debug('Status after calling init_rules'||l_return_status);
2310: END IF;
2311: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
2312: x_return_status := l_return_status;
2313: -- caller rollsback everything if error
2314: RETURN;
2315: END IF;

Line 2354: x_return_status := fnd_api.g_ret_sts_error;

2350: IF (l_debug = 1) THEN
2351: print_debug('Exception retrieving open repl demand records :'||SQLCODE ||' '||SQLERRM);
2352: END IF;
2353: -- caller rollsback everything if error
2354: x_return_status := fnd_api.g_ret_sts_error;
2355: RETURN;
2356: END;
2357:
2358:

Line 2451: x_return_status := fnd_api.g_ret_sts_error;

2447: IF (l_debug = 1) THEN
2448: print_debug('Error inserting wms_repl_demand_gtmp table');
2449: END IF;
2450: -- caller rollsback everything if error
2451: x_return_status := fnd_api.g_ret_sts_error;
2452: RETURN;
2453: END;
2454:
2455:

Line 2480: x_return_status := fnd_api.g_ret_sts_error;

2476: WHEN OTHERS THEN
2477: IF (l_debug = 1) THEN
2478: print_debug('Exception retrieving item repl records');
2479: END IF;
2480: x_return_status := fnd_api.g_ret_sts_error;
2481: -- caller rollback everything if error
2482: RETURN;
2483: END;
2484:

Line 2596: x_return_status := fnd_api.g_ret_sts_error;

2592: IF (l_debug = 1) THEN
2593: print_debug('Error inserting in WRDG temp table with Filter_item_flag = y : '||SQLCODE ||' '||SQLERRM);
2594: END IF;
2595: -- caller rollsback everything if error
2596: x_return_status := fnd_api.g_ret_sts_error;
2597: x_consol_item_repl_tbl.DELETE;
2598: RETURN;
2599: END;
2600:

Line 2616: x_return_status := fnd_api.g_ret_sts_error;

2612: IF l_return_status <> 'S' THEN
2613: IF l_debug = 1 THEN
2614: print_debug('API ADJUST_ATR_FOR_ITEM returned error');
2615: END IF;
2616: x_return_status := fnd_api.g_ret_sts_error;
2617: x_consol_item_repl_tbl.DELETE;
2618: RETURN;
2619: END IF;
2620:

Line 2638: x_return_status := FND_API.g_ret_sts_success;

2634: --=====================TEST CODE ENDS =======
2635:
2636: END IF; -- IF l_item_id_tb.COUNT = 0
2637:
2638: x_return_status := FND_API.g_ret_sts_success;
2639:
2640: IF l_debug = 1 THEN
2641: print_debug('Done with API populate_push_repl_demand');
2642: END IF;

Line 2651: x_return_status := fnd_api.g_ret_sts_unexp_error;

2647: print_debug('Error in populate_push_repl_demand SQLCODE:'||SQLCODE ||' '||SQLERRM );
2648: END IF;
2649: --
2650: -- caller rollsback everything if error
2651: x_return_status := fnd_api.g_ret_sts_unexp_error;
2652: x_consol_item_repl_tbl.DELETE;
2653: --
2654: END populate_push_repl_demand ;
2655:

Line 2682: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;

2678: l_rqoh NUMBER;
2679: l_qr NUMBER;
2680: l_qs NUMBER;
2681: l_atr NUMBER;
2682: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;
2683: l_next_lvl_src_sub VARCHAR(30);
2684: BEGIN
2685: x_create_qty := l_create_qty;
2686: x_return_status := fnd_api.g_ret_sts_success;

Line 2686: x_return_status := fnd_api.g_ret_sts_success;

2682: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;
2683: l_next_lvl_src_sub VARCHAR(30);
2684: BEGIN
2685: x_create_qty := l_create_qty;
2686: x_return_status := fnd_api.g_ret_sts_success;
2687:
2688: IF l_source_sub_atr IS NULL THEN
2689: l_source_sub_atr := -9999;
2690: END IF;

Line 2715: x_return_status := fnd_api.g_ret_sts_success;

2711: print_debug('l_repl_level:'||l_repl_level);
2712: END IF;
2713:
2714: IF l_repl_level >= 4 THEN
2715: x_return_status := fnd_api.g_ret_sts_success;
2716: x_create_qty := 0;
2717: RETURN;
2718: END IF;
2719:

Line 2738: x_return_status := fnd_api.g_ret_sts_success;

2734: print_debug('l_mo_source_sub:'||l_mo_source_sub);
2735: print_debug('l_mo_source_loc:'||l_mo_source_loc);
2736: END IF;
2737: IF ((l_create_qty <= 0) OR (l_mo_source_sub IS NULL)) THEN
2738: x_return_status := fnd_api.g_ret_sts_success;
2739: x_create_qty := 0;
2740: RETURN;
2741: END IF;
2742: select MISI.SOURCE_SUBINVENTORY into l_next_lvl_src_sub

Line 2756: x_return_status := fnd_api.g_ret_sts_success;

2752: if (l_debug = 1) THEN
2753: print_debug('Since no next level setup exists, thus returning' );
2754: END IF;
2755: x_create_qty := 0;
2756: x_return_status := fnd_api.g_ret_sts_success;
2757: return;
2758: end if;
2759:
2760:

Line 2789: x_return_status := fnd_api.g_ret_sts_success;

2785: ELSE
2786: IF (l_debug = 1) THEN
2787: print_debug('Error: Item detail not found');
2788: END IF;
2789: x_return_status := fnd_api.g_ret_sts_success;
2790: x_create_qty := 0;
2791: END IF; -- for inv_cache.set_item_rec
2792:
2793: IF (l_debug = 1) THEN

Line 2806: , p_init_msg_lst => fnd_api.g_false

2802:
2803: inv_quantity_tree_pub.query_quantities
2804: (
2805: p_api_version_number => 1.0
2806: , p_init_msg_lst => fnd_api.g_false
2807: , x_return_status => l_return_status
2808: , x_msg_count => x_msg_count
2809: , x_msg_data => x_msg_data
2810: , p_organization_id => p_organization_id

Line 2834: IF l_return_status = fnd_api.g_ret_sts_success THEN

2830:
2831: IF (l_debug = 1) THEN
2832: print_debug( 'Return status from QTY TREE:' ||x_return_status);
2833: END IF;
2834: IF l_return_status = fnd_api.g_ret_sts_success THEN
2835: x_source_sub_atr := l_source_sub_atr;
2836: ELSE
2837: l_source_sub_atr := -9999;
2838: END IF;

Line 2844: x_return_status := fnd_api.g_ret_sts_success;

2840: IF (l_debug = 1) THEN
2841: print_debug( 'l_source_sub_atr is: '||l_source_sub_atr);
2842: END IF;
2843: IF l_source_sub_atr <= 0 THEN
2844: x_return_status := fnd_api.g_ret_sts_success;
2845: x_create_qty := l_create_qty;
2846: x_source_sub_atr := 0;
2847: RETURN;
2848: END IF;

Line 2849: x_return_status := fnd_api.g_ret_sts_success;

2845: x_create_qty := l_create_qty;
2846: x_source_sub_atr := 0;
2847: RETURN;
2848: END IF;
2849: x_return_status := fnd_api.g_ret_sts_success;
2850: x_create_qty := 0;
2851: EXCEPTION
2852: WHEN OTHERS THEN
2853: x_return_status := fnd_api.g_ret_sts_success;

Line 2853: x_return_status := fnd_api.g_ret_sts_success;

2849: x_return_status := fnd_api.g_ret_sts_success;
2850: x_create_qty := 0;
2851: EXCEPTION
2852: WHEN OTHERS THEN
2853: x_return_status := fnd_api.g_ret_sts_success;
2854: x_create_qty := 0;
2855: x_source_sub_atr := NULL;
2856: END;
2857: END check_for_next_level_repl;

Line 2894: l_return_status := fnd_api.g_ret_sts_success;

2890: ORDER BY inventory_item_id, repl_to_subinventory_code;
2891:
2892: BEGIN
2893: l_org_id_tb.DELETE;
2894: l_return_status := fnd_api.g_ret_sts_success;
2895:
2896: IF (l_debug = 1) THEN
2897: print_debug('Inside API trigger_next_level_repl');
2898: END IF;

Line 2906: x_return_status := fnd_api.g_ret_sts_error;

2902: FETCH c_distinct_org_id bulk collect INTO l_org_id_tb;
2903: CLOSE c_distinct_org_id;
2904: EXCEPTION
2905: WHEN OTHERS THEN
2906: x_return_status := fnd_api.g_ret_sts_error;
2907: DELETE FROM wms_repl_demand_gtmp WHERE repl_level = p_repl_level;
2908: IF (l_debug = 1) THEN
2909: print_debug('Exception getting orgs:'||p_repl_level);
2910: END IF;

Line 2998: x_return_status := fnd_api.g_ret_sts_success;

2994:
2995: IF l_debug = 1 THEN
2996: print_debug('DONE WITH API trigger_next_level_repl');
2997: END IF;
2998: x_return_status := fnd_api.g_ret_sts_success;
2999:
3000: EXCEPTION
3001: WHEN OTHERS THEN
3002: IF l_debug = 1 THEN

Line 3025: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;

3021:
3022: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
3023: l_temp_cnt NUMBER; -- for debugging only
3024: l_repl_level NUMBER;
3025: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;
3026:
3027: BEGIN
3028: x_return_status := l_return_status;
3029:

Line 3047: IF l_return_status <> fnd_api.g_ret_sts_success THEN

3043: x_consol_item_repl_tbl => P_consol_item_repl_tbl,
3044: x_return_status => l_return_status,
3045: x_msg_count => x_msg_count,
3046: x_msg_data => x_msg_data);
3047: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3048: x_return_status := fnd_api.g_ret_sts_error;
3049: RETURN;
3050: END IF;
3051: END IF;

Line 3048: x_return_status := fnd_api.g_ret_sts_error;

3044: x_return_status => l_return_status,
3045: x_msg_count => x_msg_count,
3046: x_msg_data => x_msg_data);
3047: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3048: x_return_status := fnd_api.g_ret_sts_error;
3049: RETURN;
3050: END IF;
3051: END IF;
3052:

Line 3106: IF l_return_status <> fnd_api.g_ret_sts_success THEN

3102: x_consol_item_repl_tbl => P_consol_item_repl_tbl,
3103: x_return_status => l_return_status,
3104: x_msg_count => x_msg_count,
3105: x_msg_data => x_msg_data);
3106: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3107: x_return_status := fnd_api.g_ret_sts_error;
3108: RETURN;
3109: END IF;
3110: END IF;

Line 3107: x_return_status := fnd_api.g_ret_sts_error;

3103: x_return_status => l_return_status,
3104: x_msg_count => x_msg_count,
3105: x_msg_data => x_msg_data);
3106: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3107: x_return_status := fnd_api.g_ret_sts_error;
3108: RETURN;
3109: END IF;
3110: END IF;
3111:

Line 3161: IF l_return_status <> fnd_api.g_ret_sts_success THEN

3157: p_Plan_Tasks => p_Plan_Tasks,
3158: x_return_status => l_return_status,
3159: x_msg_count => x_msg_count,
3160: x_msg_data => x_msg_data);
3161: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3162: x_return_status := fnd_api.g_ret_sts_error;
3163: RETURN;
3164: END IF;
3165:

Line 3162: x_return_status := fnd_api.g_ret_sts_error;

3158: x_return_status => l_return_status,
3159: x_msg_count => x_msg_count,
3160: x_msg_data => x_msg_data);
3161: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3162: x_return_status := fnd_api.g_ret_sts_error;
3163: RETURN;
3164: END IF;
3165:
3166:

Line 3214: x_return_status := fnd_api.g_ret_sts_unexp_error;

3210: IF l_debug = 1 THEN
3211: print_debug('PROCESS_REPLENISHMENT: Exception block: ' || sqlcode || ', ' || sqlerrm);
3212: END IF;
3213: --
3214: x_return_status := fnd_api.g_ret_sts_unexp_error;
3215: --
3216: END PROCESS_REPLENISHMENT;
3217:
3218:

Line 3243: l_commit VARCHAR2(1) := FND_API.G_TRUE;

3239: l_trohdr_rec INV_Move_Order_PUB.Trohdr_Rec_Type;
3240: l_trohdr_val_rec INV_Move_Order_PUB.Trohdr_Val_Rec_Type;
3241: l_x_trohdr_rec INV_Move_Order_PUB.Trohdr_Rec_Type;
3242: l_x_trohdr_val_rec INV_Move_Order_PUB.Trohdr_Val_Rec_Type;
3243: l_commit VARCHAR2(1) := FND_API.G_TRUE;
3244:
3245: l_trolin_tbl INV_Move_Order_PUB.Trolin_Tbl_Type;
3246: l_trolin_val_tbl INV_Move_Order_PUB.Trolin_Val_Tbl_Type;
3247: l_x_trolin_tbl INV_Move_Order_PUB.Trolin_Tbl_Type;

Line 3391: l_trohdr_rec.db_flag := FND_API.G_TRUE;

3387: l_trohdr_rec.status_date := sysdate;
3388: l_trohdr_rec.move_order_type := INV_GLOBALS.G_MOVE_ORDER_REPLENISHMENT;
3389: l_trohdr_rec.transaction_type_id := INV_GLOBALS.G_TYPE_TRANSFER_ORDER_SUBXFR;
3390: l_trohdr_rec.operation := INV_GLOBALS.G_OPR_CREATE;
3391: l_trohdr_rec.db_flag := FND_API.G_TRUE;
3392:
3393: -- Multi step change
3394: l_item_id_tb.DELETE;
3395: l_org_id_tb.DELETE;

Line 3455: p_init_msg_list => FND_API.G_FALSE,

3451: print_debug('CALLING INV_Move_Order_PUB.Create_Move_Order_Header');
3452: END IF;
3453:
3454: INV_Move_Order_PUB.Create_Move_Order_Header(p_api_version_number => 1.0,
3455: p_init_msg_list => FND_API.G_FALSE,
3456: p_return_values => FND_API.G_TRUE,
3457: p_commit => l_commit,
3458: x_return_status => l_return_status,
3459: x_msg_count => l_msg_count,

Line 3456: p_return_values => FND_API.G_TRUE,

3452: END IF;
3453:
3454: INV_Move_Order_PUB.Create_Move_Order_Header(p_api_version_number => 1.0,
3455: p_init_msg_list => FND_API.G_FALSE,
3456: p_return_values => FND_API.G_TRUE,
3457: p_commit => l_commit,
3458: x_return_status => l_return_status,
3459: x_msg_count => l_msg_count,
3460: x_msg_data => l_msg_data,

Line 3473: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

3469: IF l_debug = 1 THEN
3470: print_debug('After Calling Create_Move_Order_Header');
3471: END IF;
3472:
3473: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3474: IF l_debug = 1 THEN
3475: print_debug('Creating MO Header failed with unexpected error returning message: ' ||
3476: l_msg_data);
3477: END IF;

Line 3478: RAISE fnd_api.g_exc_unexpected_error;

3474: IF l_debug = 1 THEN
3475: print_debug('Creating MO Header failed with unexpected error returning message: ' ||
3476: l_msg_data);
3477: END IF;
3478: RAISE fnd_api.g_exc_unexpected_error;
3479: -- If cant create a common MOH, do no repl stuff
3480: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3481: IF l_debug = 1 THEN
3482: print_debug('Creating MO Header failed with expected error returning message: ' ||

Line 3480: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

3476: l_msg_data);
3477: END IF;
3478: RAISE fnd_api.g_exc_unexpected_error;
3479: -- If cant create a common MOH, do no repl stuff
3480: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3481: IF l_debug = 1 THEN
3482: print_debug('Creating MO Header failed with expected error returning message: ' ||
3483: l_msg_data);
3484: END IF;

Line 3485: RAISE fnd_api.g_exc_error;

3481: IF l_debug = 1 THEN
3482: print_debug('Creating MO Header failed with expected error returning message: ' ||
3483: l_msg_data);
3484: END IF;
3485: RAISE fnd_api.g_exc_error;
3486: -- If cant create a common MOH, do no repl stuff
3487: ELSE
3488: IF l_debug = 1 THEN
3489: print_debug('Creating MO Header returned success with MO Header Id: ' || l_x_trohdr_rec.header_id);

Line 3510: l_return_status := fnd_api.g_ret_sts_success;

3506: IF l_debug = 1 THEN
3507: print_debug('Calling Get_Source_Sub_Dest_Loc_Info....');
3508: END IF;
3509: -- Get source sub and loc information for the repl MO, if available
3510: l_return_status := fnd_api.g_ret_sts_success;
3511: Get_Source_Sub_Dest_Loc_Info(p_Org_id => p_consol_item_repl_tbl(i).ORGANIZATION_ID,
3512: p_Item_id => p_consol_item_repl_tbl(i).Item_id,
3513: p_Picking_Sub => p_consol_item_repl_tbl(i).Repl_To_Subinventory_code,
3514: x_source_sub => l_src_sub,

Line 3520: IF l_return_status <> fnd_api.g_ret_sts_success THEN

3516: x_MAX_MINMAX_QUANTITY => l_MAX_MINMAX_QUANTITY,
3517: x_fixed_lot_multiple => l_fixed_lot_multiple,
3518: x_return_status => l_return_status);
3519:
3520: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3521: GOTO next_consol_rec;
3522: END IF;
3523:
3524: -- Final Replenishment Quantity = Maximum of min-max qty + Sum of

Line 3730: l_trolin_tbl(l_order_count).db_flag := FND_API.G_TRUE;

3726: l_trolin_tbl(l_order_count).to_subinventory_code := p_consol_item_repl_tbl(i).Repl_To_Subinventory_code;
3727: l_trolin_tbl(l_order_count).to_locator_id := NULL; -- Let Rule engine decide based ON avail_capacity
3728: l_trolin_tbl(l_order_count).transaction_source_type_id :=INV_GLOBALS.G_SOURCETYPE_MOVEORDER; -- 4
3729: l_trolin_tbl(l_order_count).transaction_type_id := INV_GLOBALS.G_TYPE_TRANSFER_ORDER_SUBXFR;
3730: l_trolin_tbl(l_order_count).db_flag := FND_API.G_TRUE;
3731: l_trolin_tbl(l_order_count).operation := INV_GLOBALS.G_OPR_CREATE;
3732:
3733: --Begin 12396907
3734: IF inv_cache.set_item_rec(p_consol_item_repl_tbl(i).ORGANIZATION_ID, p_consol_item_repl_tbl(i).item_id) THEN

Line 3757: l_return_status := fnd_api.g_ret_sts_success;

3753: -- NO NEED TO CALL THIS API FOR EACH LINE. STORE ALL LINES FOR A
3754: -- mo header IN THE l_trolin_tbl TABLE AND THEN CALL ONLY ONCE FOR
3755: -- PERFORMACE REASON. THEN FOR EACH MO LINE FROM THE SAME TABLE,
3756: -- CREATE RESERVATION FOR CORRESPONDING DEMAND LINES, IF NEEDED
3757: l_return_status := fnd_api.g_ret_sts_success;
3758: INV_Move_Order_PUB.Create_Move_Order_Lines(
3759: p_api_version_number => 1.0,
3760: p_init_msg_list => FND_API.G_FALSE,
3761: p_commit => FND_API.G_FALSE, --BUG14504260

Line 3760: p_init_msg_list => FND_API.G_FALSE,

3756: -- CREATE RESERVATION FOR CORRESPONDING DEMAND LINES, IF NEEDED
3757: l_return_status := fnd_api.g_ret_sts_success;
3758: INV_Move_Order_PUB.Create_Move_Order_Lines(
3759: p_api_version_number => 1.0,
3760: p_init_msg_list => FND_API.G_FALSE,
3761: p_commit => FND_API.G_FALSE, --BUG14504260
3762: x_return_status => l_return_status,
3763: x_msg_count => l_msg_count,
3764: x_msg_data => l_msg_data,

Line 3761: p_commit => FND_API.G_FALSE, --BUG14504260

3757: l_return_status := fnd_api.g_ret_sts_success;
3758: INV_Move_Order_PUB.Create_Move_Order_Lines(
3759: p_api_version_number => 1.0,
3760: p_init_msg_list => FND_API.G_FALSE,
3761: p_commit => FND_API.G_FALSE, --BUG14504260
3762: x_return_status => l_return_status,
3763: x_msg_count => l_msg_count,
3764: x_msg_data => l_msg_data,
3765: p_trolin_tbl => l_trolin_tbl,

Line 3776: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

3772: IF L_DEBUG = 1 THEN
3773: print_debug('After call to INV_Move_Order_PUB.Create_Move_Order_Lines');
3774: END IF;
3775:
3776: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3777:
3778: IF L_DEBUG = 1 THEN
3779: print_debug('INV_Move_Order_PUB.Create_Move_Order_Lines failed with expected error returning message: ' || l_msg_data || l_msg_count);
3780: END IF;

Line 3791: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

3787: END IF;
3788: l_line_num := l_line_num - 1;
3789: l_trolin_tbl.DELETE(l_order_count);
3790: GOTO next_consol_rec;
3791: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3792: IF L_DEBUG= 1 THEN
3793: print_debug('INV_Move_Order_PUB.Create_Move_Order_Lines failed with unexpected error returning message: ' || l_msg_data);
3794: END IF;
3795:

Line 3853: l_return_status := fnd_api.g_ret_sts_success;

3849: l_rsv_temp_rec.DEMAND_SOURCE_TYPE_ID := l_demand_type_id;
3850: l_rsv_temp_rec.DEMAND_SOURCE_HEADER_ID := l_demand_header_id;
3851: l_rsv_temp_rec.DEMAND_SOURCE_LINE_ID := l_demand_line_id;
3852:
3853: l_return_status := fnd_api.g_ret_sts_success;
3854: inv_reservation_pub.query_reservation(p_api_version_number =>1.0,
3855: x_return_status => l_return_status,
3856: x_msg_count => x_msg_count,
3857: x_msg_data => x_msg_data,

Line 3863: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN

3859: x_mtl_reservation_tbl => l_rsv_rec,
3860: x_mtl_reservation_tbl_count => l_mtl_reservation_count,
3861: x_error_code => l_error_code);
3862:
3863: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN
3864: IF L_DEBUG = 1 THEN
3865: PRINT_DEBUG('Number of reservations found: ' || l_mtl_reservation_count);
3866: END IF;
3867: ELSE

Line 3883: l_return_status := fnd_api.g_ret_sts_success;

3879: -- Create high-level reservation
3880: IF L_DEBUG = 1 THEN
3881: PRINT_DEBUG('Calling Create_RSV >>>');
3882: END IF;
3883: l_return_status := fnd_api.g_ret_sts_success;
3884: Create_RSV(p_replenishment_type => 1, -- 1- Stock Up/Push; 2- Dynamic/Pull
3885: l_debug => l_debug,
3886: l_organization_id => p_consol_item_repl_tbl(i).ORGANIZATION_ID,
3887: l_inventory_item_id => p_consol_item_repl_tbl(i).item_id,

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

3909: x_msg_count => x_msg_count,
3910: x_msg_data => x_msg_data
3911: );
3912:
3913: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3914: IF (l_debug = 1) THEN
3915: print_debug('Error returned from create_reservation API: ' || l_return_status);
3916: END IF;
3917: l_line_num := l_line_num - 1;

Line 3947: IF l_return_status <> fnd_api.g_ret_sts_success THEN

3943: , p_repl_status => 'R' -- for completed status
3944: , x_return_status => l_return_status
3945: );
3946:
3947: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3948: l_line_num := l_line_num - 1;
3949: l_trolin_tbl.DELETE(l_order_count);
3950: GOTO next_consol_rec;
3951: END IF;

Line 4158: p_init_msg_list => fnd_api.g_false,

4154: END IF;
4155:
4156: WMS_Engine_PVT.create_suggestions(
4157: p_api_version => 1.0,
4158: p_init_msg_list => fnd_api.g_false,
4159: p_commit => fnd_api.g_false,
4160: p_validation_level => fnd_api.g_valid_level_none,
4161: x_return_status => l_return_status,
4162: x_msg_count => x_msg_count,

Line 4159: p_commit => fnd_api.g_false,

4155:
4156: WMS_Engine_PVT.create_suggestions(
4157: p_api_version => 1.0,
4158: p_init_msg_list => fnd_api.g_false,
4159: p_commit => fnd_api.g_false,
4160: p_validation_level => fnd_api.g_valid_level_none,
4161: x_return_status => l_return_status,
4162: x_msg_count => x_msg_count,
4163: x_msg_data => x_msg_data,

Line 4160: p_validation_level => fnd_api.g_valid_level_none,

4156: WMS_Engine_PVT.create_suggestions(
4157: p_api_version => 1.0,
4158: p_init_msg_list => fnd_api.g_false,
4159: p_commit => fnd_api.g_false,
4160: p_validation_level => fnd_api.g_valid_level_none,
4161: x_return_status => l_return_status,
4162: x_msg_count => x_msg_count,
4163: x_msg_data => x_msg_data,
4164: p_transaction_temp_id => l_x_trolin_tbl(1).line_id,

Line 4166: p_suggest_serial => fnd_api.g_false,

4162: x_msg_count => x_msg_count,
4163: x_msg_data => x_msg_data,
4164: p_transaction_temp_id => l_x_trolin_tbl(1).line_id,
4165: p_reservations => l_rsv_tbl_tmp, --NULL value AS no rsv FOR repl MO
4166: p_suggest_serial => fnd_api.g_false,
4167: p_plan_tasks => l_plan_tasks);
4168:
4169: IF (l_debug = 1) THEN
4170: print_debug('after calling create_suggestions API');

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

4170: print_debug('after calling create_suggestions API');
4171: END IF;
4172:
4173:
4174: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4175: IF (l_debug = 1) THEN
4176: print_debug('Error returned from create_suggestions API: ' || l_return_status);
4177: END IF;
4178: -- even though it is failing

Line 4184: l_return_status := fnd_api.g_ret_sts_success;

4180: -- it can be allocated later
4181: -- no reverting so passing success to go to next
4182: -- consol rec. Also should not do any next level
4183: -- stuff which this will help to skip.
4184: l_return_status := fnd_api.g_ret_sts_success;
4185: GOTO next_consol_rec;
4186:
4187:
4188: ELSE

Line 4373: IF l_return_status <> fnd_api.g_ret_sts_success then

4369:
4370: END IF; -- IF p_consol_item_repl_tbl(i).final_replenishment_qty <= 0
4371: <>
4372:
4373: IF l_return_status <> fnd_api.g_ret_sts_success then
4374:
4375: IF (l_debug = 1) THEN
4376: print_debug('At the nexT_consol_rec rolling back as the l_return_status is ' || l_return_status);
4377: END IF;

Line 4381: l_return_status := fnd_api.g_ret_sts_success;

4377: END IF;
4378: IF c_demand_lines_for_item%ISOPEN THEN --BUG14054260
4379: CLOSE c_demand_lines_for_item;
4380: END IF;
4381: l_return_status := fnd_api.g_ret_sts_success;
4382: ROLLBACK TO current_mol_sp;
4383: -- if repl_type 2 and demand_type_id <> 4 then revert that WDD to original status
4384: -- remove all entries for that item from gtmp
4385: -- both done in following API

Line 4459: x_return_status := fnd_api.g_ret_sts_error;

4455: WHEN OTHERS THEN
4456: IF l_debug = 1 THEN
4457: print_debug('CREATE_REPL_MOVE_ORDER: Error creating move order: ' || sqlcode || ', ' || sqlerrm);
4458: END IF;
4459: x_return_status := fnd_api.g_ret_sts_error;
4460:
4461: END CREATE_REPL_MOVE_ORDER;
4462:
4463:

Line 4533: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;

4529: -- For bulk delete from the WRDG table
4530: l_detail_id_delete_tab num_tab;
4531: l_del_index NUMBER;
4532:
4533: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;
4534: l_detail_removed VARCHAR2(1) := 'N'; -- For bug#10185153
4535:
4536: CURSOR c_demand_lines_for_item(P_ORG_ID NUMBER, p_item_id number, p_fp_sub VARCHAR2) IS
4537: SELECT Repl_Sequence_id,

Line 4752: IF l_return_status <> fnd_api.g_ret_sts_success THEN

4748: , p_repl_status => 'R' -- for completed status
4749: , x_return_status => l_return_status
4750: );
4751:
4752: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4753: GOTO next_record;
4754: END IF;
4755:
4756:

Line 4782: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN

4778: x_mtl_reservation_tbl => l_rsv_rec,
4779: x_mtl_reservation_tbl_count => l_mtl_reservation_count,
4780: x_error_code => l_error_code);
4781:
4782: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN
4783: IF (l_debug = 1) THEN
4784: PRINT_DEBUG('Number of reservations found: ' ||l_mtl_reservation_count);
4785: END IF;
4786:

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

4829: x_return_status => l_return_status,
4830: x_msg_count => x_msg_count,
4831: x_msg_data => x_msg_data);
4832:
4833: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4834: IF (l_debug = 1) THEN
4835:
4836: print_debug('Error returned from create_reservation API: ' ||
4837: l_return_status);

Line 4909: IF l_return_status <> fnd_api.g_ret_sts_success THEN

4905: <>
4906: IF (l_debug = 1) THEN
4907: print_debug('At the end of current demand Available Open MO qty: '||L_mo_quantity);
4908: END IF;
4909: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4910: l_return_status := fnd_api.g_ret_sts_success;
4911: ROLLBACK TO current_demand_sp;
4912: END IF;
4913: END LOOP; -- for each demand line

Line 4910: l_return_status := fnd_api.g_ret_sts_success;

4906: IF (l_debug = 1) THEN
4907: print_debug('At the end of current demand Available Open MO qty: '||L_mo_quantity);
4908: END IF;
4909: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4910: l_return_status := fnd_api.g_ret_sts_success;
4911: ROLLBACK TO current_demand_sp;
4912: END IF;
4913: END LOOP; -- for each demand line
4914: CLOSE c_demand_lines_for_item;

Line 5022: x_return_status := fnd_api.g_ret_sts_success;

5018:
5019: IF (l_debug = 1) THEN
5020: print_debug('DONE WITH API - GET_OPEN_MO_QTY' );
5021: END IF;
5022: x_return_status := fnd_api.g_ret_sts_success;
5023: EXCEPTION
5024: WHEN OTHERS THEN
5025: x_return_status := fnd_api.g_ret_sts_error;
5026: IF c_demand_lines_for_item%ISOPEN THEN

Line 5025: x_return_status := fnd_api.g_ret_sts_error;

5021: END IF;
5022: x_return_status := fnd_api.g_ret_sts_success;
5023: EXCEPTION
5024: WHEN OTHERS THEN
5025: x_return_status := fnd_api.g_ret_sts_error;
5026: IF c_demand_lines_for_item%ISOPEN THEN
5027: CLOSE c_demand_lines_for_item;
5028: END IF;
5029: IF c_open_mo_lines%ISOPEN THEN

Line 5111: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;

5107: AND inventory_item_id = p_item_id
5108: AND repl_to_subinventory_code = p_fp_sub
5109: order by Repl_Sequence_id;
5110:
5111: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;
5112: BEGIN
5113:
5114: x_return_status := l_return_status;
5115:

Line 5195: l_return_status := fnd_api.g_ret_sts_error;

5191: ELSE
5192: IF (l_debug = 1) THEN
5193: print_debug('Error: Item detail not found');
5194: END IF;
5195: l_return_status := fnd_api.g_ret_sts_error;
5196: GOTO next_onhd_consol_rec;
5197: END IF; -- for inv_cache.set_item_rec
5198:
5199:

Line 5213: , p_init_msg_lst => fnd_api.g_false

5209:
5210: inv_quantity_tree_pub.query_quantities
5211: (
5212: p_api_version_number => 1.0
5213: , p_init_msg_lst => fnd_api.g_false
5214: , x_return_status => l_return_status
5215: , x_msg_count => x_msg_count
5216: , x_msg_data => x_msg_data
5217: , p_organization_id => x_consol_item_repl_tbl(i).organization_id

Line 5242: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN

5238: IF (l_debug = 1) THEN
5239: print_debug( 'Return status from QTY TREE:' ||l_return_status);
5240: print_debug( 'l_atr is: '||l_atr);
5241: END IF;
5242: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
5243: GOTO next_onhd_consol_rec;
5244: END IF;
5245: -- Store the demand line for which the qty tree was called
5246: l_qty_tree_demand_line_id := l_demand_line_id;

Line 5304: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN

5300: x_mtl_reservation_tbl => l_rsv_rec,
5301: x_mtl_reservation_tbl_count => l_mtl_reservation_count,
5302: x_error_code => l_error_code);
5303:
5304: IF l_RETURN_status = fnd_api.g_ret_sts_success THEN
5305: IF (l_debug = 1) THEN
5306: PRINT_DEBUG('*****Number of reservations found: ' ||l_mtl_reservation_count);
5307: END IF;
5308:

Line 5348: l_return_status := fnd_api.g_ret_sts_error;

5344: -- means mixed level of rsv, we will rather CREATE NEW replenishment
5345: -- We will not account for these rsv in this case
5346: -- Since we need to skip to next demand and
5347: -- behave as if this demand is in error
5348: l_return_status := fnd_api.g_ret_sts_error;
5349: GOTO next_dmd_record;
5350: END IF;
5351:
5352: END IF;

Line 5380: IF l_return_status <> fnd_api.g_ret_sts_success THEN

5376: , p_repl_status => 'C' -- for completed status
5377: , x_return_status => l_return_status
5378: );
5379:
5380: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5381: GOTO next_dmd_record;
5382: END IF;
5383:
5384:

Line 5444: IF l_return_status <> fnd_api.g_ret_sts_success THEN

5440: , p_repl_status => 'C' -- for completed status
5441: , x_return_status => l_return_status
5442: );
5443:
5444: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5445: GOTO next_dmd_record;
5446: END IF;
5447:
5448: IF (l_debug = 1) THEN

Line 5487: l_return_status := fnd_api.g_ret_sts_error;

5483: ELSE -- menas detailed at other sub
5484: -- SKIP current demand line assuming it will be fulfilled up by other sub
5485: -- Since we need to skip to next demand and
5486: -- behave as if this demand is in error
5487: l_return_status := fnd_api.g_ret_sts_error;
5488: GOTO next_dmd_record;
5489: END IF;
5490:
5491:

Line 5507: l_return_status := fnd_api.g_ret_sts_success;

5503: print_debug('p_Create_Rsv is Y and qty available - Creating detailed rsv AT FP sub' );
5504: END IF;
5505:
5506: --TEST: CALL Create_RSV() API to create reservation AT DETAILED LEVEL to this sub
5507: l_return_status := fnd_api.g_ret_sts_success;
5508: Create_RSV(p_replenishment_type => 1, -- 1- Stock Up/Push; 2- Dynamic/Pull
5509: l_debug => l_debug,
5510: l_organization_id => x_consol_item_repl_tbl(i).ORGANIZATION_ID,
5511: l_inventory_item_id => x_consol_item_repl_tbl(i).item_id,

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

5534: x_msg_count => x_msg_count,
5535: x_msg_data => x_msg_data
5536: );
5537:
5538: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
5539: IF (l_debug = 1) THEN
5540: print_debug('Error returned from create_reservation API: ' || l_return_status);
5541: END IF;
5542: -- Proceed to next record. In this case we might have extra amount on MOL than rsv

Line 5576: IF l_return_status <> fnd_api.g_ret_sts_success THEN

5572: , p_repl_status => 'C' -- for completed status
5573: , x_return_status => l_return_status
5574: );
5575:
5576: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5577: GOTO next_dmd_record;
5578: END IF;
5579:
5580: END IF; -- FOR IF l_repl_status <> 'C'

Line 5690: IF l_return_status <> fnd_api.g_ret_sts_success THEN

5686: l_prev_item_id := x_consol_item_repl_tbl(i).item_id;
5687: l_prev_sub_code := x_consol_item_repl_tbl(i).repl_to_subinventory_code;
5688: print_debug( 'l_atr AT THE END OF CURRENT DEMAND LINE: '||l_atr);
5689:
5690: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5691: IF (l_debug = 1 ) THEN
5692: print_debug('Move to next demand record ignoring this one');
5693: END IF;
5694: ROLLBACK TO onhd_demand_line_sp;

Line 5695: l_return_status := fnd_api.g_ret_sts_success;

5691: IF (l_debug = 1 ) THEN
5692: print_debug('Move to next demand record ignoring this one');
5693: END IF;
5694: ROLLBACK TO onhd_demand_line_sp;
5695: l_return_status := fnd_api.g_ret_sts_success;
5696: x_consol_item_repl_tbl(i).total_demand_qty :=
5697: x_consol_item_repl_tbl(i).total_demand_qty - l_demand_quantity_in_repl_uom;
5698:
5699: -- For pull and demand_type_id<>4, Backorder the WDD

Line 5740: IF l_return_status <> fnd_api.g_ret_sts_success then

5736: := (x_consol_item_repl_tbl(i).total_demand_qty - x_consol_item_repl_tbl(i).available_onhand_qty);
5737:
5738: --Note: the final replenishment qty will be upp by the p_Repl_Lot_Size in Create_repl_Move_order() API
5739: <>
5740: IF l_return_status <> fnd_api.g_ret_sts_success then
5741: l_return_status := fnd_api.g_ret_sts_success;
5742: ROLLBACK TO onhd_consol_rec_sp;
5743: -- if repl_type 2 and demand_type_id <> 4 then revert that WDD to original status
5744: -- remove all entries for that item from gtmp

Line 5741: l_return_status := fnd_api.g_ret_sts_success;

5737:
5738: --Note: the final replenishment qty will be upp by the p_Repl_Lot_Size in Create_repl_Move_order() API
5739: <>
5740: IF l_return_status <> fnd_api.g_ret_sts_success then
5741: l_return_status := fnd_api.g_ret_sts_success;
5742: ROLLBACK TO onhd_consol_rec_sp;
5743: -- if repl_type 2 and demand_type_id <> 4 then revert that WDD to original status
5744: -- remove all entries for that item from gtmp
5745: -- both done in following API

Line 5778: x_return_status := fnd_api.g_ret_sts_success;

5774:
5775: IF (l_debug = 1 ) THEN
5776: print_debug('DONE WITH GET_AVAILABLE_ONHAND_QTY API');
5777: END IF;
5778: x_return_status := fnd_api.g_ret_sts_success;
5779: EXCEPTION
5780: WHEN OTHERS THEN
5781: IF c_demand_lines_for_item%ISOPEN THEN
5782: CLOSE c_demand_lines_for_item;

Line 5787: x_return_status := fnd_api.g_ret_sts_error;

5783: END IF;
5784: IF (l_debug = 1) THEN
5785: print_debug('Error in GET_AVAILABLE_ONHAND_QTY SQLCODE:'||SQLCODE ||' '||SQLERRM );
5786: END IF;
5787: x_return_status := fnd_api.g_ret_sts_error;
5788: END GET_AVAILABLE_ONHAND_QTY;
5789:
5790:
5791:

Line 5919: p_init_msg_lst => fnd_api.g_false,

5915: print_debug('Call the create_reservation API to create the replenishemnt reservation');
5916: END IF;
5917:
5918: INV_RESERVATION_PVT.create_reservation(p_api_version_number => 1.0,
5919: p_init_msg_lst => fnd_api.g_false,
5920: x_return_status => x_return_status,
5921: x_msg_count => x_msg_count,
5922: x_msg_data => x_msg_data,
5923: p_rsv_rec => l_rsv_rec,

Line 5926: p_partial_reservation_flag => fnd_api.g_false,

5922: x_msg_data => x_msg_data,
5923: p_rsv_rec => l_rsv_rec,
5924: p_serial_number => l_serial_number,
5925: x_serial_number => l_to_serial_number,
5926: p_partial_reservation_flag => fnd_api.g_false,
5927: p_force_reservation_flag => fnd_api.g_false,
5928: p_validation_flag => fnd_api.g_true,
5929: x_quantity_reserved => l_quantity_reserved,
5930: x_secondary_quantity_reserved => l_quantity_reserved2,

Line 5927: p_force_reservation_flag => fnd_api.g_false,

5923: p_rsv_rec => l_rsv_rec,
5924: p_serial_number => l_serial_number,
5925: x_serial_number => l_to_serial_number,
5926: p_partial_reservation_flag => fnd_api.g_false,
5927: p_force_reservation_flag => fnd_api.g_false,
5928: p_validation_flag => fnd_api.g_true,
5929: x_quantity_reserved => l_quantity_reserved,
5930: x_secondary_quantity_reserved => l_quantity_reserved2,
5931: x_reservation_id => l_rsv_id);

Line 5928: p_validation_flag => fnd_api.g_true,

5924: p_serial_number => l_serial_number,
5925: x_serial_number => l_to_serial_number,
5926: p_partial_reservation_flag => fnd_api.g_false,
5927: p_force_reservation_flag => fnd_api.g_false,
5928: p_validation_flag => fnd_api.g_true,
5929: x_quantity_reserved => l_quantity_reserved,
5930: x_secondary_quantity_reserved => l_quantity_reserved2,
5931: x_reservation_id => l_rsv_id);
5932:

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

5929: x_quantity_reserved => l_quantity_reserved,
5930: x_secondary_quantity_reserved => l_quantity_reserved2,
5931: x_reservation_id => l_rsv_id);
5932:
5933: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
5934: IF (l_debug = 1) THEN
5935:
5936: print_debug('Error returned from INV create_reservation API: ' ||
5937: x_return_status);

Line 5940: RAISE FND_API.G_EXC_ERROR;

5936: print_debug('Error returned from INV create_reservation API: ' ||
5937: x_return_status);
5938: END IF;
5939: -- Raise an exception. The caller will do the rollback, cleanups,
5940: RAISE FND_API.G_EXC_ERROR;
5941:
5942: END IF;
5943:
5944: l_progress := '20';

Line 5948: x_return_status := fnd_api.g_ret_sts_error;

5944: l_progress := '20';
5945:
5946: EXCEPTION
5947: WHEN OTHERS THEN
5948: x_return_status := fnd_api.g_ret_sts_error;
5949: fnd_msg_pub.count_and_get(p_count => x_msg_count,
5950: p_data => x_msg_data);
5951: IF (l_debug = 1) THEN
5952: print_debug('Exiting Create_RSV - Execution error: ' || l_progress || ' ' ||

Line 6699: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;

6695: l_date_required_tb date_tab;
6696:
6697: l_temp_cnt NUMBER; -- removei t
6698:
6699: l_return_status VARCHAR2(3) := fnd_api.g_ret_sts_success;
6700: l_revert_wdd BOOLEAN := FALSE;
6701:
6702: l_bkorder_cnt NUMBER;
6703: BEGIN

Line 6730: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN

6726:
6727: IF (l_debug = 1) THEN
6728: print_debug('Status after calling init_rules'||l_return_status);
6729: END IF;
6730: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
6731: GOTO end_populate;
6732: END IF;
6733:
6734:

Line 6775: l_return_status := fnd_api.g_ret_sts_error;

6771: WHEN OTHERS THEN
6772: IF (l_debug = 1) THEN
6773: print_debug('Exception retrieving open repl demand records');
6774: END IF;
6775: l_return_status := fnd_api.g_ret_sts_error;
6776: GOTO end_populate;
6777: END;
6778:
6779: select pick_from_subinventory INTO l_PR_sub

Line 6900: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN

6896: l_quantity_in_repl_uom_tb.DELETE(j);
6897: l_repl_uom_code_tb.DELETE(j);
6898:
6899:
6900: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
6901: -- if we are unable to revert a WDD, we should
6902: -- essentially revery everything back
6903: -- as if could not do anything in populating
6904: l_item_id_tb.DELETE;

Line 6917: l_return_status := fnd_api.g_ret_sts_error;

6913: l_released_status_tb.DELETE;
6914: l_repl_to_sub_code_tb.DELETE;
6915: l_quantity_in_repl_uom_tb.DELETE;
6916: l_repl_uom_code_tb.DELETE;
6917: l_return_status := fnd_api.g_ret_sts_error;
6918: GOTO end_populate;
6919: END IF;
6920: END IF; -- IF (l_revert_wdd) THEN
6921: END LOOP; -- FOR j IN 1..l_delivery_detail_id_tb.COUNT LOOP

Line 7005: l_return_status := fnd_api.g_ret_sts_error;

7001: WHEN OTHERS THEN
7002: IF (l_debug = 1) THEN
7003: print_debug('Exception retrieving item repl records for Dynamic');
7004: END IF;
7005: l_return_status := fnd_api.g_ret_sts_error;
7006: GOTO end_populate;
7007: END;
7008:
7009: --Clear consolidated table

Line 7047: IF l_return_status <> FND_API.g_ret_sts_success THEN

7043: IF l_debug = 1 THEN
7044: print_debug('Return Status after call to ADJUST_ATR_FOR_ITEM :'|| l_return_status);
7045: END IF;
7046:
7047: IF l_return_status <> FND_API.g_ret_sts_success THEN
7048: -- All error out
7049: GOTO end_populate;
7050: END IF;
7051: END IF;

Line 7055: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN

7051: END IF;
7052:
7053:
7054: <>
7055: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
7056: -- Raising excetion so that will call revert of WDD status for all WDDs
7057: -- in the DYNAMIC_REPLENISHMENT api
7058: RAISE fnd_api.g_exc_unexpected_error;
7059: END IF;

Line 7058: RAISE fnd_api.g_exc_unexpected_error;

7054: <>
7055: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
7056: -- Raising excetion so that will call revert of WDD status for all WDDs
7057: -- in the DYNAMIC_REPLENISHMENT api
7058: RAISE fnd_api.g_exc_unexpected_error;
7059: END IF;
7060:
7061: x_return_status := FND_API.G_RET_STS_SUCCESS;
7062: IF l_debug = 1 THEN

Line 7061: x_return_status := FND_API.G_RET_STS_SUCCESS;

7057: -- in the DYNAMIC_REPLENISHMENT api
7058: RAISE fnd_api.g_exc_unexpected_error;
7059: END IF;
7060:
7061: x_return_status := FND_API.G_RET_STS_SUCCESS;
7062: IF l_debug = 1 THEN
7063: print_debug('DONE WITH API POPULATE_DYNAMIC_REPL_DEMAND');
7064: END IF;
7065:

Line 7072: x_return_status := fnd_api.g_ret_sts_error;

7068: IF l_debug = 1 THEN
7069: print_debug('Exception in POPULATE_DYNAMIC_REPL_DEMAND: ' || sqlcode || ', ' || sqlerrm);
7070: END IF;
7071: ROLLBACK TO populate_dyn_demand_sp;
7072: x_return_status := fnd_api.g_ret_sts_error;
7073: x_consol_item_repl_tbl.DELETE;
7074: END POPULATE_DYNAMIC_REPL_DEMAND;
7075:
7076:

Line 7436: p_init_msg_list => fnd_api.g_false,

7432: END IF;
7433:
7434: WMS_Engine_PVT.create_suggestions(
7435: p_api_version => 1.0,
7436: p_init_msg_list => fnd_api.g_false,
7437: p_commit => fnd_api.g_false,
7438: p_validation_level => fnd_api.g_valid_level_none,
7439: x_return_status => l_return_status,
7440: x_msg_count => l_msg_count,

Line 7437: p_commit => fnd_api.g_false,

7433:
7434: WMS_Engine_PVT.create_suggestions(
7435: p_api_version => 1.0,
7436: p_init_msg_list => fnd_api.g_false,
7437: p_commit => fnd_api.g_false,
7438: p_validation_level => fnd_api.g_valid_level_none,
7439: x_return_status => l_return_status,
7440: x_msg_count => l_msg_count,
7441: x_msg_data => l_msg_data,

Line 7438: p_validation_level => fnd_api.g_valid_level_none,

7434: WMS_Engine_PVT.create_suggestions(
7435: p_api_version => 1.0,
7436: p_init_msg_list => fnd_api.g_false,
7437: p_commit => fnd_api.g_false,
7438: p_validation_level => fnd_api.g_valid_level_none,
7439: x_return_status => l_return_status,
7440: x_msg_count => l_msg_count,
7441: x_msg_data => l_msg_data,
7442: p_transaction_temp_id => l_open_repl_mo.line_id,

Line 7444: p_suggest_serial => fnd_api.g_false,

7440: x_msg_count => l_msg_count,
7441: x_msg_data => l_msg_data,
7442: p_transaction_temp_id => l_open_repl_mo.line_id,
7443: p_reservations => l_rsv_tbl_tmp, --NULL value AS no rsv FOR repl MO
7444: p_suggest_serial => fnd_api.g_false,
7445: p_plan_tasks => FALSE);
7446:
7447:
7448: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

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

7444: p_suggest_serial => fnd_api.g_false,
7445: p_plan_tasks => FALSE);
7446:
7447:
7448: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
7449: IF (l_debug = 1) THEN
7450: print_debug('Error returned from create_suggestions API: '
7451: || l_return_status);
7452: END IF;

Line 7457: RAISE fnd_api.g_exc_error;

7453:
7454: -- If an exception occurs while modifying a database record, rollback the changes
7455: -- and raise exception. Should we proceed to next record
7456: ROLLBACK TO Current_MOL_SP;
7457: RAISE fnd_api.g_exc_error;
7458: ELSE
7459:
7460: IF (l_debug = 1) THEN
7461: print_debug('Success returned from create_suggestions API');

Line 7590: x_return_status := FND_API.G_RET_STS_SUCCESS;

7586: END LOOP; -- For each REPL MO line under consideration
7587:
7588:
7589: COMMIT;
7590: x_return_status := FND_API.G_RET_STS_SUCCESS;
7591:
7592: EXCEPTION
7593: WHEN OTHERS THEN
7594: IF l_debug = 1 THEN

Line 7597: x_return_status := FND_API.G_RET_STS_ERROR;

7593: WHEN OTHERS THEN
7594: IF l_debug = 1 THEN
7595: print_debug('Exception in ALLOCATE_REPL_MOVE_ORDER: ' || sqlcode || ', ' || sqlerrm);
7596: END IF;
7597: x_return_status := FND_API.G_RET_STS_ERROR;
7598: END ALLOCATE_REPL_MOVE_ORDER;
7599:
7600:
7601: PROCEDURE UPDATE_DELIVERY_DETAIL (

Line 7754: x_return_status := FND_API.G_RET_STS_SUCCESS;

7750: END IF; -- FOR l_orig_pri_qty <> -9999
7751:
7752: END IF; -- MEANS DELIVERY IS SPLIT
7753:
7754: x_return_status := FND_API.G_RET_STS_SUCCESS;
7755: EXCEPTION
7756: WHEN OTHERS THEN
7757: IF l_debug = 1 THEN
7758: print_debug('Exception in update_delivery_detail: ' || sqlcode || ', ' || sqlerrm);