70:
71:
72: EXCEPTION
73: WHEN OTHERS THEN
74: wf_core.context('XDPCORE_PKG', 'INITIALIZE_PACKAGE_SERVICE', itemtype, itemkey, to_char(actid), funcmode);
75: raise;
76: END INITIALIZE_PACKAGE_SERVICE;
77:
78:
108:
109:
110: EXCEPTION
111: WHEN OTHERS THEN
112: wf_core.context('XDPCORE_PKG', 'LAUNCH_SERVICE_FOR_PKG_PROCESS', itemtype, itemkey, to_char(actid), funcmode);
113: raise;
114: END LAUNCH_SERVICE_FOR_PKG_PROCESS;
115:
116:
145:
146:
147: EXCEPTION
148: WHEN OTHERS THEN
149: wf_core.context('XDPCORE_PKG', 'LAUNCH_SERVICE_IN_PACKAGE', itemtype, itemkey, to_char(actid), funcmode);
150: raise;
151: END LAUNCH_SERVICE_IN_PACKAGE;
152:
153:
185:
186:
187: EXCEPTION
188: WHEN OTHERS THEN
189: wf_core.context('XDPCORE_PKG', 'ARE_ALL_SERVICES_IN_PKG_DONE', itemtype, itemkey, to_char(actid), funcmode);
190: raise;
191: END ARE_ALL_SERVICES_IN_PKG_DONE;
192:
193:
210:
211: EXCEPTION
212: WHEN OTHERS THEN
213: x_Progress := 'XDPCORE_PKG.UPDATE_PACKAGESERVICE_STATUS. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
214: wf_core.context('XDPCORE_PKG', 'UPDATE_PACKAGESERVICE_STATUS', p_itemtype, p_itemkey, null,null);
215: rollback;
216: raise;
217: END UPDATE_PACKAGESERVICE_STATUS;
218:
239: END IF;
240:
241: EXCEPTION
242: WHEN OTHERS THEN
243: wf_core.context('XDPCORE_PKG', 'RESOLVE_IND_DEP_PKGS', itemtype, itemkey, to_char(actid), funcmode);
244: raise;
245: END RESOLVE_IND_DEP_PKGS;
246:
247: PROCEDURE LAUNCH_ALL_IND_SERVICES (itemtype IN VARCHAR2,
266: END IF;
267:
268: EXCEPTION
269: WHEN OTHERS THEN
270: wf_core.context('XDPCORE_PKG', 'LAUNCH_ALL_IND_SERVICES', itemtype, itemkey, to_char(actid), funcmode);
271: raise;
272: END LAUNCH_ALL_IND_SERVICES;
273:
274: PROCEDURE INITIALIZE_DEP_SERVICE_PROCESS (itemtype IN VARCHAR2,
292: END IF;
293:
294: EXCEPTION
295: WHEN OTHERS THEN
296: wf_core.context('XDPCORE_PKG', 'INITIALIZE_DEP_SERVICE_PROCESS', itemtype, itemkey, to_char(actid), funcmode);
297: raise;
298: END INITIALIZE_DEP_SERVICE_PROCESS;
299:
300: /****
516: IF c_GetDepServices%ISOPEN THEN
517: CLOSE c_GetDepServices;
518: END IF;
519:
520: wf_core.context('XDPCORE_PKG', 'LaunchServiceForPkgProcess', itemtype, itemkey, null,null);
521: raise;
522:
523: WHEN e_NoSvcInPkgFoundException THEN
524: IF c_GetIndServices%ISOPEN THEN
528: IF c_GetDepServices%ISOPEN THEN
529: CLOSE c_GetDepServices;
530: END IF;
531:
532: wf_core.context('XDPCORE_PKG', 'LaunchServiceForPkgProcess', itemtype, itemkey, null,null);
533: raise;
534:
535: WHEN others THEN
536: IF c_GetIndServices%ISOPEN THEN
541: CLOSE c_GetDepServices;
542: END IF;
543:
544: x_Progress := 'XDPCORE_PKG.LaunchServiceForPkgProcess. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
545: wf_core.context('XDPCORE_PKG', 'LaunchServiceForPkgProcess', itemtype, itemkey, null,null);
546: raise;
547: END LaunchServiceForPkgProcess;
548:
549:
619: IF c_GetSrcSeq%ISOPEN THEN
620: CLOSE c_GetSrcSeq;
621: END IF;
622:
623: wf_core.context('XDPCORE_PKG', 'AreAllServicesInPkgDone', itemtype, itemkey, null,null);
624: raise;
625:
626: WHEN Others THEN
627: IF c_GetSrcSeq%ISOPEN THEN
628: CLOSE c_GetSrcSeq;
629: END IF;
630:
631: x_Progress := 'XDPCORE_PKG.AreAllServicesInPkgDone. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
632: wf_core.context('XDPCORE_PKG', 'AreAllServicesInPkgDone', itemtype, itemkey, null,null);
633: raise;
634: END AreAllServicesInPkgDone;
635:
636:
778: IF c_GetSrcSeq%ISOPEN THEN
779: CLOSE c_GetSrcSeq;
780: END IF;
781:
782: wf_core.context('XDPCORE_PKG', 'LaunchServiceInPackage', itemtype, itemkey, null,null);
783: raise;
784:
785: WHEN e_NoSvcInPkgFoundException THEN
786: IF c_GetSrcSeq%ISOPEN THEN
786: IF c_GetSrcSeq%ISOPEN THEN
787: CLOSE c_GetSrcSeq;
788: END IF;
789:
790: wf_core.context('XDPCORE_PKG', 'LaunchServiceInPackage', itemtype, itemkey, null,null);
791: raise;
792:
793: WHEN others THEN
794: IF c_GetSrcSeq%ISOPEN THEN
795: CLOSE c_GetSrcSeq;
796: END IF;
797:
798: x_Progress := 'XDPCORE_PKG.LaunchServiceInPackage. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
799: wf_core.context('XDPCORE_PKG', 'LaunchServiceInPackage', itemtype, itemkey, null,null);
800: raise;
801: END LaunchServiceInPackage;
802:
803: PROCEDURE InitializePackageService (itemtype IN VARCHAR2,
827:
828: EXCEPTION
829: WHEN OTHERS THEN
830: x_Progress := 'XDPCORE_PKG.InitializePackageService. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
831: wf_core.context('XDPCORE_PKG', 'InitializePackageService', itemtype, itemkey, null,null);
832: raise;
833: END initializePackageService;
834:
835:
890:
891: EXCEPTION
892: WHEN OTHERS THEN
893: x_Progress := 'XDPCORE_PKG.ResolveIndDepPkgs. Unhandled Exception: ' || SUBSTR(SQLERRM, 1, 1500);
894: wf_core.context('XDPCORE_PKG', 'ResolveIndDepPkgs', itemtype, itemkey, null,null);
895: raise;
896:
897: END ResolveIndDepPkgs;
898:
986: return l_result;
987: EXCEPTION
988: WHEN OTHERS THEN
989: x_Progress := 'XDPCORE_PKG.ResolveIndDepPkgs. Unhandled Exception: ' || SUBSTR(SQLERRM, 1 , 1500);
990: wf_core.context('XDPCORE_PKG', 'ResolveIndDepPkgs', itemtype, itemkey, null,null);
991: raise;
992:
993: END LaunchAllIndServices;
994:
1016:
1017: EXCEPTION
1018: WHEN OTHERS THEN
1019: x_Progress := 'XDPCORE_PKG.InitializeDepServiceProcess. Unhandled Exception: ' || SUBSTR(SQLERRM, 1 , 1500);
1020: wf_core.context('XDPCORE_PKG', 'InitializeDepServiceProcess', itemtype, itemkey, null,null);
1021: raise;
1022:
1023: END InitializeDepServiceProcess;
1024: