DBA Data[Home] [Help]

APPS.DPP_APPROVAL_PVT dependencies on FND_API

Line 56: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

52: -- NOTES
53: ---------------------------------------------------------------------
54: PROCEDURE Update_User_Action(
55: p_api_version IN NUMBER
56: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
57: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
58:
59: ,x_return_status OUT NOCOPY VARCHAR2
60: ,x_msg_data OUT NOCOPY VARCHAR2

Line 57: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

53: ---------------------------------------------------------------------
54: PROCEDURE Update_User_Action(
55: p_api_version IN NUMBER
56: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
57: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
58:
59: ,x_return_status OUT NOCOPY VARCHAR2
60: ,x_msg_data OUT NOCOPY VARCHAR2
61: ,x_msg_count OUT NOCOPY NUMBER

Line 130: IF NOT FND_API.Compatible_API_Call (

126:
127: -- Standard begin of API savepoint Update_User_Action_PVT
128: SAVEPOINT Update_User_Action_PVT;
129: -- Standard call to check for call compatibility.
130: IF NOT FND_API.Compatible_API_Call (
131: l_api_version,
132: p_api_version,
133: l_api_name,
134: G_PKG_NAME)

Line 136: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

132: p_api_version,
133: l_api_name,
134: G_PKG_NAME)
135: THEN
136: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
137: END IF;
138: -- Debug Message
139:
140: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');

Line 143: IF FND_API.To_Boolean (p_init_msg_list) THEN

139:
140: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');
141:
142: --Initialize message list if p_init_msg_list is TRUE.
143: IF FND_API.To_Boolean (p_init_msg_list) THEN
144: FND_MSG_PUB.initialize;
145: END IF;
146: -- Initialize API return status to sucess
147: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 147: x_return_status := FND_API.G_RET_STS_SUCCESS;

143: IF FND_API.To_Boolean (p_init_msg_list) THEN
144: FND_MSG_PUB.initialize;
145: END IF;
146: -- Initialize API return status to sucess
147: x_return_status := FND_API.G_RET_STS_SUCCESS;
148:
149: -- Get Current Approver and update their access
150: OPEN csr_curr_approver(p_approval_rec.object_type, p_approval_rec.object_id,
151: p_approval_rec.action_performed_by);

Line 189: ,p_init_msg_list => FND_API.G_FALSE

185: l_approvers_tbl(1).approver_level := l_approver_level;
186: -- Add_Access - List Approvers sent from Get_Approvers api
187: Add_Access(
188: p_api_version => p_api_version
189: ,p_init_msg_list => FND_API.G_FALSE
190: ,p_commit => FND_API.G_FALSE
191: ,p_validation_level => p_validation_level
192: ,x_return_status => x_return_status
193: ,x_msg_data => x_msg_data

Line 190: ,p_commit => FND_API.G_FALSE

186: -- Add_Access - List Approvers sent from Get_Approvers api
187: Add_Access(
188: p_api_version => p_api_version
189: ,p_init_msg_list => FND_API.G_FALSE
190: ,p_commit => FND_API.G_FALSE
191: ,p_validation_level => p_validation_level
192: ,x_return_status => x_return_status
193: ,x_msg_data => x_msg_data
194: ,x_msg_count => x_msg_count

Line 198: IF x_return_status = FND_API.g_ret_sts_error THEN

194: ,x_msg_count => x_msg_count
195: ,p_approval_rec => p_approval_rec
196: ,p_approvers => l_approvers_tbl );
197:
198: IF x_return_status = FND_API.g_ret_sts_error THEN
199: RAISE FND_API.g_exc_error;
200: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
201: RAISE FND_API.g_exc_unexpected_error;
202: END IF;

Line 199: RAISE FND_API.g_exc_error;

195: ,p_approval_rec => p_approval_rec
196: ,p_approvers => l_approvers_tbl );
197:
198: IF x_return_status = FND_API.g_ret_sts_error THEN
199: RAISE FND_API.g_exc_error;
200: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
201: RAISE FND_API.g_exc_unexpected_error;
202: END IF;
203:

Line 200: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN

196: ,p_approvers => l_approvers_tbl );
197:
198: IF x_return_status = FND_API.g_ret_sts_error THEN
199: RAISE FND_API.g_exc_error;
200: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
201: RAISE FND_API.g_exc_unexpected_error;
202: END IF;
203:
204: -- Update approval access table to revoke access

Line 201: RAISE FND_API.g_exc_unexpected_error;

197:
198: IF x_return_status = FND_API.g_ret_sts_error THEN
199: RAISE FND_API.g_exc_error;
200: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
201: RAISE FND_API.g_exc_unexpected_error;
202: END IF;
203:
204: -- Update approval access table to revoke access
205: UPDATE DPP_APPROVAL_ACCESS

Line 279: ,p_init_msg_list => FND_API.G_FALSE

275:
276: -- Revoke_Access - Revoke acces to previous appprovers in the chain
277: Revoke_Access(
278: p_api_version => p_api_version
279: ,p_init_msg_list => FND_API.G_FALSE
280: ,p_validation_level => p_validation_level
281: ,x_return_status => x_return_status
282: ,x_msg_data => x_msg_data
283: ,x_msg_count => x_msg_count

Line 287: IF x_return_status = FND_API.g_ret_sts_error THEN

283: ,x_msg_count => x_msg_count
284: ,p_object_type => p_approval_rec.object_type
285: ,p_object_id => p_approval_rec.object_id);
286:
287: IF x_return_status = FND_API.g_ret_sts_error THEN
288: RAISE FND_API.g_exc_error;
289: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
290: RAISE FND_API.g_exc_unexpected_error;
291: END IF;

Line 288: RAISE FND_API.g_exc_error;

284: ,p_object_type => p_approval_rec.object_type
285: ,p_object_id => p_approval_rec.object_id);
286:
287: IF x_return_status = FND_API.g_ret_sts_error THEN
288: RAISE FND_API.g_exc_error;
289: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
290: RAISE FND_API.g_exc_unexpected_error;
291: END IF;
292:

Line 289: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN

285: ,p_object_id => p_approval_rec.object_id);
286:
287: IF x_return_status = FND_API.g_ret_sts_error THEN
288: RAISE FND_API.g_exc_error;
289: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
290: RAISE FND_API.g_exc_unexpected_error;
291: END IF;
292:
293: -- Debug Message

Line 290: RAISE FND_API.g_exc_unexpected_error;

286:
287: IF x_return_status = FND_API.g_ret_sts_error THEN
288: RAISE FND_API.g_exc_error;
289: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
290: RAISE FND_API.g_exc_unexpected_error;
291: END IF;
292:
293: -- Debug Message
294:

Line 299: p_encoded => FND_API.G_FALSE,

295: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': End');
296:
297: --Standard call to get message count and if count=1, get the message
298: FND_MSG_PUB.Count_And_Get (
299: p_encoded => FND_API.G_FALSE,
300: p_count => x_msg_count,
301: p_data => x_msg_data
302: );
303: EXCEPTION

Line 304: WHEN FND_API.G_EXC_ERROR THEN

