DBA Data[Home] [Help]

APPS.PAY_ASSG_COST_WF dependencies on HR_UTILITY

Line 7: g_debug boolean := hr_utility.debug_enabled;

3: --
4: -- Package Variables
5: --
6: g_package varchar2(33) := ' PAY_ASSG_COST_WF.';
7: g_debug boolean := hr_utility.debug_enabled;
8: g_approver ame_util.approversTable2;
9: /*Used to get the transaction id pertaining to the specified
10: item type and item key. If the transaction id does not exists
11: then it will create starting a transaction.*/

Line 23: hr_utility.set_location('Entering ... '||l_proc,10);

19: l_result varchar2(100);
20: l_performer_id number(10);
21: l_proc varchar2(100) := g_package||'GET_TRANSACTION_ID';
22: BEGIN
23: hr_utility.set_location('Entering ... '||l_proc,10);
24: l_transaction_id := wf_engine.GetItemAttrNumber(
25: itemtype => itemtype
26: ,itemkey => itemkey
27: ,aname => 'TRANSACTION_ID'

Line 32: hr_utility.set_location(l_proc || '....Step1',20);

28: ,ignore_notfound => false
29: );
30: /*If no transaction exists, start a transaction.*/
31: IF L_TRANSACTION_ID IS NULL THEN
32: hr_utility.set_location(l_proc || '....Step1',20);
33: l_performer_id := wf_engine.GetItemAttrNumber(itemtype, itemkey, 'PERFORMER_PERSON_ID');
34:
35: hr_utility.set_location(l_proc , 30);
36:

Line 35: hr_utility.set_location(l_proc , 30);

