1: PACKAGE BODY FUN_WF_COMMON AS
2: /* $Header: FUN_WF_COMMON_B.pls 120.24.12010000.2 2009/01/15 10:33:50 srampure ship $ */
3:
4: /*-----------------------------------------------------
5: * FUNCTION generate_event_key
1: PACKAGE BODY FUN_WF_COMMON AS
2: /* $Header: FUN_WF_COMMON_B.pls 120.24.12010000.2 2009/01/15 10:33:50 srampure ship $ */
3:
4: /*-----------------------------------------------------
5: * FUNCTION generate_event_key
6: * ----------------------------------------------------
135: RETURN;
136:
137: EXCEPTION
138: WHEN others THEN
139: wf_core.context('FUN_WF_COMMON', 'IS_ARAP_BATCH_MODE',
140: itemtype, itemkey, TO_CHAR(actid), funcmode);
141: RAISE;
142: END is_arap_batch_mode;
143:
169: l_trx_id := wf_engine.GetItemAttrNumber
170: (itemtype => itemtype,
171: itemkey => itemkey,
172: aname => 'TRX_ID');
173: l_event_key := fun_wf_common.generate_event_key(l_batch_id, l_trx_id);
174:
175: wf_event.AddParameterToList(p_name => 'TRX_ID',
176: p_value => TO_CHAR(l_trx_id),
177: p_parameterlist => l_params);
193: RETURN;
194:
195: EXCEPTION
196: WHEN others THEN
197: wf_core.context('FUN_WF_COMMON', 'RAISE_COMPLETE',
198: itemtype, itemkey, TO_CHAR(actid), funcmode);
199: RAISE;
200: END raise_complete;
201:
334: RETURN;
335:
336: EXCEPTION
337: WHEN others THEN
338: wf_core.context('FUN_WF_COMMON', 'UPDATE_STATUS_COMPLETE',
339: itemtype, itemkey, TO_CHAR(actid), funcmode);
340: RAISE;
341: END update_status_complete;
342:
471: actid => actid,
472: aname => 'CONTACT_ORG_TYPE');
473:
474: -- Call the procedure which will return the AME role
475: fun_wf_common.get_ame_role_list
476: (itemkey => itemkey,
477: p_transaction_id => l_transaction_id,
478: p_fyi_notification => 'Y',
479: p_contact_type => l_contact_type,
516: THEN
517: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
518: THEN
519: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,
520: 'fun.plsql.fun_wf_common.get_ame_contacts',
521: SQLERRM || ' Error occurred '||
522: ' for transaction ' || l_transaction_id);
523: END IF;
524:
521: SQLERRM || ' Error occurred '||
522: ' for transaction ' || l_transaction_id);
523: END IF;
524:
525: wf_core.context('FUN_WF_COMMON', 'GET_AME_CONTACTS',
526: itemtype, itemkey, TO_CHAR(actid), funcmode);
527: END get_ame_contacts;
528:
529: /* ---------------------------------------------------------------------------
595: aname => 'UI_ACTION_USER_ID',
596: avalue => NULL);
597:
598: -- Call the procedure which will return the AME role list
599: fun_wf_common.get_ame_role_list
600: (itemkey => itemkey,
601: p_transaction_id => l_transaction_id,
602: p_fyi_notification => 'N',
603: p_contact_type => l_contact_type,
643: THEN
644: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
645: THEN
646: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,
647: 'fun.plsql.fun_wf_common.get_ame_approvers',
648: SQLERRM || ' Error occurred '||
649: 'for transaction ' || l_transaction_id);
650: END IF;
651:
648: SQLERRM || ' Error occurred '||
649: 'for transaction ' || l_transaction_id);
650: END IF;
651:
652: wf_core.context('FUN_WF_COMMON', 'GET_AME_APPROVERS',
653: itemtype, itemkey, TO_CHAR(actid), funcmode);
654: END get_ame_approvers;
655:
656:
828: NULL;
829: END IF;
830:
831: -- For now, call is_valid_approver procedure
832: l_valid_user := fun_wf_common.is_user_valid_approver
833: (p_transaction_id => p_transaction_id,
834: p_user_id => NULL,
835: p_role_name => l_approver_table(l_index).name,
836: p_org_type => p_contact_type,
866: THEN
867: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
868: THEN
869: fnd_log.string(FND_LOG.LEVEL_ERROR,
870: 'fun.plsql.fun_wf_common.get_ame_role_list',
871: ' Invalid users found without access to org ' ||
872: 'for transaction ' || p_transaction_id);
873: END IF;
874:
929: THEN
930: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
931: THEN
932: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,
933: 'fun.plsql.fun_wf_common.get_ame_role_list',
934: SQLERRM || ' Error occurred '||
935: 'for transaction ' || p_transaction_id);
936: END IF;
937:
1176: THEN
1177: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1178: THEN
1179: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,
1180: 'fun.plsql.fun_wf_common.set_invoice_reqd_flag',
1181: SQLERRM || ' Error occurred '||
1182: 'for batch ' || p_batch_id);
1183: END IF;
1184:
1236: RAISE;
1237:
1238: END wf_abort;
1239:
1240: END FUN_WF_COMMON;