DBA Data[Home] [Help]

APPS.PO_APPROVAL_REMINDER_SV dependencies on PO_APPROVAL_REMINDER_SV

Line 1: PACKAGE BODY PO_APPROVAL_REMINDER_SV AS

1: PACKAGE BODY PO_APPROVAL_REMINDER_SV AS
2: /* $Header: POXWARMB.pls 120.12 2007/12/04 09:16:04 bisdas ship $*/
3:
4: -- Read the profile option that enables/disables the debug log
5: g_po_wf_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('PO_SET_DEBUG_WORKFLOW_ON'),'N');

Line 10: g_pkg_name CONSTANT VARCHAR2(30) := 'PO_APPROVAL_REMINDER_SV';

6: g_fnd_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
7:
8: -- Item Type for the Reminder Workflow:
9: g_reminder_item_type CONSTANT VARCHAR2(20) := 'APVRMDER';
10: g_pkg_name CONSTANT VARCHAR2(30) := 'PO_APPROVAL_REMINDER_SV';
11: g_module_prefix CONSTANT VARCHAR2(40) := 'po.plsql.' || g_pkg_name || '.';
12:
13: /*===========================================================================
14: PROCEDURE NAME: Select_Unapprove_docs

Line 35: l_progress := 'PO_APPROVAL_REMINDER_SV.Select_Unapprove_docs: 01 - BEGIN ';

31:
32: BEGIN
33:
34:
35: l_progress := 'PO_APPROVAL_REMINDER_SV.Select_Unapprove_docs: 01 - BEGIN ';
36: IF (g_po_wf_debug = 'Y') THEN
37: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
38: END IF;
39:

Line 55: l_progress := 'PO_APPROVAL_REMINDER_SV.Select_Unapprove_docs: 900 - END ';

51: Process_rfq_quote;
52:
53: process_po_temp_labor_lines; --
54:
55: l_progress := 'PO_APPROVAL_REMINDER_SV.Select_Unapprove_docs: 900 - END ';
56: IF (g_po_wf_debug = 'Y') THEN
57: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
58: END IF;
59:

Line 65: wf_core.context ('PO_APPROVAL_REMINDER_SV','Select_Unapprove_docs ' || l_progress);

61: EXCEPTION
62:
63: WHEN OTHERS THEN
64:
65: wf_core.context ('PO_APPROVAL_REMINDER_SV','Select_Unapprove_docs ' || l_progress);
66: l_progress := 'PO_APPROVAL_REMINDER_SV.Select_Unapprove_docs: 990 - ' ||
67: 'EXCEPTION sql error: ' || sqlcode;
68: IF (g_po_wf_debug = 'Y') THEN
69: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 66: l_progress := 'PO_APPROVAL_REMINDER_SV.Select_Unapprove_docs: 990 - ' ||

62:
63: WHEN OTHERS THEN
64:
65: wf_core.context ('PO_APPROVAL_REMINDER_SV','Select_Unapprove_docs ' || l_progress);
66: l_progress := 'PO_APPROVAL_REMINDER_SV.Select_Unapprove_docs: 990 - ' ||
67: 'EXCEPTION sql error: ' || sqlcode;
68: IF (g_po_wf_debug = 'Y') THEN
69: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
70: END IF;

Line 126: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_reqs: 01 - BEGIN ';

122:
123: BEGIN
124:
125:
126: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_reqs: 01 - BEGIN ';
127: IF (g_po_wf_debug = 'Y') THEN
128: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
129: END IF;
130:

Line 158: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,

154:
155:
156: IF Unapprove_req%FOUND THEN
157:
158: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,
159: l_ItemKey,
160: l_Item_exist,
161: l_Item_end_date);
162:

Line 172: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_reqs: 05 ' ||

168: -- Bypass this one
169:
170: NULL;
171:
172: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_reqs: 05 ' ||
173: 'open WF item key exists ' ||l_itemkey;
174: -- /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
175:
176: ELSE

Line 198: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_reqs: 10 ' ||

194: --
195: -- Invoke the Start_Approval_Reminder workflow
196: -- for every unique workflow Item key.
197:
198: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_reqs: 10 ' ||
199: 'Start WF item key =' ||l_itemkey;
200: IF (g_po_wf_debug = 'Y') THEN
201: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
202: END IF;

Line 204: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

200: IF (g_po_wf_debug = 'Y') THEN
201: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
202: END IF;
203:
204: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
205: l_doc_number,
206: l_doc_type,
207: l_doc_subtype,
208: l_release_num,

Line 229: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_reqs: 900 - END ';

225:
226: CLOSE Unapprove_req;
227:
228:
229: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_reqs: 900 - END ';
230: IF (g_po_wf_debug = 'Y') THEN
231: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
232: END IF;
233:

Line 237: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_reqs','No data found');

233:
234:
235: EXCEPTION
236: WHEN NO_DATA_FOUND THEN
237: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_reqs','No data found');
238: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_reqs: 901 - ' ||
239: 'EXCEPTION - no data found sql error: ' || sqlcode;
240: IF (g_po_wf_debug = 'Y') THEN
241: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 238: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_reqs: 901 - ' ||

234:
235: EXCEPTION
236: WHEN NO_DATA_FOUND THEN
237: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_reqs','No data found');
238: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_reqs: 901 - ' ||
239: 'EXCEPTION - no data found sql error: ' || sqlcode;
240: IF (g_po_wf_debug = 'Y') THEN
241: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
242: END IF;

Line 246: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_reqs','SQL error ' || sqlcode);

242: END IF;
243:
244:
245: WHEN OTHERS THEN
246: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_reqs','SQL error ' || sqlcode);
247: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_reqs: 990 - ' ||
248: 'EXCEPTION - sql error: ' || sqlcode;
249: IF (g_po_wf_debug = 'Y') THEN
250: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 247: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_reqs: 990 - ' ||

243:
244:
245: WHEN OTHERS THEN
246: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_reqs','SQL error ' || sqlcode);
247: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_reqs: 990 - ' ||
248: 'EXCEPTION - sql error: ' || sqlcode;
249: IF (g_po_wf_debug = 'Y') THEN
250: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
251: END IF;

Line 309: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_pos: 01 - BEGIN ';

305:
306: BEGIN
307:
308:
309: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_pos: 01 - BEGIN ';
310: IF (g_po_wf_debug = 'Y') THEN
311: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
312: END IF;
313:

Line 348: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,

344:
345: IF Unapprove_PO%FOUND THEN
346:
347:
348: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,
349: l_ItemKey,
350: l_Item_exist,
351: l_Item_end_date);
352:

Line 362: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_pos: 05 ' ||

358: -- Bypass this one
359:
360: NULL;
361:
362: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_pos: 05 ' ||
363: 'open WF item key exists ' ||l_itemkey;
364: -- /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
365:
366: ELSE

Line 387: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_pos: 10 ' ||

383: --
384: -- Invoke the Start_Approval_Reminder workflow
385: -- for every unique workflow Item key.
386:
387: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_pos: 10 ' ||
388: 'Start WF item key =' ||l_itemkey;
389: IF (g_po_wf_debug = 'Y') THEN
390: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
391: END IF;

Line 393: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

389: IF (g_po_wf_debug = 'Y') THEN
390: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
391: END IF;
392:
393: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
394: l_doc_number,
395: l_doc_type,
396: l_doc_subtype,
397: l_release_num,

Line 419: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_pos: 900 - END ';

415:
416: CLOSE Unapprove_PO;
417:
418:
419: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_pos: 900 - END ';
420: IF (g_po_wf_debug = 'Y') THEN
421: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
422: END IF;
423:

Line 426: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_pos','No data found');

422: END IF;
423:
424: EXCEPTION
425: WHEN NO_DATA_FOUND THEN
426: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_pos','No data found');
427:
428: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_pos: 901 - ' ||
429: 'EXCEPTION - no data found sql error: ' || sqlcode;
430: IF (g_po_wf_debug = 'Y') THEN

Line 428: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_pos: 901 - ' ||

424: EXCEPTION
425: WHEN NO_DATA_FOUND THEN
426: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_pos','No data found');
427:
428: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_pos: 901 - ' ||
429: 'EXCEPTION - no data found sql error: ' || sqlcode;
430: IF (g_po_wf_debug = 'Y') THEN
431: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
432: END IF;

Line 435: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_pos','SQL error ' || sqlcode);

431: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
432: END IF;
433:
434: WHEN OTHERS THEN
435: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_pos','SQL error ' || sqlcode);
436:
437: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_pos: 990 - ' ||
438: 'EXCEPTION - sql error: ' || sqlcode;
439: IF (g_po_wf_debug = 'Y') THEN

Line 437: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_pos: 990 - ' ||

433:
434: WHEN OTHERS THEN
435: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_pos','SQL error ' || sqlcode);
436:
437: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_pos: 990 - ' ||
438: 'EXCEPTION - sql error: ' || sqlcode;
439: IF (g_po_wf_debug = 'Y') THEN
440: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
441: END IF;

Line 502: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_releases: 01 - BEGIN ';

498:
499: BEGIN
500:
501:
502: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_releases: 01 - BEGIN ';
503: IF (g_po_wf_debug = 'Y') THEN
504: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
505: END IF;
506:

Line 540: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,

536:
537: IF Unapprove_REL%FOUND THEN
538:
539:
540: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,
541: l_ItemKey,
542: l_Item_exist,
543: l_Item_end_date);
544:

Line 554: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_releases: 05 ' ||

550: -- Bypass this one
551:
552: NULL;
553:
554: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_releases: 05 ' ||
555: 'open WF item key exists ' ||l_itemkey;
556: -- /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
557:
558:

Line 581: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_releases: 10 ' ||

577: --
578: -- Invoke the Start_Approval_Reminder workflow
579: -- for every unique workflow Item key.
580:
581: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_unapprove_releases: 10 ' ||
582: 'Start WF item key =' ||l_itemkey;
583: IF (g_po_wf_debug = 'Y') THEN
584: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
585: END IF;

Line 587: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

583: IF (g_po_wf_debug = 'Y') THEN
584: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
585: END IF;
586:
587: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
588: l_doc_number,
589: l_doc_type,
590: l_doc_subtype,
591: l_release_num,

Line 611: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_releases: 900 - END ';

607: END LOOP;
608:
609: CLOSE Unapprove_REL;
610:
611: l_progress := 'PO_APPROVAL_REMINDER_SV.Process unapprove_releases: 900 - END ';
612: IF (g_po_wf_debug = 'Y') THEN
613: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
614: END IF;
615:

Line 618: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_releases','No data found');

614: END IF;
615:
616: EXCEPTION
617: WHEN NO_DATA_FOUND THEN
618: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_releases','No data found');
619: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_Unapprove_releases: 901 - ' ||
620: 'EXCEPTION - no data found sql error: ' || sqlcode;
621: IF (g_po_wf_debug = 'Y') THEN
622: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 619: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_Unapprove_releases: 901 - ' ||

615:
616: EXCEPTION
617: WHEN NO_DATA_FOUND THEN
618: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_releases','No data found');
619: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_Unapprove_releases: 901 - ' ||
620: 'EXCEPTION - no data found sql error: ' || sqlcode;
621: IF (g_po_wf_debug = 'Y') THEN
622: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
623: END IF;

Line 627: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_releases','SQL error ' || sqlcode);

623: END IF;
624:
625:
626: WHEN OTHERS THEN
627: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_releases','SQL error ' || sqlcode);
628: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_Unapprove_releases: 990 - ' ||
629: 'EXCEPTION - sql error: ' || sqlcode;
630: IF (g_po_wf_debug = 'Y') THEN
631: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 628: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_Unapprove_releases: 990 - ' ||

624:
625:
626: WHEN OTHERS THEN
627: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Unapprove_releases','SQL error ' || sqlcode);
628: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_Unapprove_releases: 990 - ' ||
629: 'EXCEPTION - sql error: ' || sqlcode;
630: IF (g_po_wf_debug = 'Y') THEN
631: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
632: END IF;

Line 704: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 01 - BEGIN ';

700:
701: BEGIN
702:
703:
704: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 01 - BEGIN ';
705: IF (g_po_wf_debug = 'Y') THEN
706: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
707: END IF;
708:

Line 746: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,

742: */
743: IF PO_acceptance%FOUND THEN
744:
745:
746: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,
747: l_ItemKey,
748: l_Item_exist,
749: l_Item_end_date);
750:

Line 759: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 02 - item key exists ';

755: -- to_date(to_char(SYSDATE,'DD-MON-YYYY'),'DD/MM/YYYY') THEN
756: -- bug: 1076985
757:
758: -- bug 3896181
759: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 02 - item key exists ';
760: IF (g_po_wf_debug = 'Y') THEN
761: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
762: end if;
763: -- bug 3896181

Line 768: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 03 - acc_due_date > sysdate ';

764:
765: IF trunc(l_acceptance_due_date) > trunc(sysdate) THEN
766:
767: -- bug 3896181
768: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 03 - acc_due_date > sysdate ';
769: IF (g_po_wf_debug = 'Y') THEN
770: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
771: END IF;
772: IF l_Item_end_date is not null then

Line 773: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 04 - end_date not null';

769: IF (g_po_wf_debug = 'Y') THEN
770: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
771: END IF;
772: IF l_Item_end_date is not null then
773: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 04 - end_date not null';
774: IF (g_po_wf_debug = 'Y') THEN
775: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
776: END IF;
777: -- bug 3896181

Line 778: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

774: IF (g_po_wf_debug = 'Y') THEN
775: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
776: END IF;
777: -- bug 3896181
778: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,
779: l_doc_header_id,
780: NULL);
781: -- bug 3896181
782:

Line 788: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

784: l_itemkey,
785: SYSDATE,
786: true,
787: true);
788: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
789: l_doc_number,
790: l_doc_type,
791: l_doc_subtype,
792: l_release_num,

Line 797: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 05 - end_date is null';

793: l_agent_id,
794: l_itemkey);
795: COMMIT;
796: ELSE -- l_Item_end_date is not null
797: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 05 - end_date is null';
798: IF (g_po_wf_debug = 'Y') THEN
799: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
800: -- bug 3896181
801: END IF;

Line 811: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 06 - PO_ACCEPTANCE_PAST_DUE';

807: where wias.notification_id = wfn.group_id
808: and wias.item_type = 'APVRMDER'
809: and wias.item_key = l_ItemKey ;
810: IF l_message_name = 'PO_ACCEPTANCE_PAST_DUE' then
811: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 06 - PO_ACCEPTANCE_PAST_DUE';
812: -- bug 3896181
813: IF (g_po_wf_debug = 'Y') THEN
814: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
815: END IF;

Line 817: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

813: IF (g_po_wf_debug = 'Y') THEN
814: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
815: END IF;
816: -- bug 3896181
817: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,
818: l_doc_header_id,
819: NULL);
820: -- bug 3896181
821: --

Line 831: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

827: docommit => true, --
828: force => true); --
829:
830: -- bug 3896181
831: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
832: l_doc_number,
833: l_doc_type,
834: l_doc_subtype,
835: l_release_num,

Line 842: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 07 - acc_due_date < sysdate';

838: COMMIT;
839: END IF; -- l_message_name = 'PO_ACCEPTANCE_PAST_DUE'
840: END IF; -- l_Item_end_date is not null
841: ELSE -- l_acceptance_due_date) > trunc(sysdate)
842: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 07 - acc_due_date < sysdate';
843: -- bug 3896181
844: IF (g_po_wf_debug = 'Y') THEN
845: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
846: END IF;

Line 850: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 08 - end_date is not null';

846: END IF;
847:
848: -- bug 3896181
849: IF l_Item_end_date is not NULL THEN
850: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 08 - end_date is not null';
851: IF (g_po_wf_debug = 'Y') THEN
852: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
853: END IF;
854: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

Line 854: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

850: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 08 - end_date is not null';
851: IF (g_po_wf_debug = 'Y') THEN
852: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
853: END IF;
854: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,
855: l_doc_header_id,
856: NULL);
857: WF_PURGE.ITEMS (l_ItemType,
858: l_itemkey,

Line 864: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

860: true,
861: true);
862: -- bug 3896181
863:
864: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
865: l_doc_number,
866: l_doc_type,
867: l_doc_subtype,
868: l_release_num,

Line 879: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 09 - end_date is null';

875:
876: COMMIT;
877: -- bug 3896181
878: ELSE -- l_Item_end_date is not NULL
879: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 09 - end_date is null';
880: IF (g_po_wf_debug = 'Y') THEN
881: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
882: -- bug 3896181
883: END IF;

Line 892: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 10 - PO_ACCEPTANCE_REQUIRED';

888: where wias.notification_id = wfn.group_id
889: and wias.item_type = 'APVRMDER'
890: and wias.item_key = l_ItemKey ;
891: IF l_message_name = 'PO_ACCEPTANCE_REQUIRED' then
892: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 10 - PO_ACCEPTANCE_REQUIRED';
893: IF (g_po_wf_debug = 'Y') THEN
894: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
895: END IF;
896: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

Line 896: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

892: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 10 - PO_ACCEPTANCE_REQUIRED';
893: IF (g_po_wf_debug = 'Y') THEN
894: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
895: END IF;
896: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,
897: l_doc_header_id,
898: NULL);
899: WF_PURGE.ITEMS (l_ItemType,
900: l_itemkey,

Line 906: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

902: true,
903: true);
904: -- bug 3896181
905:
906: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
907: l_doc_number,
908: l_doc_type,
909: l_doc_subtype,
910: l_release_num,

Line 919: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 11 - l_item_exists is N';

915: END IF; -- l_message_name = 'PO_ACCEPTANCE_REQUIRED'
916: END IF; -- l_Item_end_date is not NULL
917: END IF; -- l_acceptance_due_date) > trunc(sysdate)
918: ELSE -- l_item_exist = 'Y'
919: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 11 - l_item_exists is N';
920: -- bug 3896181
921: IF (g_po_wf_debug = 'Y') THEN
922: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
923: END IF;

Line 925: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

921: IF (g_po_wf_debug = 'Y') THEN
922: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
923: END IF;
924: -- bug 3896181
925: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
926: l_doc_number,
927: l_doc_type,
928: l_doc_subtype,
929: l_release_num,

Line 949: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 900 - END ';

945:
946: CLOSE PO_acceptance;
947:
948:
949: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 900 - END ';
950: IF (g_po_wf_debug = 'Y') THEN
951: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
952: END IF;
953:

Line 956: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_po_acceptance','No data found');

952: END IF;
953:
954: EXCEPTION
955: WHEN NO_DATA_FOUND THEN
956: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_po_acceptance','No data found');
957: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 901 - ' ||
958: 'EXCEPTION - no data found sql error: ' || sqlcode;
959: IF (g_po_wf_debug = 'Y') THEN
960: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 957: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 901 - ' ||

953:
954: EXCEPTION
955: WHEN NO_DATA_FOUND THEN
956: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_po_acceptance','No data found');
957: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 901 - ' ||
958: 'EXCEPTION - no data found sql error: ' || sqlcode;
959: IF (g_po_wf_debug = 'Y') THEN
960: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
961: END IF;

Line 964: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_po_acceptance','SQL error ' || sqlcode);

960: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
961: END IF;
962:
963: WHEN OTHERS THEN
964: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_po_acceptance','SQL error ' || sqlcode);
965: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 990 - ' ||
966: 'EXCEPTION - sql error: ' || sqlcode;
967: IF (g_po_wf_debug = 'Y') THEN
968: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 965: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 990 - ' ||

961: END IF;
962:
963: WHEN OTHERS THEN
964: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_po_acceptance','SQL error ' || sqlcode);
965: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_po_acceptance: 990 - ' ||
966: 'EXCEPTION - sql error: ' || sqlcode;
967: IF (g_po_wf_debug = 'Y') THEN
968: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
969: END IF;

Line 1046: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 01 - BEGIN ';

1042:
1043: l_message_name VARCHAR2(300) := NULL; --bug 3896181
1044: BEGIN
1045:
1046: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 01 - BEGIN ';
1047: IF (g_po_wf_debug = 'Y') THEN
1048: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1049: END IF;
1050:

Line 1095: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,

1091: IF REL_acceptance%FOUND THEN
1092:
1093:
1094: -- Call Workflow to check if the itemkey already exists
1095: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,
1096: l_ItemKey,
1097: l_Item_exist,
1098: l_Item_end_date);
1099:

Line 1103: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 02 - item key exists ';

1099:
1100: IF l_item_exist = 'Y' THEN
1101:
1102: --bug 3896181
1103: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 02 - item key exists ';
1104: IF (g_po_wf_debug = 'Y') THEN
1105: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1106: END IF;
1107: IF trunc(l_acceptance_due_date) > trunc(sysdate) THEN

Line 1108: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 03 - acc_due_date > sysdate ';

1104: IF (g_po_wf_debug = 'Y') THEN
1105: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1106: END IF;
1107: IF trunc(l_acceptance_due_date) > trunc(sysdate) THEN
1108: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 03 - acc_due_date > sysdate ';
1109: IF (g_po_wf_debug = 'Y') THEN
1110: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1111: END IF;
1112: IF l_Item_end_date is not null then

Line 1113: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 04 - end_date not null';

1109: IF (g_po_wf_debug = 'Y') THEN
1110: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1111: END IF;
1112: IF l_Item_end_date is not null then
1113: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 04 - end_date not null';
1114: IF (g_po_wf_debug = 'Y') THEN
1115: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1116: END IF;
1117: --bug 3896181

Line 1119: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

1115: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1116: END IF;
1117: --bug 3896181
1118:
1119: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,
1120: l_doc_header_id,
1121: NULL);
1122: --bug 3896181
1123: WF_PURGE.ITEMS (l_ItemType,

Line 1128: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

1124: l_itemkey,
1125: SYSDATE,
1126: true,
1127: true);
1128: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
1129: l_doc_number,
1130: l_doc_type,
1131: l_doc_subtype,
1132: l_release_num,

Line 1137: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 05 - end_date is null';

1133: l_agent_id,
1134: l_itemkey);
1135: COMMIT;
1136: ELSE -- l_Item_end_date is not null
1137: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 05 - end_date is null';
1138: IF (g_po_wf_debug = 'Y') THEN
1139: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1140: --bug 3896181
1141: END IF;

Line 1156: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 06 - REL_ACCEPTANCE_PAST_DUE';

1152: when others then
1153: NULL;
1154: end ;
1155: IF l_message_name = 'REL_ACCEPTANCE_PAST_DUE' then
1156: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 06 - REL_ACCEPTANCE_PAST_DUE';
1157: --bug 3896181
1158: IF (g_po_wf_debug = 'Y') THEN
1159: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1160: END IF;

Line 1162: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

1158: IF (g_po_wf_debug = 'Y') THEN
1159: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1160: END IF;
1161: --bug 3896181
1162: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,
1163: l_doc_header_id,
1164: NULL);
1165: --bug 3896181
1166:

Line 1176: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

1172: docommit => true, --
1173: force => true); --
1174:
1175: --bug 3896181
1176: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
1177: l_doc_number,
1178: l_doc_type,
1179: l_doc_subtype,
1180: l_release_num,

Line 1187: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 07 - acc_due_date < sysdate';

1183: COMMIT;
1184: END IF; -- l_message_name = 'REL_ACCEPTANCE_PAST_DUE'
1185: END IF; -- l_Item_end_date is not null
1186: ELSE -- trunc(l_acceptance_due_date) > trunc(sysdate)
1187: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 07 - acc_due_date < sysdate';
1188: --bug 3896181
1189: IF (g_po_wf_debug = 'Y') THEN
1190: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1191: END IF;

Line 1195: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 08 - end_date is not null';

1191: END IF;
1192:
1193: --bug 3896181
1194: IF l_Item_end_date is not NULL THEN
1195: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 08 - end_date is not null';
1196: IF (g_po_wf_debug = 'Y') THEN
1197: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1198: END IF;
1199: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

Line 1199: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

1195: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 08 - end_date is not null';
1196: IF (g_po_wf_debug = 'Y') THEN
1197: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1198: END IF;
1199: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,
1200: l_doc_header_id,
1201: NULL);
1202: WF_PURGE.ITEMS (l_ItemType,
1203: l_itemkey,

Line 1210: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

1206: true);
1207:
1208: --bug 3896181
1209:
1210: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
1211: l_doc_number,
1212: l_doc_type,
1213: l_doc_subtype,
1214: l_release_num,

Line 1224: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 09 - end_date is null';

1220:
1221: COMMIT;
1222: --bug 3896181
1223: ELSE -- l_Item_end_date is not NULL
1224: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 09 - end_date is null';
1225: IF (g_po_wf_debug = 'Y') THEN
1226: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1227: --bug 3896181
1228: END IF;

Line 1243: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 10 - REL_ACCEPTANCE_REQUIRED';

1239: when others then
1240: NULL;
1241: end ;
1242: If l_message_name = 'REL_ACCEPTANCE_REQUIRED' then
1243: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 10 - REL_ACCEPTANCE_REQUIRED';
1244: IF (g_po_wf_debug = 'Y') THEN
1245: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1246: END IF;
1247: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

Line 1247: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,

1243: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 10 - REL_ACCEPTANCE_REQUIRED';
1244: IF (g_po_wf_debug = 'Y') THEN
1245: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1246: END IF;
1247: PO_APPROVAL_REMINDER_SV.Cancel_Notif (l_doc_type,
1248: l_doc_header_id,
1249: NULL);
1250: WF_PURGE.ITEMS (l_ItemType,
1251: l_itemkey,

Line 1256: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

1252: SYSDATE,
1253: true,
1254: true);
1255: --bug 3896181
1256: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
1257: l_doc_number,
1258: l_doc_type,
1259: l_doc_subtype,
1260: l_release_num,

Line 1269: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 11 - l_item_exists is N';

1265: END IF; -- l_message_name = 'REL_ACCEPTANCE_REQUIRED'
1266: END IF; -- l_Item_end_date is not NULL
1267: END IF; -- trunc(l_acceptance_due_date) > trunc(sysdate)
1268: ELSE -- l_item_exist = 'Y'
1269: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 11 - l_item_exists is N';
1270: --bug 3896181
1271: IF (g_po_wf_debug = 'Y') THEN
1272: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1273: END IF;

Line 1275: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

1271: IF (g_po_wf_debug = 'Y') THEN
1272: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1273: END IF;
1274: --bug 3896181
1275: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
1276: l_doc_number,
1277: l_doc_type,
1278: l_doc_subtype,
1279: l_release_num,

Line 1299: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 900 - END ';

1295: END LOOP;
1296:
1297: CLOSE REL_acceptance;
1298:
1299: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 900 - END ';
1300: IF (g_po_wf_debug = 'Y') THEN
1301: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1302: END IF;
1303:

Line 1307: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rel_acceptance','No data found');

1303:
1304:
1305: EXCEPTION
1306: WHEN NO_DATA_FOUND THEN
1307: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rel_acceptance','No data found');
1308: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 901 - ' ||
1309: 'EXCEPTION - no data found sql error: ' || sqlcode;
1310: IF (g_po_wf_debug = 'Y') THEN
1311: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 1308: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 901 - ' ||

1304:
1305: EXCEPTION
1306: WHEN NO_DATA_FOUND THEN
1307: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rel_acceptance','No data found');
1308: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 901 - ' ||
1309: 'EXCEPTION - no data found sql error: ' || sqlcode;
1310: IF (g_po_wf_debug = 'Y') THEN
1311: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1312: END IF;

Line 1315: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rel_acceptance','SQL error ' || sqlcode);

1311: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1312: END IF;
1313:
1314: WHEN OTHERS THEN
1315: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rel_acceptance','SQL error ' || sqlcode);
1316: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 990 - ' ||
1317: 'EXCEPTION - sql error: ' || sqlcode;
1318: IF (g_po_wf_debug = 'Y') THEN
1319: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 1316: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 990 - ' ||

1312: END IF;
1313:
1314: WHEN OTHERS THEN
1315: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rel_acceptance','SQL error ' || sqlcode);
1316: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rel_acceptance: 990 - ' ||
1317: 'EXCEPTION - sql error: ' || sqlcode;
1318: IF (g_po_wf_debug = 'Y') THEN
1319: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1320: END IF;

Line 1404: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 01 - BEGIN ';

1400: l_progress VARCHAR2(300) := NULL;
1401:
1402: BEGIN
1403:
1404: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 01 - BEGIN ';
1405: IF (g_po_wf_debug = 'Y') THEN
1406: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1407: END IF;
1408:

