1: PACKAGE BODY ZPB_WF_EVENT AS
2: /* $Header: zpbwfevent.plb 120.5 2007/12/04 16:22:37 mbhat noship $ */
3:
4:
5: procedure SET_ATTRIBUTES (itemtype in varchar2,
169: return;
170:
171: exception
172: when others then
173: WF_CORE.CONTEXT('ZPB_WF_EVENT.SET_ATTRIBUTES', itemtype, itemkey, to_char(actid), funcmode);
174: raise;
175: end SET_ATTRIBUTES;
176:
177:
252: AND ITEM_KEY = ItemKey;
253:
254: if upper(l_result) = 'NORMAL' then
255: -- set up users for notifications
256: ZPB_WF_EVENT.SET_AUTHORIZED_USERS (ACID, OwnerID, itemtype, itemkey, instanceID);
257: else
258: -- some error encountered
259: -- BUG 4355208 WF_INVALID_ROLE ancillary corrections for rolename and recipients
260: rolename := zpb_wf_ntf.MakeRoleName(ACID, instanceID, OwnerID);
306:
307:
308: exception
309: when others then
310: WF_CORE.CONTEXT('ZPB_WF_EVENT.GET_ATTRIBUTES', itemtype, itemkey, to_char(actid), funcmode);
311: raise;
312:
313:
314:
399:
400:
401: -- Set parameters
402:
403: wf_event.AddParameterToList('ACID', ACID, l_parameter_list);
404: wf_event.AddParameterToList('OVERIDE_START_MEM' ,p_start_mem , l_parameter_list);
405: wf_event.AddParameterToList('OVERIDE_END_MEM' ,p_end_mem , l_parameter_list);
406: wf_event.AddParameterToList('RESPAPPID', respAppID, l_parameter_list);
407: wf_event.AddParameterToList('RESPID', respID, l_parameter_list);
400:
401: -- Set parameters
402:
403: wf_event.AddParameterToList('ACID', ACID, l_parameter_list);
404: wf_event.AddParameterToList('OVERIDE_START_MEM' ,p_start_mem , l_parameter_list);
405: wf_event.AddParameterToList('OVERIDE_END_MEM' ,p_end_mem , l_parameter_list);
406: wf_event.AddParameterToList('RESPAPPID', respAppID, l_parameter_list);
407: wf_event.AddParameterToList('RESPID', respID, l_parameter_list);
408: wf_event.AddParameterToList('OWNERID', OwnerID, l_parameter_list);
401: -- Set parameters
402:
403: wf_event.AddParameterToList('ACID', ACID, l_parameter_list);
404: wf_event.AddParameterToList('OVERIDE_START_MEM' ,p_start_mem , l_parameter_list);
405: wf_event.AddParameterToList('OVERIDE_END_MEM' ,p_end_mem , l_parameter_list);
406: wf_event.AddParameterToList('RESPAPPID', respAppID, l_parameter_list);
407: wf_event.AddParameterToList('RESPID', respID, l_parameter_list);
408: wf_event.AddParameterToList('OWNERID', OwnerID, l_parameter_list);
409: wf_event.AddParameterToList('OWNER', Owner, l_parameter_list);
402:
403: wf_event.AddParameterToList('ACID', ACID, l_parameter_list);
404: wf_event.AddParameterToList('OVERIDE_START_MEM' ,p_start_mem , l_parameter_list);
405: wf_event.AddParameterToList('OVERIDE_END_MEM' ,p_end_mem , l_parameter_list);
406: wf_event.AddParameterToList('RESPAPPID', respAppID, l_parameter_list);
407: wf_event.AddParameterToList('RESPID', respID, l_parameter_list);
408: wf_event.AddParameterToList('OWNERID', OwnerID, l_parameter_list);
409: wf_event.AddParameterToList('OWNER', Owner, l_parameter_list);
410: wf_event.AddParameterToList('ARG1', l_event_key, l_parameter_list);
403: wf_event.AddParameterToList('ACID', ACID, l_parameter_list);
404: wf_event.AddParameterToList('OVERIDE_START_MEM' ,p_start_mem , l_parameter_list);
405: wf_event.AddParameterToList('OVERIDE_END_MEM' ,p_end_mem , l_parameter_list);
406: wf_event.AddParameterToList('RESPAPPID', respAppID, l_parameter_list);
407: wf_event.AddParameterToList('RESPID', respID, l_parameter_list);
408: wf_event.AddParameterToList('OWNERID', OwnerID, l_parameter_list);
409: wf_event.AddParameterToList('OWNER', Owner, l_parameter_list);
410: wf_event.AddParameterToList('ARG1', l_event_key, l_parameter_list);
411: taskseq := 0;
404: wf_event.AddParameterToList('OVERIDE_START_MEM' ,p_start_mem , l_parameter_list);
405: wf_event.AddParameterToList('OVERIDE_END_MEM' ,p_end_mem , l_parameter_list);
406: wf_event.AddParameterToList('RESPAPPID', respAppID, l_parameter_list);
407: wf_event.AddParameterToList('RESPID', respID, l_parameter_list);
408: wf_event.AddParameterToList('OWNERID', OwnerID, l_parameter_list);
409: wf_event.AddParameterToList('OWNER', Owner, l_parameter_list);
410: wf_event.AddParameterToList('ARG1', l_event_key, l_parameter_list);
411: taskseq := 0;
412: wf_event.AddParameterToList('TASKSEQ', taskseq, l_parameter_list);
405: wf_event.AddParameterToList('OVERIDE_END_MEM' ,p_end_mem , l_parameter_list);
406: wf_event.AddParameterToList('RESPAPPID', respAppID, l_parameter_list);
407: wf_event.AddParameterToList('RESPID', respID, l_parameter_list);
408: wf_event.AddParameterToList('OWNERID', OwnerID, l_parameter_list);
409: wf_event.AddParameterToList('OWNER', Owner, l_parameter_list);
410: wf_event.AddParameterToList('ARG1', l_event_key, l_parameter_list);
411: taskseq := 0;
412: wf_event.AddParameterToList('TASKSEQ', taskseq, l_parameter_list);
413: wf_event.AddParameterToList('ACNAME', ACNAME, l_parameter_list);
406: wf_event.AddParameterToList('RESPAPPID', respAppID, l_parameter_list);
407: wf_event.AddParameterToList('RESPID', respID, l_parameter_list);
408: wf_event.AddParameterToList('OWNERID', OwnerID, l_parameter_list);
409: wf_event.AddParameterToList('OWNER', Owner, l_parameter_list);
410: wf_event.AddParameterToList('ARG1', l_event_key, l_parameter_list);
411: taskseq := 0;
412: wf_event.AddParameterToList('TASKSEQ', taskseq, l_parameter_list);
413: wf_event.AddParameterToList('ACNAME', ACNAME, l_parameter_list);
414: wf_event.AddParameterToList('EPBPERFORMER', Owner, l_parameter_list);
408: wf_event.AddParameterToList('OWNERID', OwnerID, l_parameter_list);
409: wf_event.AddParameterToList('OWNER', Owner, l_parameter_list);
410: wf_event.AddParameterToList('ARG1', l_event_key, l_parameter_list);
411: taskseq := 0;
412: wf_event.AddParameterToList('TASKSEQ', taskseq, l_parameter_list);
413: wf_event.AddParameterToList('ACNAME', ACNAME, l_parameter_list);
414: wf_event.AddParameterToList('EPBPERFORMER', Owner, l_parameter_list);
415: wf_event.AddParameterToList('WF_ADMINISTRATOR', Owner, l_parameter_list);
416: -- wf_event.AddParameterToList('FNDUSERNAM', Owner, l_parameter_list);
409: wf_event.AddParameterToList('OWNER', Owner, l_parameter_list);
410: wf_event.AddParameterToList('ARG1', l_event_key, l_parameter_list);
411: taskseq := 0;
412: wf_event.AddParameterToList('TASKSEQ', taskseq, l_parameter_list);
413: wf_event.AddParameterToList('ACNAME', ACNAME, l_parameter_list);
414: wf_event.AddParameterToList('EPBPERFORMER', Owner, l_parameter_list);
415: wf_event.AddParameterToList('WF_ADMINISTRATOR', Owner, l_parameter_list);
416: -- wf_event.AddParameterToList('FNDUSERNAM', Owner, l_parameter_list);
417: -- caller of program
410: wf_event.AddParameterToList('ARG1', l_event_key, l_parameter_list);
411: taskseq := 0;
412: wf_event.AddParameterToList('TASKSEQ', taskseq, l_parameter_list);
413: wf_event.AddParameterToList('ACNAME', ACNAME, l_parameter_list);
414: wf_event.AddParameterToList('EPBPERFORMER', Owner, l_parameter_list);
415: wf_event.AddParameterToList('WF_ADMINISTRATOR', Owner, l_parameter_list);
416: -- wf_event.AddParameterToList('FNDUSERNAM', Owner, l_parameter_list);
417: -- caller of program
418: wf_event.AddParameterToList('FNDUSERNAM', ZPB_WF_NTF.ID_to_FNDUser(fnd_global.USER_ID), l_parameter_list);
411: taskseq := 0;
412: wf_event.AddParameterToList('TASKSEQ', taskseq, l_parameter_list);
413: wf_event.AddParameterToList('ACNAME', ACNAME, l_parameter_list);
414: wf_event.AddParameterToList('EPBPERFORMER', Owner, l_parameter_list);
415: wf_event.AddParameterToList('WF_ADMINISTRATOR', Owner, l_parameter_list);
416: -- wf_event.AddParameterToList('FNDUSERNAM', Owner, l_parameter_list);
417: -- caller of program
418: wf_event.AddParameterToList('FNDUSERNAM', ZPB_WF_NTF.ID_to_FNDUser(fnd_global.USER_ID), l_parameter_list);
419:
412: wf_event.AddParameterToList('TASKSEQ', taskseq, l_parameter_list);
413: wf_event.AddParameterToList('ACNAME', ACNAME, l_parameter_list);
414: wf_event.AddParameterToList('EPBPERFORMER', Owner, l_parameter_list);
415: wf_event.AddParameterToList('WF_ADMINISTRATOR', Owner, l_parameter_list);
416: -- wf_event.AddParameterToList('FNDUSERNAM', Owner, l_parameter_list);
417: -- caller of program
418: wf_event.AddParameterToList('FNDUSERNAM', ZPB_WF_NTF.ID_to_FNDUser(fnd_global.USER_ID), l_parameter_list);
419:
420:
414: wf_event.AddParameterToList('EPBPERFORMER', Owner, l_parameter_list);
415: wf_event.AddParameterToList('WF_ADMINISTRATOR', Owner, l_parameter_list);
416: -- wf_event.AddParameterToList('FNDUSERNAM', Owner, l_parameter_list);
417: -- caller of program
418: wf_event.AddParameterToList('FNDUSERNAM', ZPB_WF_NTF.ID_to_FNDUser(fnd_global.USER_ID), l_parameter_list);
419:
420:
421: -- Budnik, A. 1/12/06 B 4947816 add in business area id
422: wf_event.AddParameterToList('BUSINESSAREAID', l_business_area_id, l_parameter_list);
418: wf_event.AddParameterToList('FNDUSERNAM', ZPB_WF_NTF.ID_to_FNDUser(fnd_global.USER_ID), l_parameter_list);
419:
420:
421: -- Budnik, A. 1/12/06 B 4947816 add in business area id
422: wf_event.AddParameterToList('BUSINESSAREAID', l_business_area_id, l_parameter_list);
423:
424: wf_event.raise(l_event_name, l_event_key, l_event_data, l_parameter_list, l_send_date);
425: l_parameter_list.DELETE;
426:
420:
421: -- Budnik, A. 1/12/06 B 4947816 add in business area id
422: wf_event.AddParameterToList('BUSINESSAREAID', l_business_area_id, l_parameter_list);
423:
424: wf_event.raise(l_event_name, l_event_key, l_event_data, l_parameter_list, l_send_date);
425: l_parameter_list.DELETE;
426:
427: commit;
428: return;
514:
515: end SET_AUTHORIZED_USERS;
516:
517:
518: end ZPB_WF_EVENT;
519: