31: ,p_cancel_to_quantity IN NUMBER
32: ,p_cancellation_comments IN VARCHAR2
33: ,p_reason_code IN VARCHAR2
34: ,p_cancellation_type IN VARCHAR2
35: ,p_mc_err_handling_flag IN NUMBER := FND_API.G_MISS_NUM
36: ,x_msg_count OUT NOCOPY NUMBER
37:
38: ,x_msg_data OUT NOCOPY VARCHAR2
39:
86: l_header_id number;
87: l_tblcount number := 0;
88: --
89: BEGIN
90: x_return_status := fnd_api.g_ret_sts_success;
91: g_record_ids := l_record_ids; -- Added For bug#2965878
92: IF l_debug_level > 0 THEN
93: oe_debug_pub.add( 'ENTER PROCEDURE PROCESS CANCEL QTY' , 1 ) ;
94: END IF;
146: x_return_status => l_return_status);
147:
148: END IF;
149:
150: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
151: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
152: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
153: RAISE FND_API.G_EXC_ERROR;
154: END IF;
147:
148: END IF;
149:
150: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
151: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
152: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
153: RAISE FND_API.G_EXC_ERROR;
154: END IF;
155: l_header_id := l_record_ids(i).id2;
148: END IF;
149:
150: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
151: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
152: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
153: RAISE FND_API.G_EXC_ERROR;
154: END IF;
155: l_header_id := l_record_ids(i).id2;
156: l_line_tbl.delete;
149:
150: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
151: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
152: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
153: RAISE FND_API.G_EXC_ERROR;
154: END IF;
155: l_header_id := l_record_ids(i).id2;
156: l_line_tbl.delete;
157: l_tblcount := 0;
185: p_x_line_rec => l_line_rec,
186: x_return_status => l_return_status
187: );
188:
189: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
190: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
191: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
192: RAISE FND_API.G_EXC_ERROR;
193: END IF;
186: x_return_status => l_return_status
187: );
188:
189: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
190: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
191: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
192: RAISE FND_API.G_EXC_ERROR;
193: END IF;
194:
187: );
188:
189: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
190: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
191: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
192: RAISE FND_API.G_EXC_ERROR;
193: END IF;
194:
195: IF l_line_rec.split_action_code = FND_API.G_MISS_CHAR THEN
188:
189: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
190: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
191: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
192: RAISE FND_API.G_EXC_ERROR;
193: END IF;
194:
195: IF l_line_rec.split_action_code = FND_API.G_MISS_CHAR THEN
196: IF l_debug_level > 0 THEN
191: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
192: RAISE FND_API.G_EXC_ERROR;
193: END IF;
194:
195: IF l_line_rec.split_action_code = FND_API.G_MISS_CHAR THEN
196: IF l_debug_level > 0 THEN
197: oe_debug_pub.add( 'SPLIT ACTION CODE MISSING' , 1 ) ;
198: END IF;
199: ELSIF l_line_rec.split_action_code IS NULL THEN
216:
217: if (l_ordered_quantity = 0 or l_line_rec.cancelled_flag = 'Y') then
218: fnd_message.set_name('ONT', 'OE_CANCEL_NOTHING');
219: oe_msg_pub.add;
220: RAISE FND_API.G_EXC_ERROR ;
221: end if;
222:
223: IF l_debug_level > 0 THEN
224: oe_debug_pub.add( 'LINE ID '||TO_CHAR ( L_LINE_REC.LINE_ID ) || ' , ORD QTY '||TO_CHAR ( L_LINE_REC.ORDERED_QUANTITY ) || ' , CANCEL TYPE '|| P_CANCELLATION_TYPE , 1 ) ;
337: IF l_debug_level > 0 THEN
338: oe_debug_pub.add( 'AFTER CALLING LINES PROCEDURE' , 1 ) ;
339: END IF;
340:
341: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
338: oe_debug_pub.add( 'AFTER CALLING LINES PROCEDURE' , 1 ) ;
339: END IF;
340:
341: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
346:
339: END IF;
340:
341: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
346:
347: IF l_debug_level > 0 THEN
340:
341: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
346:
347: IF l_debug_level > 0 THEN
348: oe_debug_pub.add( 'AFTER CALLING PROCESSE for last set' , 1 ) ;
354: );
355:
356: x_return_status := l_return_status;
357:
358: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
359: IF l_debug_level > 0 THEN
360: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
361: END IF;
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
358: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
359: IF l_debug_level > 0 THEN
360: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
361: END IF;
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
363: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
364: IF l_debug_level > 0 THEN
365: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
366: END IF;
359: IF l_debug_level > 0 THEN
360: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
361: END IF;
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
363: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
364: IF l_debug_level > 0 THEN
365: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
366: END IF;
367: RAISE FND_API.G_EXC_ERROR;
363: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
364: IF l_debug_level > 0 THEN
365: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
366: END IF;
367: RAISE FND_API.G_EXC_ERROR;
368: END IF;
369:
370: IF l_debug_level > 0 THEN
371: oe_debug_pub.add( L_RETURN_STATUS ) ;
372: END IF;
373:
374: EXCEPTION /* Procedure exception handler */
375:
376: WHEN FND_API.G_EXC_ERROR THEN
377: x_return_status := FND_API.G_RET_STS_ERROR ;
378: OE_MSG_PUB.Count_And_Get
379: ( p_count => x_msg_count,
380: p_data => x_msg_data
373:
374: EXCEPTION /* Procedure exception handler */
375:
376: WHEN FND_API.G_EXC_ERROR THEN
377: x_return_status := FND_API.G_RET_STS_ERROR ;
378: OE_MSG_PUB.Count_And_Get
379: ( p_count => x_msg_count,
380: p_data => x_msg_data
381: );
380: p_data => x_msg_data
381: );
382: ROLLBACK TO SAVEPOINT Process_cancel_quantity;
383:
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
386: OE_MSG_PUB.Count_And_Get
387: ( p_count => x_msg_count,
388: p_data => x_msg_data
381: );
382: ROLLBACK TO SAVEPOINT Process_cancel_quantity;
383:
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
386: OE_MSG_PUB.Count_And_Get
387: ( p_count => x_msg_count,
388: p_data => x_msg_data
389: );
389: );
390: ROLLBACK TO SAVEPOINT Process_cancel_quantity;
391:
392: WHEN OTHERS THEN
393: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
394: IF OE_MSG_PUB.Check_Msg_Level
395: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
396: THEN
397: OE_MSG_PUB.Add_Exc_Msg
410: ( p_num_of_records IN NUMBER
411: ,p_record_ids IN OE_GLOBALS.Selected_Record_Tbl -- MOAC
412: ,p_cancellation_comments IN VARCHAR2
413: ,p_reason_code IN VARCHAR2
414: ,p_mc_err_handling_flag IN NUMBER := FND_API.G_MISS_NUM
415: ,x_msg_count OUT NOCOPY NUMBER
416:
417: ,x_msg_data OUT NOCOPY VARCHAR2
418:
489: ( p_header_id => l_header_id,
490: p_x_header_rec => l_header_rec
491: ,x_return_status => l_return_status
492: );
493: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
494: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
495: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
496: RAISE FND_API.G_EXC_ERROR;
497: END IF;
490: p_x_header_rec => l_header_rec
491: ,x_return_status => l_return_status
492: );
493: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
494: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
495: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
496: RAISE FND_API.G_EXC_ERROR;
497: END IF;
498:
491: ,x_return_status => l_return_status
492: );
493: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
494: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
495: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
496: RAISE FND_API.G_EXC_ERROR;
497: END IF;
498:
499: l_old_header_rec := l_header_rec;
492: );
493: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
494: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
495: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
496: RAISE FND_API.G_EXC_ERROR;
497: END IF;
498:
499: l_old_header_rec := l_header_rec;
500: IF l_debug_level > 0 THEN
509: L_header_rec.Order_Number);
510:
511:
512: oe_msg_pub.Add;
513: RAISE FND_API.G_EXC_ERROR ;
514: END IF;
515: IF nvl(l_header_rec.open_flag,'N') = 'N' THEN
516: IF l_debug_level > 0 THEN
517: oe_debug_pub.add( 'CANCELLED FLAG'||L_HEADER_REC.CANCELLED_FLAG , 1 ) ;
519: fnd_message.set_name('ONT', 'OE_CAN_ORDER_CLOSED');
520: FND_MESSAGE.SET_TOKEN('ORDER',
521: L_header_rec.Order_Number);
522: oe_msg_pub.Add;
523: RAISE FND_API.G_EXC_ERROR ;
524: END IF;
525:
526: l_header_rec.cancelled_flag :='Y';
527: l_header_rec.change_reason :=p_reason_code;
528: l_header_rec.change_comments :=p_cancellation_comments;
529: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
530:
531: oe_order_pvt.Header
532: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
533: , p_control_rec => l_control_rec
534: , p_x_header_rec => l_header_rec
535: , p_x_old_header_rec => l_old_header_rec
536: , x_return_status => l_return_status
542: p_data => x_msg_data
543: );
544:
545:
546: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
548: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
549: RAISE FND_API.G_EXC_ERROR;
550: END IF;
543: );
544:
545:
546: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
548: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
549: RAISE FND_API.G_EXC_ERROR;
550: END IF;
551:
544:
545:
546: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
548: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
549: RAISE FND_API.G_EXC_ERROR;
550: END IF;
551:
552:
545:
546: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
548: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
549: RAISE FND_API.G_EXC_ERROR;
550: END IF;
551:
552:
553: -- Api to call notify OC and Process Delayed Requests
566: x_return_status := l_return_status;
567: IF l_debug_level > 0 THEN
568: oe_debug_pub.add( L_RETURN_STATUS ) ;
569: END IF;
570: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
571: IF l_debug_level > 0 THEN
572: oe_debug_pub.add( 'CANCELLATION UNEXPECTED FAILURE' ) ;
573: END IF;
574: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
570: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
571: IF l_debug_level > 0 THEN
572: oe_debug_pub.add( 'CANCELLATION UNEXPECTED FAILURE' ) ;
573: END IF;
574: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
575: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
576: IF l_debug_level > 0 THEN
577: oe_debug_pub.add( 'CANCELLATION EXPECTED FAILURE' ) ;
578: END IF;
571: IF l_debug_level > 0 THEN
572: oe_debug_pub.add( 'CANCELLATION UNEXPECTED FAILURE' ) ;
573: END IF;
574: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
575: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
576: IF l_debug_level > 0 THEN
577: oe_debug_pub.add( 'CANCELLATION EXPECTED FAILURE' ) ;
578: END IF;
579: RAISE FND_API.G_EXC_ERROR;
575: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
576: IF l_debug_level > 0 THEN
577: oe_debug_pub.add( 'CANCELLATION EXPECTED FAILURE' ) ;
578: END IF;
579: RAISE FND_API.G_EXC_ERROR;
580: END IF;
581:
582:
583: End LOOP; /* end of FOR loop */
585: g_ord_lvl_can := FALSE; --For fix bug# 2922468.
586:
587: EXCEPTION /* Procedure exception handler */
588:
589: WHEN FND_API.G_EXC_ERROR THEN
590: x_return_status := FND_API.G_RET_STS_ERROR ;
591: OE_MSG_PUB.Count_And_Get
592: ( p_count => x_msg_count,
593: p_data => x_msg_data
586:
587: EXCEPTION /* Procedure exception handler */
588:
589: WHEN FND_API.G_EXC_ERROR THEN
590: x_return_status := FND_API.G_RET_STS_ERROR ;
591: OE_MSG_PUB.Count_And_Get
592: ( p_count => x_msg_count,
593: p_data => x_msg_data
594: );
594: );
595: g_ord_lvl_can := FALSE; --For fix bug# 2922468.
596: ROLLBACK TO SAVEPOINT Process_cancel_order;
597:
598: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
600: OE_MSG_PUB.Count_And_Get
601: ( p_count => x_msg_count,
602: p_data => x_msg_data
595: g_ord_lvl_can := FALSE; --For fix bug# 2922468.
596: ROLLBACK TO SAVEPOINT Process_cancel_order;
597:
598: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
600: OE_MSG_PUB.Count_And_Get
601: ( p_count => x_msg_count,
602: p_data => x_msg_data
603: );
604: g_ord_lvl_can:=FALSE; --Fix for bug# 2922468.
605: ROLLBACK TO SAVEPOINT Process_cancel_order;
606:
607: WHEN OTHERS THEN
608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
609: IF OE_MSG_PUB.Check_Msg_Level
610: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
611: THEN
612: OE_MSG_PUB.Add_Exc_Msg
648: OE_Line_Util.Query_Row
649: ( p_line_id => p_line_id,
650: x_line_rec => g_line_rec
651: );
652: g_line_rec.db_flag := FND_API.G_TRUE;
653:
654: -- Load DB record
655:
656:
746: p_header_id => l_header_id
747: , x_return_status => x_return_status
748: );
749:
750: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
751: IF l_debug_level > 0 THEN
752: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
753: END IF;
754: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
750: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
751: IF l_debug_level > 0 THEN
752: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
753: END IF;
754: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
755: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
756: IF l_debug_level > 0 THEN
757: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
758: END IF;
751: IF l_debug_level > 0 THEN
752: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
753: END IF;
754: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
755: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
756: IF l_debug_level > 0 THEN
757: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
758: END IF;
759: OE_MSG_PUB.Count_And_Get
761: p_data => x_msg_data
762: );
763:
764: /* Fix Bug # 3000720: If there is an error, everything must rollback */
765: RAISE FND_API.G_EXC_ERROR;
766: END IF;
767:
768: END LOOP;
769:
768: END LOOP;
769:
770: EXCEPTION /* Procedure exception handler */
771:
772: WHEN FND_API.G_EXC_ERROR THEN
773: x_return_status := FND_API.G_RET_STS_ERROR ;
774: OE_MSG_PUB.Count_And_Get
775: ( p_count => x_msg_count,
776: p_data => x_msg_data
769:
770: EXCEPTION /* Procedure exception handler */
771:
772: WHEN FND_API.G_EXC_ERROR THEN
773: x_return_status := FND_API.G_RET_STS_ERROR ;
774: OE_MSG_PUB.Count_And_Get
775: ( p_count => x_msg_count,
776: p_data => x_msg_data
777: );
775: ( p_count => x_msg_count,
776: p_data => x_msg_data
777: );
778: ROLLBACK TO SAVEPOINT Cancel_Remaining_Order;
779: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
781: OE_MSG_PUB.Count_And_Get
782: ( p_count => x_msg_count,
783: p_data => x_msg_data
776: p_data => x_msg_data
777: );
778: ROLLBACK TO SAVEPOINT Cancel_Remaining_Order;
779: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
781: OE_MSG_PUB.Count_And_Get
782: ( p_count => x_msg_count,
783: p_data => x_msg_data
784: );
782: ( p_count => x_msg_count,
783: p_data => x_msg_data
784: );
785: WHEN OTHERS THEN
786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
787: IF OE_MSG_PUB.Check_Msg_Level
788: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
789: THEN
790: OE_MSG_PUB.Add_Exc_Msg
816: IF l_debug_level > 0 THEN
817: oe_debug_pub.add( 'BEFORE CALLING PROCESSS ORDER LINES PROCEDURE' , 1 ) ;
818: END IF;
819:
820: x_return_status := FND_API.G_RET_STS_SUCCESS;
821:
822:
823: -- Call OE_Order_PVT.Process_order
824: IF l_debug_level > 0 THEN
824: IF l_debug_level > 0 THEN
825: oe_debug_pub.add( 'CALLING PROCESS ORDER' , 1 ) ;
826: END IF;
827: oe_order_pvt.Lines
828: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
829: , p_control_rec => l_control_rec
830: , p_x_line_tbl => l_line_tbl
831: , p_x_old_line_tbl => l_old_line_tbl
832: , x_return_status => x_return_status
835: IF l_debug_level > 0 THEN
836: oe_debug_pub.add( 'AFTER CALLING LINES PROCEDURE' , 1 ) ;
837: END IF;
838:
839: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
840: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
841: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
842: RAISE FND_API.G_EXC_ERROR;
843: END IF;
836: oe_debug_pub.add( 'AFTER CALLING LINES PROCEDURE' , 1 ) ;
837: END IF;
838:
839: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
840: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
841: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
842: RAISE FND_API.G_EXC_ERROR;
843: END IF;
844:
837: END IF;
838:
839: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
840: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
841: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
842: RAISE FND_API.G_EXC_ERROR;
843: END IF;
844:
845: OE_Order_PVT.Process_Requests_And_Notify
838:
839: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
840: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
841: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
842: RAISE FND_API.G_EXC_ERROR;
843: END IF;
844:
845: OE_Order_PVT.Process_Requests_And_Notify
846: ( p_process_requests => TRUE
859: );
860:
861: x_return_status := x_return_status;
862:
863: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
864: IF l_debug_level > 0 THEN
865: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
866: END IF;
867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
863: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
864: IF l_debug_level > 0 THEN
865: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
866: END IF;
867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
868: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
869: IF l_debug_level > 0 THEN
870: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
871: END IF;
864: IF l_debug_level > 0 THEN
865: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
866: END IF;
867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
868: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
869: IF l_debug_level > 0 THEN
870: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
871: END IF;
872: RAISE FND_API.G_EXC_ERROR;
868: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
869: IF l_debug_level > 0 THEN
870: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
871: END IF;
872: RAISE FND_API.G_EXC_ERROR;
873: END IF;
874:
875: IF l_debug_level > 0 THEN
876: oe_debug_pub.add( x_RETURN_STATUS ) ;
877: END IF;
878:
879: EXCEPTION /* Procedure exception handler */
880:
881: WHEN FND_API.G_EXC_ERROR THEN
882: x_return_status := FND_API.G_RET_STS_ERROR ;
883: OE_MSG_PUB.Count_And_Get
884: ( p_count => x_msg_count,
885: p_data => x_msg_data
878:
879: EXCEPTION /* Procedure exception handler */
880:
881: WHEN FND_API.G_EXC_ERROR THEN
882: x_return_status := FND_API.G_RET_STS_ERROR ;
883: OE_MSG_PUB.Count_And_Get
884: ( p_count => x_msg_count,
885: p_data => x_msg_data
886: );
884: ( p_count => x_msg_count,
885: p_data => x_msg_data
886: );
887:
888: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
889: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
890: OE_MSG_PUB.Count_And_Get
891: ( p_count => x_msg_count,
892: p_data => x_msg_data
885: p_data => x_msg_data
886: );
887:
888: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
889: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
890: OE_MSG_PUB.Count_And_Get
891: ( p_count => x_msg_count,
892: p_data => x_msg_data
893: );
891: ( p_count => x_msg_count,
892: p_data => x_msg_data
893: );
894: WHEN OTHERS THEN
895: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
896: IF OE_MSG_PUB.Check_Msg_Level
897: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
898: THEN
899: OE_MSG_PUB.Add_Exc_Msg