8:
9: c_log_head CONSTANT VARCHAR2(50) := 'po.plsql.' || g_pkg_name || '.';
10:
11: -- Debugging
12: g_debug_stmt CONSTANT BOOLEAN := po_debug.is_debug_stmt_on;
13: g_debug_unexp CONSTANT BOOLEAN := po_debug.is_debug_unexp_on;
14:
15: FUNCTION is_req_cancellable(p_req_hdr_id IN NUMBER) RETURN VARCHAR2
16: IS
9: c_log_head CONSTANT VARCHAR2(50) := 'po.plsql.' || g_pkg_name || '.';
10:
11: -- Debugging
12: g_debug_stmt CONSTANT BOOLEAN := po_debug.is_debug_stmt_on;
13: g_debug_unexp CONSTANT BOOLEAN := po_debug.is_debug_unexp_on;
14:
15: FUNCTION is_req_cancellable(p_req_hdr_id IN NUMBER) RETURN VARCHAR2
16: IS
17: CURSOR l_line_csr(hdr_id NUMBER) IS
35:
36: BEGIN
37:
38: IF g_debug_stmt THEN
39: po_debug.debug_begin(l_log_head);
40: po_debug.debug_var(l_log_head, l_progress, 'p_req_hdr_id', p_req_hdr_id);
41: END IF;
42:
43:
36: BEGIN
37:
38: IF g_debug_stmt THEN
39: po_debug.debug_begin(l_log_head);
40: po_debug.debug_var(l_log_head, l_progress, 'p_req_hdr_id', p_req_hdr_id);
41: END IF;
42:
43:
44: OPEN l_line_csr(p_req_hdr_id);
54: END IF; --Bug6747949
55: l_c := is_reqline_cancellable(l_line_id);
56:
57: IF g_debug_stmt THEN
58: po_debug.debug_var(l_log_head, l_progress, 'l_line_id', l_line_id);
59: po_debug.debug_var(l_log_head, l_progress, 'Is_ReqLine_Cancellable', l_c);
60: END IF;
61:
62: IF(l_c = 'Y') THEN
55: l_c := is_reqline_cancellable(l_line_id);
56:
57: IF g_debug_stmt THEN
58: po_debug.debug_var(l_log_head, l_progress, 'l_line_id', l_line_id);
59: po_debug.debug_var(l_log_head, l_progress, 'Is_ReqLine_Cancellable', l_c);
60: END IF;
61:
62: IF(l_c = 'Y') THEN
63: RETURN 'Y';
65: END LOOP;
66: CLOSE l_line_csr;
67:
68: IF g_debug_stmt THEN
69: po_debug.debug_var(l_log_head, l_progress, 'returning not cancellable', l_line_with_po);
70: END IF;
71:
72: return 'N';
73:
253: BEGIN
254:
255:
256: IF g_debug_stmt THEN
257: po_debug.debug_begin(l_log_head);
258: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
259: po_debug.debug_var(l_log_head, l_progress, 'p_req_hdr_id', p_req_hdr_id);
260: END IF;
261:
254:
255:
256: IF g_debug_stmt THEN
257: po_debug.debug_begin(l_log_head);
258: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
259: po_debug.debug_var(l_log_head, l_progress, 'p_req_hdr_id', p_req_hdr_id);
260: END IF;
261:
262: po_rco_validation_pvt.save_ireqchange(
255:
256: IF g_debug_stmt THEN
257: po_debug.debug_begin(l_log_head);
258: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
259: po_debug.debug_var(l_log_head, l_progress, 'p_req_hdr_id', p_req_hdr_id);
260: END IF;
261:
262: po_rco_validation_pvt.save_ireqchange(
263: p_api_version,
271:
272:
273:
274:
275: IF g_debug_stmt THEN po_debug.debug_end(l_log_head); END IF;
276:
277: END save_ireqchange;
278:
279: PROCEDURE save_reqchange(p_api_version IN NUMBER,
374:
375: BEGIN
376:
377: IF g_debug_stmt THEN
378: po_debug.debug_begin(l_log_head);
379: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
380: po_debug.debug_var(l_log_head, l_progress, 'p_req_hdr_id', p_req_hdr_id);
381: END IF;
382:
375: BEGIN
376:
377: IF g_debug_stmt THEN
378: po_debug.debug_begin(l_log_head);
379: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
380: po_debug.debug_var(l_log_head, l_progress, 'p_req_hdr_id', p_req_hdr_id);
381: END IF;
382:
383:
376:
377: IF g_debug_stmt THEN
378: po_debug.debug_begin(l_log_head);
379: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
380: po_debug.debug_var(l_log_head, l_progress, 'p_req_hdr_id', p_req_hdr_id);
381: END IF;
382:
383:
384: po_rco_validation_pvt.save_ireqcancel(
389: p_change_request_group_id,
390: x_retmsg,
391: p_grp_id);
392: IF g_debug_stmt THEN
393: po_debug.debug_end(l_log_head);
394: END IF;
395:
396: END save_ireqcancel;
397:
412:
413: BEGIN
414:
415: IF g_debug_stmt THEN
416: po_debug.debug_begin(l_log_head);
417: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
418: po_debug.debug_var(l_log_head, l_progress, 'p_group_ID', p_group_id);
419: po_debug.debug_var(l_log_head, l_progress, 'p_fundscheck_flag', p_fundscheck_flag);
420: po_debug.debug_var(l_log_head, l_progress, 'p_note_to_approver', p_note_to_approver);
413: BEGIN
414:
415: IF g_debug_stmt THEN
416: po_debug.debug_begin(l_log_head);
417: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
418: po_debug.debug_var(l_log_head, l_progress, 'p_group_ID', p_group_id);
419: po_debug.debug_var(l_log_head, l_progress, 'p_fundscheck_flag', p_fundscheck_flag);
420: po_debug.debug_var(l_log_head, l_progress, 'p_note_to_approver', p_note_to_approver);
421: END IF;
414:
415: IF g_debug_stmt THEN
416: po_debug.debug_begin(l_log_head);
417: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
418: po_debug.debug_var(l_log_head, l_progress, 'p_group_ID', p_group_id);
419: po_debug.debug_var(l_log_head, l_progress, 'p_fundscheck_flag', p_fundscheck_flag);
420: po_debug.debug_var(l_log_head, l_progress, 'p_note_to_approver', p_note_to_approver);
421: END IF;
422:
415: IF g_debug_stmt THEN
416: po_debug.debug_begin(l_log_head);
417: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
418: po_debug.debug_var(l_log_head, l_progress, 'p_group_ID', p_group_id);
419: po_debug.debug_var(l_log_head, l_progress, 'p_fundscheck_flag', p_fundscheck_flag);
420: po_debug.debug_var(l_log_head, l_progress, 'p_note_to_approver', p_note_to_approver);
421: END IF;
422:
423: po_rco_validation_pvt.submit_ireqchange(p_api_version,
416: po_debug.debug_begin(l_log_head);
417: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
418: po_debug.debug_var(l_log_head, l_progress, 'p_group_ID', p_group_id);
419: po_debug.debug_var(l_log_head, l_progress, 'p_fundscheck_flag', p_fundscheck_flag);
420: po_debug.debug_var(l_log_head, l_progress, 'p_note_to_approver', p_note_to_approver);
421: END IF;
422:
423: po_rco_validation_pvt.submit_ireqchange(p_api_version,
424: x_return_status,
430: x_errcode,
431: x_errtable );
432:
433: IF g_debug_stmt THEN
434: po_debug.debug_end(l_log_head);
435: END IF;
436:
437:
438: END submit_ireqchange;
451:
452: BEGIN
453:
454: IF g_debug_stmt THEN
455: po_debug.debug_begin(l_log_head);
456: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
457: --PO_DEBUG.debug_var(l_log_head,l_progress,'p_req_hdr_id',p_req_hdr_id);
458: po_debug.debug_var(l_log_head, l_progress, 'p_group_ID', p_group_id);
459: po_debug.debug_var(l_log_head, l_progress, 'p_flag', p_flag);
452: BEGIN
453:
454: IF g_debug_stmt THEN
455: po_debug.debug_begin(l_log_head);
456: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
457: --PO_DEBUG.debug_var(l_log_head,l_progress,'p_req_hdr_id',p_req_hdr_id);
458: po_debug.debug_var(l_log_head, l_progress, 'p_group_ID', p_group_id);
459: po_debug.debug_var(l_log_head, l_progress, 'p_flag', p_flag);
460: END IF;
453:
454: IF g_debug_stmt THEN
455: po_debug.debug_begin(l_log_head);
456: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
457: --PO_DEBUG.debug_var(l_log_head,l_progress,'p_req_hdr_id',p_req_hdr_id);
458: po_debug.debug_var(l_log_head, l_progress, 'p_group_ID', p_group_id);
459: po_debug.debug_var(l_log_head, l_progress, 'p_flag', p_flag);
460: END IF;
461:
454: IF g_debug_stmt THEN
455: po_debug.debug_begin(l_log_head);
456: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
457: --PO_DEBUG.debug_var(l_log_head,l_progress,'p_req_hdr_id',p_req_hdr_id);
458: po_debug.debug_var(l_log_head, l_progress, 'p_group_ID', p_group_id);
459: po_debug.debug_var(l_log_head, l_progress, 'p_flag', p_flag);
460: END IF;
461:
462:
455: po_debug.debug_begin(l_log_head);
456: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
457: --PO_DEBUG.debug_var(l_log_head,l_progress,'p_req_hdr_id',p_req_hdr_id);
458: po_debug.debug_var(l_log_head, l_progress, 'p_group_ID', p_group_id);
459: po_debug.debug_var(l_log_head, l_progress, 'p_flag', p_flag);
460: END IF;
461:
462:
463: po_rco_validation_pvt.submit_ireqcancel (
468: p_errtable ,
469: p_flag );
470:
471: IF g_debug_stmt THEN
472: po_debug.debug_end(l_log_head);
473: END IF;
474: END submit_ireqcancel;
475:
476:
514: END IF;
515:
516: exception when others then
517: IF g_debug_unexp THEN
518: po_debug.debug_var(l_api_name, '001', 'sqlerrm=', sqlerrm);
519: END IF;
520: RETURN 'Y';
521:
522: END IS_ANY_LINE_WITHDRAWABLE;
538:
539: BEGIN
540:
541: IF g_debug_stmt THEN
542: po_debug.debug_begin(l_log_head);
543: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
544: po_debug.debug_var(l_log_head, l_progress, 'p_req_hdr_id', p_req_hdr_id);
545: END IF;
546:
539: BEGIN
540:
541: IF g_debug_stmt THEN
542: po_debug.debug_begin(l_log_head);
543: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
544: po_debug.debug_var(l_log_head, l_progress, 'p_req_hdr_id', p_req_hdr_id);
545: END IF;
546:
547: l_progress := '010';
540:
541: IF g_debug_stmt THEN
542: po_debug.debug_begin(l_log_head);
543: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
544: po_debug.debug_var(l_log_head, l_progress, 'p_req_hdr_id', p_req_hdr_id);
545: END IF;
546:
547: l_progress := '010';
548:
567:
568: l_progress := '050';
569:
570: IF g_debug_stmt THEN
571: po_debug.debug_stmt(l_log_head, l_progress,'Calling Private Procedure get_preparer_name');
572: END IF;
573:
574: l_progress := '060';
575:
579: , x_return_status => x_return_status);
580:
581:
582: IF g_debug_stmt THEN
583: po_debug.debug_stmt(l_log_head, l_progress,'After Private Procedure get_preparer_name');
584: END IF;
585:
586: EXCEPTION
587:
595: WHEN OTHERS THEN
596: ROLLBACK TO get_preparer_name_sp;
597: x_return_status := fnd_api.g_ret_sts_unexp_error;
598: IF g_debug_stmt THEN
599: po_debug.debug_var(l_log_head, l_progress,'EXCEPTION: Location and SQL CODE is ', SQLCODE);
600: END IF;
601: END get_preparer_name;
602:
603: /**
621: p_qty NUMBER;
622: BEGIN
623:
624: IF g_debug_stmt THEN
625: po_debug.debug_begin(l_log_head);
626: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
627: END IF;
628:
629: l_progress := '010';
622: BEGIN
623:
624: IF g_debug_stmt THEN
625: po_debug.debug_begin(l_log_head);
626: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
627: END IF;
628:
629: l_progress := '010';
630:
656:
657: BEGIN
658:
659: IF g_debug_stmt THEN
660: po_debug.debug_begin(l_log_head);
661: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
662: END IF;
663:
664: l_progress := '010';
657: BEGIN
658:
659: IF g_debug_stmt THEN
660: po_debug.debug_begin(l_log_head);
661: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
662: END IF;
663:
664: l_progress := '010';
665:
678:
679:
680:
681: IF g_debug_stmt THEN
682: po_debug.debug_stmt(l_log_head, l_progress,'After Private Procedure update_ReqCancel_from_SO');
683: END IF;
684:
685: EXCEPTION
686:
694: WHEN OTHERS THEN
695: ROLLBACK TO update_reqcancel_from_so_sp;
696: x_return_status := fnd_api.g_ret_sts_unexp_error;
697: IF g_debug_stmt THEN
698: po_debug.debug_var(l_log_head, l_progress,'EXCEPTION: Location and SQL CODE is ', SQLCODE);
699: END IF;
700: END update_reqcancel_from_so;
701:
702:
721:
722: BEGIN
723:
724: IF g_debug_stmt THEN
725: po_debug.debug_begin(l_log_head);
726: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
727: /* PO_DEBUG.debug_var(l_log_head,l_progress,'p_commit',p_commit);
728: PO_DEBUG.debug_var(l_log_head,l_progress,'p_init_msg_list',p_init_msg_list);
729: PO_DEBUG.debug_var(l_log_head,l_progress,'p_validation_level',p_validation_level);
722: BEGIN
723:
724: IF g_debug_stmt THEN
725: po_debug.debug_begin(l_log_head);
726: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
727: /* PO_DEBUG.debug_var(l_log_head,l_progress,'p_commit',p_commit);
728: PO_DEBUG.debug_var(l_log_head,l_progress,'p_init_msg_list',p_init_msg_list);
729: PO_DEBUG.debug_var(l_log_head,l_progress,'p_validation_level',p_validation_level);
730: */ po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
723:
724: IF g_debug_stmt THEN
725: po_debug.debug_begin(l_log_head);
726: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
727: /* PO_DEBUG.debug_var(l_log_head,l_progress,'p_commit',p_commit);
728: PO_DEBUG.debug_var(l_log_head,l_progress,'p_init_msg_list',p_init_msg_list);
729: PO_DEBUG.debug_var(l_log_head,l_progress,'p_validation_level',p_validation_level);
730: */ po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
731: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity', p_delta_quantity);
724: IF g_debug_stmt THEN
725: po_debug.debug_begin(l_log_head);
726: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
727: /* PO_DEBUG.debug_var(l_log_head,l_progress,'p_commit',p_commit);
728: PO_DEBUG.debug_var(l_log_head,l_progress,'p_init_msg_list',p_init_msg_list);
729: PO_DEBUG.debug_var(l_log_head,l_progress,'p_validation_level',p_validation_level);
730: */ po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
731: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity', p_delta_quantity);
732: po_debug.debug_var(l_log_head, l_progress, 'p_new_need_by_date', p_new_need_by_date);
725: po_debug.debug_begin(l_log_head);
726: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
727: /* PO_DEBUG.debug_var(l_log_head,l_progress,'p_commit',p_commit);
728: PO_DEBUG.debug_var(l_log_head,l_progress,'p_init_msg_list',p_init_msg_list);
729: PO_DEBUG.debug_var(l_log_head,l_progress,'p_validation_level',p_validation_level);
730: */ po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
731: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity', p_delta_quantity);
732: po_debug.debug_var(l_log_head, l_progress, 'p_new_need_by_date', p_new_need_by_date);
733: END IF;
726: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
727: /* PO_DEBUG.debug_var(l_log_head,l_progress,'p_commit',p_commit);
728: PO_DEBUG.debug_var(l_log_head,l_progress,'p_init_msg_list',p_init_msg_list);
729: PO_DEBUG.debug_var(l_log_head,l_progress,'p_validation_level',p_validation_level);
730: */ po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
731: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity', p_delta_quantity);
732: po_debug.debug_var(l_log_head, l_progress, 'p_new_need_by_date', p_new_need_by_date);
733: END IF;
734:
727: /* PO_DEBUG.debug_var(l_log_head,l_progress,'p_commit',p_commit);
728: PO_DEBUG.debug_var(l_log_head,l_progress,'p_init_msg_list',p_init_msg_list);
729: PO_DEBUG.debug_var(l_log_head,l_progress,'p_validation_level',p_validation_level);
730: */ po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
731: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity', p_delta_quantity);
732: po_debug.debug_var(l_log_head, l_progress, 'p_new_need_by_date', p_new_need_by_date);
733: END IF;
734:
735: l_progress := '010';
728: PO_DEBUG.debug_var(l_log_head,l_progress,'p_init_msg_list',p_init_msg_list);
729: PO_DEBUG.debug_var(l_log_head,l_progress,'p_validation_level',p_validation_level);
730: */ po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
731: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity', p_delta_quantity);
732: po_debug.debug_var(l_log_head, l_progress, 'p_new_need_by_date', p_new_need_by_date);
733: END IF;
734:
735: l_progress := '010';
736:
779: p_sec_qty NUMBER;
780: BEGIN
781:
782: IF g_debug_stmt THEN
783: po_debug.debug_begin(l_log_head);
784: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
785: END IF;
786:
787: l_progress := '010';
780: BEGIN
781:
782: IF g_debug_stmt THEN
783: po_debug.debug_begin(l_log_head);
784: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
785: END IF;
786:
787: l_progress := '010';
788:
800: l_progress := '030';
801:
802: IF (p_req_line_id_tbl IS NULL OR p_req_line_id_tbl.Count=0 ) THEN
803: IF g_debug_stmt THEN
804: po_debug.debug_stmt(l_log_head, l_progress,'Procedure update_ReqCancel_from_SO called with no req line id from OM');
805: END IF;
806: RAISE fnd_api.g_exc_unexpected_error;
807: END IF;
808:
811:
812: l_progress := '050';
813:
814: IF g_debug_stmt THEN
815: po_debug.debug_stmt(l_log_head, l_progress,'Calling Private Procedure update_ReqCancel_from_SO table count ='|| p_req_line_id_tbl.Count);
816: END IF;
817:
818: l_progress := '060';
819:
819:
820: FOR i in 1.. p_req_line_id_tbl.COUNT LOOP
821:
822: IF g_debug_stmt THEN
823: po_debug.debug_var(l_log_head, l_progress,'p_req_line_id',p_req_line_id_tbl(i));
824: po_debug.debug_var(l_log_head, l_progress,'p_req_can_all',p_req_can_all);
825:
826: END IF;
827:
820: FOR i in 1.. p_req_line_id_tbl.COUNT LOOP
821:
822: IF g_debug_stmt THEN
823: po_debug.debug_var(l_log_head, l_progress,'p_req_line_id',p_req_line_id_tbl(i));
824: po_debug.debug_var(l_log_head, l_progress,'p_req_can_all',p_req_can_all);
825:
826: END IF;
827:
828: if p_req_can_all then
832: p_prim_qty := p_req_can_prim_qty_tbl(i) ;
833: p_sec_qty := p_req_can_sec_qty_tbl(i) ;
834: end if;
835: IF g_debug_stmt THEN
836: po_debug.debug_var(l_log_head, l_progress,'p_req_line_id',p_req_line_id_tbl(i));
837: po_debug.debug_var(l_log_head, l_progress,'p_prim_qty',p_prim_qty);
838: po_debug.debug_var(l_log_head, l_progress,'p_sec_qty',p_sec_qty);
839: po_debug.debug_var(l_log_head, l_progress,'p_req_can_all',p_req_can_all);
840:
833: p_sec_qty := p_req_can_sec_qty_tbl(i) ;
834: end if;
835: IF g_debug_stmt THEN
836: po_debug.debug_var(l_log_head, l_progress,'p_req_line_id',p_req_line_id_tbl(i));
837: po_debug.debug_var(l_log_head, l_progress,'p_prim_qty',p_prim_qty);
838: po_debug.debug_var(l_log_head, l_progress,'p_sec_qty',p_sec_qty);
839: po_debug.debug_var(l_log_head, l_progress,'p_req_can_all',p_req_can_all);
840:
841: END IF;
834: end if;
835: IF g_debug_stmt THEN
836: po_debug.debug_var(l_log_head, l_progress,'p_req_line_id',p_req_line_id_tbl(i));
837: po_debug.debug_var(l_log_head, l_progress,'p_prim_qty',p_prim_qty);
838: po_debug.debug_var(l_log_head, l_progress,'p_sec_qty',p_sec_qty);
839: po_debug.debug_var(l_log_head, l_progress,'p_req_can_all',p_req_can_all);
840:
841: END IF;
842:
835: IF g_debug_stmt THEN
836: po_debug.debug_var(l_log_head, l_progress,'p_req_line_id',p_req_line_id_tbl(i));
837: po_debug.debug_var(l_log_head, l_progress,'p_prim_qty',p_prim_qty);
838: po_debug.debug_var(l_log_head, l_progress,'p_sec_qty',p_sec_qty);
839: po_debug.debug_var(l_log_head, l_progress,'p_req_can_all',p_req_can_all);
840:
841: END IF;
842:
843:
851: END LOOP;
852:
853:
854: IF g_debug_stmt THEN
855: po_debug.debug_stmt(l_log_head, l_progress,'After Private Procedure update_ReqCancel_from_SO');
856: END IF;
857:
858: EXCEPTION
859:
867: WHEN OTHERS THEN
868: ROLLBACK TO update_reqcancel_from_so_sp;
869: x_return_status := fnd_api.g_ret_sts_unexp_error;
870: IF g_debug_stmt THEN
871: po_debug.debug_var(l_log_head, l_progress,'EXCEPTION: Location and SQL CODE is ', SQLCODE);
872: END IF;
873: END update_reqcancel_from_so;
874:
875:
906:
907: BEGIN
908:
909: IF g_debug_stmt THEN
910: po_debug.debug_begin(l_log_head);
911: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
912: po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
913: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_prim', p_delta_quantity_prim);
914: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_sec', p_delta_quantity_sec);
907: BEGIN
908:
909: IF g_debug_stmt THEN
910: po_debug.debug_begin(l_log_head);
911: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
912: po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
913: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_prim', p_delta_quantity_prim);
914: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_sec', p_delta_quantity_sec);
915: po_debug.debug_var(l_log_head, l_progress, 'p_new_need_by_date', p_new_need_by_date);
908:
909: IF g_debug_stmt THEN
910: po_debug.debug_begin(l_log_head);
911: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
912: po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
913: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_prim', p_delta_quantity_prim);
914: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_sec', p_delta_quantity_sec);
915: po_debug.debug_var(l_log_head, l_progress, 'p_new_need_by_date', p_new_need_by_date);
916: END IF;
909: IF g_debug_stmt THEN
910: po_debug.debug_begin(l_log_head);
911: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
912: po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
913: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_prim', p_delta_quantity_prim);
914: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_sec', p_delta_quantity_sec);
915: po_debug.debug_var(l_log_head, l_progress, 'p_new_need_by_date', p_new_need_by_date);
916: END IF;
917:
910: po_debug.debug_begin(l_log_head);
911: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
912: po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
913: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_prim', p_delta_quantity_prim);
914: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_sec', p_delta_quantity_sec);
915: po_debug.debug_var(l_log_head, l_progress, 'p_new_need_by_date', p_new_need_by_date);
916: END IF;
917:
918: l_progress := '010';
911: po_debug.debug_var(l_log_head, l_progress, 'p_api_version', p_api_version);
912: po_debug.debug_var(l_log_head, l_progress, 'p_req_line_id', p_req_line_id);
913: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_prim', p_delta_quantity_prim);
914: po_debug.debug_var(l_log_head, l_progress, 'p_delta_quantity_sec', p_delta_quantity_sec);
915: po_debug.debug_var(l_log_head, l_progress, 'p_new_need_by_date', p_new_need_by_date);
916: END IF;
917:
918: l_progress := '010';
919:
938:
939: l_progress := '050';
940:
941: IF g_debug_stmt THEN
942: po_debug.debug_stmt(l_log_head, l_progress,'Calling Private Procedure update_reqchange_from_so');
943: END IF;
944:
945: l_progress := '060';
946:
960: END IF;
961:
962:
963: IF g_debug_stmt THEN
964: po_debug.debug_stmt(l_log_head, l_progress,'After Private Procedure update_ReqChange_from_SO');
965: END IF;
966:
967: EXCEPTION
968:
976: WHEN OTHERS THEN
977: ROLLBACK TO update_reqchange_from_so_sp;
978: x_return_status := fnd_api.g_ret_sts_unexp_error;
979: IF g_debug_stmt THEN
980: po_debug.debug_var(l_log_head, l_progress,'EXCEPTION: Location and SQL CODE is ', SQLCODE);
981: END IF;
982:
983:
984: END update_reqchange_from_so;