1: PACKAGE BODY OKE_MILPAC_INTG_WF AS
2: /* $Header: OKEMIRVB.pls 120.1 2011/02/10 14:12:09 serukull ship $ */
3:
4: --
5: -- Global Variables
197: EXCEPTION
198: WHEN OTHERS THEN
199: ResultOut := 'ERROR:';
200: WF_Core.Context
201: ( 'OKE_MILPAC_INTG_WF'
202: , 'INITIALIZE'
203: , ItemType
204: , ItemKey
205: , to_char(ActID)
342: EXCEPTION
343: WHEN OTHERS THEN
344: ResultOut := 'ERROR:';
345: WF_Core.Context
346: ( 'OKE_MILPAC_INTG_WF'
347: , 'CREATE_ATTACHMENT'
348: , ItemType
349: , ItemKey
350: , to_char(ActID)
353: RAISE;
354:
355: END Create_Attachment;
356:
357: END OKE_MILPAC_INTG_WF;