DBA Data[Home] [Help]

APPS.IGS_SC_GRANTS_PVT dependencies on FND_API

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

345: END check_grant_text;
346:
347: PROCEDURE construct_grant(
348: p_api_version IN NUMBER,
349: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
350: p_commit IN VARCHAR2 := FND_API.G_FALSE,
351: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
352: p_grant_id IN NUMBER,
353: x_return_status OUT NOCOPY VARCHAR2,

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

346:
347: PROCEDURE construct_grant(
348: p_api_version IN NUMBER,
349: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
350: p_commit IN VARCHAR2 := FND_API.G_FALSE,
351: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
352: p_grant_id IN NUMBER,
353: x_return_status OUT NOCOPY VARCHAR2,
354: x_msg_count OUT NOCOPY NUMBER,

Line 351: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,

347: PROCEDURE construct_grant(
348: p_api_version IN NUMBER,
349: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
350: p_commit IN VARCHAR2 := FND_API.G_FALSE,
351: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
352: p_grant_id IN NUMBER,
353: x_return_status OUT NOCOPY VARCHAR2,
354: x_msg_count OUT NOCOPY NUMBER,
355: x_msg_data OUT NOCOPY VARCHAR2

Line 416: IF NOT FND_API.Compatible_API_Call (l_api_version,

412: -- Standard Start of API savepoint
413: SAVEPOINT construct_grant;
414:
415: -- Standard call to check for call compatibility.
416: IF NOT FND_API.Compatible_API_Call (l_api_version,
417: p_api_version,
418: l_api_name,
419: G_PKG_NAME)
420: THEN

Line 421: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

417: p_api_version,
418: l_api_name,
419: G_PKG_NAME)
420: THEN
421: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
422: END IF;
423:
424: -- Initialize message list if p_init_msg_list is set to TRUE.
425:

Line 426: x_return_status := FND_API.G_RET_STS_SUCCESS;

422: END IF;
423:
424: -- Initialize message list if p_init_msg_list is set to TRUE.
425:
426: x_return_status := FND_API.G_RET_STS_SUCCESS;
427:
428: IF FND_API.to_Boolean (p_init_msg_list) THEN
429: FND_MSG_PUB.initialize;
430: END IF;

Line 428: IF FND_API.to_Boolean (p_init_msg_list) THEN

424: -- Initialize message list if p_init_msg_list is set to TRUE.
425:
426: x_return_status := FND_API.G_RET_STS_SUCCESS;
427:
428: IF FND_API.to_Boolean (p_init_msg_list) THEN
429: FND_MSG_PUB.initialize;
430: END IF;
431:
432: -- API body

Line 451: IF FND_API.To_Boolean( p_commit ) THEN

447:
448: -- End of API body.
449: -- Standard check of p_commit.
450:
451: IF FND_API.To_Boolean( p_commit ) THEN
452: COMMIT WORK;
453: END IF;
454:
455: -- Standard call to get message count and if count is 1, get message info.

Line 462: WHEN FND_API.G_EXC_ERROR THEN

458: p_data => x_msg_data
459: );
460:
461: EXCEPTION
462: WHEN FND_API.G_EXC_ERROR THEN
463:
464: ROLLBACK TO construct_grant;
465: x_return_status := FND_API.G_RET_STS_ERROR;
466: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,

Line 465: x_return_status := FND_API.G_RET_STS_ERROR;

461: EXCEPTION
462: WHEN FND_API.G_EXC_ERROR THEN
463:
464: ROLLBACK TO construct_grant;
465: x_return_status := FND_API.G_RET_STS_ERROR;
466: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
467: p_data => x_msg_data );
468:
469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

465: x_return_status := FND_API.G_RET_STS_ERROR;
466: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
467: p_data => x_msg_data );
468:
469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
470:
471: ROLLBACK TO construct_grant;
472: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
473: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,

Line 472: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

468:
469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
470:
471: ROLLBACK TO construct_grant;
472: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
473: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
474: p_data => x_msg_data );
475:
476: WHEN OTHERS THEN

Line 479: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

475:
476: WHEN OTHERS THEN
477:
478: ROLLBACK TO construct_grant;
479: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
480:
481: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
482: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
483: END IF;

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

