25:
26: l_application_id number;
27: l_transaction_type varchar2(100):='GMDQM_STABILITY_BATCH';
28: l_user varchar2(32);
29: Approver ame_util.approverRecord;
30:
31:
32: l_form varchar2(240);
33: l_itemtype varchar2(240);
152: select user_name into l_user from fnd_user
153: where user_id=Approver.user_id;
154: else
155: select user_name into l_user from fnd_user
156: where user_id=ame_util.PERSONIDTOUSERID(Approver.person_id);
157: end if;
158: end if ;
159:
160: IF (l_debug = 'Y') THEN
251: gmd_debug.put_line('Finished setting workflow attributes ');
252: END IF;
253:
254: /* As this a pure FYI notification we will set the approver to approve status */
255: Approver.approval_status := ame_util.approvedStatus;
256:
257: if (l_owner_used = 0) then
258: ame_api.updateApprovalStatus(applicationIdIn => l_application_id,
259: transactionIdIn => l_event_key,
258: ame_api.updateApprovalStatus(applicationIdIn => l_application_id,
259: transactionIdIn => l_event_key,
260: approverIn => Approver,
261: transactionTypeIn => l_transaction_type,
262: forwardeeIn => ame_util.emptyApproverRecord);
263: end if ;
264:
265: WF_ENGINE.STARTPROCESS (itemtype => l_itemtype,itemkey => l_itemkey);
266:
305: itemtype=>p_itemtype,
306: itemkey=>P_itemkey,
307: aname=>'AME_TRANS');
308: l_user varchar2(32);
309: Approver ame_util.approverRecord;
310: l_form varchar2(240);
311: BEGIN
312:
313: /* Get Next Approver */
329: select user_name into l_user from fnd_user
330: where user_id=Approver.user_id;
331: else
332: select user_name into l_user from fnd_user
333: where user_id=ame_util.PERSONIDTOUSERID(Approver.person_id);
334: end if;
335:
336: /* Set the User Attribute */
337:
339: aname => 'CURRENT_APPROVER',
340: avalue => l_user);
341:
342: P_resultout:='COMPLETE:Y';
343: Approver.approval_status := ame_util.approvedStatus;
344: ame_api.updateApprovalStatus(applicationIdIn => l_application_id,
345: transactionIdIn => l_event_key,
346: approverIn => Approver,
347: transactionTypeIn => l_transaction_type,
344: ame_api.updateApprovalStatus(applicationIdIn => l_application_id,
345: transactionIdIn => l_event_key,
346: approverIn => Approver,
347: transactionTypeIn => l_transaction_type,
348: forwardeeIn => ame_util.emptyApproverRecord);
349: end if;
350: EXCEPTION
351: WHEN OTHERS THEN
352: WF_CORE.CONTEXT ('GMD_SS_BATCH_WF_PKG','CHECK_NEXT_APPROVER',p_itemtype,p_itemkey,'Initial' );