166:
167: begin
168:
169: if g_fnd_debug = 'Y' then
170: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
171: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering change_first_approver...');
172: END IF;
173: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
174: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
167: begin
168:
169: if g_fnd_debug = 'Y' then
170: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
171: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering change_first_approver...');
172: END IF;
173: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
174: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
175: END IF;
169: if g_fnd_debug = 'Y' then
170: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
171: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering change_first_approver...');
172: END IF;
173: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
174: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
175: END IF;
176: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
177: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
170: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
171: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering change_first_approver...');
172: END IF;
173: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
174: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
175: END IF;
176: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
177: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
178: END IF;
172: END IF;
173: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
174: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
175: END IF;
176: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
177: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
178: END IF;
179: end if;
180:
173: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
174: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
175: END IF;
176: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
177: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
178: END IF;
179: end if;
180:
181: getAmeTransactionType(pReqHeaderId => pReqHeaderId,
184: pQuoteChar :=quoteChar;
185: pFieldDelimiter :=fieldDelimiter;
186:
187: if g_fnd_debug = 'Y' then
188: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
189: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame api ame_api2.getAllApprovers7() to get the list of approvers from AME.');
190: END IF;
191: end if;
192:
185: pFieldDelimiter :=fieldDelimiter;
186:
187: if g_fnd_debug = 'Y' then
188: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
189: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame api ame_api2.getAllApprovers7() to get the list of approvers from AME.');
190: END IF;
191: end if;
192:
193: -- get the current approvers list from AME.
198: approversOut=>approverList
199: );
200:
201: if g_fnd_debug = 'Y' then
202: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
203: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Retrieved the list of approvers from AME using ame_api2.getAllApprovers7()');
204: END IF;
205: end if;
206:
199: );
200:
201: if g_fnd_debug = 'Y' then
202: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
203: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Retrieved the list of approvers from AME using ame_api2.getAllApprovers7()');
204: END IF;
205: end if;
206:
207: -- Once we get the approvers list from AME, we iterate through the approvers list,
212: and approverList(i).api_insertion = 'N'
213: and approverList(i).group_or_chain_id < 3 ) then
214: currentFirstApprover := approverList(i) ;
215: if g_fnd_debug = 'Y' then
216: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
217: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Found the first authority approver...' || currentFirstApprover.name );
218: END IF;
219: end if;
220: exit;
213: and approverList(i).group_or_chain_id < 3 ) then
214: currentFirstApprover := approverList(i) ;
215: if g_fnd_debug = 'Y' then
216: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
217: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Found the first authority approver...' || currentFirstApprover.name );
218: END IF;
219: end if;
220: exit;
221: end if;
231:
232: if currentFirstApprover.orig_system = ame_util.posOrigSystem then
233:
234: if g_fnd_debug = 'Y' then
235: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
236: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'First record is of type Position Hierarchy...' );
237: END IF;
238: end if;
239: tmpApprover.orig_system := ame_util.posOrigSystem;
232: if currentFirstApprover.orig_system = ame_util.posOrigSystem then
233:
234: if g_fnd_debug = 'Y' then
235: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
236: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'First record is of type Position Hierarchy...' );
237: END IF;
238: end if;
239: tmpApprover.orig_system := ame_util.posOrigSystem;
240: SELECT position_id into tmpApprover.orig_system_id FROM PER_ALL_ASSIGNMENTS_F pa
244: and TRUNC ( pa.effective_start_date )
245: <= TRUNC(SYSDATE) AND NVL(pa.effective_end_date, TRUNC( SYSDATE)) >= TRUNC(SYSDATE);
246:
247: if g_fnd_debug = 'Y' then
248: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
249: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Got users position_id :' || tmpApprover.orig_system_id );
250: END IF;
251: end if;
252:
245: <= TRUNC(SYSDATE) AND NVL(pa.effective_end_date, TRUNC( SYSDATE)) >= TRUNC(SYSDATE);
246:
247: if g_fnd_debug = 'Y' then
248: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
249: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Got users position_id :' || tmpApprover.orig_system_id );
250: END IF;
251: end if;
252:
253: UPDATE po_requisition_headers_all
254: SET first_position_id = tmpApprover.orig_system_id, first_approver_id = pPersonId
255: WHERE requisition_header_id = pReqHeaderId;
256:
257: if g_fnd_debug = 'Y' then
258: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
259: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Inserted the first_position_id and first_approver_id columns.' );
260: END IF;
261: end if;
262:
255: WHERE requisition_header_id = pReqHeaderId;
256:
257: if g_fnd_debug = 'Y' then
258: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
259: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Inserted the first_position_id and first_approver_id columns.' );
260: END IF;
261: end if;
262:
263: IF tmpApprover.orig_system_id IS NULL THEN
264: raise_application_error(-20001, 'User is not associated to any position. ');
265: END IF;
266: else
267: if g_fnd_debug = 'Y' then
268: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
269: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' First record is of type Emp-Sup Hierarchy...' );
270: END IF;
271: end if;
272: tmpApprover.orig_system := ame_util.perOrigSystem;
265: END IF;
266: else
267: if g_fnd_debug = 'Y' then
268: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
269: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' First record is of type Emp-Sup Hierarchy...' );
270: END IF;
271: end if;
272: tmpApprover.orig_system := ame_util.perOrigSystem;
273: tmpApprover.orig_system_id := pPersonId;
298: -- call the ame api to set the first authority approver.
299: -- tmpApprover is the new first authority approver record.
300:
301: if g_fnd_debug = 'Y' then
302: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
303: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.setFirstAuthorityApprover()...' );
304: END IF;
305: end if;
306:
299: -- tmpApprover is the new first authority approver record.
300:
301: if g_fnd_debug = 'Y' then
302: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
303: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.setFirstAuthorityApprover()...' );
304: END IF;
305: end if;
306:
307: -- set a save point for failure rollback
313: transactionTypeIn => ameTransactionType,
314: clearChainStatusYNIn => ame_util.booleanTrue
315: );
316: if g_fnd_debug = 'Y' then
317: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
318: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.setFirstAuthorityApprover()...' );
319: END IF;
320: end if;
321:
314: clearChainStatusYNIn => ame_util.booleanTrue
315: );
316: if g_fnd_debug = 'Y' then
317: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
318: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.setFirstAuthorityApprover()...' );
319: END IF;
320: end if;
321:
322: -- Once we change the first authority approver, then get the updated approvers list from ame.
322: -- Once we change the first authority approver, then get the updated approvers list from ame.
323: getAllApprovers(pReqHeaderId, ameTransactionType, pApprovalListStr, pApprovalListCount);
324:
325: if g_fnd_debug = 'Y' then
326: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
327: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving change_first_approver...');
328: END IF;
329: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
330: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
323: getAllApprovers(pReqHeaderId, ameTransactionType, pApprovalListStr, pApprovalListCount);
324:
325: if g_fnd_debug = 'Y' then
326: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
327: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving change_first_approver...');
328: END IF;
329: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
330: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
331: END IF;
325: if g_fnd_debug = 'Y' then
326: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
327: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving change_first_approver...');
328: END IF;
329: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
330: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
331: END IF;
332: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
333: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
326: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
327: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving change_first_approver...');
328: END IF;
329: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
330: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
331: END IF;
332: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
333: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
334: END IF;
328: END IF;
329: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
330: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
331: END IF;
332: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
333: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
334: END IF;
335: end if;
336:
329: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
330: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
331: END IF;
332: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
333: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
334: END IF;
335: end if;
336:
337: exception
338: when NO_DATA_FOUND then
339: pApprovalListCount := 0;
340: pApprovalListStr := 'NO_DATA_FOUND';
341: if g_fnd_debug = 'Y' then
342: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
343: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
344: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
345: END IF;
346: end if;
339: pApprovalListCount := 0;
340: pApprovalListStr := 'NO_DATA_FOUND';
341: if g_fnd_debug = 'Y' then
342: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
343: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
344: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
345: END IF;
346: end if;
347: when others then
347: when others then
348: pApprovalListCount := 0;
349: pApprovalListStr := 'EXCEPTION:' || sqlerrm;
350: if g_fnd_debug = 'Y' then
351: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
352: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
353: l_api_name || '.others_exception', sqlerrm);
354: END IF;
355: end if;
348: pApprovalListCount := 0;
349: pApprovalListStr := 'EXCEPTION:' || sqlerrm;
350: if g_fnd_debug = 'Y' then
351: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
352: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
353: l_api_name || '.others_exception', sqlerrm);
354: END IF;
355: end if;
356: ROLLBACK TO CHANGE_FIRST_APPROVER;
415:
416: begin
417:
418: if g_fnd_debug = 'Y' then
419: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
420: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering insert_approver...');
421: END IF;
422: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
423: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
416: begin
417:
418: if g_fnd_debug = 'Y' then
419: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
420: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering insert_approver...');
421: END IF;
422: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
423: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
424: END IF;
418: if g_fnd_debug = 'Y' then
419: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
420: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering insert_approver...');
421: END IF;
422: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
423: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
424: END IF;
425: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
426: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
419: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
420: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering insert_approver...');
421: END IF;
422: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
423: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
424: END IF;
425: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
426: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
427: END IF;
421: END IF;
422: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
423: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
424: END IF;
425: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
426: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
427: END IF;
428: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
429: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pAuthority :' || pAuthority );
422: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
423: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
424: END IF;
425: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
426: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
427: END IF;
428: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
429: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pAuthority :' || pAuthority );
430: END IF;
424: END IF;
425: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
426: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
427: END IF;
428: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
429: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pAuthority :' || pAuthority );
430: END IF;
431: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
432: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPosition :' || pPosition );
425: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
426: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
427: END IF;
428: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
429: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pAuthority :' || pAuthority );
430: END IF;
431: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
432: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPosition :' || pPosition );
433: END IF;
427: END IF;
428: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
429: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pAuthority :' || pAuthority );
430: END IF;
431: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
432: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPosition :' || pPosition );
433: END IF;
434: end if;
435:
428: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
429: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pAuthority :' || pAuthority );
430: END IF;
431: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
432: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPosition :' || pPosition );
433: END IF;
434: end if;
435:
436: getAmeTransactionType(pReqHeaderId => pReqHeaderId,
476: Approvers with Approval_status 'REPEATED' OR 'SUPPRESSED'is not considered in getAllApprovers procedure
477: Second condition will be used to avoid this code when we are inserting first approver */
478: IF ( hasHiddenApprovers = true AND pApproverName IS NOT NULL ) THEN
479: if g_fnd_debug = 'Y' then
480: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
481: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Found Repeated/Skipped Approvers!' );
482: END IF;
483: end if;
484:
477: Second condition will be used to avoid this code when we are inserting first approver */
478: IF ( hasHiddenApprovers = true AND pApproverName IS NOT NULL ) THEN
479: if g_fnd_debug = 'Y' then
480: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
481: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Found Repeated/Skipped Approvers!' );
482: END IF;
483: end if;
484:
485: for i in 1 .. approverList.count loop
558:
559: -- Verify the available insertions list from ame by giving the position number
560: -- Ame will give the output available list if the insertion is possible.
561: if g_fnd_debug = 'Y' then
562: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
563: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' final absolutePosition :' || absolutePosition );
564: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api3.getAvailableInsertions()..');
565: END IF;
566: end if;
559: -- Verify the available insertions list from ame by giving the position number
560: -- Ame will give the output available list if the insertion is possible.
561: if g_fnd_debug = 'Y' then
562: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
563: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' final absolutePosition :' || absolutePosition );
564: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api3.getAvailableInsertions()..');
565: END IF;
566: end if;
567:
560: -- Ame will give the output available list if the insertion is possible.
561: if g_fnd_debug = 'Y' then
562: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
563: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' final absolutePosition :' || absolutePosition );
564: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api3.getAvailableInsertions()..');
565: END IF;
566: end if;
567:
568: ame_api3.getAvailableInsertions( applicationIdIn => applicationId,
572: availableInsertionsOut => availableInsertionList
573: );
574:
575: if g_fnd_debug = 'Y' then
576: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
577: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api3.getAvailableInsertions()..');
578: END IF;
579: end if;
580:
573: );
574:
575: if g_fnd_debug = 'Y' then
576: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
577: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api3.getAvailableInsertions()..');
578: END IF;
579: end if;
580:
581: -- Iterate through the available list and find out the authority approver insertion location.
609: tmpApprover.orig_system_id || ' -- orig_system :' || tmpApprover.orig_system );
610: END IF;
611:
612: if g_fnd_debug = 'Y' then
613: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
614: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Found the available position also to insert..');
615: END IF;
616: end if;
617:
610: END IF;
611:
612: if g_fnd_debug = 'Y' then
613: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
614: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Found the available position also to insert..');
615: END IF;
616: end if;
617:
618: hasAvailableOrder := true;
650: tmpApprover.orig_system_id || ' -- orig_system :' || tmpApprover.orig_system );
651: END IF;
652:
653: if g_fnd_debug = 'Y' then
654: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
655: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Found the available position also to insert..');
656: END IF;
657: end if;
658:
651: END IF;
652:
653: if g_fnd_debug = 'Y' then
654: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
655: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Found the available position also to insert..');
656: END IF;
657: end if;
658:
659: hasAvailableOrder := true;
666: -- tmpApprover will be the new approver record and will be inserted in the absolutePosition.
667: if (hasAvailableOrder) then
668:
669: if g_fnd_debug = 'Y' then
670: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
671: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api3.insertApprover()..');
672: END IF;
673: end if;
674:
667: if (hasAvailableOrder) then
668:
669: if g_fnd_debug = 'Y' then
670: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
671: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api3.insertApprover()..');
672: END IF;
673: end if;
674:
675: ame_api3.insertApprover( applicationIdIn => applicationId,
680: transactionTypeIn => ameTransactionType
681: );
682:
683: if g_fnd_debug = 'Y' then
684: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
685: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api3.insertApprover()..');
686: END IF;
687: end if;
688: -- Once we insert an approver to ame, get the updated list of approvers from ame.
681: );
682:
683: if g_fnd_debug = 'Y' then
684: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
685: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api3.insertApprover()..');
686: END IF;
687: end if;
688: -- Once we insert an approver to ame, get the updated list of approvers from ame.
689: getAllApprovers(pReqHeaderId, ameTransactionType, pApprovalListStr, pApprovalListCount);
688: -- Once we insert an approver to ame, get the updated list of approvers from ame.
689: getAllApprovers(pReqHeaderId, ameTransactionType, pApprovalListStr, pApprovalListCount);
690:
691: if g_fnd_debug = 'Y' then
692: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
693: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving insert_approver...');
694: END IF;
695: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
696: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
689: getAllApprovers(pReqHeaderId, ameTransactionType, pApprovalListStr, pApprovalListCount);
690:
691: if g_fnd_debug = 'Y' then
692: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
693: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving insert_approver...');
694: END IF;
695: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
696: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
697: END IF;
691: if g_fnd_debug = 'Y' then
692: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
693: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving insert_approver...');
694: END IF;
695: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
696: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
697: END IF;
698: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
699: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
692: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
693: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving insert_approver...');
694: END IF;
695: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
696: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
697: END IF;
698: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
699: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
700: END IF;
694: END IF;
695: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
696: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
697: END IF;
698: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
699: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
700: END IF;
701: end if;
702:
695: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
696: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
697: END IF;
698: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
699: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
700: END IF;
701: end if;
702:
703: return;
709: when E_NO_AVAILABLE_INSERTION then
710: pApprovalListCount := 0;
711: pApprovalListStr := 'EXCEPTION-E_NO_AVAILABLE_INSERTION';
712: if g_fnd_debug = 'Y' then
713: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
714: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
715: l_api_name || '.E_NO_AVAILABLE_INSERTION', 'No available insertion order');
716: END IF;
717: end if;
710: pApprovalListCount := 0;
711: pApprovalListStr := 'EXCEPTION-E_NO_AVAILABLE_INSERTION';
712: if g_fnd_debug = 'Y' then
713: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
714: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
715: l_api_name || '.E_NO_AVAILABLE_INSERTION', 'No available insertion order');
716: END IF;
717: end if;
718: when NO_DATA_FOUND then
718: when NO_DATA_FOUND then
719: pApprovalListCount := 0;
720: pApprovalListStr := 'NO_DATA_FOUND';
721: if g_fnd_debug = 'Y' then
722: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
723: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
724: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
725: END IF;
726: end if;
719: pApprovalListCount := 0;
720: pApprovalListStr := 'NO_DATA_FOUND';
721: if g_fnd_debug = 'Y' then
722: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
723: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
724: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
725: END IF;
726: end if;
727: when others then
727: when others then
728: pApprovalListCount := 0;
729: pApprovalListStr := 'EXCEPTION';
730: if g_fnd_debug = 'Y' then
731: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
732: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
733: l_api_name || '.others_exception', sqlerrm);
734: END IF;
735: end if;
728: pApprovalListCount := 0;
729: pApprovalListStr := 'EXCEPTION';
730: if g_fnd_debug = 'Y' then
731: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
732: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
733: l_api_name || '.others_exception', sqlerrm);
734: END IF;
735: end if;
736: end;
776:
777: begin
778:
779: if g_fnd_debug = 'Y' then
780: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
781: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering delete_approver...');
782: END IF;
783: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
784: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
777: begin
778:
779: if g_fnd_debug = 'Y' then
780: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
781: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering delete_approver...');
782: END IF;
783: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
784: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
785: END IF;
779: if g_fnd_debug = 'Y' then
780: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
781: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering delete_approver...');
782: END IF;
783: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
784: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
785: END IF;
786: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
787: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
780: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
781: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering delete_approver...');
782: END IF;
783: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
784: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
785: END IF;
786: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
787: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
788: END IF;
782: END IF;
783: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
784: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
785: END IF;
786: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
787: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
788: END IF;
789: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
790: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystem :' || pOrigSystem );
783: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
784: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
785: END IF;
786: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
787: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
788: END IF;
789: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
790: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystem :' || pOrigSystem );
791: END IF;
785: END IF;
786: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
787: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
788: END IF;
789: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
790: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystem :' || pOrigSystem );
791: END IF;
792: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
793: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystemId :' || pOrigSystemId );
786: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
787: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pPersonId :' || pPersonId );
788: END IF;
789: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
790: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystem :' || pOrigSystem );
791: END IF;
792: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
793: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystemId :' || pOrigSystemId );
794: END IF;
788: END IF;
789: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
790: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystem :' || pOrigSystem );
791: END IF;
792: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
793: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystemId :' || pOrigSystemId );
794: END IF;
795: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
796: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pRecordName :' || pRecordName );
789: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
790: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystem :' || pOrigSystem );
791: END IF;
792: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
793: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystemId :' || pOrigSystemId );
794: END IF;
795: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
796: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pRecordName :' || pRecordName );
797: END IF;
791: END IF;
792: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
793: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystemId :' || pOrigSystemId );
794: END IF;
795: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
796: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pRecordName :' || pRecordName );
797: END IF;
798: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
799: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pAuthority :' || pAuthority );
792: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
793: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pOrigSystemId :' || pOrigSystemId );
794: END IF;
795: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
796: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pRecordName :' || pRecordName );
797: END IF;
798: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
799: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pAuthority :' || pAuthority );
800: END IF;
794: END IF;
795: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
796: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pRecordName :' || pRecordName );
797: END IF;
798: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
799: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pAuthority :' || pAuthority );
800: END IF;
801: end if;
802:
795: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
796: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pRecordName :' || pRecordName );
797: END IF;
798: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
799: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pAuthority :' || pAuthority );
800: END IF;
801: end if;
802:
803: getAmeTransactionType(pReqHeaderId => pReqHeaderId,
812: tmpApprover.name := pRecordName;
813: tmpApprover.authority := pAuthority;
814:
815: if g_fnd_debug = 'Y' then
816: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
817: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()..');
818: END IF;
819: end if;
820:
813: tmpApprover.authority := pAuthority;
814:
815: if g_fnd_debug = 'Y' then
816: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
817: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()..');
818: END IF;
819: end if;
820:
821: -- get the AME approvers list
826: approversOut => approverList
827: );
828:
829: if g_fnd_debug = 'Y' then
830: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
831: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()..');
832: END IF;
833: end if;
834:
827: );
828:
829: if g_fnd_debug = 'Y' then
830: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
831: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()..');
832: END IF;
833: end if;
834:
835: -- check for the given approver details in the approval list
837: -- once we get the approver details in the list, simply copy the record to tmpApprover approverRecord2.
838: for i in 1 .. approverList.count loop
839:
840: if g_fnd_debug = 'Y' then
841: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
842: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Searching through list of Approvers for match');
843: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' name: ' || tmpApprover.name || ' ? ' || approverList(i).name);
844: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system: ' || tmpApprover.orig_system || ' ? ' || approverList(i).orig_system);
845: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system_id: ' || tmpApprover.orig_system_id || ' ? ' || approverList(i).orig_system_id);
838: for i in 1 .. approverList.count loop
839:
840: if g_fnd_debug = 'Y' then
841: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
842: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Searching through list of Approvers for match');
843: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' name: ' || tmpApprover.name || ' ? ' || approverList(i).name);
844: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system: ' || tmpApprover.orig_system || ' ? ' || approverList(i).orig_system);
845: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system_id: ' || tmpApprover.orig_system_id || ' ? ' || approverList(i).orig_system_id);
846: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' authority: ' || tmpApprover.authority || ' ? ' || approverList(i).authority);
839:
840: if g_fnd_debug = 'Y' then
841: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
842: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Searching through list of Approvers for match');
843: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' name: ' || tmpApprover.name || ' ? ' || approverList(i).name);
844: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system: ' || tmpApprover.orig_system || ' ? ' || approverList(i).orig_system);
845: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system_id: ' || tmpApprover.orig_system_id || ' ? ' || approverList(i).orig_system_id);
846: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' authority: ' || tmpApprover.authority || ' ? ' || approverList(i).authority);
847: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' status is NULL or NOT SUPPRESSED: ' || approverList(i).approval_status);
840: if g_fnd_debug = 'Y' then
841: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
842: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Searching through list of Approvers for match');
843: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' name: ' || tmpApprover.name || ' ? ' || approverList(i).name);
844: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system: ' || tmpApprover.orig_system || ' ? ' || approverList(i).orig_system);
845: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system_id: ' || tmpApprover.orig_system_id || ' ? ' || approverList(i).orig_system_id);
846: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' authority: ' || tmpApprover.authority || ' ? ' || approverList(i).authority);
847: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' status is NULL or NOT SUPPRESSED: ' || approverList(i).approval_status);
848: END IF;
841: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
842: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Searching through list of Approvers for match');
843: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' name: ' || tmpApprover.name || ' ? ' || approverList(i).name);
844: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system: ' || tmpApprover.orig_system || ' ? ' || approverList(i).orig_system);
845: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system_id: ' || tmpApprover.orig_system_id || ' ? ' || approverList(i).orig_system_id);
846: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' authority: ' || tmpApprover.authority || ' ? ' || approverList(i).authority);
847: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' status is NULL or NOT SUPPRESSED: ' || approverList(i).approval_status);
848: END IF;
849: end if;
842: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Searching through list of Approvers for match');
843: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' name: ' || tmpApprover.name || ' ? ' || approverList(i).name);
844: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system: ' || tmpApprover.orig_system || ' ? ' || approverList(i).orig_system);
845: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system_id: ' || tmpApprover.orig_system_id || ' ? ' || approverList(i).orig_system_id);
846: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' authority: ' || tmpApprover.authority || ' ? ' || approverList(i).authority);
847: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' status is NULL or NOT SUPPRESSED: ' || approverList(i).approval_status);
848: END IF;
849: end if;
850:
843: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' name: ' || tmpApprover.name || ' ? ' || approverList(i).name);
844: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system: ' || tmpApprover.orig_system || ' ? ' || approverList(i).orig_system);
845: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' orig_system_id: ' || tmpApprover.orig_system_id || ' ? ' || approverList(i).orig_system_id);
846: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' authority: ' || tmpApprover.authority || ' ? ' || approverList(i).authority);
847: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' status is NULL or NOT SUPPRESSED: ' || approverList(i).approval_status);
848: END IF;
849: end if;
850:
851: if( approverList(i).name = tmpApprover.name and
856: approverList(i).approval_status = ame_util.nullStatus or
857: approverList(i).approval_status <> ame_util.suppressedStatus) ) then
858:
859: if g_fnd_debug = 'Y' then
860: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
861: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Found the approver to be deleted also in the list...');
862: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Name = ' || tmpApprover.name);
863: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Action Type Id = ' || approverList(i).action_type_id);
864: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Status = ' || approverList(i).approval_status);
857: approverList(i).approval_status <> ame_util.suppressedStatus) ) then
858:
859: if g_fnd_debug = 'Y' then
860: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
861: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Found the approver to be deleted also in the list...');
862: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Name = ' || tmpApprover.name);
863: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Action Type Id = ' || approverList(i).action_type_id);
864: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Status = ' || approverList(i).approval_status);
865: END IF;
858:
859: if g_fnd_debug = 'Y' then
860: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
861: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Found the approver to be deleted also in the list...');
862: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Name = ' || tmpApprover.name);
863: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Action Type Id = ' || approverList(i).action_type_id);
864: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Status = ' || approverList(i).approval_status);
865: END IF;
866: end if;
859: if g_fnd_debug = 'Y' then
860: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
861: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Found the approver to be deleted also in the list...');
862: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Name = ' || tmpApprover.name);
863: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Action Type Id = ' || approverList(i).action_type_id);
864: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Status = ' || approverList(i).approval_status);
865: END IF;
866: end if;
867: tmpApprover := approverList(i) ;
860: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
861: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Found the approver to be deleted also in the list...');
862: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Name = ' || tmpApprover.name);
863: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Action Type Id = ' || approverList(i).action_type_id);
864: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver Status = ' || approverList(i).approval_status);
865: END IF;
866: end if;
867: tmpApprover := approverList(i) ;
868: exit;
872:
873: -- Call the ame api to delete the approver.
874: -- tmpApprover will be deleted from the approver list
875: if g_fnd_debug = 'Y' then
876: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
877: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api3.suppressApprover()..');
878: END IF;
879: end if;
880: ame_api3.suppressApprover( applicationIdIn => applicationId,
873: -- Call the ame api to delete the approver.
874: -- tmpApprover will be deleted from the approver list
875: if g_fnd_debug = 'Y' then
876: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
877: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api3.suppressApprover()..');
878: END IF;
879: end if;
880: ame_api3.suppressApprover( applicationIdIn => applicationId,
881: transactionIdIn => pReqHeaderId,
883: transactionTypeIn => ameTransactionType
884: );
885:
886: if g_fnd_debug = 'Y' then
887: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
888: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api3.suppressApprover()..');
889: END IF;
890: end if;
891:
884: );
885:
886: if g_fnd_debug = 'Y' then
887: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
888: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api3.suppressApprover()..');
889: END IF;
890: end if;
891:
892: if (tmpApprover.orig_system=ame_util.posOrigSystem) THEN
896: FROM po_requisition_headers_all
897: WHERE requisition_header_id = pReqHeaderId;
898:
899: if g_fnd_debug = 'Y' then
900: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
901: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'POS Record is being suppressed.');
902: END IF;
903: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
904: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Stored FIRST_POSITION_ID = ' || l_first_position_id);
897: WHERE requisition_header_id = pReqHeaderId;
898:
899: if g_fnd_debug = 'Y' then
900: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
901: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'POS Record is being suppressed.');
902: END IF;
903: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
904: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Stored FIRST_POSITION_ID = ' || l_first_position_id);
905: END IF;
899: if g_fnd_debug = 'Y' then
900: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
901: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'POS Record is being suppressed.');
902: END IF;
903: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
904: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Stored FIRST_POSITION_ID = ' || l_first_position_id);
905: END IF;
906: end if;
907:
900: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
901: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'POS Record is being suppressed.');
902: END IF;
903: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
904: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Stored FIRST_POSITION_ID = ' || l_first_position_id);
905: END IF;
906: end if;
907:
908: if (tmpApprover.orig_system_id=l_first_position_id) then
913: SET first_position_id = NULL, first_approver_id = NULL
914: WHERE requisition_header_id = pReqHeaderId;
915:
916: if g_fnd_debug = 'Y' then
917: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
918: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name,
919: 'Cleared first_position_id and first_approver_id from req_header table.');
920: END IF;
921: end if;
914: WHERE requisition_header_id = pReqHeaderId;
915:
916: if g_fnd_debug = 'Y' then
917: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
918: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name,
919: 'Cleared first_position_id and first_approver_id from req_header table.');
920: END IF;
921: end if;
922:
926: -- Once we delete an approver from the approval list, get the updated approval list from ame.
927: getAllApprovers(pReqHeaderId, ameTransactionType, pApprovalListStr, pApprovalListCount);
928:
929: if g_fnd_debug = 'Y' then
930: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
931: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving delete_approver...');
932: END IF;
933: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
934: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
927: getAllApprovers(pReqHeaderId, ameTransactionType, pApprovalListStr, pApprovalListCount);
928:
929: if g_fnd_debug = 'Y' then
930: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
931: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving delete_approver...');
932: END IF;
933: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
934: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
935: END IF;
929: if g_fnd_debug = 'Y' then
930: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
931: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving delete_approver...');
932: END IF;
933: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
934: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
935: END IF;
936: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
937: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
930: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
931: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving delete_approver...');
932: END IF;
933: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
934: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
935: END IF;
936: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
937: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
938: END IF;
932: END IF;
933: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
934: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
935: END IF;
936: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
937: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
938: END IF;
939: end if;
940:
933: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
934: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
935: END IF;
936: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
937: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
938: END IF;
939: end if;
940:
941: exception
942: when NO_DATA_FOUND then
943: pApprovalListCount := 0;
944: pApprovalListStr := 'NO_DATA_FOUND';
945: if g_fnd_debug = 'Y' then
946: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
947: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
948: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
949: END IF;
950: end if;
943: pApprovalListCount := 0;
944: pApprovalListStr := 'NO_DATA_FOUND';
945: if g_fnd_debug = 'Y' then
946: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
947: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
948: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
949: END IF;
950: end if;
951: when others then
951: when others then
952: pApprovalListCount := 0;
953: pApprovalListStr := 'EXCEPTION:' || sqlerrm;
954: if g_fnd_debug = 'Y' then
955: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
956: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
957: l_api_name || '.others_exception', sqlerrm);
958: END IF;
959: end if;
952: pApprovalListCount := 0;
953: pApprovalListStr := 'EXCEPTION:' || sqlerrm;
954: if g_fnd_debug = 'Y' then
955: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
956: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
957: l_api_name || '.others_exception', sqlerrm);
958: END IF;
959: end if;
960: end;
1012:
1013: BEGIN
1014:
1015: if g_fnd_debug = 'Y' then
1016: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1017: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_ame_approval_list...');
1018: END IF;
1019: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1020: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
1013: BEGIN
1014:
1015: if g_fnd_debug = 'Y' then
1016: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1017: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_ame_approval_list...');
1018: END IF;
1019: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1020: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
1021: END IF;
1015: if g_fnd_debug = 'Y' then
1016: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1017: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_ame_approval_list...');
1018: END IF;
1019: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1020: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
1021: END IF;
1022: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1023: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pDefaultFlag :' || pDefaultFlag );
1016: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1017: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_ame_approval_list...');
1018: END IF;
1019: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1020: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
1021: END IF;
1022: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1023: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pDefaultFlag :' || pDefaultFlag );
1024: END IF;
1018: END IF;
1019: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1020: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
1021: END IF;
1022: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1023: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pDefaultFlag :' || pDefaultFlag );
1024: END IF;
1025: end if;
1026:
1019: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1020: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
1021: END IF;
1022: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1023: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pDefaultFlag :' || pDefaultFlag );
1024: END IF;
1025: end if;
1026:
1027: -- pDefaultFlag:
1058: -- If we call clearAllApprovals all the inserted/deleted approvers by the users will be ignored.
1059: -- AME will return the rule generated approvers if we call getAllApprovers after the clearAllApprovals call.
1060:
1061: if g_fnd_debug = 'Y' then
1062: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1063: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'authorizationStatus :' || authorizationStatus);
1064: END IF;
1065: end if;
1066:
1059: -- AME will return the rule generated approvers if we call getAllApprovers after the clearAllApprovals call.
1060:
1061: if g_fnd_debug = 'Y' then
1062: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1063: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'authorizationStatus :' || authorizationStatus);
1064: END IF;
1065: end if;
1066:
1067: -- if INCOMPLETE and pDefaultFlag is 1 (non-force), then check to see if we should reset or not
1067: -- if INCOMPLETE and pDefaultFlag is 1 (non-force), then check to see if we should reset or not
1068: if (authorizationStatus = 'INCOMPLETE' AND pDefaultFlag=1) then
1069:
1070: if g_fnd_debug = 'Y' then
1071: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1072: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()a...');
1073: END IF;
1074: end if;
1075:
1068: if (authorizationStatus = 'INCOMPLETE' AND pDefaultFlag=1) then
1069:
1070: if g_fnd_debug = 'Y' then
1071: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1072: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()a...');
1073: END IF;
1074: end if;
1075:
1076: ame_api2.getAllApprovers7( applicationIdIn => applicationId,
1079: approvalProcessCompleteYNOut => l_process_out,
1080: approversOut => approverList
1081: );
1082: if g_fnd_debug = 'Y' then
1083: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1084: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()a...');
1085: END IF;
1086: end if;
1087:
1080: approversOut => approverList
1081: );
1082: if g_fnd_debug = 'Y' then
1083: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1084: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()a...');
1085: END IF;
1086: end if;
1087:
1088: for i in 1 .. approverList.count loop
1094: end if;
1095: end loop;
1096:
1097: if g_fnd_debug = 'Y' then
1098: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1099: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'clearListForSavedCart :' || clearListForSavedCart);
1100: END IF;
1101: end if;
1102:
1095: end loop;
1096:
1097: if g_fnd_debug = 'Y' then
1098: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1099: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'clearListForSavedCart :' || clearListForSavedCart);
1100: END IF;
1101: end if;
1102:
1103: if (clearListForSavedCart = 'Y') then
1107: SET first_position_id = NULL, first_approver_id = NULL
1108: WHERE requisition_header_id = pReqHeaderId;
1109:
1110: if g_fnd_debug = 'Y' then
1111: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1112: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name,
1113: 'Cleared first_position_id and first_approver_id from req_header table.');
1114: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.clearAllApprovals()a...');
1115: END IF;
1108: WHERE requisition_header_id = pReqHeaderId;
1109:
1110: if g_fnd_debug = 'Y' then
1111: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1112: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name,
1113: 'Cleared first_position_id and first_approver_id from req_header table.');
1114: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.clearAllApprovals()a...');
1115: END IF;
1116: end if;
1110: if g_fnd_debug = 'Y' then
1111: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1112: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name,
1113: 'Cleared first_position_id and first_approver_id from req_header table.');
1114: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.clearAllApprovals()a...');
1115: END IF;
1116: end if;
1117:
1118: ame_api2.clearAllApprovals( applicationIdIn => applicationId,
1120: transactionTypeIn => ameTransactionType
1121: );
1122:
1123: if g_fnd_debug = 'Y' then
1124: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1125: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.clearAllApprovals()a...');
1126: END IF;
1127: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1128: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()b...');
1121: );
1122:
1123: if g_fnd_debug = 'Y' then
1124: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1125: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.clearAllApprovals()a...');
1126: END IF;
1127: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1128: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()b...');
1129: END IF;
1123: if g_fnd_debug = 'Y' then
1124: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1125: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.clearAllApprovals()a...');
1126: END IF;
1127: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1128: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()b...');
1129: END IF;
1130: end if;
1131:
1124: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1125: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.clearAllApprovals()a...');
1126: END IF;
1127: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1128: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()b...');
1129: END IF;
1130: end if;
1131:
1132: ame_api2.getAllApprovers7( applicationIdIn => applicationId,
1135: approvalProcessCompleteYNOut => l_process_out,
1136: approversOut => approverList
1137: );
1138: if g_fnd_debug = 'Y' then
1139: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1140: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()b...');
1141: END IF;
1142: end if;
1143:
1136: approversOut => approverList
1137: );
1138: if g_fnd_debug = 'Y' then
1139: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1140: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()b...');
1141: END IF;
1142: end if;
1143:
1144: end if; -- if(clearListForSavedCart = 'Y')
1150: SET first_position_id = NULL, first_approver_id = NULL
1151: WHERE requisition_header_id = pReqHeaderId;
1152:
1153: if g_fnd_debug = 'Y' then
1154: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1155: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name,
1156: 'Cleared first_position_id and first_approver_id from req_header table.');
1157: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.clearAllApprovals()b...');
1158: END IF;
1151: WHERE requisition_header_id = pReqHeaderId;
1152:
1153: if g_fnd_debug = 'Y' then
1154: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1155: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name,
1156: 'Cleared first_position_id and first_approver_id from req_header table.');
1157: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.clearAllApprovals()b...');
1158: END IF;
1159: end if;
1153: if g_fnd_debug = 'Y' then
1154: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1155: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name,
1156: 'Cleared first_position_id and first_approver_id from req_header table.');
1157: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.clearAllApprovals()b...');
1158: END IF;
1159: end if;
1160:
1161: ame_api2.clearAllApprovals( applicationIdIn => applicationId,
1163: transactionTypeIn => ameTransactionType
1164: );
1165:
1166: if g_fnd_debug = 'Y' then
1167: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1168: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.clearAllApprovals()b...');
1169: END IF;
1170: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1171: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()c...');
1164: );
1165:
1166: if g_fnd_debug = 'Y' then
1167: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1168: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.clearAllApprovals()b...');
1169: END IF;
1170: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1171: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()c...');
1172: END IF;
1166: if g_fnd_debug = 'Y' then
1167: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1168: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.clearAllApprovals()b...');
1169: END IF;
1170: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1171: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()c...');
1172: END IF;
1173: end if;
1174:
1167: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1168: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.clearAllApprovals()b...');
1169: END IF;
1170: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1171: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()c...');
1172: END IF;
1173: end if;
1174:
1175: ame_api2.getAllApprovers7( applicationIdIn => applicationId,
1178: approvalProcessCompleteYNOut => l_process_out,
1179: approversOut => approverList
1180: );
1181: if g_fnd_debug = 'Y' then
1182: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1183: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()c...');
1184: END IF;
1185: end if;
1186:
1179: approversOut => approverList
1180: );
1181: if g_fnd_debug = 'Y' then
1182: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1183: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()c...');
1184: END IF;
1185: end if;
1186:
1187: end if; -- if ( authorizationStatus = 'INCOMPLETE')
1188:
1189: else -- if pDefaultFlag is null or -1
1190:
1191: if g_fnd_debug = 'Y' then
1192: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1193: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()d...');
1194: END IF;
1195: end if;
1196:
1189: else -- if pDefaultFlag is null or -1
1190:
1191: if g_fnd_debug = 'Y' then
1192: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1193: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()d...');
1194: END IF;
1195: end if;
1196:
1197: ame_api2.getAllApprovers7( applicationIdIn => applicationId,
1201: approversOut => approverList
1202: );
1203:
1204: if g_fnd_debug = 'Y' then
1205: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1206: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()d...');
1207: END IF;
1208: end if;
1209:
1202: );
1203:
1204: if g_fnd_debug = 'Y' then
1205: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1206: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()d...');
1207: END IF;
1208: end if;
1209:
1210: end if; -- if(pDefaultFlag = 1)
1214: else
1215: pApprovalListCount:=0;
1216: end if;
1217: if g_fnd_debug = 'Y' then
1218: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1219: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_ame_approval_list...');
1220: END IF;
1221: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1222: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1215: pApprovalListCount:=0;
1216: end if;
1217: if g_fnd_debug = 'Y' then
1218: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1219: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_ame_approval_list...');
1220: END IF;
1221: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1222: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1223: END IF;
1217: if g_fnd_debug = 'Y' then
1218: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1219: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_ame_approval_list...');
1220: END IF;
1221: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1222: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1223: END IF;
1224: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1225: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1218: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1219: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_ame_approval_list...');
1220: END IF;
1221: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1222: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1223: END IF;
1224: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1225: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1226: END IF;
1220: END IF;
1221: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1222: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1223: END IF;
1224: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1225: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1226: END IF;
1227: end if;
1228:
1221: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1222: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1223: END IF;
1224: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1225: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1226: END IF;
1227: end if;
1228:
1229: exception
1230: when NO_DATA_FOUND then
1231: pApprovalListCount := 0;
1232: pApprovalListStr := 'NO_DATA_FOUND';
1233: if g_fnd_debug = 'Y' then
1234: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1235: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1236: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
1237: END IF;
1238: end if;
1231: pApprovalListCount := 0;
1232: pApprovalListStr := 'NO_DATA_FOUND';
1233: if g_fnd_debug = 'Y' then
1234: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1235: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1236: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
1237: END IF;
1238: end if;
1239: when others then
1239: when others then
1240: pApprovalListCount := 0;
1241: pApprovalListStr := 'EXCEPTION:' || sqlerrm;
1242: if g_fnd_debug = 'Y' then
1243: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1244: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1245: l_api_name || '.others_exception', sqlerrm);
1246: END IF;
1247: end if;
1240: pApprovalListCount := 0;
1241: pApprovalListStr := 'EXCEPTION:' || sqlerrm;
1242: if g_fnd_debug = 'Y' then
1243: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1244: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1245: l_api_name || '.others_exception', sqlerrm);
1246: END IF;
1247: end if;
1248: END get_ame_approval_list;
1339:
1340: BEGIN
1341:
1342: if g_fnd_debug = 'Y' then
1343: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1344: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_old_approval_list...');
1345: END IF;
1346: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1347: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
1340: BEGIN
1341:
1342: if g_fnd_debug = 'Y' then
1343: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1344: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_old_approval_list...');
1345: END IF;
1346: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1347: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
1348: END IF;
1342: if g_fnd_debug = 'Y' then
1343: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1344: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_old_approval_list...');
1345: END IF;
1346: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1347: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
1348: END IF;
1349: end if;
1350:
1343: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1344: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_old_approval_list...');
1345: END IF;
1346: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1347: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
1348: END IF;
1349: end if;
1350:
1351: begin
1355: where requisition_header_id = pReqHeaderId;
1356: exception
1357: when others then
1358: if g_fnd_debug = 'Y' then
1359: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1360: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1361: l_api_name || '.others_exception', sqlerrm);
1362: END IF;
1363: end if;
1356: exception
1357: when others then
1358: if g_fnd_debug = 'Y' then
1359: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1360: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1361: l_api_name || '.others_exception', sqlerrm);
1362: END IF;
1363: end if;
1364: return;
1364: return;
1365: end;
1366:
1367: if g_fnd_debug = 'Y' then
1368: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1369: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'authorizationStatus :' || authorizationStatus);
1370: END IF;
1371: end if;
1372:
1365: end;
1366:
1367: if g_fnd_debug = 'Y' then
1368: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1369: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'authorizationStatus :' || authorizationStatus);
1370: END IF;
1371: end if;
1372:
1373: if (authorizationStatus <> 'IN PROCESS' and authorizationStatus <> 'PRE-APPROVED') then
1401: if (is_ame_reqapprv_workflow (pReqHeaderId, isRcoApproval, ameTransactionType) <> 'Y') then
1402:
1403: pApprovalListCount := 0;
1404: if g_fnd_debug = 'Y' then
1405: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1406: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_old_approval_list due to the call is_ame_reqapprv_workflow()...');
1407: END IF;
1408: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1409: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1402:
1403: pApprovalListCount := 0;
1404: if g_fnd_debug = 'Y' then
1405: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1406: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_old_approval_list due to the call is_ame_reqapprv_workflow()...');
1407: END IF;
1408: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1409: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1410: END IF;
1404: if g_fnd_debug = 'Y' then
1405: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1406: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_old_approval_list due to the call is_ame_reqapprv_workflow()...');
1407: END IF;
1408: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1409: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1410: END IF;
1411: end if;
1412: return;
1405: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1406: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_old_approval_list due to the call is_ame_reqapprv_workflow()...');
1407: END IF;
1408: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1409: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1410: END IF;
1411: end if;
1412: return;
1413: end if;
1415: pQuoteChar :=quoteChar;
1416: pFieldDelimiter :=fieldDelimiter;
1417:
1418: if g_fnd_debug = 'Y' then
1419: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1420: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api3.getOldApprovers()...');
1421: END IF;
1422: end if;
1423:
1416: pFieldDelimiter :=fieldDelimiter;
1417:
1418: if g_fnd_debug = 'Y' then
1419: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1420: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api3.getOldApprovers()...');
1421: END IF;
1422: end if;
1423:
1424: /*
1435: approversOut => approverList
1436: );
1437:
1438: if g_fnd_debug = 'Y' then
1439: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1440: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api3.getOldApprovers()...');
1441: END IF;
1442: end if;
1443:
1436: );
1437:
1438: if g_fnd_debug = 'Y' then
1439: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1440: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api3.getOldApprovers()...');
1441: END IF;
1442: end if;
1443:
1444: pApprovalListCount := approverList.count;
1448: pApprovalListCount := approverCount;
1449: end if;
1450:
1451: if g_fnd_debug = 'Y' then
1452: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1453: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_old_approval_list...');
1454: END IF;
1455: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1456: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1449: end if;
1450:
1451: if g_fnd_debug = 'Y' then
1452: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1453: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_old_approval_list...');
1454: END IF;
1455: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1456: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1457: END IF;
1451: if g_fnd_debug = 'Y' then
1452: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1453: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_old_approval_list...');
1454: END IF;
1455: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1456: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1457: END IF;
1458: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1459: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1452: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1453: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_old_approval_list...');
1454: END IF;
1455: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1456: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1457: END IF;
1458: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1459: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1460: END IF;
1454: END IF;
1455: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1456: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1457: END IF;
1458: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1459: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1460: END IF;
1461: end if;
1462:
1455: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1456: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
1457: END IF;
1458: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1459: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
1460: END IF;
1461: end if;
1462:
1463: exception
1464: when NO_DATA_FOUND then
1465: pApprovalListCount := 0;
1466: pApprovalListStr := 'NO_DATA_FOUND';
1467: if g_fnd_debug = 'Y' then
1468: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1469: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1470: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
1471: END IF;
1472: end if;
1465: pApprovalListCount := 0;
1466: pApprovalListStr := 'NO_DATA_FOUND';
1467: if g_fnd_debug = 'Y' then
1468: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1469: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1470: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
1471: END IF;
1472: end if;
1473: when others then
1473: when others then
1474: pApprovalListCount := 0;
1475: pApprovalListStr := 'EXCEPTION';
1476: if g_fnd_debug = 'Y' then
1477: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1478: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1479: l_api_name || '.others_exception', sqlerrm);
1480: END IF;
1481: end if;
1474: pApprovalListCount := 0;
1475: pApprovalListStr := 'EXCEPTION';
1476: if g_fnd_debug = 'Y' then
1477: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1478: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1479: l_api_name || '.others_exception', sqlerrm);
1480: END IF;
1481: end if;
1482: END;
1518:
1519: BEGIN
1520:
1521: if g_fnd_debug = 'Y' then
1522: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1523: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering is_req_pre_approved...');
1524: END IF;
1525: end if;
1526:
1519: BEGIN
1520:
1521: if g_fnd_debug = 'Y' then
1522: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1523: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering is_req_pre_approved...');
1524: END IF;
1525: end if;
1526:
1527: x_progress := 'POR_AME_APPROVAL_LIST.is_req_pre_approved: 01';
1554: END IF;
1555:
1556: -- Get the list of approvers from ame.
1557: if g_fnd_debug = 'Y' then
1558: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1559: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()...');
1560: END IF;
1561: end if;
1562:
1555:
1556: -- Get the list of approvers from ame.
1557: if g_fnd_debug = 'Y' then
1558: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1559: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()...');
1560: END IF;
1561: end if;
1562:
1563: ame_api2.getAllApprovers7( applicationIdIn => applicationId,
1566: approvalProcessCompleteYNOut => l_process_out,
1567: approversOut => approvers
1568: );
1569: if g_fnd_debug = 'Y' then
1570: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1571: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()...');
1572: END IF;
1573: end if;
1574: approverCount := approvers.count;
1567: approversOut => approvers
1568: );
1569: if g_fnd_debug = 'Y' then
1570: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1571: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()...');
1572: END IF;
1573: end if;
1574: approverCount := approvers.count;
1575:
1593: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1594: END IF;
1595:
1596: if g_fnd_debug = 'Y' then
1597: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1598: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving is_req_pre_approved...');
1599: END IF;
1600: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1601: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- x_resultout :' || x_resultout);
1594: END IF;
1595:
1596: if g_fnd_debug = 'Y' then
1597: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1598: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving is_req_pre_approved...');
1599: END IF;
1600: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1601: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- x_resultout :' || x_resultout);
1602: END IF;
1596: if g_fnd_debug = 'Y' then
1597: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1598: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving is_req_pre_approved...');
1599: END IF;
1600: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1601: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- x_resultout :' || x_resultout);
1602: END IF;
1603: end if;
1604:
1597: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1598: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving is_req_pre_approved...');
1599: END IF;
1600: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1601: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- x_resultout :' || x_resultout);
1602: END IF;
1603: end if;
1604:
1605: EXCEPTION
1644:
1645: BEGIN
1646:
1647: if g_fnd_debug = 'Y' then
1648: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1649: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_first_authority_approver...');
1650: END IF;
1651: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1652: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId ' || pReqHeaderId );
1645: BEGIN
1646:
1647: if g_fnd_debug = 'Y' then
1648: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1649: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_first_authority_approver...');
1650: END IF;
1651: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1652: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId ' || pReqHeaderId );
1653: END IF;
1647: if g_fnd_debug = 'Y' then
1648: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1649: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_first_authority_approver...');
1650: END IF;
1651: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1652: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId ' || pReqHeaderId );
1653: END IF;
1654: end if;
1655:
1648: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1649: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_first_authority_approver...');
1650: END IF;
1651: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1652: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId ' || pReqHeaderId );
1653: END IF;
1654: end if;
1655:
1656: xPersonId := null;
1658: pAmeTransactionType => ameTransactionType);
1659:
1660: -- Get the approvers list from ame.
1661: if g_fnd_debug = 'Y' then
1662: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1663: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()...');
1664: END IF;
1665: end if;
1666:
1659:
1660: -- Get the approvers list from ame.
1661: if g_fnd_debug = 'Y' then
1662: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1663: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()...');
1664: END IF;
1665: end if;
1666:
1667: ame_api2.getAllApprovers7( applicationIdIn => applicationId,
1671: approversOut => approvers
1672: );
1673:
1674: if g_fnd_debug = 'Y' then
1675: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1676: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()...');
1677: END IF;
1678: end if;
1679:
1672: );
1673:
1674: if g_fnd_debug = 'Y' then
1675: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1676: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()...');
1677: END IF;
1678: end if;
1679:
1680: approverCount := approvers.count;
1692:
1693: if approvers(i).orig_system = ame_util.posOrigSystem then
1694:
1695: if g_fnd_debug = 'Y' then
1696: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1697: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'First record is Position Hierarchy action type...');
1698: END IF;
1699: end if;
1700:
1693: if approvers(i).orig_system = ame_util.posOrigSystem then
1694:
1695: if g_fnd_debug = 'Y' then
1696: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1697: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'First record is Position Hierarchy action type...');
1698: END IF;
1699: end if;
1700:
1701: begin
1721: end if;
1722: end loop;
1723:
1724: if g_fnd_debug = 'Y' then
1725: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1726: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_first_authority_approver...');
1727: END IF;
1728: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1729: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- xPersonId :' || xPersonId);
1722: end loop;
1723:
1724: if g_fnd_debug = 'Y' then
1725: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1726: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_first_authority_approver...');
1727: END IF;
1728: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1729: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- xPersonId :' || xPersonId);
1730: END IF;
1724: if g_fnd_debug = 'Y' then
1725: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1726: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_first_authority_approver...');
1727: END IF;
1728: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1729: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- xPersonId :' || xPersonId);
1730: END IF;
1731: end if;
1732:
1725: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1726: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_first_authority_approver...');
1727: END IF;
1728: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1729: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- xPersonId :' || xPersonId);
1730: END IF;
1731: end if;
1732:
1733: exception
1732:
1733: exception
1734: when others then
1735: if g_fnd_debug = 'Y' then
1736: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1737: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1738: l_api_name || '.others_exception', sqlerrm);
1739: END IF;
1740: end if;
1733: exception
1734: when others then
1735: if g_fnd_debug = 'Y' then
1736: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1737: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1738: l_api_name || '.others_exception', sqlerrm);
1739: END IF;
1740: end if;
1741: raise;
1768:
1769: BEGIN
1770:
1771: if g_fnd_debug = 'Y' then
1772: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1773: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering can_delete_oam_approvers...');
1774: END IF;
1775: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1776: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId ' || pReqHeaderId );
1769: BEGIN
1770:
1771: if g_fnd_debug = 'Y' then
1772: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1773: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering can_delete_oam_approvers...');
1774: END IF;
1775: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1776: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId ' || pReqHeaderId );
1777: END IF;
1771: if g_fnd_debug = 'Y' then
1772: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1773: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering can_delete_oam_approvers...');
1774: END IF;
1775: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1776: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId ' || pReqHeaderId );
1777: END IF;
1778: end if;
1779:
1772: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1773: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering can_delete_oam_approvers...');
1774: END IF;
1775: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1776: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId ' || pReqHeaderId );
1777: END IF;
1778: end if;
1779:
1780: getAmeTransactionType(pReqHeaderId => pReqHeaderId,
1780: getAmeTransactionType(pReqHeaderId => pReqHeaderId,
1781: pAmeTransactionType => ameTransactionType);
1782:
1783: if g_fnd_debug = 'Y' then
1784: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1785: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api3.getAttributeValue()...');
1786: END IF;
1787: end if;
1788: ame_api3.getAttributeValue(applicationIdIn => applicationId,
1781: pAmeTransactionType => ameTransactionType);
1782:
1783: if g_fnd_debug = 'Y' then
1784: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1785: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api3.getAttributeValue()...');
1786: END IF;
1787: end if;
1788: ame_api3.getAttributeValue(applicationIdIn => applicationId,
1789: transactionTypeIn => ameTransactionType,
1794: attributeValue2Out => attributeValue2,
1795: attributeValue3Out => attributeValue3);
1796:
1797: if g_fnd_debug = 'Y' then
1798: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1799: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api3.getAttributeValue()...');
1800: END IF;
1801: end if;
1802:
1795: attributeValue3Out => attributeValue3);
1796:
1797: if g_fnd_debug = 'Y' then
1798: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1799: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api3.getAttributeValue()...');
1800: END IF;
1801: end if;
1802:
1803: IF attributeValue1 = 'true' THEN
1806: xResult := 'N';
1807: END IF;
1808:
1809: if g_fnd_debug = 'Y' then
1810: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1811: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving can_delete_oam_approvers...');
1812: END IF;
1813: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1814: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- xResult :' || xResult);
1807: END IF;
1808:
1809: if g_fnd_debug = 'Y' then
1810: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1811: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving can_delete_oam_approvers...');
1812: END IF;
1813: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1814: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- xResult :' || xResult);
1815: END IF;
1809: if g_fnd_debug = 'Y' then
1810: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1811: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving can_delete_oam_approvers...');
1812: END IF;
1813: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1814: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- xResult :' || xResult);
1815: END IF;
1816: end if;
1817:
1810: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1811: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving can_delete_oam_approvers...');
1812: END IF;
1813: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1814: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- xResult :' || xResult);
1815: END IF;
1816: end if;
1817:
1818: EXCEPTION
1817:
1818: EXCEPTION
1819: WHEN OTHERS THEN
1820: if g_fnd_debug = 'Y' then
1821: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1822: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1823: l_api_name || '.others_exception', sqlerrm);
1824: END IF;
1825: end if;
1818: EXCEPTION
1819: WHEN OTHERS THEN
1820: if g_fnd_debug = 'Y' then
1821: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1822: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1823: l_api_name || '.others_exception', sqlerrm);
1824: END IF;
1825: end if;
1826: --raise;
1842:
1843: begin
1844:
1845: if g_fnd_debug = 'Y' then
1846: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1847: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'pReqHeaderId: ' || pReqHeaderId);
1848: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'current org id: ' || PO_MOAC_UTILS_PVT.get_current_org_id);
1849: END IF;
1850: end if;
1843: begin
1844:
1845: if g_fnd_debug = 'Y' then
1846: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1847: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'pReqHeaderId: ' || pReqHeaderId);
1848: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'current org id: ' || PO_MOAC_UTILS_PVT.get_current_org_id);
1849: END IF;
1850: end if;
1851:
1844:
1845: if g_fnd_debug = 'Y' then
1846: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1847: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'pReqHeaderId: ' || pReqHeaderId);
1848: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'current org id: ' || PO_MOAC_UTILS_PVT.get_current_org_id);
1849: END IF;
1850: end if;
1851:
1852: -- check if is rco, alternative is to check authorization status
1862: pcr.request_status NOT IN ('ACCEPTED', 'REJECTED');
1863: exception
1864: when others then
1865: if g_fnd_debug = 'Y' then
1866: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1867: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Not RCO');
1868: END IF;
1869: end if;
1870: end;
1863: exception
1864: when others then
1865: if g_fnd_debug = 'Y' then
1866: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1867: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Not RCO');
1868: END IF;
1869: end if;
1870: end;
1871:
1888:
1889: exception
1890: when others then
1891: if g_fnd_debug = 'Y' then
1892: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1893: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Req not found');
1894: END IF;
1895: end if;
1896: lookupCode := 'PURCHASE'; -- assume not internal
1889: exception
1890: when others then
1891: if g_fnd_debug = 'Y' then
1892: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1893: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Req not found');
1894: END IF;
1895: end if;
1896: lookupCode := 'PURCHASE'; -- assume not internal
1897: end;
1901: -- Use the private function to fetch the ame txn type given the doc type and subtype
1902: pAmeTransactionType := getAmeTxnType(docType, docSubType, orgId);
1903:
1904: if g_fnd_debug = 'Y' then
1905: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1906: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'pAmeTransactionType: ' || pAmeTransactionType);
1907: END IF;
1908: end if;
1909:
1902: pAmeTransactionType := getAmeTxnType(docType, docSubType, orgId);
1903:
1904: if g_fnd_debug = 'Y' then
1905: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1906: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'pAmeTransactionType: ' || pAmeTransactionType);
1907: END IF;
1908: end if;
1909:
1910: end;
1993:
1994: begin
1995:
1996: if g_fnd_debug = 'Y' then
1997: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1998: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering serializeApproversTable...');
1999: END IF;
2000: end if;
2001:
1994: begin
1995:
1996: if g_fnd_debug = 'Y' then
1997: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1998: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering serializeApproversTable...');
1999: END IF;
2000: end if;
2001:
2002: select PREPARER_ID
2004: from po_requisition_headers_all
2005: where reqHeaderId = requisition_header_id;
2006:
2007: if g_fnd_debug = 'Y' then
2008: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2009: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_preparer_id: ' || l_preparer_id);
2010: END IF;
2011: end if;
2012:
2005: where reqHeaderId = requisition_header_id;
2006:
2007: if g_fnd_debug = 'Y' then
2008: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2009: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_preparer_id: ' || l_preparer_id);
2010: END IF;
2011: end if;
2012:
2013: approvalListStr := NULL;
2016: approverCount := 0;
2017: hasApprovalAction := 'N';
2018:
2019: if g_fnd_debug = 'Y' then
2020: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2021: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' upperLimit :' || upperLimit );
2022: END IF;
2023: end if;
2024:
2017: hasApprovalAction := 'N';
2018:
2019: if g_fnd_debug = 'Y' then
2020: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2021: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' upperLimit :' || upperLimit );
2022: END IF;
2023: end if;
2024:
2025: -- Iterate through the list of approvers.
2025: -- Iterate through the list of approvers.
2026: for i in 1 .. upperLimit loop
2027:
2028: if g_fnd_debug = 'Y' then
2029: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2030: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Processing the approver :' || i );
2031: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Orig_System :' || approversTableIn(i).orig_system);
2032: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Orig System Id :' || approversTableIn(i).orig_system_id);
2033: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approval Status :' || approversTableIn(i).approval_status);
2026: for i in 1 .. upperLimit loop
2027:
2028: if g_fnd_debug = 'Y' then
2029: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2030: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Processing the approver :' || i );
2031: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Orig_System :' || approversTableIn(i).orig_system);
2032: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Orig System Id :' || approversTableIn(i).orig_system_id);
2033: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approval Status :' || approversTableIn(i).approval_status);
2034: END IF;
2027:
2028: if g_fnd_debug = 'Y' then
2029: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2030: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Processing the approver :' || i );
2031: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Orig_System :' || approversTableIn(i).orig_system);
2032: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Orig System Id :' || approversTableIn(i).orig_system_id);
2033: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approval Status :' || approversTableIn(i).approval_status);
2034: END IF;
2035: end if;
2028: if g_fnd_debug = 'Y' then
2029: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2030: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Processing the approver :' || i );
2031: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Orig_System :' || approversTableIn(i).orig_system);
2032: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Orig System Id :' || approversTableIn(i).orig_system_id);
2033: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approval Status :' || approversTableIn(i).approval_status);
2034: END IF;
2035: end if;
2036:
2029: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2030: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Processing the approver :' || i );
2031: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Orig_System :' || approversTableIn(i).orig_system);
2032: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Orig System Id :' || approversTableIn(i).orig_system_id);
2033: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approval Status :' || approversTableIn(i).approval_status);
2034: END IF;
2035: end if;
2036:
2037: -- assume valid approver
2043: if (approversTableIn(i).orig_system = ame_util.perOrigSystem) then
2044: if (approversTableIn(i).orig_system_id = l_preparer_id) THEN
2045: l_valid_approver := 'N';
2046: if g_fnd_debug = 'Y' then
2047: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2048: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' ApproverID matches l_preparer_id... skipping!');
2049: END IF;
2050: end if;
2051: end if;
2044: if (approversTableIn(i).orig_system_id = l_preparer_id) THEN
2045: l_valid_approver := 'N';
2046: if g_fnd_debug = 'Y' then
2047: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2048: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' ApproverID matches l_preparer_id... skipping!');
2049: END IF;
2050: end if;
2051: end if;
2052:
2067:
2068: if (approversTableIn(i).orig_system_id = l_preparer_pos_id) then
2069: l_valid_approver := 'N';
2070: if g_fnd_debug = 'Y' then
2071: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2072: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approvers Position matches preparers... skipping!');
2073: END IF;
2074: end if;
2075: end if;
2068: if (approversTableIn(i).orig_system_id = l_preparer_pos_id) then
2069: l_valid_approver := 'N';
2070: if g_fnd_debug = 'Y' then
2071: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2072: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approvers Position matches preparers... skipping!');
2073: END IF;
2074: end if;
2075: end if;
2076:
2091: approversTableIn(i).approval_status<>ame_util.approvedStatus) then
2092:
2093: hasApprovalAction := 'Y';
2094: if g_fnd_debug = 'Y' then
2095: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2096: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approval_status is ' || approversTableIn(i).approval_status);
2097: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' ...so we do not consider this approver.');
2098: END IF;
2099: end if;
2092:
2093: hasApprovalAction := 'Y';
2094: if g_fnd_debug = 'Y' then
2095: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2096: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approval_status is ' || approversTableIn(i).approval_status);
2097: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' ...so we do not consider this approver.');
2098: END IF;
2099: end if;
2100:
2093: hasApprovalAction := 'Y';
2094: if g_fnd_debug = 'Y' then
2095: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2096: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approval_status is ' || approversTableIn(i).approval_status);
2097: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' ...so we do not consider this approver.');
2098: END IF;
2099: end if;
2100:
2101: elsif (l_valid_approver = 'Y') then
2114: raise NO_DATA_FOUND;
2115: end if;
2116:
2117: if g_fnd_debug = 'Y' then
2118: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2119: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_orig_system :' || l_orig_system );
2120: END IF;
2121: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2122: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_orig_system_id :' || l_orig_system_id );
2115: end if;
2116:
2117: if g_fnd_debug = 'Y' then
2118: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2119: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_orig_system :' || l_orig_system );
2120: END IF;
2121: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2122: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_orig_system_id :' || l_orig_system_id );
2123: END IF;
2117: if g_fnd_debug = 'Y' then
2118: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2119: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_orig_system :' || l_orig_system );
2120: END IF;
2121: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2122: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_orig_system_id :' || l_orig_system_id );
2123: END IF;
2124: end if;
2125:
2118: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2119: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_orig_system :' || l_orig_system );
2120: END IF;
2121: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2122: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_orig_system_id :' || l_orig_system_id );
2123: END IF;
2124: end if;
2125:
2126: begin
2164:
2165: end if;
2166:
2167: if g_fnd_debug = 'Y' then
2168: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2169: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_full_name :' || l_full_name );
2170: END IF;
2171: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2172: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_person_id :' || l_person_id );
2165: end if;
2166:
2167: if g_fnd_debug = 'Y' then
2168: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2169: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_full_name :' || l_full_name );
2170: END IF;
2171: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2172: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_person_id :' || l_person_id );
2173: END IF;
2167: if g_fnd_debug = 'Y' then
2168: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2169: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_full_name :' || l_full_name );
2170: END IF;
2171: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2172: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_person_id :' || l_person_id );
2173: END IF;
2174: end if;
2175:
2168: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2169: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_full_name :' || l_full_name );
2170: END IF;
2171: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2172: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_person_id :' || l_person_id );
2173: END IF;
2174: end if;
2175:
2176: -- Make sure position/job name is populated.
2194: SELECT name INTO l_job_or_position FROM per_jobs WHERE job_id = l_job_id;
2195: end if;
2196:
2197: if g_fnd_debug = 'Y' then
2198: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2199: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_job_or_position :' || l_job_or_position );
2200: END IF;
2201: end if;
2202:
2195: end if;
2196:
2197: if g_fnd_debug = 'Y' then
2198: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2199: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_job_or_position :' || l_job_or_position );
2200: END IF;
2201: end if;
2202:
2203: end if;
2231: end if; -- if approval_status is not null.
2232: end loop;
2233:
2234: if g_fnd_debug = 'Y' then
2235: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2236: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving serializeApproversTable...');
2237: END IF;
2238: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2239: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- approvalListStr :' || approvalListStr );
2232: end loop;
2233:
2234: if g_fnd_debug = 'Y' then
2235: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2236: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving serializeApproversTable...');
2237: END IF;
2238: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2239: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- approvalListStr :' || approvalListStr );
2240: END IF;
2234: if g_fnd_debug = 'Y' then
2235: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2236: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving serializeApproversTable...');
2237: END IF;
2238: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2239: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- approvalListStr :' || approvalListStr );
2240: END IF;
2241: end if;
2242: return approvalListStr;
2235: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2236: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving serializeApproversTable...');
2237: END IF;
2238: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2239: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- approvalListStr :' || approvalListStr );
2240: END IF;
2241: end if;
2242: return approvalListStr;
2243:
2243:
2244: exception
2245: when others then
2246: if g_fnd_debug = 'Y' then
2247: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2248: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2249: l_api_name || '.others_exception', sqlerrm);
2250: END IF;
2251: end if;
2244: exception
2245: when others then
2246: if g_fnd_debug = 'Y' then
2247: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2248: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2249: l_api_name || '.others_exception', sqlerrm);
2250: END IF;
2251: end if;
2252: raise;
2266: begin
2267:
2268:
2269: if g_fnd_debug = 'Y' then
2270: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2271: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering getAllApprovers...');
2272: END IF;
2273: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2274: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId :' || pReqHeaderId);
2267:
2268:
2269: if g_fnd_debug = 'Y' then
2270: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2271: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering getAllApprovers...');
2272: END IF;
2273: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2274: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId :' || pReqHeaderId);
2275: END IF;
2269: if g_fnd_debug = 'Y' then
2270: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2271: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering getAllApprovers...');
2272: END IF;
2273: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2274: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId :' || pReqHeaderId);
2275: END IF;
2276: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2277: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()...');
2270: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2271: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering getAllApprovers...');
2272: END IF;
2273: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2274: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId :' || pReqHeaderId);
2275: END IF;
2276: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2277: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()...');
2278: END IF;
2272: END IF;
2273: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2274: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId :' || pReqHeaderId);
2275: END IF;
2276: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2277: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()...');
2278: END IF;
2279: end if;
2280:
2273: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2274: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param -- pReqHeaderId :' || pReqHeaderId);
2275: END IF;
2276: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2277: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Invoking ame_api2.getAllApprovers7()...');
2278: END IF;
2279: end if;
2280:
2281: ame_api2.getAllApprovers7( applicationIdIn => applicationId,
2285: approversOut => approverList
2286: );
2287:
2288: if g_fnd_debug = 'Y' then
2289: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2290: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()...');
2291: END IF;
2292: end if;
2293:
2286: );
2287:
2288: if g_fnd_debug = 'Y' then
2289: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2290: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Done with ame_api2.getAllApprovers7()...');
2291: END IF;
2292: end if;
2293:
2294: if(approverList.count > 0) then
2298: pApprovalListCount:=0;
2299: end if;
2300:
2301: if g_fnd_debug = 'Y' then
2302: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2303: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving getAllApprovers...');
2304: END IF;
2305: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2306: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- approvalListStr :' || approvalListStr );
2299: end if;
2300:
2301: if g_fnd_debug = 'Y' then
2302: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2303: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving getAllApprovers...');
2304: END IF;
2305: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2306: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- approvalListStr :' || approvalListStr );
2307: END IF;
2301: if g_fnd_debug = 'Y' then
2302: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2303: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving getAllApprovers...');
2304: END IF;
2305: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2306: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- approvalListStr :' || approvalListStr );
2307: END IF;
2308: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2309: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount );
2302: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2303: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving getAllApprovers...');
2304: END IF;
2305: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2306: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- approvalListStr :' || approvalListStr );
2307: END IF;
2308: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2309: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount );
2310: END IF;
2304: END IF;
2305: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2306: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- approvalListStr :' || approvalListStr );
2307: END IF;
2308: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2309: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount );
2310: END IF;
2311: end if;
2312:
2305: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2306: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- approvalListStr :' || approvalListStr );
2307: END IF;
2308: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2309: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount );
2310: END IF;
2311: end if;
2312:
2313: exception
2312:
2313: exception
2314: when others then
2315: if g_fnd_debug = 'Y' then
2316: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2317: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2318: l_api_name || '.others_exception', sqlerrm);
2319: END IF;
2320: end if;
2313: exception
2314: when others then
2315: if g_fnd_debug = 'Y' then
2316: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2317: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2318: l_api_name || '.others_exception', sqlerrm);
2319: END IF;
2320: end if;
2321: raise;
2355:
2356: exception
2357: when others then
2358: if g_fnd_debug = 'Y' then
2359: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2360: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2361: l_api_name || '.others_exception', sqlerrm);
2362: END IF;
2363: end if;
2356: exception
2357: when others then
2358: if g_fnd_debug = 'Y' then
2359: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2360: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2361: l_api_name || '.others_exception', sqlerrm);
2362: END IF;
2363: end if;
2364: raise;
2398:
2399: begin
2400:
2401: if g_fnd_debug = 'Y' then
2402: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2403: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering retrieve_approval_info...');
2404: END IF;
2405: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2406: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_req_header_id :' || p_req_header_id );
2399: begin
2400:
2401: if g_fnd_debug = 'Y' then
2402: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2403: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering retrieve_approval_info...');
2404: END IF;
2405: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2406: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_req_header_id :' || p_req_header_id );
2407: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_is_approval_history_flow :' || p_is_approval_history_flow );
2401: if g_fnd_debug = 'Y' then
2402: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2403: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering retrieve_approval_info...');
2404: END IF;
2405: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2406: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_req_header_id :' || p_req_header_id );
2407: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_is_approval_history_flow :' || p_is_approval_history_flow );
2408:
2409: END IF;
2402: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2403: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering retrieve_approval_info...');
2404: END IF;
2405: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2406: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_req_header_id :' || p_req_header_id );
2407: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_is_approval_history_flow :' || p_is_approval_history_flow );
2408:
2409: END IF;
2410: end if;
2403: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering retrieve_approval_info...');
2404: END IF;
2405: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2406: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_req_header_id :' || p_req_header_id );
2407: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_is_approval_history_flow :' || p_is_approval_history_flow );
2408:
2409: END IF;
2410: end if;
2411:
2420: from po_requisition_headers_all
2421: where requisition_header_id = p_req_header_id;
2422:
2423: if g_fnd_debug = 'Y' then
2424: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2425: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_approval_status :' || x_approval_status );
2426: END IF;
2427: end if;
2428:
2421: where requisition_header_id = p_req_header_id;
2422:
2423: if g_fnd_debug = 'Y' then
2424: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2425: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_approval_status :' || x_approval_status );
2426: END IF;
2427: end if;
2428:
2429: -- Check whether it is ame approval or not.
2484: end if;
2485: end if;
2486:
2487: if g_fnd_debug = 'Y' then
2488: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2489: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_is_ame_approval :' || x_is_ame_approval );
2490: END IF;
2491: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2492: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_is_rco_approval :' || x_is_rco_approval );
2485: end if;
2486:
2487: if g_fnd_debug = 'Y' then
2488: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2489: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_is_ame_approval :' || x_is_ame_approval );
2490: END IF;
2491: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2492: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_is_rco_approval :' || x_is_rco_approval );
2493: END IF;
2487: if g_fnd_debug = 'Y' then
2488: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2489: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_is_ame_approval :' || x_is_ame_approval );
2490: END IF;
2491: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2492: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_is_rco_approval :' || x_is_rco_approval );
2493: END IF;
2494: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2495: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_approval_status :' || x_approval_status );
2488: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2489: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_is_ame_approval :' || x_is_ame_approval );
2490: END IF;
2491: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2492: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_is_rco_approval :' || x_is_rco_approval );
2493: END IF;
2494: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2495: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_approval_status :' || x_approval_status );
2496: END IF;
2490: END IF;
2491: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2492: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_is_rco_approval :' || x_is_rco_approval );
2493: END IF;
2494: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2495: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_approval_status :' || x_approval_status );
2496: END IF;
2497: end if;
2498:
2491: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2492: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_is_rco_approval :' || x_is_rco_approval );
2493: END IF;
2494: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2495: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_approval_status :' || x_approval_status );
2496: END IF;
2497: end if;
2498:
2499: exception
2498:
2499: exception
2500: when others then
2501: if g_fnd_debug = 'Y' then
2502: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2503: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2504: l_api_name || '.others_exception', sqlerrm);
2505: END IF;
2506: end if;
2499: exception
2500: when others then
2501: if g_fnd_debug = 'Y' then
2502: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2503: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2504: l_api_name || '.others_exception', sqlerrm);
2505: END IF;
2506: end if;
2507: raise;
2531:
2532: begin
2533:
2534: if g_fnd_debug = 'Y' then
2535: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2536: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering retrieve_approver_info...');
2537: END IF;
2538: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2539: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_approver_id :' || p_approver_id );
2532: begin
2533:
2534: if g_fnd_debug = 'Y' then
2535: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2536: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering retrieve_approver_info...');
2537: END IF;
2538: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2539: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_approver_id :' || p_approver_id );
2540: END IF;
2534: if g_fnd_debug = 'Y' then
2535: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2536: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering retrieve_approver_info...');
2537: END IF;
2538: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2539: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_approver_id :' || p_approver_id );
2540: END IF;
2541: end if;
2542:
2535: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2536: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering retrieve_approver_info...');
2537: END IF;
2538: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2539: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_approver_id :' || p_approver_id );
2540: END IF;
2541: end if;
2542:
2543: x_title := null;
2549: AND TRUNC ( effective_start_date ) <= TRUNC(SYSDATE) AND NVL(effective_end_date, TRUNC( SYSDATE)) >= TRUNC(SYSDATE)
2550: AND rownum = 1;
2551:
2552: if g_fnd_debug = 'Y' then
2553: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2554: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_email :' || x_email );
2555: END IF;
2556: end if;
2557:
2550: AND rownum = 1;
2551:
2552: if g_fnd_debug = 'Y' then
2553: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2554: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_email :' || x_email );
2555: END IF;
2556: end if;
2557:
2558: -- retrieve the position name. if the position name is null check for the job name.
2572: SELECT name INTO x_title FROM per_jobs WHERE job_id = l_job_id;
2573: end if;
2574:
2575: if g_fnd_debug = 'Y' then
2576: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2577: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_title :' || x_title );
2578: END IF;
2579: end if;
2580:
2573: end if;
2574:
2575: if g_fnd_debug = 'Y' then
2576: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2577: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_title :' || x_title );
2578: END IF;
2579: end if;
2580:
2581: exception
2580:
2581: exception
2582: when others then
2583: if g_fnd_debug = 'Y' then
2584: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2585: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2586: l_api_name || '.others_exception', sqlerrm);
2587: END IF;
2588: end if;
2581: exception
2582: when others then
2583: if g_fnd_debug = 'Y' then
2584: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2585: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2586: l_api_name || '.others_exception', sqlerrm);
2587: END IF;
2588: end if;
2589: end retrieve_approver_info;
2610: return '';
2611: end if;
2612:
2613: if g_fnd_debug = 'Y' then
2614: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2615: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_approval_group_name...');
2616: END IF;
2617: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2618: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_group_id :' || p_group_id );
2611: end if;
2612:
2613: if g_fnd_debug = 'Y' then
2614: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2615: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_approval_group_name...');
2616: END IF;
2617: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2618: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_group_id :' || p_group_id );
2619: END IF;
2613: if g_fnd_debug = 'Y' then
2614: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2615: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_approval_group_name...');
2616: END IF;
2617: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2618: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_group_id :' || p_group_id );
2619: END IF;
2620: end if;
2621:
2614: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2615: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_approval_group_name...');
2616: END IF;
2617: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2618: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - p_group_id :' || p_group_id );
2619: END IF;
2620: end if;
2621:
2622: -- If the group id is less than 3, then it is not approval group.
2630: groupNameOut => l_group_name
2631: );
2632:
2633: if g_fnd_debug = 'Y' then
2634: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2635: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_group_name :' || l_group_name );
2636: END IF;
2637: end if;
2638:
2631: );
2632:
2633: if g_fnd_debug = 'Y' then
2634: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2635: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_group_name :' || l_group_name );
2636: END IF;
2637: end if;
2638:
2639: return l_group_name;
2641: exception
2642: when others then
2643: l_group_name := 'Group:' || p_group_id;
2644: if g_fnd_debug = 'Y' then
2645: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2646: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2647: l_api_name || '.others_exception', sqlerrm);
2648: END IF;
2649: end if;
2642: when others then
2643: l_group_name := 'Group:' || p_group_id;
2644: if g_fnd_debug = 'Y' then
2645: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2646: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
2647: l_api_name || '.others_exception', sqlerrm);
2648: END IF;
2649: end if;
2650: return l_group_name;
2706:
2707: BEGIN
2708:
2709: if g_fnd_debug = 'Y' then
2710: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2711: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_ame_approval_list_history...');
2712: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
2713: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' current org Id: ' || PO_MOAC_UTILS_PVT.get_current_org_id);
2714: END IF;
2707: BEGIN
2708:
2709: if g_fnd_debug = 'Y' then
2710: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2711: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_ame_approval_list_history...');
2712: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
2713: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' current org Id: ' || PO_MOAC_UTILS_PVT.get_current_org_id);
2714: END IF;
2715: end if;
2708:
2709: if g_fnd_debug = 'Y' then
2710: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2711: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_ame_approval_list_history...');
2712: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
2713: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' current org Id: ' || PO_MOAC_UTILS_PVT.get_current_org_id);
2714: END IF;
2715: end if;
2716:
2709: if g_fnd_debug = 'Y' then
2710: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2711: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_ame_approval_list_history...');
2712: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Input param - pReqHeaderId :' || pReqHeaderId );
2713: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' current org Id: ' || PO_MOAC_UTILS_PVT.get_current_org_id);
2714: END IF;
2715: end if;
2716:
2717: select PREPARER_ID,
2731:
2732: --PO_MOAC_UTILS_PVT.set_org_context(l_org_id);
2733:
2734: if g_fnd_debug = 'Y' then
2735: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2736: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' PreparerID for this req :' || l_preparer_id );
2737: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_position_id: ' || l_first_position_id);
2738: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_approver_id: ' || l_first_approver_id);
2739: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_authorizationStatus: ' || l_authorizationStatus);
2732: --PO_MOAC_UTILS_PVT.set_org_context(l_org_id);
2733:
2734: if g_fnd_debug = 'Y' then
2735: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2736: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' PreparerID for this req :' || l_preparer_id );
2737: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_position_id: ' || l_first_position_id);
2738: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_approver_id: ' || l_first_approver_id);
2739: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_authorizationStatus: ' || l_authorizationStatus);
2740: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_change_pending_flag: ' || l_change_pending_flag);
2733:
2734: if g_fnd_debug = 'Y' then
2735: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2736: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' PreparerID for this req :' || l_preparer_id );
2737: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_position_id: ' || l_first_position_id);
2738: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_approver_id: ' || l_first_approver_id);
2739: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_authorizationStatus: ' || l_authorizationStatus);
2740: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_change_pending_flag: ' || l_change_pending_flag);
2741: END IF;
2734: if g_fnd_debug = 'Y' then
2735: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2736: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' PreparerID for this req :' || l_preparer_id );
2737: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_position_id: ' || l_first_position_id);
2738: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_approver_id: ' || l_first_approver_id);
2739: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_authorizationStatus: ' || l_authorizationStatus);
2740: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_change_pending_flag: ' || l_change_pending_flag);
2741: END IF;
2742: end if;
2735: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2736: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' PreparerID for this req :' || l_preparer_id );
2737: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_position_id: ' || l_first_position_id);
2738: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_approver_id: ' || l_first_approver_id);
2739: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_authorizationStatus: ' || l_authorizationStatus);
2740: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_change_pending_flag: ' || l_change_pending_flag);
2741: END IF;
2742: end if;
2743:
2736: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' PreparerID for this req :' || l_preparer_id );
2737: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_position_id: ' || l_first_position_id);
2738: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_approver_id: ' || l_first_approver_id);
2739: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_authorizationStatus: ' || l_authorizationStatus);
2740: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_change_pending_flag: ' || l_change_pending_flag);
2741: END IF;
2742: end if;
2743:
2744: pQuoteChar := quoteChar;
2774:
2775: if (l_approval_reqd_flag = 'N') then
2776:
2777: if g_fnd_debug = 'Y' then
2778: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2779: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' No Approval Required! RETURNING....');
2780: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_ame_approval_list...');
2781: END IF;
2782: end if;
2775: if (l_approval_reqd_flag = 'N') then
2776:
2777: if g_fnd_debug = 'Y' then
2778: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2779: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' No Approval Required! RETURNING....');
2780: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_ame_approval_list...');
2781: END IF;
2782: end if;
2783:
2776:
2777: if g_fnd_debug = 'Y' then
2778: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2779: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' No Approval Required! RETURNING....');
2780: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_ame_approval_list...');
2781: END IF;
2782: end if;
2783:
2784: pApprovalListCount := 0;
2808:
2809: ameTransactionType := getAmeTxnType(p_doc_type, p_doc_subtype, l_org_id);
2810:
2811: if g_fnd_debug = 'Y' then
2812: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2813: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'ameTransactionType: ' || ameTransactionType);
2814: END IF;
2815: end if;
2816:
2809: ameTransactionType := getAmeTxnType(p_doc_type, p_doc_subtype, l_org_id);
2810:
2811: if g_fnd_debug = 'Y' then
2812: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2813: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'ameTransactionType: ' || ameTransactionType);
2814: END IF;
2815: end if;
2816:
2817: -- if called from RCO page or RCO notification, we use change_pending_flag to determine if txn is in process
2822: (pCallingPage = 'fromChangeHistoryPage' AND l_change_pending_flag = 'Y') ) then
2823:
2824: -- if req is in process, then use ame_api2 which will rebuild the approval list
2825: if g_fnd_debug = 'Y' then
2826: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2827: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Req is IN PROCESS: Using ame_api2 to REBUILD');
2828: END IF;
2829: end if;
2830:
2823:
2824: -- if req is in process, then use ame_api2 which will rebuild the approval list
2825: if g_fnd_debug = 'Y' then
2826: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2827: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Req is IN PROCESS: Using ame_api2 to REBUILD');
2828: END IF;
2829: end if;
2830:
2831: -- If we are going to use the flag approvalProcessCompleteYNOut,
2839: approversOut => approverList
2840: );
2841:
2842: if g_fnd_debug = 'Y' then
2843: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2844: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'approvalProcessCompleteYNOut = ' || l_process_out);
2845: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'getAllApprovers7 Done');
2846: END IF;
2847: end if;
2840: );
2841:
2842: if g_fnd_debug = 'Y' then
2843: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2844: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'approvalProcessCompleteYNOut = ' || l_process_out);
2845: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'getAllApprovers7 Done');
2846: END IF;
2847: end if;
2848:
2841:
2842: if g_fnd_debug = 'Y' then
2843: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2844: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'approvalProcessCompleteYNOut = ' || l_process_out);
2845: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'getAllApprovers7 Done');
2846: END IF;
2847: end if;
2848:
2849: else
2849: else
2850: -- otherwise, req is completed... so use ame_api6 to get the stored history w/o rebuilding
2851:
2852: if g_fnd_debug = 'Y' then
2853: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2854: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Req is COMPLETED: Using ame_api6 - NO REBUILD');
2855: END IF;
2856: end if;
2857:
2850: -- otherwise, req is completed... so use ame_api6 to get the stored history w/o rebuilding
2851:
2852: if g_fnd_debug = 'Y' then
2853: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2854: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Req is COMPLETED: Using ame_api6 - NO REBUILD');
2855: END IF;
2856: end if;
2857:
2858: ame_api6.getApprovers(applicationIdIn => applicationId,
2863: -- process is completed. Set flag.
2864: l_process_out := 'Y';
2865:
2866: if g_fnd_debug = 'Y' then
2867: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2868: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'getApprovers Done');
2869: END IF;
2870: end if;
2871:
2864: l_process_out := 'Y';
2865:
2866: if g_fnd_debug = 'Y' then
2867: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2868: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'getApprovers Done');
2869: END IF;
2870: end if;
2871:
2872: END IF;
2875: for i in 1 .. approverList.count loop
2876:
2877: l_valid_approver := 'Y';
2878: if g_fnd_debug = 'Y' then
2879: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2880: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Processing the approver :' || i );
2881: END IF;
2882: end if;
2883:
2876:
2877: l_valid_approver := 'Y';
2878: if g_fnd_debug = 'Y' then
2879: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2880: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Processing the approver :' || i );
2881: END IF;
2882: end if;
2883:
2884: if (l_preparer_id=approverList(i).orig_system_id) THEN
2883:
2884: if (l_preparer_id=approverList(i).orig_system_id) THEN
2885: l_valid_approver := 'N';
2886: if g_fnd_debug = 'Y' then
2887: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2888: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' ApproverID matches PreparerID... invalid approver!');
2889: END IF;
2890: end if;
2891: end if;
2884: if (l_preparer_id=approverList(i).orig_system_id) THEN
2885: l_valid_approver := 'N';
2886: if g_fnd_debug = 'Y' then
2887: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2888: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' ApproverID matches PreparerID... invalid approver!');
2889: END IF;
2890: end if;
2891: end if;
2892:
2923: if ( l_orig_system = ame_util.perOrigSystem) then
2924:
2925: -- Employee Supervisor Record.
2926: if g_fnd_debug = 'Y' then
2927: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2928: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Emp - Sup Record ...');
2929: END IF;
2930: end if;
2931: l_full_name := approverList(i).display_name;
2924:
2925: -- Employee Supervisor Record.
2926: if g_fnd_debug = 'Y' then
2927: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2928: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Emp - Sup Record ...');
2929: END IF;
2930: end if;
2931: l_full_name := approverList(i).display_name;
2932: l_person_id := l_orig_system_id;
2934: elsif ( l_orig_system = ame_util.posOrigSystem) then
2935:
2936: -- Position Hierarchy Record. The logic is mentioned in the comments section.
2937: if g_fnd_debug = 'Y' then
2938: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2939: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Position Hierarchy Record ...');
2940: END IF;
2941: end if;
2942:
2935:
2936: -- Position Hierarchy Record. The logic is mentioned in the comments section.
2937: if g_fnd_debug = 'Y' then
2938: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2939: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Position Hierarchy Record ...');
2940: END IF;
2941: end if;
2942:
2943: begin
2944:
2945: if (l_first_position_id is not NULL AND l_first_position_id=l_orig_system_id) then
2946:
2947: if g_fnd_debug = 'Y' then
2948: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2949: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver position matches l_first_position_id.');
2950: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Using stored l_first_approver_id as person_id.');
2951: END IF;
2952: end if;
2945: if (l_first_position_id is not NULL AND l_first_position_id=l_orig_system_id) then
2946:
2947: if g_fnd_debug = 'Y' then
2948: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2949: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver position matches l_first_position_id.');
2950: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Using stored l_first_approver_id as person_id.');
2951: END IF;
2952: end if;
2953:
2946:
2947: if g_fnd_debug = 'Y' then
2948: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2949: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver position matches l_first_position_id.');
2950: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Using stored l_first_approver_id as person_id.');
2951: END IF;
2952: end if;
2953:
2954: l_person_id := l_first_approver_id;
2983: elsif (l_orig_system = ame_util.fndUserOrigSystem) then
2984:
2985: -- FND User Record.
2986: if g_fnd_debug = 'Y' then
2987: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2988: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'FND User Record ...');
2989: END IF;
2990: end if;
2991: SELECT employee_id into l_person_id
2984:
2985: -- FND User Record.
2986: if g_fnd_debug = 'Y' then
2987: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2988: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'FND User Record ...');
2989: END IF;
2990: end if;
2991: SELECT employee_id into l_person_id
2992: FROM fnd_user
2997:
2998: end if;
2999:
3000: if g_fnd_debug = 'Y' then
3001: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3002: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_full_name :' || l_full_name );
3003: END IF;
3004: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3005: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_person_id :' || l_person_id );
2998: end if;
2999:
3000: if g_fnd_debug = 'Y' then
3001: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3002: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_full_name :' || l_full_name );
3003: END IF;
3004: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3005: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_person_id :' || l_person_id );
3006: END IF;
3000: if g_fnd_debug = 'Y' then
3001: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3002: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_full_name :' || l_full_name );
3003: END IF;
3004: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3005: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_person_id :' || l_person_id );
3006: END IF;
3007: end if;
3008:
3001: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3002: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_full_name :' || l_full_name );
3003: END IF;
3004: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3005: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_person_id :' || l_person_id );
3006: END IF;
3007: end if;
3008:
3009: -- Find position | job name
3034: SELECT name INTO l_job_or_position FROM per_jobs WHERE job_id = l_job_id;
3035: end if;
3036:
3037: if g_fnd_debug = 'Y' then
3038: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3039: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_job_or_position :' || l_job_or_position );
3040: END IF;
3041: end if;
3042:
3035: end if;
3036:
3037: if g_fnd_debug = 'Y' then
3038: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3039: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_job_or_position :' || l_job_or_position );
3040: END IF;
3041: end if;
3042:
3043: end if;
3072:
3073: pApprovalListStr := approvalListStr;
3074:
3075: if g_fnd_debug = 'Y' then
3076: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3077: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
3078: END IF;
3079: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3080: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
3073: pApprovalListStr := approvalListStr;
3074:
3075: if g_fnd_debug = 'Y' then
3076: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3077: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
3078: END IF;
3079: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3080: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
3081: END IF;
3075: if g_fnd_debug = 'Y' then
3076: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3077: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
3078: END IF;
3079: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3080: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
3081: END IF;
3082: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3083: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_ame_approval_list...');
3076: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3077: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListStr :' || pApprovalListStr);
3078: END IF;
3079: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3080: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
3081: END IF;
3082: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3083: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_ame_approval_list...');
3084: END IF;
3078: END IF;
3079: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3080: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
3081: END IF;
3082: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3083: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_ame_approval_list...');
3084: END IF;
3085: end if;
3086:
3079: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3080: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Output param -- pApprovalListCount :' || pApprovalListCount);
3081: END IF;
3082: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3083: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_ame_approval_list...');
3084: END IF;
3085: end if;
3086:
3087: exception
3088: when NO_DATA_FOUND then
3089: pApprovalListCount := 0;
3090: pApprovalListStr := 'NO_DATA_FOUND';
3091: if g_fnd_debug = 'Y' then
3092: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3093: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
3094: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
3095: END IF;
3096: end if;
3089: pApprovalListCount := 0;
3090: pApprovalListStr := 'NO_DATA_FOUND';
3091: if g_fnd_debug = 'Y' then
3092: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3093: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
3094: l_api_name || '.NO_DATA_FOUND', 'NO_DATA_FOUND');
3095: END IF;
3096: end if;
3097: when others then
3097: when others then
3098: pApprovalListCount := 0;
3099: pApprovalListStr := 'EXCEPTION';
3100: if g_fnd_debug = 'Y' then
3101: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3102: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
3103: l_api_name || '.others_exception', sqlerrm);
3104: END IF;
3105: end if;
3098: pApprovalListCount := 0;
3099: pApprovalListStr := 'EXCEPTION';
3100: if g_fnd_debug = 'Y' then
3101: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3102: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
3103: l_api_name || '.others_exception', sqlerrm);
3104: END IF;
3105: end if;
3106: END get_ame_approval_list_history;
3142: x_progress varchar2(100);
3143:
3144: BEGIN
3145: if g_fnd_debug = 'Y' then
3146: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3147: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_next_approvers_info...');
3148: END IF;
3149: end if;
3150:
3143:
3144: BEGIN
3145: if g_fnd_debug = 'Y' then
3146: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3147: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Entering get_next_approvers_info...');
3148: END IF;
3149: end if;
3150:
3151: x_progress := '001';
3203:
3204: x_progress := '007';
3205:
3206: if g_fnd_debug = 'Y' then
3207: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3208: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'x_approverId :' || x_approverId );
3209: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_approverName:' || x_approverName);
3210: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_next_approvers_info...');
3211: END IF;
3204: x_progress := '007';
3205:
3206: if g_fnd_debug = 'Y' then
3207: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3208: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'x_approverId :' || x_approverId );
3209: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_approverName:' || x_approverName);
3210: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_next_approvers_info...');
3211: END IF;
3212: end if;
3205:
3206: if g_fnd_debug = 'Y' then
3207: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3208: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'x_approverId :' || x_approverId );
3209: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_approverName:' || x_approverName);
3210: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_next_approvers_info...');
3211: END IF;
3212: end if;
3213:
3206: if g_fnd_debug = 'Y' then
3207: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3208: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'x_approverId :' || x_approverId );
3209: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_approverName:' || x_approverName);
3210: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'Leaving get_next_approvers_info...');
3211: END IF;
3212: end if;
3213:
3214: EXCEPTION
3215: when others then
3216: x_approverId := -999;
3217: x_approverName := null;
3218: if g_fnd_debug = 'Y' then
3219: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3220: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
3221: l_api_name || '.others_exception', sqlerrm);
3222: END IF;
3223: end if;
3216: x_approverId := -999;
3217: x_approverName := null;
3218: if g_fnd_debug = 'Y' then
3219: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3220: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
3221: l_api_name || '.others_exception', sqlerrm);
3222: END IF;
3223: end if;
3224: raise;
3242:
3243: BEGIN
3244:
3245: if p_logFlag = 'Y' then
3246: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3247: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'get_person_info(+)');
3248: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystem = ' || p_origSystem);
3249: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystemId = ' || p_origSystemId);
3250: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_displayName = ' || p_displayName);
3243: BEGIN
3244:
3245: if p_logFlag = 'Y' then
3246: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3247: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'get_person_info(+)');
3248: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystem = ' || p_origSystem);
3249: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystemId = ' || p_origSystemId);
3250: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_displayName = ' || p_displayName);
3251: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_reqHeaderId = ' || p_reqHeaderId);
3244:
3245: if p_logFlag = 'Y' then
3246: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3247: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'get_person_info(+)');
3248: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystem = ' || p_origSystem);
3249: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystemId = ' || p_origSystemId);
3250: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_displayName = ' || p_displayName);
3251: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_reqHeaderId = ' || p_reqHeaderId);
3252: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_logFlag = ' || p_logFlag);
3245: if p_logFlag = 'Y' then
3246: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3247: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'get_person_info(+)');
3248: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystem = ' || p_origSystem);
3249: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystemId = ' || p_origSystemId);
3250: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_displayName = ' || p_displayName);
3251: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_reqHeaderId = ' || p_reqHeaderId);
3252: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_logFlag = ' || p_logFlag);
3253: END IF;
3246: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3247: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'get_person_info(+)');
3248: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystem = ' || p_origSystem);
3249: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystemId = ' || p_origSystemId);
3250: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_displayName = ' || p_displayName);
3251: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_reqHeaderId = ' || p_reqHeaderId);
3252: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_logFlag = ' || p_logFlag);
3253: END IF;
3254: end if;
3247: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'get_person_info(+)');
3248: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystem = ' || p_origSystem);
3249: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystemId = ' || p_origSystemId);
3250: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_displayName = ' || p_displayName);
3251: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_reqHeaderId = ' || p_reqHeaderId);
3252: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_logFlag = ' || p_logFlag);
3253: END IF;
3254: end if;
3255:
3248: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystem = ' || p_origSystem);
3249: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_origSystemId = ' || p_origSystemId);
3250: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_displayName = ' || p_displayName);
3251: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_reqHeaderId = ' || p_reqHeaderId);
3252: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' p_logFlag = ' || p_logFlag);
3253: END IF;
3254: end if;
3255:
3256: if ( p_origSystem = ame_util.perOrigSystem) then
3256: if ( p_origSystem = ame_util.perOrigSystem) then
3257:
3258: -- Employee Supervisor Record.
3259: if p_logFlag = 'Y' then
3260: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3261: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Employee Supervisor Record ...');
3262: END IF;
3263: end if;
3264:
3257:
3258: -- Employee Supervisor Record.
3259: if p_logFlag = 'Y' then
3260: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3261: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Employee Supervisor Record ...');
3262: END IF;
3263: end if;
3264:
3265: x_fullName := p_displayName;
3268: elsif ( p_origSystem = ame_util.posOrigSystem) then
3269:
3270: -- Position Hierarchy Record.
3271: if p_logFlag = 'Y' then
3272: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3273: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Position Hierarchy Record ...');
3274: END IF;
3275: end if;
3276:
3269:
3270: -- Position Hierarchy Record.
3271: if p_logFlag = 'Y' then
3272: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3273: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Position Hierarchy Record ...');
3274: END IF;
3275: end if;
3276:
3277: select first_position_id, first_approver_id
3279: from po_requisition_headers_all
3280: where p_reqHeaderId = requisition_header_id;
3281:
3282: if p_logFlag = 'Y' then
3283: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3284: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_position_id: ' || l_first_position_id);
3285: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_approver_id: ' || l_first_approver_id);
3286: END IF;
3287: end if;
3280: where p_reqHeaderId = requisition_header_id;
3281:
3282: if p_logFlag = 'Y' then
3283: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3284: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_position_id: ' || l_first_position_id);
3285: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_approver_id: ' || l_first_approver_id);
3286: END IF;
3287: end if;
3288:
3281:
3282: if p_logFlag = 'Y' then
3283: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3284: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_position_id: ' || l_first_position_id);
3285: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' l_first_approver_id: ' || l_first_approver_id);
3286: END IF;
3287: end if;
3288:
3289: if (l_first_position_id is not NULL AND l_first_position_id = p_origSystemId) then
3289: if (l_first_position_id is not NULL AND l_first_position_id = p_origSystemId) then
3290: -- use stored approver_id since position_id matches stored id
3291:
3292: if p_logFlag = 'Y' then
3293: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3294: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver position matches l_first_position_id.');
3295: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Using stored l_first_approver_id as person_id.');
3296: END IF;
3297: end if;
3290: -- use stored approver_id since position_id matches stored id
3291:
3292: if p_logFlag = 'Y' then
3293: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3294: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver position matches l_first_position_id.');
3295: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Using stored l_first_approver_id as person_id.');
3296: END IF;
3297: end if;
3298:
3291:
3292: if p_logFlag = 'Y' then
3293: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3294: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Approver position matches l_first_position_id.');
3295: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' Using stored l_first_approver_id as person_id.');
3296: END IF;
3297: end if;
3298:
3299: x_personId := l_first_approver_id;
3330: elsif (p_origSystem = ame_util.fndUserOrigSystem) then
3331:
3332: -- FND User Record.
3333: if p_logFlag = 'Y' then
3334: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3335: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' FND User Record ...');
3336: END IF;
3337: end if;
3338:
3331:
3332: -- FND User Record.
3333: if p_logFlag = 'Y' then
3334: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3335: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' FND User Record ...');
3336: END IF;
3337: end if;
3338:
3339: SELECT employee_id
3346:
3347: end if;
3348:
3349: if p_logFlag = 'Y' then
3350: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3351: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_fullName :' || x_fullName );
3352: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_personId :' || x_personId );
3353: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'get_person_info(-)');
3354: END IF;
3347: end if;
3348:
3349: if p_logFlag = 'Y' then
3350: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3351: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_fullName :' || x_fullName );
3352: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_personId :' || x_personId );
3353: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'get_person_info(-)');
3354: END IF;
3355: end if;
3348:
3349: if p_logFlag = 'Y' then
3350: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3351: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_fullName :' || x_fullName );
3352: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_personId :' || x_personId );
3353: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'get_person_info(-)');
3354: END IF;
3355: end if;
3356:
3349: if p_logFlag = 'Y' then
3350: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3351: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_fullName :' || x_fullName );
3352: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, ' x_personId :' || x_personId );
3353: FND_LOG.string(FND_LOG.level_statement, g_module_prefix || l_api_name, 'get_person_info(-)');
3354: END IF;
3355: end if;
3356:
3357: end get_person_info;