1: PACKAGE BODY IGW_PROP_USER_ROLES_PVT as
2: /* $Header: igwvpurb.pls 115.8 2002/11/18 19:20:06 ashkumar ship $*/
3: PROCEDURE create_prop_user_role (
4: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
5: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
141: END IF;
142:
143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
144:
145: fnd_msg_pub.add_exc_msg(p_pkg_name => 'IGW_PROP_USER_ROLES_PVT',
146: p_procedure_name => 'CREATE_USER_ROLE',
147: p_error_text => SUBSTRB(SQLERRM,1,240));
148:
149: fnd_msg_pub.count_and_get(p_count => x_msg_count,
323: END IF;
324:
325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
326:
327: fnd_msg_pub.add_exc_msg(p_pkg_name => 'IGW_PROP_USER_ROLES_PVT',
328: p_procedure_name => 'UPDATE_USER_ROLE',
329: p_error_text => SUBSTRB(SQLERRM,1,240));
330:
331: fnd_msg_pub.count_and_get(p_count => x_msg_count,
446: END IF;
447:
448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
449:
450: fnd_msg_pub.add_exc_msg(p_pkg_name => 'IGW_PROP_USER_ROLES_PVT',
451: p_procedure_name => 'DELETE_USER_ROLE',
452: p_error_text => SUBSTRB(SQLERRM,1,240));
453:
454: fnd_msg_pub.count_and_get(p_count => x_msg_count,
490: NULL;
491:
492: WHEN OTHERS THEN
493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
494: fnd_msg_pub.add_exc_msg(p_pkg_name => 'IGW_PROP_USER_ROLES_PVT',
495: p_procedure_name => 'VALIDATE_LOGGED_USER_RIGHTS',
496: p_error_text => SUBSTRB(SQLERRM,1,240));
497: raise fnd_api.g_exc_unexpected_error;
498: END VALIDATE_LOGGED_USER_RIGHTS;
521: raise fnd_api.g_exc_error;
522:
523: WHEN OTHERS THEN
524: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
525: fnd_msg_pub.add_exc_msg(p_pkg_name => 'IGW_PROP_USER_ROLES_PVT',
526: p_procedure_name => 'CHECK_LOCK_GET_PK',
527: p_error_text => SUBSTRB(SQLERRM,1,240));
528: raise fnd_api.g_exc_unexpected_error;
529:
588:
589: EXCEPTION
590: WHEN OTHERS THEN
591: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
592: fnd_msg_pub.add_exc_msg(p_pkg_name => 'IGW_PROP_USER_ROLES_PVT',
593: p_procedure_name => 'CHECK_IF_SEEDED_ROLE',
594: p_error_text => SUBSTRB(SQLERRM,1,240));
595: raise fnd_api.g_exc_unexpected_error;
596: END CHECK_IF_SEEDED_ROLE;
607:
608: END CHECK_ERRORS;
609:
610:
611: END IGW_PROP_USER_ROLES_PVT;