46: IF l_debug_on THEN
47: WSH_DEBUG_SV.push(l_module_name);
48: END IF;
49: --
50: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
51:
52: OPEN c_dup_role_name;
53: FETCH c_dup_role_name INTO l_dup_id;
54: IF c_dup_role_name%NOTFOUND THEN
108: --
109: EXCEPTION
110: WHEN wsh_duplicate_name THEN
111: FND_MESSAGE.Set_Name('FND', 'FORM_DUPLICATE_KEY_IN_INDEX');
112: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
113: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
114:
115: --
116: -- Debug Statements
109: EXCEPTION
110: WHEN wsh_duplicate_name THEN
111: FND_MESSAGE.Set_Name('FND', 'FORM_DUPLICATE_KEY_IN_INDEX');
112: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
113: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
114:
115: --
116: -- Debug Statements
117: --
120: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DUPLICATE_NAME');
121: END IF;
122: --
123: WHEN others THEN
124: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
125: wsh_util_core.default_handler('WSH_RU_ROLES_PVT.INSERT_ROW');
126:
127: --
128: -- Debug Statements
121: END IF;
122: --
123: WHEN others THEN
124: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
125: wsh_util_core.default_handler('WSH_RU_ROLES_PVT.INSERT_ROW');
126:
127: --
128: -- Debug Statements
129: --
322:
323: IF (SQL%NOTFOUND) THEN
324: RAISE NO_DATA_FOUND;
325: ELSE
326: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
327: END IF;
328:
329: --
330: -- Debug Statements
335: --
336: EXCEPTION
337: WHEN wsh_duplicate_name THEN
338: FND_MESSAGE.Set_Name('FND', 'FORM_DUPLICATE_KEY_IN_INDEX');
339: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
340: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
341:
342: --
343: -- Debug Statements
336: EXCEPTION
337: WHEN wsh_duplicate_name THEN
338: FND_MESSAGE.Set_Name('FND', 'FORM_DUPLICATE_KEY_IN_INDEX');
339: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
340: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
341:
342: --
343: -- Debug Statements
344: --
350: WHEN others THEN
351: IF c_dup_role_name%isopen THEN
352: CLOSE c_dup_role_name;
353: END IF;
354: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
355: wsh_util_core.default_handler('WSH_RU_ROLES_PVT.UPDATE_ROW');
356:
357: --
358: -- Debug Statements
351: IF c_dup_role_name%isopen THEN
352: CLOSE c_dup_role_name;
353: END IF;
354: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
355: wsh_util_core.default_handler('WSH_RU_ROLES_PVT.UPDATE_ROW');
356:
357: --
358: -- Debug Statements
359: --
396: WHERE rowid = p_rowid;
397: IF SQL%NOTFOUND THEN
398: RAISE NO_DATA_FOUND;
399: END IF;
400: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
401:
402: --
403: -- Debug Statements
404: --
407: END IF;
408: --
409: EXCEPTION
410: WHEN others THEN
411: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
412: wsh_util_core.default_handler('WSH_RU_ROLES_PVT.DELETE_ROW');
413:
414: --
415: -- Debug Statements
408: --
409: EXCEPTION
410: WHEN others THEN
411: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
412: wsh_util_core.default_handler('WSH_RU_ROLES_PVT.DELETE_ROW');
413:
414: --
415: -- Debug Statements
416: --