Line 1466: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02 - sysdate : '||

1462:
1463: l_quote_end_date_temp := l_quote_end_date_active - l_quote_warning_delay;
1464:
1465:
1466: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02 - sysdate : '||
1467: to_char(SYSDATE,'DD/MM/YYYY');
1468: --/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1469:
1470:

Line 1471: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02 - quote end date active : '||

1467: to_char(SYSDATE,'DD/MM/YYYY');
1468: --/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1469:
1470:
1471: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02 - quote end date active : '||
1472: to_char(l_quote_end_date_active,'DD/MM/YYYY');
1473: --/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1474:
1475: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02 - quote warning delay : '||

Line 1475: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02 - quote warning delay : '||

1471: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02 - quote end date active : '||
1472: to_char(l_quote_end_date_active,'DD/MM/YYYY');
1473: --/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1474:
1475: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02 - quote warning delay : '||
1476: l_quote_warning_delay;
1477: --/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1478:
1479:

Line 1480: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02 - quote end date temp : '||

1476: l_quote_warning_delay;
1477: --/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1478:
1479:
1480: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02 - quote end date temp : '||
1481: to_char(l_quote_end_date_temp,'DD/MM/YYYY');
1482: --/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1483:
1484:

Line 1493: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02-set l_start_ntfn_wf_ok: '||

1489: to_date(to_char(l_quote_end_date_temp,'DD/MM/YYYY'),'DD/MM/YYYY') THEN
1490:
1491: l_start_ntfn_wf_ok := 'Y';
1492:
1493: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 02-set l_start_ntfn_wf_ok: '||
1494: l_start_ntfn_wf_ok;
1495: --/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1496:
1497: END IF;

Line 1508: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 03 - l_start_ntfn_wf_ok: '||

1504:
1505: END IF;
1506:
1507:
1508: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 03 - l_start_ntfn_wf_ok: '||
1509: l_start_ntfn_wf_ok;
1510: IF (g_po_wf_debug = 'Y') THEN
1511: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1512: END IF;

Line 1522: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,

1518:
1519: IF RFQ_QUOTE%FOUND THEN
1520:
1521: -- Call Workflow to check if the itemkey already exists
1522: PO_APPROVAL_REMINDER_SV.item_exist (l_ItemType,
1523: l_ItemKey,
1524: l_Item_exist,
1525: l_Item_end_date);
1526:

Line 1534: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 05 ' ||

1530: -- Bypass this one
1531:
1532: NULL;
1533:
1534: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 05 ' ||
1535: 'open WF item key exists ' ||l_itemkey;
1536: -- /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1537:
1538: ELSE

Line 1543: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 10 ' ||

1539: -- Workflow item does not exist
1540: -- Invoke the Start_Approval_Reminder workflow
1541: -- for every unique workflow Item key.
1542:
1543: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 10 ' ||
1544: 'Start WF item key =' ||l_itemkey;
1545: IF (g_po_wf_debug = 'Y') THEN
1546: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1547: END IF;

Line 1549: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,

1545: IF (g_po_wf_debug = 'Y') THEN
1546: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1547: END IF;
1548:
1549: PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder (l_doc_header_id,
1550: l_doc_number,
1551: l_doc_type,
1552: l_doc_subtype,
1553: l_release_num,

Line 1578: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 900 - END ';

1574:
1575: CLOSE RFQ_QUOTE;
1576:
1577:
1578: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 900 - END ';
1579: IF (g_po_wf_debug = 'Y') THEN
1580: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1581: END IF;
1582:

Line 1586: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rfq_quote','No data found');

1582:
1583:
1584: EXCEPTION
1585: WHEN NO_DATA_FOUND THEN
1586: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rfq_quote','No data found');
1587: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 901 - ' ||
1588: 'EXCEPTION - no data found sql error: ' || sqlcode;
1589: IF (g_po_wf_debug = 'Y') THEN
1590: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 1587: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 901 - ' ||

1583:
1584: EXCEPTION
1585: WHEN NO_DATA_FOUND THEN
1586: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rfq_quote','No data found');
1587: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 901 - ' ||
1588: 'EXCEPTION - no data found sql error: ' || sqlcode;
1589: IF (g_po_wf_debug = 'Y') THEN
1590: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1591: END IF;

Line 1594: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rfq_quote','SQL error ' || sqlcode);

1590: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1591: END IF;
1592:
1593: WHEN OTHERS THEN
1594: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rfq_quote','SQL error ' || sqlcode);
1595: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 990 - ' ||
1596: 'EXCEPTION - sql error: ' || sqlcode;
1597: IF (g_po_wf_debug = 'Y') THEN
1598: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 1595: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 990 - ' ||

1591: END IF;
1592:
1593: WHEN OTHERS THEN
1594: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_rfq_quote','SQL error ' || sqlcode);
1595: l_progress := 'PO_APPROVAL_REMINDER_SV.Process_rfq_quote: 990 - ' ||
1596: 'EXCEPTION - sql error: ' || sqlcode;
1597: IF (g_po_wf_debug = 'Y') THEN
1598: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1599: END IF;

Line 1638: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder: 01 ';

1634: l_progress VARCHAR2(300) := NULL;
1635:
1636: BEGIN
1637:
1638: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder: 01 ';
1639: IF (g_po_wf_debug = 'Y') THEN
1640: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1641: END IF;
1642:

Line 1728: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder: 900 ';

1724: -- dbms_output.put_line ('Start_Approval_Reminder, agent dispname '|| l_agent_disp_name);
1725: wf_engine.StartProcess ( ItemType => l_ItemType,
1726: ItemKey => l_ItemKey );
1727:
1728: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder: 900 ';
1729: IF (g_po_wf_debug = 'Y') THEN
1730: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1731: END IF;
1732:

Line 1737: wf_core.context ('PO_APPROVAL_REMINDER_SV','Start_Approval_Reminder','SQL error ' || sqlcode);

1733:
1734: EXCEPTION
1735:
1736: WHEN OTHERS THEN
1737: wf_core.context ('PO_APPROVAL_REMINDER_SV','Start_Approval_Reminder','SQL error ' || sqlcode);
1738: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder: 990 - ' ||
1739: 'EXCEPTION - sql error: ' || sqlcode;
1740: IF (g_po_wf_debug = 'Y') THEN
1741: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);

Line 1738: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder: 990 - ' ||

1734: EXCEPTION
1735:
1736: WHEN OTHERS THEN
1737: wf_core.context ('PO_APPROVAL_REMINDER_SV','Start_Approval_Reminder','SQL error ' || sqlcode);
1738: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Approval_Reminder: 990 - ' ||
1739: 'EXCEPTION - sql error: ' || sqlcode;
1740: IF (g_po_wf_debug = 'Y') THEN
1741: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,l_progress);
1742: END IF;

Line 1800: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 01 ';

1796: l_progress VARCHAR2(300) := NULL;
1797:
1798: BEGIN
1799:
1800: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 01 ';
1801: IF (g_po_wf_debug = 'Y') THEN
1802: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);
1803: END IF;
1804:

Line 2072: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 05 RESULT ' ||

2068: -- Set RESULT type
2069:
2070: RESULT := l_doc_type;
2071:
2072: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 05 RESULT ' ||
2073: l_doc_type;
2074: IF (g_po_wf_debug = 'Y') THEN
2075: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);
2076: END IF;

Line 2086: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 900 ';

2082: --
2083: END IF;
2084:
2085:
2086: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 900 ';
2087: IF (g_po_wf_debug = 'Y') THEN
2088: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);
2089: END IF;
2090:

Line 2094: wf_core.context ('PO_APPROVAL_REMINDER_SV','Set_Doc_Type','No data found');

2090:
2091:
2092: EXCEPTION
2093: WHEN NO_DATA_FOUND THEN
2094: wf_core.context ('PO_APPROVAL_REMINDER_SV','Set_Doc_Type','No data found');
2095: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 901 - ' ||
2096: 'EXCEPTION - no data found sql error: ' || sqlcode;
2097: IF (g_po_wf_debug = 'Y') THEN
2098: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);

Line 2095: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 901 - ' ||

2091:
2092: EXCEPTION
2093: WHEN NO_DATA_FOUND THEN
2094: wf_core.context ('PO_APPROVAL_REMINDER_SV','Set_Doc_Type','No data found');
2095: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 901 - ' ||
2096: 'EXCEPTION - no data found sql error: ' || sqlcode;
2097: IF (g_po_wf_debug = 'Y') THEN
2098: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);
2099: END IF;

Line 2102: wf_core.context ('PO_APPROVAL_REMINDER_SV','Set_Doc_Type','SQL error ' || sqlcode);

2098: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);
2099: END IF;
2100:
2101: WHEN OTHERS THEN
2102: wf_core.context ('PO_APPROVAL_REMINDER_SV','Set_Doc_Type','SQL error ' || sqlcode);
2103: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 990 - ' ||
2104: 'EXCEPTION - sql error: ' || sqlcode;
2105: IF (g_po_wf_debug = 'Y') THEN
2106: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);

Line 2103: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 990 - ' ||

2099: END IF;
2100:
2101: WHEN OTHERS THEN
2102: wf_core.context ('PO_APPROVAL_REMINDER_SV','Set_Doc_Type','SQL error ' || sqlcode);
2103: l_progress := 'PO_APPROVAL_REMINDER_SV.Set_Doc_Type: 990 - ' ||
2104: 'EXCEPTION - sql error: ' || sqlcode;
2105: IF (g_po_wf_debug = 'Y') THEN
2106: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);
2107: END IF;

Line 2151: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Doc_Approval: 01 ';

2147: l_progress VARCHAR2(300) := NULL;
2148:
2149: BEGIN
2150:
2151: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Doc_Approval: 01 ';
2152: IF (g_po_wf_debug = 'Y') THEN
2153: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);
2154: END IF;
2155:

Line 2283: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Doc_Approval: 900 - END ';

2279: --
2280: END IF;
2281:
2282:
2283: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Doc_Approval: 900 - END ';
2284: IF (g_po_wf_debug = 'Y') THEN
2285: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);
2286: END IF;
2287:

Line 2291: wf_core.context ('PO_APPROVAL_REMINDER_SV','Start_Doc_Approval','No data found');

2287:
2288:
2289: EXCEPTION
2290: WHEN NO_DATA_FOUND THEN
2291: wf_core.context ('PO_APPROVAL_REMINDER_SV','Start_Doc_Approval','No data found');
2292: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Doc_Approval: 901 - ' ||
2293: 'EXCEPTION - no data found sql error: ' || sqlcode;
2294: IF (g_po_wf_debug = 'Y') THEN
2295: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);

Line 2292: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Doc_Approval: 901 - ' ||

2288:
2289: EXCEPTION
2290: WHEN NO_DATA_FOUND THEN
2291: wf_core.context ('PO_APPROVAL_REMINDER_SV','Start_Doc_Approval','No data found');
2292: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Doc_Approval: 901 - ' ||
2293: 'EXCEPTION - no data found sql error: ' || sqlcode;
2294: IF (g_po_wf_debug = 'Y') THEN
2295: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);
2296: END IF;

Line 2300: wf_core.context ('PO_APPROVAL_REMINDER_SV','Start_Doc_Approval','SQL error ' || sqlcode);

2296: END IF;
2297:
2298:
2299: WHEN OTHERS THEN
2300: wf_core.context ('PO_APPROVAL_REMINDER_SV','Start_Doc_Approval','SQL error ' || sqlcode);
2301: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Doc_Approval: 990 - ' ||
2302: 'EXCEPTION - sql error: ' || sqlcode;
2303: IF (g_po_wf_debug = 'Y') THEN
2304: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);

Line 2301: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Doc_Approval: 990 - ' ||

2297:
2298:
2299: WHEN OTHERS THEN
2300: wf_core.context ('PO_APPROVAL_REMINDER_SV','Start_Doc_Approval','SQL error ' || sqlcode);
2301: l_progress := 'PO_APPROVAL_REMINDER_SV.Start_Doc_Approval: 990 - ' ||
2302: 'EXCEPTION - sql error: ' || sqlcode;
2303: IF (g_po_wf_debug = 'Y') THEN
2304: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,l_progress);
2305: END IF;

Line 2376: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 01 ' ||

2372: /* RETROACTIVE FPI END */
2373:
2374: BEGIN
2375:
2376: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 01 ' ||
2377: p_DocumentTypeCode || p_DocumentSubtype || p_DocumentNumber;
2378: IF (g_po_wf_debug = 'Y') THEN
2379: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug('APVRMDER',NULL,l_progress);
2380: END IF;

Line 2412: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 02 ' ||

2408: * to do the same from here also. Now we will get email or
2409: * document will get printed depending on the setup when we
2410: * we approve the document from the Notification Summary screen.
2411: */
2412: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 02 ' ||
2413: p_DocumentTypeCode || p_DocumentSubtype ||
2414: p_DocumentNumber;
2415: IF (g_po_wf_debug = 'Y') THEN
2416: PO_WF_DEBUG_PKG.insert_debug('POXWARMB',NULL,l_progress);

Line 2457: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 03 ' ||

2453: * since we need these values to set some workflow attributes
2454: * before we call start_Wf_process.
2455: */
2456:
2457: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 03 ' ||
2458: p_DocumentTypeCode || p_DocumentSubtype ||
2459: p_DocumentNumber;
2460: IF (g_po_wf_debug = 'Y') THEN
2461: PO_WF_DEBUG_PKG.insert_debug('POXWARMB',NULL,l_progress);

Line 2523: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 04 ' ||

2519: /* Bug 2780033.
2520: * Add the communication flags to the call to
2521: * start_wf_process below.
2522: */
2523: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 04 ' ||
2524: p_DocumentTypeCode || p_DocumentSubtype ||
2525: p_DocumentNumber;
2526: IF (g_po_wf_debug = 'Y') THEN
2527: PO_WF_DEBUG_PKG.insert_debug('POXWARMB',NULL,l_progress);

Line 2550: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 900 ' ||

2546: EmailFlag => l_emailflag,
2547: EmailAddress => l_emailaddress);
2548:
2549:
2550: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 900 ' ||
2551: p_DocumentTypeCode || p_DocumentSubtype || p_DocumentNumber;
2552: IF (g_po_wf_debug = 'Y') THEN
2553: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug('APVRMDER',l_itemkey,l_progress);
2554: END IF;

Line 2561: wf_core.context ('PO_APPROVAL_REMINDER_SV','SetUpWorkFlow','SQL error ' || sqlcode);

2557:
2558: EXCEPTION
2559:
2560: WHEN OTHERS THEN
2561: wf_core.context ('PO_APPROVAL_REMINDER_SV','SetUpWorkFlow','SQL error ' || sqlcode);
2562: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 990 - ' ||
2563: 'EXCEPTION - sql error: ' || sqlcode;
2564: IF (g_po_wf_debug = 'Y') THEN
2565: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug('APVRMDER',l_itemkey,l_progress);

Line 2562: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 990 - ' ||

2558: EXCEPTION
2559:
2560: WHEN OTHERS THEN
2561: wf_core.context ('PO_APPROVAL_REMINDER_SV','SetUpWorkFlow','SQL error ' || sqlcode);
2562: l_progress := 'PO_APPROVAL_REMINDER_SV.SetUpWorkFlow: 990 - ' ||
2563: 'EXCEPTION - sql error: ' || sqlcode;
2564: IF (g_po_wf_debug = 'Y') THEN
2565: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug('APVRMDER',l_itemkey,l_progress);
2566: END IF;

Line 2600: x_progress := 'PO_APPROVAL_REMINDER_SV.Is_Forward_To_Valid: 01';

2596:
2597:
2598: BEGIN
2599:
2600: x_progress := 'PO_APPROVAL_REMINDER_SV.Is_Forward_To_Valid: 01';
2601: IF (g_po_wf_debug = 'Y') THEN
2602: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2603: END IF;
2604:

Line 2628: x_progress := 'PO_APPROVAL_REMINDER_SV.Is_Forward_To_Valid: 02';

2624: aname => 'FORWARD_TO_USERNAME_RESPONSE');
2625:
2626: l_forward_to_username_response := UPPER(l_forward_to_username_response);
2627:
2628: x_progress := 'PO_APPROVAL_REMINDER_SV.Is_Forward_To_Valid: 02';
2629: x_progress := x_progress || ' Forward-To=' || l_forward_to_username_response;
2630: IF (g_po_wf_debug = 'Y') THEN
2631: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2632: END IF;

Line 2755: x_progress := 'PO_APPROVAL_REMINDER_SV.Is_Forward_To_Valid: 900';

2751:
2752: END IF;
2753:
2754:
2755: x_progress := 'PO_APPROVAL_REMINDER_SV.Is_Forward_To_Valid: 900';
2756: IF (g_po_wf_debug = 'Y') THEN
2757: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2758: END IF;
2759:

Line 2764: wf_core.context ('PO_APPROVAL_REMINDER_SV','Is_Forward_To_Valid','SQL error ' || sqlcode);

2760:
2761: EXCEPTION
2762:
2763: WHEN OTHERS THEN
2764: wf_core.context ('PO_APPROVAL_REMINDER_SV','Is_Forward_To_Valid','SQL error ' || sqlcode);
2765: x_progress := 'PO_APPROVAL_REMINDER_SV.Is_Forward_To_Valid: 990 - ' ||
2766: 'EXCEPTION - sql error: ' || sqlcode;
2767: IF (g_po_wf_debug = 'Y') THEN
2768: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);

Line 2765: x_progress := 'PO_APPROVAL_REMINDER_SV.Is_Forward_To_Valid: 990 - ' ||

2761: EXCEPTION
2762:
2763: WHEN OTHERS THEN
2764: wf_core.context ('PO_APPROVAL_REMINDER_SV','Is_Forward_To_Valid','SQL error ' || sqlcode);
2765: x_progress := 'PO_APPROVAL_REMINDER_SV.Is_Forward_To_Valid: 990 - ' ||
2766: 'EXCEPTION - sql error: ' || sqlcode;
2767: IF (g_po_wf_debug = 'Y') THEN
2768: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2769: END IF;

Line 2816: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-001';

2812: BEGIN
2813: l_doc_subtype := p_DocumentTypeCode;
2814: if ((p_DocumentTypeCode = 'STANDARD') or (p_DocumentTypeCode = 'PLANNED')) then
2815:
2816: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-001';
2817:
2818: l_doc_type := 'PO';
2819:
2820: select agent_id

Line 2834: if (po_approval_reminder_sv.is_active('APVRMDER',rec.item_key)) then

2830: l_doc_subtype ||'-'||
2831: to_char(p_DocumentId) ||'-';
2832:
2833: For rec in cand_active_wf(l_itemkey) LOOP
2834: if (po_approval_reminder_sv.is_active('APVRMDER',rec.item_key)) then
2835: WF_Engine.AbortProcess('APVRMDER',rec.item_key);
2836: end if;
2837: End Loop;
2838:

Line 2844: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-002';

2840:
2841:
2842: if (p_ReleaseFlag = 'Y') then /* the doc_type must be RELEASE */
2843:
2844: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-002';
2845:
2846: l_doc_type := 'RELEASE';
2847:
2848: select agent_id

Line 2863: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-003';

2859: to_char(p_DocumentId) ||'-'||
2860: to_char(l_agent_id);
2861: else
2862:
2863: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-003';
2864:
2865: l_doc_type := 'PA';
2866:
2867: select agent_id

Line 2880: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then

2876: l_doc_subtype ||'-'||
2877: to_char(p_DocumentId) ||'-'||
2878: to_char(l_agent_id);
2879: end if;
2880: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then
2881: WF_Engine.AbortProcess('APVRMDER',l_itemkey);
2882: end if;
2883:
2884:

Line 2888: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-004';

2884:
2885:
2886: elsif ((p_DocumentTypeCode = 'INTERNAL') or (p_DocumentTypeCode = 'PURCHASE')) then
2887:
2888: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-004';
2889:
2890: l_doc_type := 'REQUISITION';
2891:
2892: select preparer_id

Line 2905: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then

2901: l_doc_subtype ||'-'||
2902: to_char(p_DocumentId) ||'-'||
2903: to_char(l_agent_id);
2904:
2905: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then
2906: WF_Engine.AbortProcess('APVRMDER',l_itemkey);
2907: end if;
2908:
2909: elsif (p_DocumentTypeCode = 'SCHEDULED') then

Line 2911: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-005';

2907: end if;
2908:
2909: elsif (p_DocumentTypeCode = 'SCHEDULED') then
2910:
2911: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-005';
2912:
2913: l_doc_type := 'RELEASE';
2914:
2915: select agent_id

Line 2928: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then

2924: l_doc_subtype ||'-'||
2925: to_char(p_DocumentId) ||'-'||
2926: to_char(l_agent_id);
2927:
2928: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then
2929: WF_Engine.AbortProcess('APVRMDER',l_itemkey);
2930: end if;
2931: elsif (p_DocumentTypeCode = 'PO_ACCEPTANCE') then
2932:

Line 2933: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-006';

2929: WF_Engine.AbortProcess('APVRMDER',l_itemkey);
2930: end if;
2931: elsif (p_DocumentTypeCode = 'PO_ACCEPTANCE') then
2932:
2933: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-006';
2934:
2935: l_doc_type := 'PO_ACCEPTANCE';
2936:
2937: select type_lookup_code

Line 2950: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then

2946: l_doc_subtype ||'-'||
2947: to_char(p_DocumentId);
2948:
2949:
2950: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then
2951: WF_Engine.AbortProcess('APVRMDER',l_itemkey);
2952: end if;
2953:
2954: -- Bug 3593182: Removed the item exists condition before

Line 2966: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-007';

2962: force => true); --
2963:
2964: elsif (p_DocumentTypeCode = 'REL_ACCEPTANCE') then
2965:
2966: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-007';
2967:
2968: l_doc_type := 'REL_ACCEPTANCE';
2969:
2970: select poh.type_lookup_code

Line 2989: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then

2985: l_doc_subtype ||'-'||
2986: to_char(p_DocumentId);
2987:
2988:
2989: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then
2990: WF_Engine.AbortProcess('APVRMDER',l_itemkey);
2991: end if;
2992:
2993: -- Bug 3593182: Removed the item exists condition before

Line 3006: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-008';

3002: force => true); --
3003:
3004: elsif (p_DocumentTypeCode = 'RFQ') then
3005:
3006: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-008';
3007: l_doc_type := 'RFQ';
3008:
3009: l_itemkey := l_doc_type ||
3010: to_char(p_DocumentId);

Line 3012: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then

3008:
3009: l_itemkey := l_doc_type ||
3010: to_char(p_DocumentId);
3011:
3012: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then
3013: WF_Engine.AbortProcess('APVRMDER',l_itemkey);
3014: end if;
3015:
3016:

Line 3029: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-009';

3025: force => true); --
3026:
3027: elsif (p_DocumentTypeCode = 'QUOTATION') then
3028:
3029: x_progress := 'PO_APPROVAL_REMINDER_SV.cancel_notif-009';
3030: l_doc_type := 'QUOTATION';
3031:
3032: l_itemkey := l_doc_type ||
3033: to_char(p_DocumentId);

Line 3035: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then

3031:
3032: l_itemkey := l_doc_type ||
3033: to_char(p_DocumentId);
3034:
3035: if (po_approval_reminder_sv.is_active('APVRMDER',l_itemkey)) then
3036: WF_Engine.AbortProcess('APVRMDER',l_itemkey);
3037: end if;
3038:
3039:

Line 3057: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Cancel_notification','SQL error ' || sqlcode);

3053: WHEN OTHERS THEN
3054: IF (g_po_wf_debug = 'Y') THEN
3055: PO_WF_DEBUG_PKG.insert_debug(null,null,x_progress);
3056: END IF;
3057: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Cancel_notification','SQL error ' || sqlcode);
3058: RAISE;
3059:
3060: END Cancel_Notif;
3061:

Line 3073: x_progress := 'PO_APPROVAL_REMINDER_SV.is_active-001';

3069:
3070: x_progress varchar2(100) := '001';
3071:
3072: BEGIN
3073: x_progress := 'PO_APPROVAL_REMINDER_SV.is_active-001';
3074:
3075: --bug#3693990 commented out the above sql because the view
3076: --wf_item_activity_statuses_v is a view which is based on
3077: --a union all between wf_item_activity_statuses and

Line 3107: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Check_Status','SQL error ' || sqlcode);

3103: WHEN OTHERS THEN
3104: IF (g_po_wf_debug = 'Y') THEN
3105: PO_WF_DEBUG_PKG.insert_debug(null,null,x_progress);
3106: END IF;
3107: wf_core.context ('PO_APPROVAL_REMINDER_SV','Process_Check_Status','SQL error ' || sqlcode);
3108: RAISE;
3109: return FALSE;
3110: END;
3111:

Line 3117: if (po_approval_reminder_sv.is_active(item_type,item_key)) then

3113: item_key in varchar2) is
3114:
3115: BEGIN
3116:
3117: if (po_approval_reminder_sv.is_active(item_type,item_key)) then
3118: WF_Engine.AbortProcess(item_type,item_key);
3119: end if;
3120:
3121: END stop_process;

Line 3135: l_progress := 'PO_APPROVAL_REMINDER_SV.Item_Exist: 01';

3131:
3132: BEGIN
3133:
3134:
3135: l_progress := 'PO_APPROVAL_REMINDER_SV.Item_Exist: 01';
3136: -- /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(p_itemtype,p_itemkey,l_progress);
3137:
3138: -- initialize the return variables
3139: p_item_exist := NULL;

Line 3149: l_progress := 'PO_APPROVAL_REMINDER_SV.Item_Exist: 900 ';

3145: WHERE WI.ITEM_TYPE = p_ItemType
3146: AND WI.ITEM_KEY = p_ItemKey;
3147:
3148:
3149: l_progress := 'PO_APPROVAL_REMINDER_SV.Item_Exist: 900 ';
3150: -- /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(p_itemtype,p_itemkey,l_progress);
3151:
3152:
3153: EXCEPTION

Line 3162: wf_core.context ('PO_APPROVAL_REMINDER_SV','Item_exist','SQL error ' || sqlcode);

3158: p_item_end_date := NULL;
3159:
3160: WHEN OTHERS THEN
3161:
3162: wf_core.context ('PO_APPROVAL_REMINDER_SV','Item_exist','SQL error ' || sqlcode);
3163: l_progress := 'PO_APPROVAL_REMINDER_SV.Item_Exist: 990 - ' ||
3164: 'EXCEPTION - sql error: ' || sqlcode;
3165: IF (g_po_wf_debug = 'Y') THEN
3166: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(p_itemtype,p_itemkey,l_progress);

Line 3163: l_progress := 'PO_APPROVAL_REMINDER_SV.Item_Exist: 990 - ' ||

3159:
3160: WHEN OTHERS THEN
3161:
3162: wf_core.context ('PO_APPROVAL_REMINDER_SV','Item_exist','SQL error ' || sqlcode);
3163: l_progress := 'PO_APPROVAL_REMINDER_SV.Item_Exist: 990 - ' ||
3164: 'EXCEPTION - sql error: ' || sqlcode;
3165: IF (g_po_wf_debug = 'Y') THEN
3166: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(p_itemtype,p_itemkey,l_progress);
3167: END IF;

Line 3442: PO_APPROVAL_REMINDER_SV.item_exist (p_ItemType => 'APVRMDER',

3438: END IF;
3439: END IF;
3440:
3441: -- Cancel and purge any existing reminder process for this line.
3442: PO_APPROVAL_REMINDER_SV.item_exist (p_ItemType => 'APVRMDER',
3443: p_ItemKey => l_item_key,
3444: p_Item_exist => l_item_exist,
3445: p_Item_end_date => l_item_end_date);
3446: IF (l_item_exist = 'Y') THEN

Line 3638: wf_core.context( 'PO_APPROVAL_REMINDER_SV',

3634: resultout := wf_engine.eng_completed || ':' || l_line_reminder_type;
3635:
3636: EXCEPTION
3637: WHEN OTHERS THEN
3638: wf_core.context( 'PO_APPROVAL_REMINDER_SV',
3639: 'GET_TEMP_LABOR_REMINDER_TYPE' );
3640: RAISE;
3641: END get_po_line_reminder_type;
3642:

Line 3645: END PO_APPROVAL_REMINDER_SV;

3641: END get_po_line_reminder_type;
3642:
3643: --
3644:
3645: END PO_APPROVAL_REMINDER_SV;