300: p_count => x_msg_count,
301: p_data => x_msg_data
302: );
303: EXCEPTION
304: WHEN FND_API.G_EXC_ERROR THEN
305: ROLLBACK TO Update_User_Action_PVT;
306: x_return_status := FND_API.G_RET_STS_ERROR;
307: -- Standard call to get message count and if count=1, get the message
308: FND_MSG_PUB.Count_And_Get (

Line 306: x_return_status := FND_API.G_RET_STS_ERROR;

302: );
303: EXCEPTION
304: WHEN FND_API.G_EXC_ERROR THEN
305: ROLLBACK TO Update_User_Action_PVT;
306: x_return_status := FND_API.G_RET_STS_ERROR;
307: -- Standard call to get message count and if count=1, get the message
308: FND_MSG_PUB.Count_And_Get (
309: p_encoded => FND_API.G_FALSE,
310: p_count => x_msg_count,

Line 309: p_encoded => FND_API.G_FALSE,

305: ROLLBACK TO Update_User_Action_PVT;
306: x_return_status := FND_API.G_RET_STS_ERROR;
307: -- Standard call to get message count and if count=1, get the message
308: FND_MSG_PUB.Count_And_Get (
309: p_encoded => FND_API.G_FALSE,
310: p_count => x_msg_count,
311: p_data => x_msg_data
312: );
313: IF x_msg_count > 1 THEN

Line 318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

314: FOR I IN 1..x_msg_count LOOP
315: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
316: END LOOP;
317: END IF;
318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
319: ROLLBACK TO Update_User_Action_PVT;
320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
321: -- Standard call to get message count and if count=1, get the message
322: FND_MSG_PUB.Count_And_Get (

Line 320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

316: END LOOP;
317: END IF;
318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
319: ROLLBACK TO Update_User_Action_PVT;
320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
321: -- Standard call to get message count and if count=1, get the message
322: FND_MSG_PUB.Count_And_Get (
323: p_encoded => FND_API.G_FALSE,
324: p_count => x_msg_count,

Line 323: p_encoded => FND_API.G_FALSE,

319: ROLLBACK TO Update_User_Action_PVT;
320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
321: -- Standard call to get message count and if count=1, get the message
322: FND_MSG_PUB.Count_And_Get (
323: p_encoded => FND_API.G_FALSE,
324: p_count => x_msg_count,
325: p_data => x_msg_data
326: );
327: IF x_msg_count > 1 THEN

Line 334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

330: END LOOP;
331: END IF;
332: WHEN OTHERS THEN
333: ROLLBACK TO Update_User_Action_PVT;
334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
335: IF DPP_UNEXP_ERROR_ON
336: THEN
337: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
338: END IF;

Line 341: p_encoded => FND_API.G_FALSE,

337: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
338: END IF;
339: -- Standard call to get message count and if count=1, get the message
340: FND_MSG_PUB.Count_And_Get (
341: p_encoded => FND_API.G_FALSE,
342: p_count => x_msg_count,
343: p_data => x_msg_data
344: );
345: IF x_msg_count > 1 THEN

Line 362: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

358: -- NOTES
359: ---------------------------------------------------------------------
360: PROCEDURE Get_Approvers(
361: p_api_version IN NUMBER
362: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
363: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
364:
365: ,x_return_status OUT NOCOPY VARCHAR2
366: ,x_msg_data OUT NOCOPY VARCHAR2

Line 363: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

359: ---------------------------------------------------------------------
360: PROCEDURE Get_Approvers(
361: p_api_version IN NUMBER
362: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
363: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
364:
365: ,x_return_status OUT NOCOPY VARCHAR2
366: ,x_msg_data OUT NOCOPY VARCHAR2
367: ,x_msg_count OUT NOCOPY NUMBER

Line 399: IF NOT FND_API.Compatible_API_Call (

395:
396: -- Standard begin of API savepoint
397: SAVEPOINT Get_Approvers_PVT;
398: -- Standard call to check for call compatibility.
399: IF NOT FND_API.Compatible_API_Call (
400: l_api_version,
401: p_api_version,
402: l_api_name,
403: G_PKG_NAME)

Line 405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

401: p_api_version,
402: l_api_name,
403: G_PKG_NAME)
404: THEN
405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
406: END IF;
407: -- Debug Message
408:
409: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');

Line 412: IF FND_API.To_Boolean (p_init_msg_list) THEN

408:
409: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');
410:
411: --Initialize message list if p_init_msg_list is TRUE.
412: IF FND_API.To_Boolean (p_init_msg_list) THEN
413: FND_MSG_PUB.initialize;
414: END IF;
415: -- Initialize API return status to sucess
416: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 416: x_return_status := FND_API.G_RET_STS_SUCCESS;

412: IF FND_API.To_Boolean (p_init_msg_list) THEN
413: FND_MSG_PUB.initialize;
414: END IF;
415: -- Initialize API return status to sucess
416: x_return_status := FND_API.G_RET_STS_SUCCESS;
417:
418: OPEN csr_approver_level (l_object_type, l_object_id);
419: FETCH csr_approver_level INTO l_approver_level;
420: CLOSE csr_approver_level;

Line 533: p_encoded => FND_API.G_FALSE,

529: END IF;
530:
531: --Standard call to get message count and if count=1, get the message
532: FND_MSG_PUB.Count_And_Get (
533: p_encoded => FND_API.G_FALSE,
534: p_count => x_msg_count,
535: p_data => x_msg_data
536: );
537: EXCEPTION

Line 538: WHEN FND_API.G_EXC_ERROR THEN

534: p_count => x_msg_count,
535: p_data => x_msg_data
536: );
537: EXCEPTION
538: WHEN FND_API.G_EXC_ERROR THEN
539: ROLLBACK TO Get_Approvers_PVT;
540: x_return_status := FND_API.G_RET_STS_ERROR;
541: -- Standard call to get message count and if count=1, get the message
542: FND_MSG_PUB.Count_And_Get (

Line 540: x_return_status := FND_API.G_RET_STS_ERROR;

536: );
537: EXCEPTION
538: WHEN FND_API.G_EXC_ERROR THEN
539: ROLLBACK TO Get_Approvers_PVT;
540: x_return_status := FND_API.G_RET_STS_ERROR;
541: -- Standard call to get message count and if count=1, get the message
542: FND_MSG_PUB.Count_And_Get (
543: p_encoded => FND_API.G_FALSE,
544: p_count => x_msg_count,

Line 543: p_encoded => FND_API.G_FALSE,

539: ROLLBACK TO Get_Approvers_PVT;
540: x_return_status := FND_API.G_RET_STS_ERROR;
541: -- Standard call to get message count and if count=1, get the message
542: FND_MSG_PUB.Count_And_Get (
543: p_encoded => FND_API.G_FALSE,
544: p_count => x_msg_count,
545: p_data => x_msg_data
546: );
547: IF x_msg_count > 1 THEN

Line 552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

548: FOR I IN 1..x_msg_count LOOP
549: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
550: END LOOP;
551: END IF;
552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
553: ROLLBACK TO Get_Approvers_PVT;
554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
555: -- Standard call to get message count and if count=1, get the message
556: FND_MSG_PUB.Count_And_Get (

Line 554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

550: END LOOP;
551: END IF;
552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
553: ROLLBACK TO Get_Approvers_PVT;
554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
555: -- Standard call to get message count and if count=1, get the message
556: FND_MSG_PUB.Count_And_Get (
557: p_encoded => FND_API.G_FALSE,
558: p_count => x_msg_count,

Line 557: p_encoded => FND_API.G_FALSE,

553: ROLLBACK TO Get_Approvers_PVT;
554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
555: -- Standard call to get message count and if count=1, get the message
556: FND_MSG_PUB.Count_And_Get (
557: p_encoded => FND_API.G_FALSE,
558: p_count => x_msg_count,
559: p_data => x_msg_data
560: );
561: IF x_msg_count > 1 THEN

Line 568: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

564: END LOOP;
565: END IF;
566: WHEN OTHERS THEN
567: ROLLBACK TO Get_Approvers_PVT;
568: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
569: IF DPP_UNEXP_ERROR_ON
570: THEN
571: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
572: END IF;

Line 575: p_encoded => FND_API.G_FALSE,

571: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
572: END IF;
573: -- Standard call to get message count and if count=1, get the message
574: FND_MSG_PUB.Count_And_Get (
575: p_encoded => FND_API.G_FALSE,
576: p_count => x_msg_count,
577: p_data => x_msg_data
578: );
579: IF x_msg_count > 1 THEN

Line 596: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

592: -- NOTES
593: ---------------------------------------------------------------------
594: PROCEDURE Get_AllApprovers(
595: p_api_version IN NUMBER
596: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
597: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
598:
599: ,x_return_status OUT NOCOPY VARCHAR2
600: ,x_msg_data OUT NOCOPY VARCHAR2

Line 597: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

593: ---------------------------------------------------------------------
594: PROCEDURE Get_AllApprovers(
595: p_api_version IN NUMBER
596: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
597: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
598:
599: ,x_return_status OUT NOCOPY VARCHAR2
600: ,x_msg_data OUT NOCOPY VARCHAR2
601: ,x_msg_count OUT NOCOPY NUMBER

Line 624: IF NOT FND_API.Compatible_API_Call (

620: BEGIN
621: -- Standard begin of API savepoint
622: SAVEPOINT Get_AllApprovers_PVT;
623: -- Standard call to check for call compatibility.
624: IF NOT FND_API.Compatible_API_Call (
625: l_api_version,
626: p_api_version,
627: l_api_name,
628: G_PKG_NAME)

Line 630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

626: p_api_version,
627: l_api_name,
628: G_PKG_NAME)
629: THEN
630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
631: END IF;
632: -- Debug Message
633:
634: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');

Line 637: IF FND_API.To_Boolean (p_init_msg_list) THEN

633:
634: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');
635:
636: --Initialize message list if p_init_msg_list is TRUE.
637: IF FND_API.To_Boolean (p_init_msg_list) THEN
638: FND_MSG_PUB.initialize;
639: END IF;
640: --Initialize API return status to sucess
641: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 641: x_return_status := FND_API.G_RET_STS_SUCCESS;

637: IF FND_API.To_Boolean (p_init_msg_list) THEN
638: FND_MSG_PUB.initialize;
639: END IF;
640: --Initialize API return status to sucess
641: x_return_status := FND_API.G_RET_STS_SUCCESS;
642:
643: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'l_application_id:'|| l_application_id);
644: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'p_approval_rec.object_id:'|| p_approval_rec.object_id);
645: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'p_approval_rec.object_type:'|| p_approval_rec.object_type);

Line 679: RAISE FND_API.G_EXC_ERROR;

675: EXCEPTION
676: WHEN NO_DATA_FOUND THEN
677: FND_MESSAGE.set_name('DPP', 'DPP_AME_NO_APP');
678: FND_MSG_PUB.add;
679: RAISE FND_API.G_EXC_ERROR;
680: WHEN OTHERS THEN
681: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
682: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
683: fnd_message.set_token('ERRNO', sqlcode);

Line 686: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

682: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
683: fnd_message.set_token('ERRNO', sqlcode);
684: fnd_message.set_token('REASON', sqlerrm);
685: FND_MSG_PUB.add;
686: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
687: END;
688: p_approversOut(1).first_name := l_first_name;
689: p_approversOut(1).last_name := l_last_name;
690: ELSE

Line 723: RAISE FND_API.G_EXC_ERROR;

719: WHEN NO_DATA_FOUND THEN
720: l_approver_email := NULL;
721: FND_MESSAGE.set_name('DPP', 'DPP_NO_APP_DETAIL');
722: FND_MSG_PUB.add;
723: RAISE FND_API.G_EXC_ERROR;
724: WHEN OTHERS THEN
725: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
726: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
727: fnd_message.set_token('ERRNO', sqlcode);

Line 730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

726: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
727: fnd_message.set_token('ERRNO', sqlcode);
728: fnd_message.set_token('REASON', sqlerrm);
729: FND_MSG_PUB.add;
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: END;
732: ELSE -- Both the person id and the user id are null
733:
734: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'No details retrieved for the Approver ');

Line 750: RAISE FND_API.G_EXC_ERROR;

746: EXCEPTION
747: WHEN NO_DATA_FOUND THEN
748: FND_MESSAGE.set_name('DPP', 'DPP_NO_APP_GRP_DETAIL');
749: FND_MSG_PUB.add;
750: RAISE FND_API.G_EXC_ERROR;
751: WHEN OTHERS THEN
752: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
753: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
754: fnd_message.set_token('ERRNO', sqlcode);

Line 757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

753: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
754: fnd_message.set_token('ERRNO', sqlcode);
755: fnd_message.set_token('REASON', sqlerrm);
756: FND_MSG_PUB.add;
757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
758: END;
759: --Retrieve the order number
760: BEGIN
761: SELECT order_number

Line 770: RAISE FND_API.G_EXC_ERROR;

766: EXCEPTION
767: WHEN NO_DATA_FOUND THEN
768: FND_MESSAGE.set_name('DPP', 'DPP_NO_APP_SEQ');
769: FND_MSG_PUB.add;
770: RAISE FND_API.G_EXC_ERROR;
771: WHEN OTHERS THEN
772: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
773: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
774: fnd_message.set_token('ERRNO', sqlcode);

Line 777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

773: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
774: fnd_message.set_token('ERRNO', sqlcode);
775: fnd_message.set_token('REASON', sqlerrm);
776: FND_MSG_PUB.add;
777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
778: END;
779: --Assign the approver details to the out variable
780: p_approversOut(i).user_id := l_approversOut(i).orig_system_id;
781: p_approversOut(i).person_id := l_approversOut(i).orig_system_id;

Line 802: p_encoded => FND_API.G_FALSE,

798: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': End');
799:
800: --Standard call to get message count and if count=1, get the message
801: FND_MSG_PUB.Count_And_Get (
802: p_encoded => FND_API.G_FALSE,
803: p_count => x_msg_count,
804: p_data => x_msg_data
805: );
806: EXCEPTION

Line 807: WHEN FND_API.G_EXC_ERROR THEN

803: p_count => x_msg_count,
804: p_data => x_msg_data
805: );
806: EXCEPTION
807: WHEN FND_API.G_EXC_ERROR THEN
808: ROLLBACK TO Get_AllApprovers_PVT;
809: x_return_status := FND_API.G_RET_STS_ERROR;
810: -- Standard call to get message count and if count=1, get the message
811: FND_MSG_PUB.Count_And_Get (

Line 809: x_return_status := FND_API.G_RET_STS_ERROR;

805: );
806: EXCEPTION
807: WHEN FND_API.G_EXC_ERROR THEN
808: ROLLBACK TO Get_AllApprovers_PVT;
809: x_return_status := FND_API.G_RET_STS_ERROR;
810: -- Standard call to get message count and if count=1, get the message
811: FND_MSG_PUB.Count_And_Get (
812: p_encoded => FND_API.G_FALSE,
813: p_count => x_msg_count,

Line 812: p_encoded => FND_API.G_FALSE,

808: ROLLBACK TO Get_AllApprovers_PVT;
809: x_return_status := FND_API.G_RET_STS_ERROR;
810: -- Standard call to get message count and if count=1, get the message
811: FND_MSG_PUB.Count_And_Get (
812: p_encoded => FND_API.G_FALSE,
813: p_count => x_msg_count,
814: p_data => x_msg_data
815: );
816: IF x_msg_count > 1 THEN

Line 821: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

817: FOR I IN 1..x_msg_count LOOP
818: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
819: END LOOP;
820: END IF;
821: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
822: ROLLBACK TO Get_AllApprovers_PVT;
823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
824: -- Standard call to get message count and if count=1, get the message
825: FND_MSG_PUB.Count_And_Get (

Line 823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

819: END LOOP;
820: END IF;
821: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
822: ROLLBACK TO Get_AllApprovers_PVT;
823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
824: -- Standard call to get message count and if count=1, get the message
825: FND_MSG_PUB.Count_And_Get (
826: p_encoded => FND_API.G_FALSE,
827: p_count => x_msg_count,

Line 826: p_encoded => FND_API.G_FALSE,

822: ROLLBACK TO Get_AllApprovers_PVT;
823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
824: -- Standard call to get message count and if count=1, get the message
825: FND_MSG_PUB.Count_And_Get (
826: p_encoded => FND_API.G_FALSE,
827: p_count => x_msg_count,
828: p_data => x_msg_data
829: );
830: IF x_msg_count > 1 THEN

Line 837: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

833: END LOOP;
834: END IF;
835: WHEN OTHERS THEN
836: ROLLBACK TO Get_AllApprovers_PVT;
837: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
838: IF DPP_UNEXP_ERROR_ON
839: THEN
840: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
841: END IF;

Line 844: p_encoded => FND_API.G_FALSE,

840: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
841: END IF;
842: -- Standard call to get message count and if count=1, get the message
843: FND_MSG_PUB.Count_And_Get (
844: p_encoded => FND_API.G_FALSE,
845: p_count => x_msg_count,
846: p_data => x_msg_data
847: );
848: IF x_msg_count > 1 THEN

Line 866: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

862: -- NOTES
863: ---------------------------------------------------------------------
864: PROCEDURE Clear_All_Approvals (
865: p_api_version IN NUMBER
866: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
867: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
868: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
869:
870: ,x_return_status OUT NOCOPY VARCHAR2

Line 867: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

863: ---------------------------------------------------------------------
864: PROCEDURE Clear_All_Approvals (
865: p_api_version IN NUMBER
866: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
867: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
868: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
869:
870: ,x_return_status OUT NOCOPY VARCHAR2
871: ,x_msg_count OUT NOCOPY NUMBER

Line 868: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

864: PROCEDURE Clear_All_Approvals (
865: p_api_version IN NUMBER
866: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
867: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
868: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
869:
870: ,x_return_status OUT NOCOPY VARCHAR2
871: ,x_msg_count OUT NOCOPY NUMBER
872: ,x_msg_data OUT NOCOPY VARCHAR2

Line 887: IF NOT FND_API.Compatible_API_Call (

883: BEGIN
884: -- Standard begin of API savepoint Update_User_Action_PVT
885: SAVEPOINT Clear_All_Approvals_PVT;
886: -- Standard call to check for call compatibility.
887: IF NOT FND_API.Compatible_API_Call (
888: l_api_version,
889: p_api_version,
890: l_api_name,
891: G_PKG_NAME)

Line 893: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

889: p_api_version,
890: l_api_name,
891: G_PKG_NAME)
892: THEN
893: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
894: END IF;
895: -- Debug Message
896:
897: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');

Line 900: IF FND_API.To_Boolean (p_init_msg_list) THEN

896:
897: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');
898:
899: --Initialize message list if p_init_msg_list is TRUE.
900: IF FND_API.To_Boolean (p_init_msg_list) THEN
901: FND_MSG_PUB.initialize;
902: END IF;
903: -- Initialize API return status to sucess
904: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 904: x_return_status := FND_API.G_RET_STS_SUCCESS;

900: IF FND_API.To_Boolean (p_init_msg_list) THEN
901: FND_MSG_PUB.initialize;
902: END IF;
903: -- Initialize API return status to sucess
904: x_return_status := FND_API.G_RET_STS_SUCCESS;
905:
906:
907: AME_API2.clearAllApprovals(applicationIdIn => l_application_id
908: ,transactionIdIn => p_txn_hdr_id

Line 918: p_encoded => FND_API.G_FALSE,

914: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': End');
915:
916: --Standard call to get message count and if count=1, get the message
917: FND_MSG_PUB.Count_And_Get (
918: p_encoded => FND_API.G_FALSE,
919: p_count => x_msg_count,
920: p_data => x_msg_data
921: );
922: EXCEPTION

Line 923: WHEN FND_API.G_EXC_ERROR THEN

919: p_count => x_msg_count,
920: p_data => x_msg_data
921: );
922: EXCEPTION
923: WHEN FND_API.G_EXC_ERROR THEN
924: ROLLBACK TO Clear_All_Approvals_PVT;
925: x_return_status := FND_API.G_RET_STS_ERROR;
926: -- Standard call to get message count and if count=1, get the message
927: FND_MSG_PUB.Count_And_Get (

Line 925: x_return_status := FND_API.G_RET_STS_ERROR;

921: );
922: EXCEPTION
923: WHEN FND_API.G_EXC_ERROR THEN
924: ROLLBACK TO Clear_All_Approvals_PVT;
925: x_return_status := FND_API.G_RET_STS_ERROR;
926: -- Standard call to get message count and if count=1, get the message
927: FND_MSG_PUB.Count_And_Get (
928: p_encoded => FND_API.G_FALSE,
929: p_count => x_msg_count,

Line 928: p_encoded => FND_API.G_FALSE,

924: ROLLBACK TO Clear_All_Approvals_PVT;
925: x_return_status := FND_API.G_RET_STS_ERROR;
926: -- Standard call to get message count and if count=1, get the message
927: FND_MSG_PUB.Count_And_Get (
928: p_encoded => FND_API.G_FALSE,
929: p_count => x_msg_count,
930: p_data => x_msg_data
931: );
932: IF x_msg_count > 1 THEN

Line 937: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

933: FOR I IN 1..x_msg_count LOOP
934: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
935: END LOOP;
936: END IF;
937: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
938: ROLLBACK TO Clear_All_Approvals_PVT;
939: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
940: -- Standard call to get message count and if count=1, get the message
941: FND_MSG_PUB.Count_And_Get (

Line 939: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

935: END LOOP;
936: END IF;
937: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
938: ROLLBACK TO Clear_All_Approvals_PVT;
939: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
940: -- Standard call to get message count and if count=1, get the message
941: FND_MSG_PUB.Count_And_Get (
942: p_encoded => FND_API.G_FALSE,
943: p_count => x_msg_count,

Line 942: p_encoded => FND_API.G_FALSE,

938: ROLLBACK TO Clear_All_Approvals_PVT;
939: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
940: -- Standard call to get message count and if count=1, get the message
941: FND_MSG_PUB.Count_And_Get (
942: p_encoded => FND_API.G_FALSE,
943: p_count => x_msg_count,
944: p_data => x_msg_data
945: );
946: IF x_msg_count > 1 THEN

Line 953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

949: END LOOP;
950: END IF;
951: WHEN OTHERS THEN
952: ROLLBACK TO Clear_All_Approvals_PVT;
953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
954: IF DPP_UNEXP_ERROR_ON
955: THEN
956: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
957: END IF;

Line 960: p_encoded => FND_API.G_FALSE,

956: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
957: END IF;
958: -- Standard call to get message count and if count=1, get the message
959: FND_MSG_PUB.Count_And_Get (
960: p_encoded => FND_API.G_FALSE,
961: p_count => x_msg_count,
962: p_data => x_msg_data
963: );
964: IF x_msg_count > 1 THEN

Line 984: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

980: -- NOTES
981: ---------------------------------------------------------------------
982: PROCEDURE Add_Access(
983: p_api_version IN NUMBER
984: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
985: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
986: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
987:
988: ,x_msg_data OUT NOCOPY VARCHAR2

Line 985: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

981: ---------------------------------------------------------------------
982: PROCEDURE Add_Access(
983: p_api_version IN NUMBER
984: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
985: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
986: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
987:
988: ,x_msg_data OUT NOCOPY VARCHAR2
989: ,x_msg_count OUT NOCOPY NUMBER

Line 986: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

982: PROCEDURE Add_Access(
983: p_api_version IN NUMBER
984: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
985: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
986: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
987:
988: ,x_msg_data OUT NOCOPY VARCHAR2
989: ,x_msg_count OUT NOCOPY NUMBER
990: ,x_return_status OUT NOCOPY VARCHAR2

Line 1006: IF NOT FND_API.Compatible_API_Call (

1002: BEGIN
1003: -- Standard begin of API savepoint
1004: SAVEPOINT Add_Access_PVT;
1005: -- Standard call to check for call compatibility.
1006: IF NOT FND_API.Compatible_API_Call (
1007: l_api_version,
1008: p_api_version,
1009: l_api_name,
1010: G_PKG_NAME)

Line 1012: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1008: p_api_version,
1009: l_api_name,
1010: G_PKG_NAME)
1011: THEN
1012: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1013: END IF;
1014: -- Debug Message
1015:
1016: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');

Line 1019: IF FND_API.To_Boolean (p_init_msg_list) THEN

1015:
1016: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');
1017:
1018: --Initialize message list if p_init_msg_list is TRUE.
1019: IF FND_API.To_Boolean (p_init_msg_list) THEN
1020: FND_MSG_PUB.initialize;
1021: END IF;
1022: -- Initialize API return status to sucess
1023: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1023: x_return_status := FND_API.G_RET_STS_SUCCESS;

1019: IF FND_API.To_Boolean (p_init_msg_list) THEN
1020: FND_MSG_PUB.initialize;
1021: END IF;
1022: -- Initialize API return status to sucess
1023: x_return_status := FND_API.G_RET_STS_SUCCESS;
1024:
1025: IF p_approval_rec.object_type IS NULL THEN
1026: IF DPP_ERROR_ON THEN
1027: dpp_utility_pvt.error_message('OZF_OBJECT_TYPE_NOT_FOUND');

Line 1028: x_return_status := FND_API.g_ret_sts_error;

1024:
1025: IF p_approval_rec.object_type IS NULL THEN
1026: IF DPP_ERROR_ON THEN
1027: dpp_utility_pvt.error_message('OZF_OBJECT_TYPE_NOT_FOUND');
1028: x_return_status := FND_API.g_ret_sts_error;
1029: RAISE FND_API.G_EXC_ERROR;
1030: END IF;
1031: END IF;
1032:

Line 1029: RAISE FND_API.G_EXC_ERROR;

1025: IF p_approval_rec.object_type IS NULL THEN
1026: IF DPP_ERROR_ON THEN
1027: dpp_utility_pvt.error_message('OZF_OBJECT_TYPE_NOT_FOUND');
1028: x_return_status := FND_API.g_ret_sts_error;
1029: RAISE FND_API.G_EXC_ERROR;
1030: END IF;
1031: END IF;
1032:
1033: IF p_approval_rec.object_id IS NULL THEN

Line 1036: x_return_status := FND_API.g_ret_sts_error;

1032:
1033: IF p_approval_rec.object_id IS NULL THEN
1034: IF DPP_ERROR_ON THEN
1035: dpp_utility_pvt.error_message('OZF_OBJECT_ID_NOT_FOUND');
1036: x_return_status := FND_API.g_ret_sts_error;
1037: RAISE FND_API.G_EXC_ERROR;
1038: END IF;
1039: END IF;
1040:

Line 1037: RAISE FND_API.G_EXC_ERROR;

1033: IF p_approval_rec.object_id IS NULL THEN
1034: IF DPP_ERROR_ON THEN
1035: dpp_utility_pvt.error_message('OZF_OBJECT_ID_NOT_FOUND');
1036: x_return_status := FND_API.g_ret_sts_error;
1037: RAISE FND_API.G_EXC_ERROR;
1038: END IF;
1039: END IF;
1040:
1041: -- Validate if the approvers record is valid

Line 1050: x_return_status := FND_API.g_ret_sts_error;

1046:
1047: IF p_approvers(i).approver_type <> 'USER' and p_approvers(i).approver_type <> 'PERSON' THEN
1048: IF DPP_ERROR_ON THEN
1049: dpp_utility_pvt.error_message('OZF_APPROVER_NOT_USER');
1050: x_return_status := FND_API.g_ret_sts_error;
1051: RAISE FND_API.G_EXC_ERROR;
1052: END IF;
1053: END IF;
1054:

Line 1051: RAISE FND_API.G_EXC_ERROR;

1047: IF p_approvers(i).approver_type <> 'USER' and p_approvers(i).approver_type <> 'PERSON' THEN
1048: IF DPP_ERROR_ON THEN
1049: dpp_utility_pvt.error_message('OZF_APPROVER_NOT_USER');
1050: x_return_status := FND_API.g_ret_sts_error;
1051: RAISE FND_API.G_EXC_ERROR;
1052: END IF;
1053: END IF;
1054:
1055: IF p_approvers(i).approver_level IS NULL THEN

Line 1058: x_return_status := FND_API.g_ret_sts_error;

1054:
1055: IF p_approvers(i).approver_level IS NULL THEN
1056: IF DPP_ERROR_ON THEN
1057: dpp_utility_pvt.error_message('OZF_APPROVAL_LEVEL_NOT_FOUND');
1058: x_return_status := FND_API.g_ret_sts_error;
1059: RAISE FND_API.G_EXC_ERROR;
1060: END IF;
1061: END IF;
1062: END LOOP;

Line 1059: RAISE FND_API.G_EXC_ERROR;

1055: IF p_approvers(i).approver_level IS NULL THEN
1056: IF DPP_ERROR_ON THEN
1057: dpp_utility_pvt.error_message('OZF_APPROVAL_LEVEL_NOT_FOUND');
1058: x_return_status := FND_API.g_ret_sts_error;
1059: RAISE FND_API.G_EXC_ERROR;
1060: END IF;
1061: END IF;
1062: END LOOP;
1063:

Line 1118: x_return_status := FND_API.g_ret_sts_error;

1114: EXCEPTION
1115: WHEN OTHERS THEN
1116: IF DPP_ERROR_ON THEN
1117: dpp_utility_pvt.error_message('DPP_APPROVAL_ACCESS_INSERT_ERR');
1118: x_return_status := FND_API.g_ret_sts_error;
1119: RAISE FND_API.G_EXC_ERROR;
1120: END IF;
1121: END;
1122: END LOOP;

Line 1119: RAISE FND_API.G_EXC_ERROR;

1115: WHEN OTHERS THEN
1116: IF DPP_ERROR_ON THEN
1117: dpp_utility_pvt.error_message('DPP_APPROVAL_ACCESS_INSERT_ERR');
1118: x_return_status := FND_API.g_ret_sts_error;
1119: RAISE FND_API.G_EXC_ERROR;
1120: END IF;
1121: END;
1122: END LOOP;
1123:

Line 1125: IF FND_API.To_Boolean ( p_commit ) THEN

1121: END;
1122: END LOOP;
1123:
1124: --Standard check of commit
1125: IF FND_API.To_Boolean ( p_commit ) THEN
1126: COMMIT WORK;
1127: END IF;
1128: -- Debug Message
1129:

Line 1134: p_encoded => FND_API.G_FALSE,

1130: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': End');
1131:
1132: --Standard call to get message count and if count=1, get the message
1133: FND_MSG_PUB.Count_And_Get (
1134: p_encoded => FND_API.G_FALSE,
1135: p_count => x_msg_count,
1136: p_data => x_msg_data
1137: );
1138: EXCEPTION

Line 1139: WHEN FND_API.G_EXC_ERROR THEN

1135: p_count => x_msg_count,
1136: p_data => x_msg_data
1137: );
1138: EXCEPTION
1139: WHEN FND_API.G_EXC_ERROR THEN
1140: ROLLBACK TO Add_Access_PVT;
1141: x_return_status := FND_API.G_RET_STS_ERROR;
1142: -- Standard call to get message count and if count=1, get the message
1143: FND_MSG_PUB.Count_And_Get (

Line 1141: x_return_status := FND_API.G_RET_STS_ERROR;

1137: );
1138: EXCEPTION
1139: WHEN FND_API.G_EXC_ERROR THEN
1140: ROLLBACK TO Add_Access_PVT;
1141: x_return_status := FND_API.G_RET_STS_ERROR;
1142: -- Standard call to get message count and if count=1, get the message
1143: FND_MSG_PUB.Count_And_Get (
1144: p_encoded => FND_API.G_FALSE,
1145: p_count => x_msg_count,

Line 1144: p_encoded => FND_API.G_FALSE,

1140: ROLLBACK TO Add_Access_PVT;
1141: x_return_status := FND_API.G_RET_STS_ERROR;
1142: -- Standard call to get message count and if count=1, get the message
1143: FND_MSG_PUB.Count_And_Get (
1144: p_encoded => FND_API.G_FALSE,
1145: p_count => x_msg_count,
1146: p_data => x_msg_data
1147: );
1148: IF x_msg_count > 1 THEN

Line 1153: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1149: FOR I IN 1..x_msg_count LOOP
1150: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1151: END LOOP;
1152: END IF;
1153: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1154: ROLLBACK TO Add_Access_PVT;
1155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1156: -- Standard call to get message count and if count=1, get the message
1157: FND_MSG_PUB.Count_And_Get (

Line 1155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1151: END LOOP;
1152: END IF;
1153: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1154: ROLLBACK TO Add_Access_PVT;
1155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1156: -- Standard call to get message count and if count=1, get the message
1157: FND_MSG_PUB.Count_And_Get (
1158: p_encoded => FND_API.G_FALSE,
1159: p_count => x_msg_count,

Line 1158: p_encoded => FND_API.G_FALSE,

1154: ROLLBACK TO Add_Access_PVT;
1155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1156: -- Standard call to get message count and if count=1, get the message
1157: FND_MSG_PUB.Count_And_Get (
1158: p_encoded => FND_API.G_FALSE,
1159: p_count => x_msg_count,
1160: p_data => x_msg_data
1161: );
1162: IF x_msg_count > 1 THEN

Line 1169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1165: END LOOP;
1166: END IF;
1167: WHEN OTHERS THEN
1168: ROLLBACK TO Add_Access_PVT;
1169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1170: IF DPP_UNEXP_ERROR_ON
1171: THEN
1172: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1173: END IF;

Line 1176: p_encoded => FND_API.G_FALSE,

1172: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1173: END IF;
1174: -- Standard call to get message count and if count=1, get the message
1175: FND_MSG_PUB.Count_And_Get (
1176: p_encoded => FND_API.G_FALSE,
1177: p_count => x_msg_count,
1178: p_data => x_msg_data
1179: );
1180: IF x_msg_count > 1 THEN

Line 1200: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

1196: -- NOTES
1197: ---------------------------------------------------------------------
1198: PROCEDURE Revoke_Access (
1199: p_api_version IN NUMBER
1200: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1201: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1202: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1203:
1204: ,x_return_status OUT NOCOPY VARCHAR2

Line 1201: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

1197: ---------------------------------------------------------------------
1198: PROCEDURE Revoke_Access (
1199: p_api_version IN NUMBER
1200: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1201: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1202: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1203:
1204: ,x_return_status OUT NOCOPY VARCHAR2
1205: ,x_msg_data OUT NOCOPY VARCHAR2

Line 1202: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

1198: PROCEDURE Revoke_Access (
1199: p_api_version IN NUMBER
1200: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1201: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1202: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1203:
1204: ,x_return_status OUT NOCOPY VARCHAR2
1205: ,x_msg_data OUT NOCOPY VARCHAR2
1206: ,x_msg_count OUT NOCOPY NUMBER

Line 1229: IF NOT FND_API.Compatible_API_Call (

1225: BEGIN
1226: -- Standard begin of API savepoint
1227: SAVEPOINT Revoke_Access_PVT;
1228: -- Standard call to check for call compatibility.
1229: IF NOT FND_API.Compatible_API_Call (
1230: l_api_version,
1231: p_api_version,
1232: l_api_name,
1233: G_PKG_NAME)

Line 1235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1231: p_api_version,
1232: l_api_name,
1233: G_PKG_NAME)
1234: THEN
1235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1236: END IF;
1237: -- Debug Message
1238: IF G_DEBUG THEN
1239: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 1244: IF FND_API.To_Boolean (p_init_msg_list) THEN

1240: FND_MESSAGE.Set_Token('TEXT',l_api_name||': Start');
1241: FND_MSG_PUB.Add;
1242: END IF;
1243: --Initialize message list if p_init_msg_list is TRUE.
1244: IF FND_API.To_Boolean (p_init_msg_list) THEN
1245: FND_MSG_PUB.initialize;
1246: END IF;
1247: -- Initialize API return status to sucess
1248: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1248: x_return_status := FND_API.G_RET_STS_SUCCESS;

1244: IF FND_API.To_Boolean (p_init_msg_list) THEN
1245: FND_MSG_PUB.initialize;
1246: END IF;
1247: -- Initialize API return status to sucess
1248: x_return_status := FND_API.G_RET_STS_SUCCESS;
1249:
1250: -- Update records in DPP_APPROVAL_ACCESS_all to revoke access
1251: OPEN csr_curr_approvers(p_object_type, p_object_id);
1252: LOOP

Line 1272: IF FND_API.To_Boolean ( p_commit ) THEN

1268: END LOOP;
1269: CLOSE csr_curr_approvers;
1270:
1271: --Standard check of commit
1272: IF FND_API.To_Boolean ( p_commit ) THEN
1273:
1274: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Inside Commit ');
1275:
1276: COMMIT WORK;

Line 1284: p_encoded => FND_API.G_FALSE,

1280: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': End');
1281:
1282: --Standard call to get message count and if count=1, get the message
1283: FND_MSG_PUB.Count_And_Get (
1284: p_encoded => FND_API.G_FALSE,
1285: p_count => x_msg_count,
1286: p_data => x_msg_data
1287: );
1288: EXCEPTION

Line 1289: WHEN FND_API.G_EXC_ERROR THEN

1285: p_count => x_msg_count,
1286: p_data => x_msg_data
1287: );
1288: EXCEPTION
1289: WHEN FND_API.G_EXC_ERROR THEN
1290: ROLLBACK TO Revoke_Access_PVT;
1291: x_return_status := FND_API.G_RET_STS_ERROR;
1292: -- Standard call to get message count and if count=1, get the message
1293: FND_MSG_PUB.Count_And_Get (

Line 1291: x_return_status := FND_API.G_RET_STS_ERROR;

1287: );
1288: EXCEPTION
1289: WHEN FND_API.G_EXC_ERROR THEN
1290: ROLLBACK TO Revoke_Access_PVT;
1291: x_return_status := FND_API.G_RET_STS_ERROR;
1292: -- Standard call to get message count and if count=1, get the message
1293: FND_MSG_PUB.Count_And_Get (
1294: p_encoded => FND_API.G_FALSE,
1295: p_count => x_msg_count,

Line 1294: p_encoded => FND_API.G_FALSE,

1290: ROLLBACK TO Revoke_Access_PVT;
1291: x_return_status := FND_API.G_RET_STS_ERROR;
1292: -- Standard call to get message count and if count=1, get the message
1293: FND_MSG_PUB.Count_And_Get (
1294: p_encoded => FND_API.G_FALSE,
1295: p_count => x_msg_count,
1296: p_data => x_msg_data
1297: );
1298: IF x_msg_count > 1 THEN

Line 1303: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1299: FOR I IN 1..x_msg_count LOOP
1300: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1301: END LOOP;
1302: END IF;
1303: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1304: ROLLBACK TO Revoke_Access_PVT;
1305: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1306: -- Standard call to get message count and if count=1, get the message
1307: FND_MSG_PUB.Count_And_Get (

Line 1305: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1301: END LOOP;
1302: END IF;
1303: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1304: ROLLBACK TO Revoke_Access_PVT;
1305: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1306: -- Standard call to get message count and if count=1, get the message
1307: FND_MSG_PUB.Count_And_Get (
1308: p_encoded => FND_API.G_FALSE,
1309: p_count => x_msg_count,

Line 1308: p_encoded => FND_API.G_FALSE,

1304: ROLLBACK TO Revoke_Access_PVT;
1305: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1306: -- Standard call to get message count and if count=1, get the message
1307: FND_MSG_PUB.Count_And_Get (
1308: p_encoded => FND_API.G_FALSE,
1309: p_count => x_msg_count,
1310: p_data => x_msg_data
1311: );
1312: IF x_msg_count > 1 THEN

Line 1319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1315: END LOOP;
1316: END IF;
1317: WHEN OTHERS THEN
1318: ROLLBACK TO Revoke_Access_PVT;
1319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1320: IF DPP_UNEXP_ERROR_ON
1321: THEN
1322: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1323: END IF;

Line 1326: p_encoded => FND_API.G_FALSE,

1322: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1323: END IF;
1324: -- Standard call to get message count and if count=1, get the message
1325: FND_MSG_PUB.Count_And_Get (
1326: p_encoded => FND_API.G_FALSE,
1327: p_count => x_msg_count,
1328: p_data => x_msg_data
1329: );
1330: IF x_msg_count > 1 THEN

Line 1491: x_return_status := FND_API.g_ret_sts_error;

1487: IF l_event = 'NOTFOUND' THEN
1488: IF DPP_ERROR_ON THEN
1489: dpp_utility_pvt.error_message('OZF_WF_EVENT_NAME_NULL', 'NAME', p_event_name);
1490: END IF;
1491: x_return_status := FND_API.g_ret_sts_error;
1492: RAISE FND_API.G_EXC_ERROR;
1493: END IF;
1494:
1495: l_parameter_t.setName('OBJECT_TYPE');

Line 1492: RAISE FND_API.G_EXC_ERROR;

1488: IF DPP_ERROR_ON THEN
1489: dpp_utility_pvt.error_message('OZF_WF_EVENT_NAME_NULL', 'NAME', p_event_name);
1490: END IF;
1491: x_return_status := FND_API.g_ret_sts_error;
1492: RAISE FND_API.G_EXC_ERROR;
1493: END IF;
1494:
1495: l_parameter_t.setName('OBJECT_TYPE');
1496: l_parameter_t.setValue(p_approval_rec.object_type);

Line 1525: WHEN FND_API.G_EXC_ERROR THEN

1521:
1522: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'event raised....');
1523:
1524: EXCEPTION
1525: WHEN FND_API.G_EXC_ERROR THEN
1526: ROLLBACK TO Raise_Event_PVT;
1527: x_return_status := FND_API.G_RET_STS_ERROR;
1528: -- Standard call to get message count and if count=1, get the message
1529: FND_MSG_PUB.Count_And_Get (

Line 1527: x_return_status := FND_API.G_RET_STS_ERROR;

1523:
1524: EXCEPTION
1525: WHEN FND_API.G_EXC_ERROR THEN
1526: ROLLBACK TO Raise_Event_PVT;
1527: x_return_status := FND_API.G_RET_STS_ERROR;
1528: -- Standard call to get message count and if count=1, get the message
1529: FND_MSG_PUB.Count_And_Get (
1530: p_encoded => FND_API.G_FALSE,
1531: p_count => x_msg_count,

Line 1530: p_encoded => FND_API.G_FALSE,

1526: ROLLBACK TO Raise_Event_PVT;
1527: x_return_status := FND_API.G_RET_STS_ERROR;
1528: -- Standard call to get message count and if count=1, get the message
1529: FND_MSG_PUB.Count_And_Get (
1530: p_encoded => FND_API.G_FALSE,
1531: p_count => x_msg_count,
1532: p_data => x_msg_data
1533: );
1534: IF x_msg_count > 1 THEN

Line 1539: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1535: FOR I IN 1..x_msg_count LOOP
1536: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1537: END LOOP;
1538: END IF;
1539: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1540: ROLLBACK TO Raise_Event_PVT;
1541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1542: -- Standard call to get message count and if count=1, get the message
1543: FND_MSG_PUB.Count_And_Get (

Line 1541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1537: END LOOP;
1538: END IF;
1539: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1540: ROLLBACK TO Raise_Event_PVT;
1541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1542: -- Standard call to get message count and if count=1, get the message
1543: FND_MSG_PUB.Count_And_Get (
1544: p_encoded => FND_API.G_FALSE,
1545: p_count => x_msg_count,

Line 1544: p_encoded => FND_API.G_FALSE,

1540: ROLLBACK TO Raise_Event_PVT;
1541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1542: -- Standard call to get message count and if count=1, get the message
1543: FND_MSG_PUB.Count_And_Get (
1544: p_encoded => FND_API.G_FALSE,
1545: p_count => x_msg_count,
1546: p_data => x_msg_data
1547: );
1548: IF x_msg_count > 1 THEN

Line 1555: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1551: END LOOP;
1552: END IF;
1553: WHEN OTHERS THEN
1554: ROLLBACK TO Raise_Event_PVT;
1555: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1556: IF DPP_UNEXP_ERROR_ON
1557: THEN
1558: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1559: END IF;

Line 1562: p_encoded => FND_API.G_FALSE,

1558: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1559: END IF;
1560: -- Standard call to get message count and if count=1, get the message
1561: FND_MSG_PUB.Count_And_Get (
1562: p_encoded => FND_API.G_FALSE,
1563: p_count => x_msg_count,
1564: p_data => x_msg_data
1565: );
1566: IF x_msg_count > 1 THEN

Line 1586: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

1582: -- NOTES
1583: ---------------------------------------------------------------------
1584: PROCEDURE Send_Notification (
1585: p_api_version IN NUMBER
1586: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1587: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1588: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1589:
1590: ,x_return_status OUT NOCOPY VARCHAR2

Line 1587: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

1583: ---------------------------------------------------------------------
1584: PROCEDURE Send_Notification (
1585: p_api_version IN NUMBER
1586: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1587: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1588: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1589:
1590: ,x_return_status OUT NOCOPY VARCHAR2
1591: ,x_msg_data OUT NOCOPY VARCHAR2

Line 1588: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

1584: PROCEDURE Send_Notification (
1585: p_api_version IN NUMBER
1586: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1587: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1588: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1589:
1590: ,x_return_status OUT NOCOPY VARCHAR2
1591: ,x_msg_data OUT NOCOPY VARCHAR2
1592: ,x_msg_count OUT NOCOPY NUMBER

Line 1652: IF NOT FND_API.Compatible_API_Call (

1648: BEGIN
1649: -- Standard begin of API savepoint
1650: SAVEPOINT Send_Notification_PVT;
1651: -- Standard call to check for call compatibility.
1652: IF NOT FND_API.Compatible_API_Call (
1653: l_api_version,
1654: p_api_version,
1655: l_api_name,
1656: G_PKG_NAME)

Line 1658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1654: p_api_version,
1655: l_api_name,
1656: G_PKG_NAME)
1657: THEN
1658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1659: END IF;
1660: -- Debug Message
1661:
1662: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');

Line 1665: IF FND_API.To_Boolean (p_init_msg_list) THEN

1661:
1662: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');
1663:
1664: --Initialize message list if p_init_msg_list is TRUE.
1665: IF FND_API.To_Boolean (p_init_msg_list) THEN
1666: FND_MSG_PUB.initialize;
1667: END IF;
1668: -- Initialize API return status to sucess
1669: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1669: x_return_status := FND_API.G_RET_STS_SUCCESS;

1665: IF FND_API.To_Boolean (p_init_msg_list) THEN
1666: FND_MSG_PUB.initialize;
1667: END IF;
1668: -- Initialize API return status to sucess
1669: x_return_status := FND_API.G_RET_STS_SUCCESS;
1670:
1671: IF l_user_role is null THEN
1672: l_user_role := '%';
1673: ELSE

Line 1774: IF FND_API.To_Boolean ( p_commit ) THEN

1770: from DPP_APPROVAL_ACCESS
1771: where object_type = l_object_type
1772: and object_id = l_object_id);
1773: --Standard check of commit
1774: IF FND_API.To_Boolean ( p_commit ) THEN
1775: COMMIT WORK;
1776: END IF;
1777:
1778: -- Debug Message

Line 1784: p_encoded => FND_API.G_FALSE,

1780: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': End');
1781:
1782: --Standard call to get message count and if count=1, get the message
1783: FND_MSG_PUB.Count_And_Get (
1784: p_encoded => FND_API.G_FALSE,
1785: p_count => x_msg_count,
1786: p_data => x_msg_data
1787: );
1788: EXCEPTION

Line 1789: WHEN FND_API.G_EXC_ERROR THEN

1785: p_count => x_msg_count,
1786: p_data => x_msg_data
1787: );
1788: EXCEPTION
1789: WHEN FND_API.G_EXC_ERROR THEN
1790: ROLLBACK TO Send_Notification_PVT;
1791: x_return_status := FND_API.G_RET_STS_ERROR;
1792: -- Standard call to get message count and if count=1, get the message
1793: FND_MSG_PUB.Count_And_Get (

Line 1791: x_return_status := FND_API.G_RET_STS_ERROR;

1787: );
1788: EXCEPTION
1789: WHEN FND_API.G_EXC_ERROR THEN
1790: ROLLBACK TO Send_Notification_PVT;
1791: x_return_status := FND_API.G_RET_STS_ERROR;
1792: -- Standard call to get message count and if count=1, get the message
1793: FND_MSG_PUB.Count_And_Get (
1794: p_encoded => FND_API.G_FALSE,
1795: p_count => x_msg_count,

Line 1794: p_encoded => FND_API.G_FALSE,

1790: ROLLBACK TO Send_Notification_PVT;
1791: x_return_status := FND_API.G_RET_STS_ERROR;
1792: -- Standard call to get message count and if count=1, get the message
1793: FND_MSG_PUB.Count_And_Get (
1794: p_encoded => FND_API.G_FALSE,
1795: p_count => x_msg_count,
1796: p_data => x_msg_data
1797: );
1798: IF x_msg_count > 1 THEN

Line 1803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1799: FOR I IN 1..x_msg_count LOOP
1800: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1801: END LOOP;
1802: END IF;
1803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1804: ROLLBACK TO Send_Notification_PVT;
1805: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1806: -- Standard call to get message count and if count=1, get the message
1807: FND_MSG_PUB.Count_And_Get (

Line 1805: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1801: END LOOP;
1802: END IF;
1803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1804: ROLLBACK TO Send_Notification_PVT;
1805: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1806: -- Standard call to get message count and if count=1, get the message
1807: FND_MSG_PUB.Count_And_Get (
1808: p_encoded => FND_API.G_FALSE,
1809: p_count => x_msg_count,

Line 1808: p_encoded => FND_API.G_FALSE,

1804: ROLLBACK TO Send_Notification_PVT;
1805: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1806: -- Standard call to get message count and if count=1, get the message
1807: FND_MSG_PUB.Count_And_Get (
1808: p_encoded => FND_API.G_FALSE,
1809: p_count => x_msg_count,
1810: p_data => x_msg_data
1811: );
1812: IF x_msg_count > 1 THEN

Line 1819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1815: END LOOP;
1816: END IF;
1817: WHEN OTHERS THEN
1818: ROLLBACK TO Send_Notification_PVT;
1819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1820: IF DPP_UNEXP_ERROR_ON
1821: THEN
1822: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1823: END IF;

Line 1826: p_encoded => FND_API.G_FALSE,

1822: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1823: END IF;
1824: -- Standard call to get message count and if count=1, get the message
1825: FND_MSG_PUB.Count_And_Get (
1826: p_encoded => FND_API.G_FALSE,
1827: p_count => x_msg_count,
1828: p_data => x_msg_data
1829: );
1830: IF x_msg_count > 1 THEN

Line 1852: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

1848: -- 1. object_version_number will be set to 1.
1849: ---------------------------------------------------------------------
1850: PROCEDURE Process_User_Action (
1851: p_api_version IN NUMBER
1852: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1853: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1854: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1855:
1856: ,x_return_status OUT NOCOPY VARCHAR2

Line 1853: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

1849: ---------------------------------------------------------------------
1850: PROCEDURE Process_User_Action (
1851: p_api_version IN NUMBER
1852: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1853: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1854: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1855:
1856: ,x_return_status OUT NOCOPY VARCHAR2
1857: ,x_msg_data OUT NOCOPY VARCHAR2

Line 1854: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

1850: PROCEDURE Process_User_Action (
1851: p_api_version IN NUMBER
1852: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1853: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1854: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1855:
1856: ,x_return_status OUT NOCOPY VARCHAR2
1857: ,x_msg_data OUT NOCOPY VARCHAR2
1858: ,x_msg_count OUT NOCOPY NUMBER

Line 1867: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

1863: )
1864: IS
1865: l_api_name CONSTANT VARCHAR2(80) := 'Process_User_Action';
1866: l_api_version CONSTANT NUMBER := 1.0;
1867: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
1868:
1869: l_approvers_tbl approvers_tbl_type;
1870: l_event_name VARCHAR2(240) ;
1871: l_event_key VARCHAR2(240);

Line 1888: IF NOT FND_API.Compatible_API_Call (

1884: BEGIN
1885: -- Standard begin of API savepoint
1886: SAVEPOINT Process_User_Action_PVT;
1887: -- Standard call to check for call compatibility.
1888: IF NOT FND_API.Compatible_API_Call (
1889: l_api_version,
1890: p_api_version,
1891: l_api_name,
1892: G_PKG_NAME)

Line 1894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1890: p_api_version,
1891: l_api_name,
1892: G_PKG_NAME)
1893: THEN
1894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1895: END IF;
1896: -- Debug Message
1897:
1898: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');

Line 1901: IF FND_API.To_Boolean (p_init_msg_list) THEN

1897:
1898: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': Start');
1899:
1900: --Initialize message list if p_init_msg_list is TRUE.
1901: IF FND_API.To_Boolean (p_init_msg_list) THEN
1902: FND_MSG_PUB.initialize;
1903: END IF;
1904: x_return_status := FND_API.G_RET_STS_SUCCESS;
1905:

Line 1904: x_return_status := FND_API.G_RET_STS_SUCCESS;

1900: --Initialize message list if p_init_msg_list is TRUE.
1901: IF FND_API.To_Boolean (p_init_msg_list) THEN
1902: FND_MSG_PUB.initialize;
1903: END IF;
1904: x_return_status := FND_API.G_RET_STS_SUCCESS;
1905:
1906: --Retrieve the details of the transaction
1907: BEGIN
1908: SELECT transaction_number,

Line 1923: RAISE FND_API.G_EXC_ERROR;

1919: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
1920: fnd_message.set_token('ERRNO', sqlcode);
1921: fnd_message.set_token('REASON', 'Invalid Transaction Header ID');
1922: FND_MSG_PUB.add;
1923: RAISE FND_API.G_EXC_ERROR;
1924: WHEN OTHERS THEN
1925: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1926: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
1927: fnd_message.set_token('ERRNO', sqlcode);

Line 1930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1926: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
1927: fnd_message.set_token('ERRNO', sqlcode);
1928: fnd_message.set_token('REASON', sqlerrm);
1929: FND_MSG_PUB.add;
1930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1931: END;
1932: -- Update AME/approval tbl of users action and revoke access to existing approvers
1933:
1934: IF p_approval_rec.action_code = 'APPROVE' OR

Line 1942: ,p_init_msg_list => FND_API.G_FALSE

1938:
1939: -- Update_User_Action - Update the user action in approval table
1940: Update_User_Action(
1941: p_api_version => p_api_version
1942: ,p_init_msg_list => FND_API.G_FALSE
1943: ,p_validation_level => p_validation_level
1944: ,x_return_status => l_return_status
1945: ,x_msg_data => x_msg_data
1946: ,x_msg_count => x_msg_count

Line 1949: IF l_return_status = FND_API.g_ret_sts_error THEN

1945: ,x_msg_data => x_msg_data
1946: ,x_msg_count => x_msg_count
1947: ,p_approval_rec => p_approval_rec);
1948:
1949: IF l_return_status = FND_API.g_ret_sts_error THEN
1950: RAISE FND_API.g_exc_error;
1951: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1952: RAISE FND_API.g_exc_unexpected_error;
1953: END IF;

Line 1950: RAISE FND_API.g_exc_error;

1946: ,x_msg_count => x_msg_count
1947: ,p_approval_rec => p_approval_rec);
1948:
1949: IF l_return_status = FND_API.g_ret_sts_error THEN
1950: RAISE FND_API.g_exc_error;
1951: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1952: RAISE FND_API.g_exc_unexpected_error;
1953: END IF;
1954:

Line 1951: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1947: ,p_approval_rec => p_approval_rec);
1948:
1949: IF l_return_status = FND_API.g_ret_sts_error THEN
1950: RAISE FND_API.g_exc_error;
1951: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1952: RAISE FND_API.g_exc_unexpected_error;
1953: END IF;
1954:
1955: IF p_approval_rec.action_code = 'REJECT' THEN

Line 1952: RAISE FND_API.g_exc_unexpected_error;

1948:
1949: IF l_return_status = FND_API.g_ret_sts_error THEN
1950: RAISE FND_API.g_exc_error;
1951: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1952: RAISE FND_API.g_exc_unexpected_error;
1953: END IF;
1954:
1955: IF p_approval_rec.action_code = 'REJECT' THEN
1956: l_final_approval_flag := 'Y';

Line 1969: ,p_init_msg_list => FND_API.G_FALSE

1965:
1966: -- Get_Approvers - List of Approvers or Default Approver
1967: Get_Approvers(
1968: p_api_version => p_api_version
1969: ,p_init_msg_list => FND_API.G_FALSE
1970: ,p_validation_level => p_validation_level
1971: ,x_return_status => l_return_status
1972: ,x_msg_data => x_msg_data
1973: ,x_msg_count => x_msg_count

Line 1980: IF l_return_status = FND_API.g_ret_sts_error THEN

1976: ,x_final_approval_flag => l_final_approval_flag);
1977:
1978: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'After Get_Approvers >> ' || l_approvers_tbl.count );
1979:
1980: IF l_return_status = FND_API.g_ret_sts_error THEN
1981: RAISE FND_API.g_exc_error;
1982: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1983: RAISE FND_API.g_exc_unexpected_error;
1984: END IF;

Line 1981: RAISE FND_API.g_exc_error;

1977:
1978: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'After Get_Approvers >> ' || l_approvers_tbl.count );
1979:
1980: IF l_return_status = FND_API.g_ret_sts_error THEN
1981: RAISE FND_API.g_exc_error;
1982: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1983: RAISE FND_API.g_exc_unexpected_error;
1984: END IF;
1985: END IF;

Line 1982: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1978: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'After Get_Approvers >> ' || l_approvers_tbl.count );
1979:
1980: IF l_return_status = FND_API.g_ret_sts_error THEN
1981: RAISE FND_API.g_exc_error;
1982: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1983: RAISE FND_API.g_exc_unexpected_error;
1984: END IF;
1985: END IF;
1986:

Line 1983: RAISE FND_API.g_exc_unexpected_error;

1979:
1980: IF l_return_status = FND_API.g_ret_sts_error THEN
1981: RAISE FND_API.g_exc_error;
1982: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1983: RAISE FND_API.g_exc_unexpected_error;
1984: END IF;
1985: END IF;
1986:
1987: -- Add access to users who have approval privileges

Line 2000: ,p_init_msg_list => FND_API.G_FALSE

1996: if l_approvers_tbl.count > 0 then --(i).approver_id is not null then
1997: -- Add_Access - List Approvers sent from Get_Approvers api
1998: Add_Access(
1999: p_api_version => p_api_version
2000: ,p_init_msg_list => FND_API.G_FALSE
2001: ,p_commit => FND_API.G_FALSE
2002: ,p_validation_level => p_validation_level
2003: ,x_return_status => l_return_status
2004: ,x_msg_data => x_msg_data

Line 2001: ,p_commit => FND_API.G_FALSE

1997: -- Add_Access - List Approvers sent from Get_Approvers api
1998: Add_Access(
1999: p_api_version => p_api_version
2000: ,p_init_msg_list => FND_API.G_FALSE
2001: ,p_commit => FND_API.G_FALSE
2002: ,p_validation_level => p_validation_level
2003: ,x_return_status => l_return_status
2004: ,x_msg_data => x_msg_data
2005: ,x_msg_count => x_msg_count

Line 2009: IF l_return_status = FND_API.g_ret_sts_error THEN

2005: ,x_msg_count => x_msg_count
2006: ,p_approval_rec => p_approval_rec
2007: ,p_approvers => l_approvers_tbl);
2008:
2009: IF l_return_status = FND_API.g_ret_sts_error THEN
2010: RAISE FND_API.g_exc_error;
2011: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2012: RAISE FND_API.g_exc_unexpected_error;
2013: END IF;

Line 2010: RAISE FND_API.g_exc_error;

2006: ,p_approval_rec => p_approval_rec
2007: ,p_approvers => l_approvers_tbl);
2008:
2009: IF l_return_status = FND_API.g_ret_sts_error THEN
2010: RAISE FND_API.g_exc_error;
2011: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2012: RAISE FND_API.g_exc_unexpected_error;
2013: END IF;
2014:

Line 2011: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2007: ,p_approvers => l_approvers_tbl);
2008:
2009: IF l_return_status = FND_API.g_ret_sts_error THEN
2010: RAISE FND_API.g_exc_error;
2011: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2012: RAISE FND_API.g_exc_unexpected_error;
2013: END IF;
2014:
2015: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Access Added ' || x_return_status );

Line 2012: RAISE FND_API.g_exc_unexpected_error;

2008:
2009: IF l_return_status = FND_API.g_ret_sts_error THEN
2010: RAISE FND_API.g_exc_error;
2011: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2012: RAISE FND_API.g_exc_unexpected_error;
2013: END IF;
2014:
2015: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Access Added ' || x_return_status );
2016:

Line 2073: x_return_status := FND_API.G_RET_STS_ERROR;

2069: last_update_login = l_login_id
2070: WHERE transaction_header_id = p_approval_rec.object_id;
2071:
2072: IF SQL%ROWCOUNT = 0 THEN
2073: x_return_status := FND_API.G_RET_STS_ERROR;
2074: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Unable to Update the column transaction_status in dpp_transaction_headers_all Table');
2075: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2076: END IF;
2077:

Line 2075: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2071:
2072: IF SQL%ROWCOUNT = 0 THEN
2073: x_return_status := FND_API.G_RET_STS_ERROR;
2074: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Unable to Update the column transaction_status in dpp_transaction_headers_all Table');
2075: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2076: END IF;
2077:
2078: DPP_EXECUTIONPROCESS_PVT.Update_HeaderLog(
2079: p_api_version_number => 1.0

Line 2080: , p_init_msg_list => FND_API.G_FALSE

2076: END IF;
2077:
2078: DPP_EXECUTIONPROCESS_PVT.Update_HeaderLog(
2079: p_api_version_number => 1.0
2080: , p_init_msg_list => FND_API.G_FALSE
2081: , p_commit => FND_API.G_FALSE
2082: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2083: , x_return_status => l_return_status
2084: , x_msg_count => x_msg_count

Line 2081: , p_commit => FND_API.G_FALSE

2077:
2078: DPP_EXECUTIONPROCESS_PVT.Update_HeaderLog(
2079: p_api_version_number => 1.0
2080: , p_init_msg_list => FND_API.G_FALSE
2081: , p_commit => FND_API.G_FALSE
2082: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2083: , x_return_status => l_return_status
2084: , x_msg_count => x_msg_count
2085: , x_msg_data => x_msg_data

Line 2082: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

2078: DPP_EXECUTIONPROCESS_PVT.Update_HeaderLog(
2079: p_api_version_number => 1.0
2080: , p_init_msg_list => FND_API.G_FALSE
2081: , p_commit => FND_API.G_FALSE
2082: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2083: , x_return_status => l_return_status
2084: , x_msg_count => x_msg_count
2085: , x_msg_data => x_msg_data
2086: , p_transaction_header_id => p_approval_rec.object_id

Line 2093: IF l_return_status = Fnd_Api.g_ret_sts_error THEN

2089: IF G_DEBUG THEN
2090: fnd_file.put_line(fnd_file.log, ' Update_HeaderLog. Return Status: ' || l_return_status || ' Error Msg: ' || x_msg_data);
2091: END IF;
2092:
2093: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2094: RAISE Fnd_Api.g_exc_error;
2095: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2096: RAISE Fnd_Api.g_exc_unexpected_error;
2097: END IF;

Line 2094: RAISE Fnd_Api.g_exc_error;

2090: fnd_file.put_line(fnd_file.log, ' Update_HeaderLog. Return Status: ' || l_return_status || ' Error Msg: ' || x_msg_data);
2091: END IF;
2092:
2093: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2094: RAISE Fnd_Api.g_exc_error;
2095: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2096: RAISE Fnd_Api.g_exc_unexpected_error;
2097: END IF;
2098:

Line 2095: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2091: END IF;
2092:
2093: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2094: RAISE Fnd_Api.g_exc_error;
2095: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2096: RAISE Fnd_Api.g_exc_unexpected_error;
2097: END IF;
2098:
2099: EXCEPTION

Line 2096: RAISE Fnd_Api.g_exc_unexpected_error;

2092:
2093: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2094: RAISE Fnd_Api.g_exc_error;
2095: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2096: RAISE Fnd_Api.g_exc_unexpected_error;
2097: END IF;
2098:
2099: EXCEPTION
2100: WHEN FND_API.G_EXC_ERROR THEN

Line 2100: WHEN FND_API.G_EXC_ERROR THEN

2096: RAISE Fnd_Api.g_exc_unexpected_error;
2097: END IF;
2098:
2099: EXCEPTION
2100: WHEN FND_API.G_EXC_ERROR THEN
2101: RAISE Fnd_Api.g_exc_error;
2102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2103: RAISE Fnd_Api.g_exc_unexpected_error;
2104: WHEN OTHERS THEN

Line 2101: RAISE Fnd_Api.g_exc_error;

2097: END IF;
2098:
2099: EXCEPTION
2100: WHEN FND_API.G_EXC_ERROR THEN
2101: RAISE Fnd_Api.g_exc_error;
2102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2103: RAISE Fnd_Api.g_exc_unexpected_error;
2104: WHEN OTHERS THEN
2105: ROLLBACK;

Line 2102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2098:
2099: EXCEPTION
2100: WHEN FND_API.G_EXC_ERROR THEN
2101: RAISE Fnd_Api.g_exc_error;
2102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2103: RAISE Fnd_Api.g_exc_unexpected_error;
2104: WHEN OTHERS THEN
2105: ROLLBACK;
2106: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2103: RAISE Fnd_Api.g_exc_unexpected_error;

2099: EXCEPTION
2100: WHEN FND_API.G_EXC_ERROR THEN
2101: RAISE Fnd_Api.g_exc_error;
2102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2103: RAISE Fnd_Api.g_exc_unexpected_error;
2104: WHEN OTHERS THEN
2105: ROLLBACK;
2106: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2107: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');

Line 2111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2107: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
2108: fnd_message.set_token('ERRNO', sqlcode);
2109: fnd_message.set_token('REASON', sqlerrm);
2110: FND_MSG_PUB.add;
2111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2112: END;
2113: --Call the Initiate execution process program to make the transaction Active
2114: DPP_EXECUTIONPROCESS_PVT.Initiate_ExecutionProcess(errbuff,
2115: retcode,

Line 2138: IF FND_API.To_Boolean ( p_commit ) THEN

2134:
2135: END IF; --l_effective_date <= sysdate
2136: END IF; --x_final_approval_flag := 'Y'
2137: --Standard check of commit
2138: IF FND_API.To_Boolean ( p_commit ) THEN
2139: COMMIT WORK;
2140: END IF;
2141: -- Debug Message
2142:

Line 2147: p_encoded => FND_API.G_FALSE,

2143: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, l_api_name||': End');
2144:
2145: --Standard call to get message count and if count=1, get the message
2146: FND_MSG_PUB.Count_And_Get (
2147: p_encoded => FND_API.G_FALSE,
2148: p_count => x_msg_count,
2149: p_data => x_msg_data
2150: );
2151:

Line 2153: WHEN FND_API.G_EXC_ERROR THEN

2149: p_data => x_msg_data
2150: );
2151:
2152: EXCEPTION
2153: WHEN FND_API.G_EXC_ERROR THEN
2154: ROLLBACK TO Process_User_Action_PVT;
2155: x_return_status := FND_API.G_RET_STS_ERROR;
2156: -- Standard call to get message count and if count=1, get the message
2157: FND_MSG_PUB.Count_And_Get (

Line 2155: x_return_status := FND_API.G_RET_STS_ERROR;

2151:
2152: EXCEPTION
2153: WHEN FND_API.G_EXC_ERROR THEN
2154: ROLLBACK TO Process_User_Action_PVT;
2155: x_return_status := FND_API.G_RET_STS_ERROR;
2156: -- Standard call to get message count and if count=1, get the message
2157: FND_MSG_PUB.Count_And_Get (
2158: p_encoded => FND_API.G_FALSE,
2159: p_count => x_msg_count,

Line 2158: p_encoded => FND_API.G_FALSE,

2154: ROLLBACK TO Process_User_Action_PVT;
2155: x_return_status := FND_API.G_RET_STS_ERROR;
2156: -- Standard call to get message count and if count=1, get the message
2157: FND_MSG_PUB.Count_And_Get (
2158: p_encoded => FND_API.G_FALSE,
2159: p_count => x_msg_count,
2160: p_data => x_msg_data
2161: );
2162: IF x_msg_count > 1 THEN

Line 2167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2163: FOR I IN 1..x_msg_count LOOP
2164: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
2165: END LOOP;
2166: END IF;
2167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2168: ROLLBACK TO Process_User_Action_PVT;
2169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2170: -- Standard call to get message count and if count=1, get the message
2171: FND_MSG_PUB.Count_And_Get (

Line 2169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2165: END LOOP;
2166: END IF;
2167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2168: ROLLBACK TO Process_User_Action_PVT;
2169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2170: -- Standard call to get message count and if count=1, get the message
2171: FND_MSG_PUB.Count_And_Get (
2172: p_encoded => FND_API.G_FALSE,
2173: p_count => x_msg_count,

Line 2172: p_encoded => FND_API.G_FALSE,

2168: ROLLBACK TO Process_User_Action_PVT;
2169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2170: -- Standard call to get message count and if count=1, get the message
2171: FND_MSG_PUB.Count_And_Get (
2172: p_encoded => FND_API.G_FALSE,
2173: p_count => x_msg_count,
2174: p_data => x_msg_data
2175: );
2176: IF x_msg_count > 1 THEN

Line 2183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2179: END LOOP;
2180: END IF;
2181: WHEN OTHERS THEN
2182: ROLLBACK TO Process_User_Action_PVT;
2183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2184: IF DPP_UNEXP_ERROR_ON
2185: THEN
2186: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2187: END IF;

Line 2190: p_encoded => FND_API.G_FALSE,

2186: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2187: END IF;
2188: -- Standard call to get message count and if count=1, get the message
2189: FND_MSG_PUB.Count_And_Get (
2190: p_encoded => FND_API.G_FALSE,
2191: p_count => x_msg_count,
2192: p_data => x_msg_data
2193: );
2194: IF x_msg_count > 1 THEN