491:
492:
493: PROCEDURE generate_grant(
494: p_api_version IN NUMBER,
495: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
496: p_commit IN VARCHAR2 := FND_API.G_FALSE,
497: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
498: p_object_name IN VARCHAR2,
499: p_function_type IN VARCHAR2,

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

492:
493: PROCEDURE generate_grant(
494: p_api_version IN NUMBER,
495: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
496: p_commit IN VARCHAR2 := FND_API.G_FALSE,
497: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
498: p_object_name IN VARCHAR2,
499: p_function_type IN VARCHAR2,
500: x_where_clause OUT NOCOPY VARCHAR2,

Line 497: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,

493: PROCEDURE generate_grant(
494: p_api_version IN NUMBER,
495: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
496: p_commit IN VARCHAR2 := FND_API.G_FALSE,
497: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
498: p_object_name IN VARCHAR2,
499: p_function_type IN VARCHAR2,
500: x_where_clause OUT NOCOPY VARCHAR2,
501: x_return_status OUT NOCOPY VARCHAR2,

Line 518: IF NOT FND_API.Compatible_API_Call (l_api_version,

514:
515: BEGIN
516:
517: -- Standard call to check for call compatibility.
518: IF NOT FND_API.Compatible_API_Call (l_api_version,
519: p_api_version,
520: l_api_name,
521: G_PKG_NAME)
522: THEN

Line 523: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

519: p_api_version,
520: l_api_name,
521: G_PKG_NAME)
522: THEN
523: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
524: END IF;
525:
526: -- Initialize message list if p_init_msg_list is set to TRUE.
527:

Line 528: x_return_status := FND_API.G_RET_STS_SUCCESS;

524: END IF;
525:
526: -- Initialize message list if p_init_msg_list is set to TRUE.
527:
528: x_return_status := FND_API.G_RET_STS_SUCCESS;
529:
530: IF FND_API.to_Boolean (p_init_msg_list) THEN
531: FND_MSG_PUB.initialize;
532: END IF;

Line 530: IF FND_API.to_Boolean (p_init_msg_list) THEN

526: -- Initialize message list if p_init_msg_list is set to TRUE.
527:
528: x_return_status := FND_API.G_RET_STS_SUCCESS;
529:
530: IF FND_API.to_Boolean (p_init_msg_list) THEN
531: FND_MSG_PUB.initialize;
532: END IF;
533:
534: x_where_clause:= generate_grant (

Line 551: IF FND_API.To_Boolean( p_commit ) THEN

547:
548: -- End of API body.
549: -- Standard check of p_commit.
550:
551: IF FND_API.To_Boolean( p_commit ) THEN
552: COMMIT WORK;
553: END IF;
554:
555: -- Standard call to get message count and if count is 1, get message info.

Line 562: WHEN FND_API.G_EXC_ERROR THEN

558: p_data => x_msg_data
559: );
560:
561: EXCEPTION
562: WHEN FND_API.G_EXC_ERROR THEN
563:
564: x_return_status := FND_API.G_RET_STS_ERROR;
565: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
566: p_data => x_msg_data );

Line 564: x_return_status := FND_API.G_RET_STS_ERROR;

560:
561: EXCEPTION
562: WHEN FND_API.G_EXC_ERROR THEN
563:
564: x_return_status := FND_API.G_RET_STS_ERROR;
565: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
566: p_data => x_msg_data );
567:
568: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN

Line 575: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

571: ||'Error Message: '||x_msg_data;
572: fnd_log.string_with_context( fnd_log.level_procedure,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
573: END IF;
574:
575: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
576:
577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
578: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
579: p_data => x_msg_data );

Line 577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

573: END IF;
574:
575: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
576:
577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
578: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
579: p_data => x_msg_data );
580:
581: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN

Line 590: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

586: END IF;
587:
588: WHEN OTHERS THEN
589:
590: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
591:
592: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
593: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
594: END IF;

Line 696: RAISE FND_API.G_EXC_ERROR;

692: FND_MESSAGE.SET_TOKEN('ATTRIB_ID', l_grant_cond(c_grant_cond_rec.grant_cond_num).obj_attrib_id);
693: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_group_rec.table_name );
694: FND_MSG_PUB.Add;
695:
696: RAISE FND_API.G_EXC_ERROR;
697:
698: ELSIF l_obj_attrib.NULL_ALLOW_FLAG IN ('Y','N') THEN
699: onlyZTypeAttributes := false;
700: close c_obj_attrib;

Line 751: RAISE FND_API.G_EXC_ERROR;

747: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_MTHD_NOT_FOUND');
748: FND_MESSAGE.SET_TOKEN('ATTRIB_ID', l_grant_cond(c_grant_cond_rec.grant_cond_num).obj_attrib_id);
749: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_group_rec.table_name );
750: FND_MSG_PUB.Add;
751: RAISE FND_API.G_EXC_ERROR;
752:
753: END IF;
754:
755:

Line 840: RAISE FND_API.G_EXC_ERROR;

836:
837: -- Not supported combination
838: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_NOT_SPRT_COMB');
839: FND_MSG_PUB.Add;
840: RAISE FND_API.G_EXC_ERROR;
841:
842: END IF;
843:
844: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN

Line 1152: RAISE FND_API.G_EXC_ERROR;

1148: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
1149: FND_MESSAGE.SET_TOKEN('OBJ_NAME',p_group_rec.table_name );
1150: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', l_statment);
1151: FND_MSG_PUB.Add;
1152: RAISE FND_API.G_EXC_ERROR;
1153:
1154: END IF;
1155:
1156:

Line 1297: RAISE FND_API.G_EXC_ERROR;

1293: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_NO_OBJECT_FOUND');
1294: FND_MSG_PUB.Add;
1295:
1296: -- Return nothing ofr a table
1297: RAISE FND_API.G_EXC_ERROR;
1298:
1299: END IF;
1300:
1301: -- Find all grant Ids for all groups user belongs to

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

1390:
1391:
1392: PROCEDURE populate_user_attrib(
1393: p_api_version IN NUMBER,
1394: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1395: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1396: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1397: p_attrib_id IN NUMBER := NULL,
1398: p_user_id IN NUMBER := NULL,

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

1391:
1392: PROCEDURE populate_user_attrib(
1393: p_api_version IN NUMBER,
1394: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1395: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1396: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1397: p_attrib_id IN NUMBER := NULL,
1398: p_user_id IN NUMBER := NULL,
1399: p_all_attribs IN VARCHAR2 :='N',

Line 1396: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,

1392: PROCEDURE populate_user_attrib(
1393: p_api_version IN NUMBER,
1394: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1395: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1396: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1397: p_attrib_id IN NUMBER := NULL,
1398: p_user_id IN NUMBER := NULL,
1399: p_all_attribs IN VARCHAR2 :='N',
1400: x_return_status OUT NOCOPY VARCHAR2,

Line 1463: IF NOT FND_API.Compatible_API_Call (l_api_version,

1459: -- Standard Start of API savepoint
1460: SAVEPOINT populate_user_attrib;
1461:
1462: -- Standard call to check for call compatibility.
1463: IF NOT FND_API.Compatible_API_Call (l_api_version,
1464: p_api_version,
1465: l_api_name,
1466: G_PKG_NAME)
1467: THEN

Line 1468: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1464: p_api_version,
1465: l_api_name,
1466: G_PKG_NAME)
1467: THEN
1468: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1469: END IF;
1470:
1471: -- Initialize message list if p_init_msg_list is set to TRUE.
1472:

Line 1473: x_return_status := FND_API.G_RET_STS_SUCCESS;

1469: END IF;
1470:
1471: -- Initialize message list if p_init_msg_list is set to TRUE.
1472:
1473: x_return_status := FND_API.G_RET_STS_SUCCESS;
1474:
1475: IF FND_API.to_Boolean (p_init_msg_list) THEN
1476: FND_MSG_PUB.initialize;
1477: END IF;

Line 1475: IF FND_API.to_Boolean (p_init_msg_list) THEN

1471: -- Initialize message list if p_init_msg_list is set to TRUE.
1472:
1473: x_return_status := FND_API.G_RET_STS_SUCCESS;
1474:
1475: IF FND_API.to_Boolean (p_init_msg_list) THEN
1476: FND_MSG_PUB.initialize;
1477: END IF;
1478:
1479: -- API body

Line 1545: IF FND_API.To_Boolean( p_commit ) THEN

1541:
1542: -- End of API body.
1543: -- Standard check of p_commit.
1544:
1545: IF FND_API.To_Boolean( p_commit ) THEN
1546: COMMIT WORK;
1547: END IF;
1548:
1549: -- Standard call to get message count and if count is 1, get message info.

Line 1556: WHEN FND_API.G_EXC_ERROR THEN

1552: p_data => x_msg_data
1553: );
1554:
1555: EXCEPTION
1556: WHEN FND_API.G_EXC_ERROR THEN
1557:
1558: ROLLBACK TO populate_user_attrib;
1559: x_return_status := FND_API.G_RET_STS_ERROR;
1560: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,

Line 1559: x_return_status := FND_API.G_RET_STS_ERROR;

1555: EXCEPTION
1556: WHEN FND_API.G_EXC_ERROR THEN
1557:
1558: ROLLBACK TO populate_user_attrib;
1559: x_return_status := FND_API.G_RET_STS_ERROR;
1560: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
1561: p_data => x_msg_data );
1562:
1563: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1563: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1559: x_return_status := FND_API.G_RET_STS_ERROR;
1560: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
1561: p_data => x_msg_data );
1562:
1563: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1564:
1565: ROLLBACK TO populate_user_attrib;
1566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1567: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,

Line 1566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1562:
1563: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1564:
1565: ROLLBACK TO populate_user_attrib;
1566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1567: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1568: p_data => x_msg_data );
1569:
1570: WHEN OTHERS THEN

Line 1573: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1569:
1570: WHEN OTHERS THEN
1571:
1572: ROLLBACK TO populate_user_attrib;
1573: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1574:
1575: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
1576: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1577: END IF;

Line 1694: l_msg_data := FND_MSg_PUB.GET(l_cur, FND_API.g_FALSE);

1690: l_msg_data := '';
1691:
1692: FOR l_cur IN 1..l_msg_count LOOP
1693:
1694: l_msg_data := FND_MSg_PUB.GET(l_cur, FND_API.g_FALSE);
1695: Put_Log_Msg(l_msg_data,1);
1696: END LOOP;
1697:
1698: ELSE

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

1746:
1747:
1748: PROCEDURE unlock_all_grants(
1749: p_api_version IN NUMBER,
1750: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1751: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1752: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1753: p_conc_program_flag IN VARCHAR2 := FND_API.G_FALSE,
1754: p_disable_security IN VARCHAR2 := FND_API.G_FALSE,

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

1747:
1748: PROCEDURE unlock_all_grants(
1749: p_api_version IN NUMBER,
1750: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1751: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1752: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1753: p_conc_program_flag IN VARCHAR2 := FND_API.G_FALSE,
1754: p_disable_security IN VARCHAR2 := FND_API.G_FALSE,
1755: p_obj_group_id IN NUMBER,

Line 1752: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,

1748: PROCEDURE unlock_all_grants(
1749: p_api_version IN NUMBER,
1750: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1751: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1752: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1753: p_conc_program_flag IN VARCHAR2 := FND_API.G_FALSE,
1754: p_disable_security IN VARCHAR2 := FND_API.G_FALSE,
1755: p_obj_group_id IN NUMBER,
1756: x_return_status OUT NOCOPY VARCHAR2,

Line 1753: p_conc_program_flag IN VARCHAR2 := FND_API.G_FALSE,

1749: p_api_version IN NUMBER,
1750: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1751: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1752: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1753: p_conc_program_flag IN VARCHAR2 := FND_API.G_FALSE,
1754: p_disable_security IN VARCHAR2 := FND_API.G_FALSE,
1755: p_obj_group_id IN NUMBER,
1756: x_return_status OUT NOCOPY VARCHAR2,
1757: x_msg_count OUT NOCOPY NUMBER,

Line 1754: p_disable_security IN VARCHAR2 := FND_API.G_FALSE,

1750: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1751: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1752: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1753: p_conc_program_flag IN VARCHAR2 := FND_API.G_FALSE,
1754: p_disable_security IN VARCHAR2 := FND_API.G_FALSE,
1755: p_obj_group_id IN NUMBER,
1756: x_return_status OUT NOCOPY VARCHAR2,
1757: x_msg_count OUT NOCOPY NUMBER,
1758: x_msg_data OUT NOCOPY VARCHAR2

Line 1781: IF NOT FND_API.Compatible_API_Call (l_api_version,

1777: -- Standard Start of API savepoint
1778: SAVEPOINT unlock_all_grants;
1779:
1780: -- Standard call to check for call compatibility.
1781: IF NOT FND_API.Compatible_API_Call (l_api_version,
1782: p_api_version,
1783: l_api_name,
1784: G_PKG_NAME)
1785: THEN

Line 1786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1782: p_api_version,
1783: l_api_name,
1784: G_PKG_NAME)
1785: THEN
1786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1787: END IF;
1788:
1789: -- Initialize message list if p_init_msg_list is set to TRUE.
1790:

Line 1791: x_return_status := FND_API.G_RET_STS_SUCCESS;

1787: END IF;
1788:
1789: -- Initialize message list if p_init_msg_list is set to TRUE.
1790:
1791: x_return_status := FND_API.G_RET_STS_SUCCESS;
1792:
1793: IF FND_API.to_Boolean (p_init_msg_list) THEN
1794: FND_MSG_PUB.initialize;
1795: END IF;

Line 1793: IF FND_API.to_Boolean (p_init_msg_list) THEN

1789: -- Initialize message list if p_init_msg_list is set to TRUE.
1790:
1791: x_return_status := FND_API.G_RET_STS_SUCCESS;
1792:
1793: IF FND_API.to_Boolean (p_init_msg_list) THEN
1794: FND_MSG_PUB.initialize;
1795: END IF;
1796:
1797: -- API body

Line 1808: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1804: p_grant_id => c_grants_rec.grant_id,
1805: x_return_status => l_return_status,
1806: x_return_message => l_msg_data );
1807:
1808: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1809: raise FND_API.G_EXC_ERROR;
1810: END IF;
1811:
1812: END LOOP;

Line 1809: raise FND_API.G_EXC_ERROR;

1805: x_return_status => l_return_status,
1806: x_return_message => l_msg_data );
1807:
1808: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1809: raise FND_API.G_EXC_ERROR;
1810: END IF;
1811:
1812: END LOOP;
1813:

Line 1814: IF FND_API.to_Boolean (p_disable_security) THEN

1810: END IF;
1811:
1812: END LOOP;
1813:
1814: IF FND_API.to_Boolean (p_disable_security) THEN
1815:
1816: -- Change default access level for all groups
1817: UPDATE igs_sc_obj_groups
1818: SET default_policy_type = 'G';

Line 1825: IF FND_API.To_Boolean( p_commit ) THEN

1821:
1822: -- End of API body.
1823: -- Standard check of p_commit.
1824:
1825: IF FND_API.To_Boolean( p_commit ) THEN
1826: COMMIT WORK;
1827: END IF;
1828:
1829: -- Standard call to get message count and if count is 1, get message info.

Line 1836: WHEN FND_API.G_EXC_ERROR THEN

1832: p_data => x_msg_data
1833: );
1834:
1835: EXCEPTION
1836: WHEN FND_API.G_EXC_ERROR THEN
1837:
1838: ROLLBACK TO unlock_all_grants;
1839: x_return_status := FND_API.G_RET_STS_ERROR;
1840: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,

