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;
151: x_return_status => l_return_status);
152:
153: END IF;
154:
155: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
156: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
157: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
158: RAISE FND_API.G_EXC_ERROR;
159: END IF;
152:
153: END IF;
154:
155: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
156: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
157: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
158: RAISE FND_API.G_EXC_ERROR;
159: END IF;
160: l_header_id := l_record_ids(i).id3;
153: END IF;
154:
155: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
156: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
157: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
158: RAISE FND_API.G_EXC_ERROR;
159: END IF;
160: l_header_id := l_record_ids(i).id3;
161: l_line_tbl.delete;
154:
155: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
156: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
157: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
158: RAISE FND_API.G_EXC_ERROR;
159: END IF;
160: l_header_id := l_record_ids(i).id3;
161: l_line_tbl.delete;
162: l_tblcount := 0;
191: p_x_line_rec => l_line_rec,
192: x_return_status => l_return_status
193: );
194:
195: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
196: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
197: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
198: RAISE FND_API.G_EXC_ERROR;
199: END IF;
192: x_return_status => l_return_status
193: );
194:
195: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
196: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
197: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
198: RAISE FND_API.G_EXC_ERROR;
199: END IF;
200:
193: );
194:
195: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
196: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
197: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
198: RAISE FND_API.G_EXC_ERROR;
199: END IF;
200:
201: IF l_line_rec.split_action_code = FND_API.G_MISS_CHAR THEN
194:
195: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
196: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
197: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
198: RAISE FND_API.G_EXC_ERROR;
199: END IF;
200:
201: IF l_line_rec.split_action_code = FND_API.G_MISS_CHAR THEN
202: IF l_debug_level > 0 THEN
197: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
198: RAISE FND_API.G_EXC_ERROR;
199: END IF;
200:
201: IF l_line_rec.split_action_code = FND_API.G_MISS_CHAR THEN
202: IF l_debug_level > 0 THEN
203: oe_debug_pub.add( 'SPLIT ACTION CODE MISSING' , 1 ) ;
204: END IF;
205: ELSIF l_line_rec.split_action_code IS NULL THEN
222:
223: if (l_ordered_quantity = 0 or l_line_rec.cancelled_flag = 'Y') then
224: fnd_message.set_name('ONT', 'OE_CANCEL_NOTHING');
225: oe_msg_pub.add;
226: RAISE FND_API.G_EXC_ERROR ;
227: end if;
228:
229: IF l_debug_level > 0 THEN
230: 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 ) ;
343: IF l_debug_level > 0 THEN
344: oe_debug_pub.add( 'AFTER CALLING LINES PROCEDURE' , 1 ) ;
345: END IF;
346:
347: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
348: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
349: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
350: RAISE FND_API.G_EXC_ERROR;
351: END IF;
344: oe_debug_pub.add( 'AFTER CALLING LINES PROCEDURE' , 1 ) ;
345: END IF;
346:
347: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
348: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
349: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
350: RAISE FND_API.G_EXC_ERROR;
351: END IF;
352:
345: END IF;
346:
347: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
348: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
349: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
350: RAISE FND_API.G_EXC_ERROR;
351: END IF;
352:
353: IF l_debug_level > 0 THEN
346:
347: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
348: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
349: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
350: RAISE FND_API.G_EXC_ERROR;
351: END IF;
352:
353: IF l_debug_level > 0 THEN
354: oe_debug_pub.add( 'AFTER CALLING PROCESSE for last set' , 1 ) ;
360: );
361:
362: x_return_status := l_return_status;
363:
364: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
365: IF l_debug_level > 0 THEN
366: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
367: END IF;
368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
364: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
365: IF l_debug_level > 0 THEN
366: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
367: END IF;
368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
369: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
370: IF l_debug_level > 0 THEN
371: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
372: END IF;
365: IF l_debug_level > 0 THEN
366: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
367: END IF;
368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
369: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
370: IF l_debug_level > 0 THEN
371: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
372: END IF;
373: RAISE FND_API.G_EXC_ERROR;
369: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
370: IF l_debug_level > 0 THEN
371: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
372: END IF;
373: RAISE FND_API.G_EXC_ERROR;
374: END IF;
375:
376: IF l_debug_level > 0 THEN
377: oe_debug_pub.add( L_RETURN_STATUS ) ;
378: END IF;
379:
380: EXCEPTION /* Procedure exception handler */
381:
382: WHEN FND_API.G_EXC_ERROR THEN
383: x_return_status := FND_API.G_RET_STS_ERROR ;
384: OE_MSG_PUB.Count_And_Get
385: ( p_count => x_msg_count,
386: p_data => x_msg_data
379:
380: EXCEPTION /* Procedure exception handler */
381:
382: WHEN FND_API.G_EXC_ERROR THEN
383: x_return_status := FND_API.G_RET_STS_ERROR ;
384: OE_MSG_PUB.Count_And_Get
385: ( p_count => x_msg_count,
386: p_data => x_msg_data
387: );
386: p_data => x_msg_data
387: );
388: ROLLBACK TO SAVEPOINT Process_cancel_quantity;
389:
390: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
391: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
392: OE_MSG_PUB.Count_And_Get
393: ( p_count => x_msg_count,
394: p_data => x_msg_data
387: );
388: ROLLBACK TO SAVEPOINT Process_cancel_quantity;
389:
390: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
391: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
392: OE_MSG_PUB.Count_And_Get
393: ( p_count => x_msg_count,
394: p_data => x_msg_data
395: );
395: );
396: ROLLBACK TO SAVEPOINT Process_cancel_quantity;
397:
398: WHEN OTHERS THEN
399: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
400: IF OE_MSG_PUB.Check_Msg_Level
401: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
402: THEN
403: OE_MSG_PUB.Add_Exc_Msg
416: ( p_num_of_records IN NUMBER
417: ,p_record_ids IN OE_GLOBALS.Selected_Record_Tbl -- MOAC
418: ,p_cancellation_comments IN VARCHAR2
419: ,p_reason_code IN VARCHAR2
420: ,p_mc_err_handling_flag IN NUMBER := FND_API.G_MISS_NUM
421: ,x_msg_count OUT NOCOPY NUMBER
422:
423: ,x_msg_data OUT NOCOPY VARCHAR2
424:
495: ( p_header_id => l_header_id,
496: p_x_header_rec => l_header_rec
497: ,x_return_status => l_return_status
498: );
499: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
500: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
501: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
502: RAISE FND_API.G_EXC_ERROR;
503: END IF;
496: p_x_header_rec => l_header_rec
497: ,x_return_status => l_return_status
498: );
499: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
500: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
501: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
502: RAISE FND_API.G_EXC_ERROR;
503: END IF;
504:
497: ,x_return_status => l_return_status
498: );
499: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
500: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
501: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
502: RAISE FND_API.G_EXC_ERROR;
503: END IF;
504:
505: l_old_header_rec := l_header_rec;
498: );
499: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
500: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
501: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
502: RAISE FND_API.G_EXC_ERROR;
503: END IF;
504:
505: l_old_header_rec := l_header_rec;
506: IF l_debug_level > 0 THEN
515: L_header_rec.Order_Number);
516:
517:
518: oe_msg_pub.Add;
519: RAISE FND_API.G_EXC_ERROR ;
520: END IF;
521: IF nvl(l_header_rec.open_flag,'N') = 'N' THEN
522: IF l_debug_level > 0 THEN
523: oe_debug_pub.add( 'CANCELLED FLAG'||L_HEADER_REC.CANCELLED_FLAG , 1 ) ;
525: fnd_message.set_name('ONT', 'OE_CAN_ORDER_CLOSED');
526: FND_MESSAGE.SET_TOKEN('ORDER',
527: L_header_rec.Order_Number);
528: oe_msg_pub.Add;
529: RAISE FND_API.G_EXC_ERROR ;
530: END IF;
531:
532: l_header_rec.cancelled_flag :='Y';
533: l_header_rec.change_reason :=p_reason_code;
534: l_header_rec.change_comments :=p_cancellation_comments;
535: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
536:
537: oe_order_pvt.Header
538: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
539: , p_control_rec => l_control_rec
540: , p_x_header_rec => l_header_rec
541: , p_x_old_header_rec => l_old_header_rec
542: , x_return_status => l_return_status
548: p_data => x_msg_data
549: );
550:
551:
552: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
553: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
554: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
555: RAISE FND_API.G_EXC_ERROR;
556: END IF;
549: );
550:
551:
552: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
553: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
554: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
555: RAISE FND_API.G_EXC_ERROR;
556: END IF;
557:
550:
551:
552: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
553: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
554: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
555: RAISE FND_API.G_EXC_ERROR;
556: END IF;
557:
558:
551:
552: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
553: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
554: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
555: RAISE FND_API.G_EXC_ERROR;
556: END IF;
557:
558:
559: -- Api to call notify OC and Process Delayed Requests
577: x_return_status := l_return_status;
578: IF l_debug_level > 0 THEN
579: oe_debug_pub.add( L_RETURN_STATUS ) ;
580: END IF;
581: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
582: IF l_debug_level > 0 THEN
583: oe_debug_pub.add( 'CANCELLATION UNEXPECTED FAILURE' ) ;
584: END IF;
585: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
581: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
582: IF l_debug_level > 0 THEN
583: oe_debug_pub.add( 'CANCELLATION UNEXPECTED FAILURE' ) ;
584: END IF;
585: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
586: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
587: IF l_debug_level > 0 THEN
588: oe_debug_pub.add( 'CANCELLATION EXPECTED FAILURE' ) ;
589: END IF;
582: IF l_debug_level > 0 THEN
583: oe_debug_pub.add( 'CANCELLATION UNEXPECTED FAILURE' ) ;
584: END IF;
585: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
586: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
587: IF l_debug_level > 0 THEN
588: oe_debug_pub.add( 'CANCELLATION EXPECTED FAILURE' ) ;
589: END IF;
590: RAISE FND_API.G_EXC_ERROR;
586: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
587: IF l_debug_level > 0 THEN
588: oe_debug_pub.add( 'CANCELLATION EXPECTED FAILURE' ) ;
589: END IF;
590: RAISE FND_API.G_EXC_ERROR;
591: END IF;
592:
593:
594: End LOOP; /* end of FOR loop */
596: g_ord_lvl_can := FALSE; --For fix bug# 2922468.
597:
598: EXCEPTION /* Procedure exception handler */
599:
600: WHEN FND_API.G_EXC_ERROR THEN
601: x_return_status := FND_API.G_RET_STS_ERROR ;
602: OE_MSG_PUB.Count_And_Get
603: ( p_count => x_msg_count,
604: p_data => x_msg_data
597:
598: EXCEPTION /* Procedure exception handler */
599:
600: WHEN FND_API.G_EXC_ERROR THEN
601: x_return_status := FND_API.G_RET_STS_ERROR ;
602: OE_MSG_PUB.Count_And_Get
603: ( p_count => x_msg_count,
604: p_data => x_msg_data
605: );
605: );
606: g_ord_lvl_can := FALSE; --For fix bug# 2922468.
607: ROLLBACK TO SAVEPOINT Process_cancel_order;
608:
609: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
611: OE_MSG_PUB.Count_And_Get
612: ( p_count => x_msg_count,
613: p_data => x_msg_data
606: g_ord_lvl_can := FALSE; --For fix bug# 2922468.
607: ROLLBACK TO SAVEPOINT Process_cancel_order;
608:
609: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
611: OE_MSG_PUB.Count_And_Get
612: ( p_count => x_msg_count,
613: p_data => x_msg_data
614: );
615: g_ord_lvl_can:=FALSE; --Fix for bug# 2922468.
616: ROLLBACK TO SAVEPOINT Process_cancel_order;
617:
618: WHEN OTHERS THEN
619: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
620: IF OE_MSG_PUB.Check_Msg_Level
621: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
622: THEN
623: OE_MSG_PUB.Add_Exc_Msg
659: OE_Line_Util.Query_Row
660: ( p_line_id => p_line_id,
661: x_line_rec => g_line_rec
662: );
663: g_line_rec.db_flag := FND_API.G_TRUE;
664:
665: -- Load DB record
666:
667:
757: p_header_id => l_header_id
758: , x_return_status => x_return_status
759: );
760:
761: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
762: IF l_debug_level > 0 THEN
763: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
764: END IF;
765: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
761: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
762: IF l_debug_level > 0 THEN
763: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
764: END IF;
765: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
766: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
767: IF l_debug_level > 0 THEN
768: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
769: END IF;
762: IF l_debug_level > 0 THEN
763: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
764: END IF;
765: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
766: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
767: IF l_debug_level > 0 THEN
768: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
769: END IF;
770: OE_MSG_PUB.Count_And_Get
772: p_data => x_msg_data
773: );
774:
775: /* Fix Bug # 3000720: If there is an error, everything must rollback */
776: RAISE FND_API.G_EXC_ERROR;
777: END IF;
778:
779: END LOOP;
780:
779: END LOOP;
780:
781: EXCEPTION /* Procedure exception handler */
782:
783: WHEN FND_API.G_EXC_ERROR THEN
784: x_return_status := FND_API.G_RET_STS_ERROR ;
785: OE_MSG_PUB.Count_And_Get
786: ( p_count => x_msg_count,
787: p_data => x_msg_data
780:
781: EXCEPTION /* Procedure exception handler */
782:
783: WHEN FND_API.G_EXC_ERROR THEN
784: x_return_status := FND_API.G_RET_STS_ERROR ;
785: OE_MSG_PUB.Count_And_Get
786: ( p_count => x_msg_count,
787: p_data => x_msg_data
788: );
786: ( p_count => x_msg_count,
787: p_data => x_msg_data
788: );
789: ROLLBACK TO SAVEPOINT Cancel_Remaining_Order;
790: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: OE_MSG_PUB.Count_And_Get
793: ( p_count => x_msg_count,
794: p_data => x_msg_data
787: p_data => x_msg_data
788: );
789: ROLLBACK TO SAVEPOINT Cancel_Remaining_Order;
790: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: OE_MSG_PUB.Count_And_Get
793: ( p_count => x_msg_count,
794: p_data => x_msg_data
795: );
793: ( p_count => x_msg_count,
794: p_data => x_msg_data
795: );
796: WHEN OTHERS THEN
797: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
798: IF OE_MSG_PUB.Check_Msg_Level
799: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
800: THEN
801: OE_MSG_PUB.Add_Exc_Msg
827: IF l_debug_level > 0 THEN
828: oe_debug_pub.add( 'BEFORE CALLING PROCESSS ORDER LINES PROCEDURE' , 1 ) ;
829: END IF;
830:
831: x_return_status := FND_API.G_RET_STS_SUCCESS;
832:
833:
834: -- Call OE_Order_PVT.Process_order
835: IF l_debug_level > 0 THEN
835: IF l_debug_level > 0 THEN
836: oe_debug_pub.add( 'CALLING PROCESS ORDER' , 1 ) ;
837: END IF;
838: oe_order_pvt.Lines
839: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
840: , p_control_rec => l_control_rec
841: , p_x_line_tbl => l_line_tbl
842: , p_x_old_line_tbl => l_old_line_tbl
843: , x_return_status => x_return_status
846: IF l_debug_level > 0 THEN
847: oe_debug_pub.add( 'AFTER CALLING LINES PROCEDURE' , 1 ) ;
848: END IF;
849:
850: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
852: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
853: RAISE FND_API.G_EXC_ERROR;
854: END IF;
847: oe_debug_pub.add( 'AFTER CALLING LINES PROCEDURE' , 1 ) ;
848: END IF;
849:
850: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
852: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
853: RAISE FND_API.G_EXC_ERROR;
854: END IF;
855:
848: END IF;
849:
850: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
852: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
853: RAISE FND_API.G_EXC_ERROR;
854: END IF;
855:
856: OE_Order_PVT.Process_Requests_And_Notify
849:
850: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
852: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
853: RAISE FND_API.G_EXC_ERROR;
854: END IF;
855:
856: OE_Order_PVT.Process_Requests_And_Notify
857: ( p_process_requests => TRUE
870: );
871:
872: x_return_status := x_return_status;
873:
874: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
875: IF l_debug_level > 0 THEN
876: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
877: END IF;
878: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
874: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
875: IF l_debug_level > 0 THEN
876: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
877: END IF;
878: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
879: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
880: IF l_debug_level > 0 THEN
881: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
882: END IF;
875: IF l_debug_level > 0 THEN
876: oe_debug_pub.add( 'INTO CANCELATION UNEXPECTED FAILURE' ) ;
877: END IF;
878: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
879: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
880: IF l_debug_level > 0 THEN
881: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
882: END IF;
883: RAISE FND_API.G_EXC_ERROR;
879: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
880: IF l_debug_level > 0 THEN
881: oe_debug_pub.add( 'INTO CANCELLATION EXPECTED FAILURE' ) ;
882: END IF;
883: RAISE FND_API.G_EXC_ERROR;
884: END IF;
885:
886: IF l_debug_level > 0 THEN
887: oe_debug_pub.add( x_RETURN_STATUS ) ;
888: END IF;
889:
890: EXCEPTION /* Procedure exception handler */
891:
892: WHEN FND_API.G_EXC_ERROR THEN
893: x_return_status := FND_API.G_RET_STS_ERROR ;
894: OE_MSG_PUB.Count_And_Get
895: ( p_count => x_msg_count,
896: p_data => x_msg_data
889:
890: EXCEPTION /* Procedure exception handler */
891:
892: WHEN FND_API.G_EXC_ERROR THEN
893: x_return_status := FND_API.G_RET_STS_ERROR ;
894: OE_MSG_PUB.Count_And_Get
895: ( p_count => x_msg_count,
896: p_data => x_msg_data
897: );
895: ( p_count => x_msg_count,
896: p_data => x_msg_data
897: );
898:
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
901: OE_MSG_PUB.Count_And_Get
902: ( p_count => x_msg_count,
903: p_data => x_msg_data
896: p_data => x_msg_data
897: );
898:
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
901: OE_MSG_PUB.Count_And_Get
902: ( p_count => x_msg_count,
903: p_data => x_msg_data
904: );
902: ( p_count => x_msg_count,
903: p_data => x_msg_data
904: );
905: WHEN OTHERS THEN
906: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
907: IF OE_MSG_PUB.Check_Msg_Level
908: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
909: THEN
910: OE_MSG_PUB.Add_Exc_Msg