31: IF L_TRANSACTION_ID IS NULL THEN
32: hr_utility.set_location(l_proc || '....Step1',20);
33: l_performer_id := wf_engine.GetItemAttrNumber(itemtype, itemkey, 'PERFORMER_PERSON_ID');
34:
35: hr_utility.set_location(l_proc , 30);
36:
37: hr_transaction_ss.start_transaction
38: (itemtype => itemtype
39: ,itemkey => itemkey

Line 44: hr_utility.set_location(l_proc, 40);

40: ,actid => actid
41: ,funmode => 'RUN'
42: ,p_login_person_id => l_performer_id
43: ,result => l_result);
44: hr_utility.set_location(l_proc, 40);
45:
46: /*Gett the newly created transaction and set as workflow attribute*/
47: l_transaction_id:= hr_transaction_ss.get_transaction_id
48: (p_item_type => itemtype

Line 51: hr_utility.set_location(l_proc ,50);

47: l_transaction_id:= hr_transaction_ss.get_transaction_id
48: (p_item_type => itemtype
49: ,p_item_key => itemkey);
50: wf_engine.SetItemAttrNumber(itemtype,itemkey,'TRANSACTION_ID',l_transaction_id);
51: hr_utility.set_location(l_proc ,50);
52:
53: END IF;
54: hr_utility.set_location('Leaving....'||l_proc ,60);
55: RETURN l_transaction_id;

Line 54: hr_utility.set_location('Leaving....'||l_proc ,60);

50: wf_engine.SetItemAttrNumber(itemtype,itemkey,'TRANSACTION_ID',l_transaction_id);
51: hr_utility.set_location(l_proc ,50);
52:
53: END IF;
54: hr_utility.set_location('Leaving....'||l_proc ,60);
55: RETURN l_transaction_id;
56:
57: END GET_TRANSACTION_ID;
58: procedure check_approvers_exist

Line 78: hr_utility.set_location('Entering:'|| l_proc, 10);

74: l_wf_admin ame_util.approverRecord2;
75: l_admin_name varchar2(240);
76: l_admin_display_name varchar2(240);
77: begin
78: hr_utility.set_location('Entering:'|| l_proc, 10);
79: /*Get the transaction id*/
80: l_transaction_id := get_transaction_id(
81: itemtype => itemtype
82: ,itemkey => itemkey

Line 93: hr_utility.set_location(l_proc, 20);

89: Once he setup the approver then the notification would go to the approver
90: as expected. We are not supposed to reject any Workflow in the absense of
91: approver.*/
92:
93: hr_utility.set_location(l_proc, 20);
94: resultout := ame_util.booleanTrue;
95: begin
96: ame_api2.getNextApprovers4(
97: applicationIdIn => 801,

Line 167: hr_utility.set_location('Entering ... '||l_proc, 10);

163: l_role_name varchar2(240);
164: l_role_display_name varchar2(240);
165:
166: begin
167: hr_utility.set_location('Entering ... '||l_proc, 10);
168: /*Get the transaction id*/
169: l_transaction_id := get_transaction_id(
170: itemtype => itemtype
171: ,itemkey => itemkey

Line 179: hr_utility.set_location(l_proc,20);

175:
176: /*Update the status of the previous approver to true as the control
177: comes to this place once the approver approves it.*/
178:
179: hr_utility.set_location(l_proc,20);
180: ame_api2.updateApprovalStatus2(
181: applicationIdIn =>801,
182: transactionTypeIn =>'PAY_ASSIGNMENT_COSTING',
183: transactionIdIn =>l_transaction_id,

Line 189: hr_utility.set_location(l_proc,30);

185: approverNameIn => wf_engine.getItemAttrText(itemtype, itemkey,'APPROVER_LOGIN_NAME'),
186: updateItemIn => true);
187:
188: /*Now get the next approver.*/
189: hr_utility.set_location(l_proc,30);
190: ame_api2.getNextApprovers4(
191: applicationIdIn => 801,
192: transactionTypeIn => 'PAY_ASSIGNMENT_COSTING',
193: transactionIdIn => l_transaction_id,

Line 202: hr_utility.set_location(l_proc, 40);

198: the attribute APPROVER_LOGIN_NAME. Workflow sends notifications to the approvers
199: If there are no approvers then we need to save the data. Once the resultout
200: is set to 'F' workflow take care of saving the data by calling underlaying
201: APIs*/
202: hr_utility.set_location(l_proc, 40);
203: if l_apprvl_process_complete = ame_util.booleanFalse then
204: /*Set the previous approver attributes.*/
205: wf_engine.setItemAttrText(itemtype, itemkey,'PREVIOUS_APPROVER_LOGIN_NAME',
206: wf_engine.getItemAttrText(itemtype, itemkey, 'APPROVER_LOGIN_NAME'));

Line 223: hr_utility.set_location('Leaving.....'||l_proc,50);

219: resultout := 'T';
220: else
221: resultout := 'F';
222: end if;
223: hr_utility.set_location('Leaving.....'||l_proc,50);
224: EXCEPTION
225: WHEN OTHERS THEN
226: hr_utility.set_location('An EXCEPTION occured '||SQLERRM(SQLCODE),60);
227: hr_utility.set_location('Leaving ..'||l_proc,1000);

Line 226: hr_utility.set_location('An EXCEPTION occured '||SQLERRM(SQLCODE),60);

222: end if;
223: hr_utility.set_location('Leaving.....'||l_proc,50);
224: EXCEPTION
225: WHEN OTHERS THEN
226: hr_utility.set_location('An EXCEPTION occured '||SQLERRM(SQLCODE),60);
227: hr_utility.set_location('Leaving ..'||l_proc,1000);
228: RAISE;
229: end get_next_approver;
230: -- ------------------------------------------------------------------------

Line 227: hr_utility.set_location('Leaving ..'||l_proc,1000);

223: hr_utility.set_location('Leaving.....'||l_proc,50);
224: EXCEPTION
225: WHEN OTHERS THEN
226: hr_utility.set_location('An EXCEPTION occured '||SQLERRM(SQLCODE),60);
227: hr_utility.set_location('Leaving ..'||l_proc,1000);
228: RAISE;
229: end get_next_approver;
230: -- ------------------------------------------------------------------------
231: -- |--------------------------< START_WF_PROCESS>-------------------------|

Line 260: hr_utility.set_location('Entering....'||l_proc,10);

256: from per_all_people_f
257: where person_id = p_person_id
258: and trunc(sysdate) between effective_start_date and effective_end_date;
259: BEGIN
260: hr_utility.set_location('Entering....'||l_proc,10);
261: /*Create the workflow process.*/
262: wf_engine.CreateProcess (ItemType => l_Item_Type
263: ,ItemKey => p_Item_Key
264: ,process => l_process

Line 374: hr_utility.set_location('Entering ..'||l_proc,10);

370: l_proc varchar2(240) := g_package||'REJECT_PROCESS';
371: l_result varchar2(20);
372: BEGIN
373: if g_debug then
374: hr_utility.set_location('Entering ..'||l_proc,10);
375: end if;
376:
377: hr_transaction_ss.rollback_transaction(
378: itemtype => itemtype

Line 384: hr_utility.set_location('Transaction deleted successfully ',20);

380: ,actid => actid
381: ,funmode => funmode
382: ,result => l_result);
383: if (l_result = 'SUCCESS') then
384: hr_utility.set_location('Transaction deleted successfully ',20);
385: else
386: hr_utility.set_location('Error in deleting Transaction ',30);
387: end if;
388: if g_debug then

Line 386: hr_utility.set_location('Error in deleting Transaction ',30);

382: ,result => l_result);
383: if (l_result = 'SUCCESS') then
384: hr_utility.set_location('Transaction deleted successfully ',20);
385: else
386: hr_utility.set_location('Error in deleting Transaction ',30);
387: end if;
388: if g_debug then
389: hr_utility.set_location('Leaving ..'||l_proc,1000);
390: end if;

Line 389: hr_utility.set_location('Leaving ..'||l_proc,1000);

385: else
386: hr_utility.set_location('Error in deleting Transaction ',30);
387: end if;
388: if g_debug then
389: hr_utility.set_location('Leaving ..'||l_proc,1000);
390: end if;
391: EXCEPTION
392: WHEN OTHERS THEN
393: hr_utility.set_location('An EXCEPTION occured',40);

Line 393: hr_utility.set_location('An EXCEPTION occured',40);

389: hr_utility.set_location('Leaving ..'||l_proc,1000);
390: end if;
391: EXCEPTION
392: WHEN OTHERS THEN
393: hr_utility.set_location('An EXCEPTION occured',40);
394: hr_utility.set_location('Leaving ..'||l_proc,1000);
395: RAISE;
396: END REJECT_PROCESS;
397:

Line 394: hr_utility.set_location('Leaving ..'||l_proc,1000);

390: end if;
391: EXCEPTION
392: WHEN OTHERS THEN
393: hr_utility.set_location('An EXCEPTION occured',40);
394: hr_utility.set_location('Leaving ..'||l_proc,1000);
395: RAISE;
396: END REJECT_PROCESS;
397:
398: end PAY_ASSG_COST_WF;