Line 1839: x_return_status := FND_API.G_RET_STS_ERROR;

1835: EXCEPTION
1836: WHEN FND_API.G_EXC_ERROR THEN
1837:
1838: ROLLBACK TO unlock_all_grants;
1839: x_return_status := FND_API.G_RET_STS_ERROR;
1840: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
1841: p_data => x_msg_data );
1842:
1843: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1843: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1839: x_return_status := FND_API.G_RET_STS_ERROR;
1840: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
1841: p_data => x_msg_data );
1842:
1843: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1844:
1845: ROLLBACK TO unlock_all_grants;
1846: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1847: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,

Line 1846: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1842:
1843: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1844:
1845: ROLLBACK TO unlock_all_grants;
1846: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1847: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1848: p_data => x_msg_data );
1849:
1850: WHEN OTHERS THEN

Line 1853: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1849:
1850: WHEN OTHERS THEN
1851:
1852: ROLLBACK TO unlock_all_grants;
1853: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1854:
1855: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
1856: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1857: END IF;

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

1861: END unlock_all_grants;
1862:
1863: PROCEDURE lock_all_grants(
1864: p_api_version IN NUMBER,
1865: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1866: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1867: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1868: p_conc_program_flag IN VARCHAR2 := FND_API.G_FALSE,
1869: p_obj_group_id IN NUMBER,

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

1862:
1863: PROCEDURE lock_all_grants(
1864: p_api_version IN NUMBER,
1865: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1866: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1867: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1868: p_conc_program_flag IN VARCHAR2 := FND_API.G_FALSE,
1869: p_obj_group_id IN NUMBER,
1870: x_return_status OUT NOCOPY VARCHAR2,

Line 1867: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,

1863: PROCEDURE lock_all_grants(
1864: p_api_version IN NUMBER,
1865: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1866: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1867: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1868: p_conc_program_flag IN VARCHAR2 := FND_API.G_FALSE,
1869: p_obj_group_id IN NUMBER,
1870: x_return_status OUT NOCOPY VARCHAR2,
1871: x_msg_count OUT NOCOPY NUMBER,

Line 1868: p_conc_program_flag IN VARCHAR2 := FND_API.G_FALSE,

1864: p_api_version IN NUMBER,
1865: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1866: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1867: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_NONE,
1868: p_conc_program_flag IN VARCHAR2 := FND_API.G_FALSE,
1869: p_obj_group_id IN NUMBER,
1870: x_return_status OUT NOCOPY VARCHAR2,
1871: x_msg_count OUT NOCOPY NUMBER,
1872: x_msg_data OUT NOCOPY VARCHAR2

Line 1895: IF NOT FND_API.Compatible_API_Call (l_api_version,

1891: -- Standard Start of API savepoint
1892: SAVEPOINT lock_all_grants;
1893:
1894: -- Standard call to check for call compatibility.
1895: IF NOT FND_API.Compatible_API_Call (l_api_version,
1896: p_api_version,
1897: l_api_name,
1898: G_PKG_NAME)
1899: THEN

Line 1900: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1896: p_api_version,
1897: l_api_name,
1898: G_PKG_NAME)
1899: THEN
1900: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1901: END IF;
1902:
1903: -- Initialize message list if p_init_msg_list is set to TRUE.
1904:

Line 1905: x_return_status := FND_API.G_RET_STS_SUCCESS;

1901: END IF;
1902:
1903: -- Initialize message list if p_init_msg_list is set to TRUE.
1904:
1905: x_return_status := FND_API.G_RET_STS_SUCCESS;
1906:
1907: IF FND_API.to_Boolean (p_init_msg_list) THEN
1908: FND_MSG_PUB.initialize;
1909: END IF;

Line 1907: IF FND_API.to_Boolean (p_init_msg_list) THEN

1903: -- Initialize message list if p_init_msg_list is set to TRUE.
1904:
1905: x_return_status := FND_API.G_RET_STS_SUCCESS;
1906:
1907: IF FND_API.to_Boolean (p_init_msg_list) THEN
1908: FND_MSG_PUB.initialize;
1909: END IF;
1910:
1911: -- API body

Line 1922: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1918: p_grant_id => c_grants_rec.grant_id,
1919: x_return_status => l_return_status,
1920: x_return_message => l_msg_data );
1921:
1922: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1923: raise FND_API.G_EXC_ERROR;
1924: END IF;
1925:
1926: END LOOP;

Line 1923: raise FND_API.G_EXC_ERROR;

1919: x_return_status => l_return_status,
1920: x_return_message => l_msg_data );
1921:
1922: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1923: raise FND_API.G_EXC_ERROR;
1924: END IF;
1925:
1926: END LOOP;
1927:

Line 1932: IF FND_API.To_Boolean( p_commit ) THEN

1928:
1929: -- End of API body.
1930: -- Standard check of p_commit.
1931:
1932: IF FND_API.To_Boolean( p_commit ) THEN
1933: COMMIT WORK;
1934: END IF;
1935:
1936: -- Standard call to get message count and if count is 1, get message info.

Line 1943: WHEN FND_API.G_EXC_ERROR THEN

1939: p_data => x_msg_data
1940: );
1941:
1942: EXCEPTION
1943: WHEN FND_API.G_EXC_ERROR THEN
1944:
1945: ROLLBACK TO lock_all_grants;
1946: x_return_status := FND_API.G_RET_STS_ERROR;
1947: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,

Line 1946: x_return_status := FND_API.G_RET_STS_ERROR;

1942: EXCEPTION
1943: WHEN FND_API.G_EXC_ERROR THEN
1944:
1945: ROLLBACK TO lock_all_grants;
1946: x_return_status := FND_API.G_RET_STS_ERROR;
1947: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
1948: p_data => x_msg_data );
1949:
1950: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1950: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1946: x_return_status := FND_API.G_RET_STS_ERROR;
1947: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
1948: p_data => x_msg_data );
1949:
1950: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1951:
1952: ROLLBACK TO lock_all_grants;
1953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1954: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,

Line 1953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1949:
1950: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1951:
1952: ROLLBACK TO lock_all_grants;
1953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1954: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1955: p_data => x_msg_data );
1956:
1957: WHEN OTHERS THEN

Line 1960: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1956:
1957: WHEN OTHERS THEN
1958:
1959: ROLLBACK TO lock_all_grants;
1960: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1961:
1962: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
1963: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1964: END IF;