86: x_Progress := 'XDPCORE.StartWfProcess: Cannot Start Workflow process with null values for Itemtype: '
87: || NVL(itemtype, 'NULL') || ' Itemkey: ' || NVL(itemkey, 'NULL') || ' OrderID ' || NVL(OrderID, 'NULL')
88: || ' Process: ' || NVL(WorkflowProcess, 'NULL');
89:
90: wf_core.context('XDPCORE', 'StartWfProcess', itemtype, itemkey, x_Progress);
91: raise;
92: WHEN OTHERS THEN
93: wf_core.context('XDPCORE', 'StartWfProcess', itemtype, itemkey, null, null);
94: raise;
89:
90: wf_core.context('XDPCORE', 'StartWfProcess', itemtype, itemkey, x_Progress);
91: raise;
92: WHEN OTHERS THEN
93: wf_core.context('XDPCORE', 'StartWfProcess', itemtype, itemkey, null, null);
94: raise;
95: END StartWfProcess;
96:
97:
143: end if;
144:
145: exception
146: when others then
147: wf_core.context('XDPCORE', 'StartInitOrderProcess', itemtype, itemkey, null, x_progress);
148: raise;
149: end StartInitOrderProcess;
150:
151:
210: end if;
211:
212: exception
213: when others then
214: wf_core.context('XDPCORE', 'StartORUProcess', itemtype, itemkey, null, x_progress);
215: raise;
216: end StartORUProcess;
217:
218:
262: end if;
263:
264: exception
265: when others then
266: wf_core.context('XDPCORE', 'StartOAProcess', itemtype, itemkey, null, x_progress);
267: raise;
268: end StartOAProcess;
269:
270:
308:
309: exception
310: when others then
311: x_progress := 'XDPCORE.CreateOrderProcess. Unhandled Excepton: ' || SUBSTR(SQLERRM, 1, 1500);
312: wf_core.context('XDPCORE', 'CreateOrderProcess', itemtype, itemkey, null, x_progress);
313: raise;
314: end CreateOrderProcess;
315:
316:
350:
351:
352: EXCEPTION
353: WHEN OTHERS THEN
354: wf_core.context('XDPCORE', 'IS_OA_NEEDED', itemtype, itemkey, to_char(actid), funcmode);
355: raise;
356: END IS_OA_NEEDED;
357:
358:
387: END IF;
388:
389: EXCEPTION
390: WHEN OTHERS THEN
391: wf_core.context('XDPCORE', 'LAUNCH_ORDER_ANALYZER', itemtype, itemkey, to_char(actid), funcmode);
392: raise;
393: END LAUNCH_ORDER_ANALYZER;
394:
395:
420: END IF;
421:
422: EXCEPTION
423: WHEN OTHERS THEN
424: wf_core.context('XDPCORE', 'SET_ORDER_STATUS_TO_HOLD', itemtype, itemkey, to_char(actid), funcmode);
425: raise;
426: END SET_ORDER_STATUS_TO_HOLD;
427:
428:
454: END IF;
455:
456: EXCEPTION
457: WHEN OTHERS THEN
458: wf_core.context('XDPCORE', 'ENQUEUE_PENDING_QUEUE', itemtype, itemkey, to_char(actid), funcmode);
459: raise;
460: END ENQUEUE_PENDING_QUEUE;
461:
462: ****/
492: END IF;
493:
494: EXCEPTION
495: WHEN OTHERS THEN
496: wf_core.context('XDPCORE', 'WHAT_SOURCE', itemtype, itemkey, to_char(actid), funcmode);
497: raise;
498: END WHAT_SOURCE;
499:
500:
528: END IF;
529:
530: EXCEPTION
531: WHEN OTHERS THEN
532: wf_core.context('XDPCORE', 'ORDER_TYPE', itemtype, itemkey, to_char(actid), funcmode);
533: raise;
534: END ORDER_TYPE;
535:
536:
563: END IF;
564:
565: EXCEPTION
566: WHEN OTHERS THEN
567: wf_core.context('XDPCORE', 'RESUME_SDP', itemtype, itemkey, to_char(actid), funcmode);
568: raise;
569: END RESUME_SDP;
570:
571:
581:
582: EXCEPTION
583:
584: WHEN OTHERS THEN
585: wf_core.context('XDPCORE', 'OP_START', itemtype, itemkey, to_char(actid), funcmode);
586: raise;
587: END OP_START;
588:
589: Procedure OP_END (itemtype in varchar2,
595: BEGIN
596: null;
597: EXCEPTION
598: WHEN OTHERS THEN
599: wf_core.context('XDPCORE', 'OP_END', itemtype, itemkey, to_char(actid), funcmode);
600: raise;
601: END OP_END;
602:
603:
689: END IF;
690:
691: EXCEPTION
692: WHEN e_EnqueueException THEN
693: wf_core.context('XDPCORE', 'EnqueuePendingQueue',itemtype,itemkey, null,x_progress);
694: raise;
695: WHEN others THEN
696: x_progress := 'XDPCORE.EnqueuePendingQueue. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
697: wf_core.context('XDPCORE', 'EnqueuePendingQueue',itemtype,itemkey, null,x_progress);
693: wf_core.context('XDPCORE', 'EnqueuePendingQueue',itemtype,itemkey, null,x_progress);
694: raise;
695: WHEN others THEN
696: x_progress := 'XDPCORE.EnqueuePendingQueue. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
697: wf_core.context('XDPCORE', 'EnqueuePendingQueue',itemtype,itemkey, null,x_progress);
698: raise;
699: END EnqueuePendingQueue;
700: *******/
701:
759:
760: EXCEPTION
761: WHEN e_deregister_exception then
762: x_progress := 'XDPCORE.ResumeSDP. Error when Deregistering Timers and Callback Events' || SUBSTR(x_progress, 1, 1800);
763: wf_core.context('XDPCORE', 'ResumeSDP', itemtype, itemkey, to_char(actid), x_progress);
764: raise;
765: WHEN others THEN
766: x_progress := 'XDPCORE.ResumeSDP. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
767: wf_core.context('XDPCORE', 'ResumeSDP', itemtype, itemkey, to_char(actid), x_progress);
763: wf_core.context('XDPCORE', 'ResumeSDP', itemtype, itemkey, to_char(actid), x_progress);
764: raise;
765: WHEN others THEN
766: x_progress := 'XDPCORE.ResumeSDP. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
767: wf_core.context('XDPCORE', 'ResumeSDP', itemtype, itemkey, to_char(actid), x_progress);
768: raise;
769: END ResumeSDP;
770:
771:
788:
789: EXCEPTION
790: WHEN others THEN
791: x_progress := 'XDPCORE.GetOrderType. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
792: wf_core.context('XDPCORE', 'GetOrderType', itemtype, itemkey, to_char(actid), x_progress);
793: END GetOrderType;
794:
795:
796:
813:
814: EXCEPTION
815: WHEN others THEN
816: x_progress := 'XDPCORE.GetOrderSource. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
817: wf_core.context('XDPCORE', 'GetOrderSource', itemtype, itemkey, to_char(actid), x_progress);
818: END GetOrderSource;
819:
820:
821: FUNCTION IsOANeeded (itemtype IN VARCHAR2,
839:
840: EXCEPTION
841: WHEN others THEN
842: x_progress := 'XDPCORE.IsOANeeded. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
843: wf_core.context('XDPCORE', 'IsOANeeded', itemtype, itemkey, to_char(actid), x_progress);
844: END IsOANeeded;
845:
846:
847: PROCEDURE LaunchOrderAnalyzer (itemtype IN VARCHAR2,
861:
862: EXCEPTION
863: WHEN others THEN
864: x_progress := 'XDPCORE.LaunchOrderAnalyzer. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
865: wf_core.context('XDPCORE', 'LaunchOrderAnalyzer', itemtype, itemkey, to_char(actid), x_progress);
866: END LaunchOrderAnalyzer;
867:
868:
869:
900: priority);
901:
902: EXCEPTION
903: WHEN others THEN
904: wf_core.context('XDPCORE', 'SEND_NOTIFICATION',null,null, null,null);
905: raise;
906: END SEND_NOTIFICATION;
907:
908:
942: WHEN others THEN
943: -- dbms_output.put_line(SQLCODE);
944: IF SQLCODE = -20002 THEN
945: l_AttrFound := 0;
946: wf_core.clear;
947: ELSE
948: RAISE;
949: END IF;
950: END;
1006: -- dbms_output.put_line(SQLCODE);
1007:
1008: IF SQLCODE = -20002 then
1009: l_AttrFound := 0;
1010: wf_core.clear;
1011: ELSE
1012: RAISE;
1013: END IF;
1014: END;
1070: WHEN others THEN
1071: -- dbms_output.put_line(SQLCODE);
1072: IF SQLCODE = -20002 then
1073: l_AttrFound := 0;
1074: wf_core.clear;
1075: ELSE
1076: RAISE;
1077: END IF;
1078: END;
1511:
1512: buf varchar2(32000);
1513: begin
1514: -- Start with package and proc name.
1515: buf := wf_core.newline||pkg_name||'.'||proc_name||'(';
1516:
1517: -- Add all defined args.
1518: if (arg1 <> '*none*') then
1519: buf := substrb(buf||arg1, 1, 32000);