84: --
85: --
86:
87:
88: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
89:
90: IF (X_Org_Carrier_site_id is NULL) THEN
91: OPEN C_Next_id;
92: FETCH C_Next_id INTO l_Org_Carrier_site_Id;
202: WHERE rowid = x_rowid;
203:
204: IF (SQL%NOTFOUND) THEN
205: RAISE NO_DATA_FOUND;
206: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
207: END IF;
208:
209: END IF;
210:
224: x_position := l_position;
225: x_procedure := l_procedure;
226: x_sqlerr := sqlerrm;
227: x_sql_code := sqlcode;
228: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
229:
230: --
231: -- Debug Statements
232: --
241: x_position := l_position;
242: x_procedure := l_procedure;
243: x_sqlerr := sqlerrm;
244: x_sql_code := sqlcode;
245: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
246:
247: --
248: -- Debug Statements
249: --
295: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
296: END IF;
297: --
298:
299: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
300:
301: IF (p_rowid is not null) THEN
302: OPEN C_lock_row;
303: FETCH C_lock_row INTO Recinfo;
304:
305: IF (C_lock_row%NOTFOUND) THEN
306: CLOSE C_lock_row;
307: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
308: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
309: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
310:
311: --
312: IF l_debug_on THEN
305: IF (C_lock_row%NOTFOUND) THEN
306: CLOSE C_lock_row;
307: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
308: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
309: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
310:
311: --
312: IF l_debug_on THEN
313: WSH_DEBUG_SV.pop(l_module_name,'x_return_status');
395: --
396:
397: EXCEPTION
398: WHEN others THEN
399: x_Return_Status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
400: WSH_UTIL_CORE.Default_Handler('WSH_ORG_CARRIER_SITES_PKG.Lock_Org_Carrier_Site',l_module_name);
401:
402: --
403: IF l_debug_on THEN
396:
397: EXCEPTION
398: WHEN others THEN
399: x_Return_Status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
400: WSH_UTIL_CORE.Default_Handler('WSH_ORG_CARRIER_SITES_PKG.Lock_Org_Carrier_Site',l_module_name);
401:
402: --
403: IF l_debug_on THEN
404: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);