137: OPEN c_lock_role_privilege;
138: FETCH c_lock_role_privilege INTO l_db_rec;
139: IF c_lock_role_privilege%NOTFOUND THEN
140: CLOSE c_lock_role_privilege;
141: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
142: IF l_debug_on THEN
143: WSH_DEBUG_SV.log(l_module_name,'FORM_RECORD_DELETED');
144: END IF;
145: app_exception.raise_exception;
162: END IF;
163: --
164: RETURN;
165: ELSE
166: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
167: IF l_debug_on THEN
168: WSH_DEBUG_SV.log(l_module_name,'FORM_RECORD_CHANGED');
169: END IF;
170: app_exception.raise_exception;
194: if (c_lock_role_privilege%ISOPEN) then
195: close c_lock_role_privilege;
196: end if;
197:
198: FND_MESSAGE.SET_NAME('WSH','WSH_UNEXP_ERROR');
199: FND_MESSAGE.Set_Token('PACKAGE', 'WSH_RU_ROLE_PRIVILEGES_PVT.LOCK_ROW');
200: FND_MESSAGE.Set_Token('ORA_ERROR',sqlcode);
201: FND_MESSAGE.Set_Token('ORA_TEXT',sqlerrm);
202: --
195: close c_lock_role_privilege;
196: end if;
197:
198: FND_MESSAGE.SET_NAME('WSH','WSH_UNEXP_ERROR');
199: FND_MESSAGE.Set_Token('PACKAGE', 'WSH_RU_ROLE_PRIVILEGES_PVT.LOCK_ROW');
200: FND_MESSAGE.Set_Token('ORA_ERROR',sqlcode);
201: FND_MESSAGE.Set_Token('ORA_TEXT',sqlerrm);
202: --
203: IF l_debug_on THEN
196: end if;
197:
198: FND_MESSAGE.SET_NAME('WSH','WSH_UNEXP_ERROR');
199: FND_MESSAGE.Set_Token('PACKAGE', 'WSH_RU_ROLE_PRIVILEGES_PVT.LOCK_ROW');
200: FND_MESSAGE.Set_Token('ORA_ERROR',sqlcode);
201: FND_MESSAGE.Set_Token('ORA_TEXT',sqlerrm);
202: --
203: IF l_debug_on THEN
204: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
197:
198: FND_MESSAGE.SET_NAME('WSH','WSH_UNEXP_ERROR');
199: FND_MESSAGE.Set_Token('PACKAGE', 'WSH_RU_ROLE_PRIVILEGES_PVT.LOCK_ROW');
200: FND_MESSAGE.Set_Token('ORA_ERROR',sqlcode);
201: FND_MESSAGE.Set_Token('ORA_TEXT',sqlerrm);
202: --
203: IF l_debug_on THEN
204: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
205: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');