43: WHERE object_id = p_object_id;
44:
45: IF(SQL%ROWCOUNT > 0)
46: THEN
47: x_return_status := FND_API.G_RET_STS_SUCCESS;
48: x_msg :='Row updated successfully';
49: ELSE
50: x_return_status := FND_API.G_RET_STS_ERROR;
51: x_msg :='Object_id ' ||p_object_id ||' not found ';
46: THEN
47: x_return_status := FND_API.G_RET_STS_SUCCESS;
48: x_msg :='Row updated successfully';
49: ELSE
50: x_return_status := FND_API.G_RET_STS_ERROR;
51: x_msg :='Object_id ' ||p_object_id ||' not found ';
52: END IF;
53:
54: COMMIT;
55:
56: EXCEPTION
57:
58: WHEN NO_DATA_FOUND THEN
59: x_return_status := FND_API.G_RET_STS_ERROR;
60: x_msg :='Object_id ' ||p_object_id ||' not found ';
61:
62:
63: WHEN OTHERS THEN
60: x_msg :='Object_id ' ||p_object_id ||' not found ';
61:
62:
63: WHEN OTHERS THEN
64: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
65: x_msg:=substr(sqlerrm, 1, 255);
66:
67: END freeze_worksheet;
68:
107: AND status = 'LOCKED';
108:
109: IF(SQL%ROWCOUNT > 0)
110: THEN
111: x_return_status := FND_API.G_RET_STS_SUCCESS;
112: x_msg :='Row updated successfully';
113: ELSE
114: x_return_status := FND_API.G_RET_STS_ERROR;
115: x_msg :='No locked worksheet to unfreeze for Object_id ' || p_object_id;
110: THEN
111: x_return_status := FND_API.G_RET_STS_SUCCESS;
112: x_msg :='Row updated successfully';
113: ELSE
114: x_return_status := FND_API.G_RET_STS_ERROR;
115: x_msg :='No locked worksheet to unfreeze for Object_id ' || p_object_id;
116: END IF;
117:
118: COMMIT;
119:
120: EXCEPTION
121:
122: WHEN NO_DATA_FOUND THEN
123: x_return_status := FND_API.G_RET_STS_ERROR;
124: x_msg :='Object_id ' ||p_object_id ||' not found ';
125:
126: WHEN OTHERS THEN
127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
123: x_return_status := FND_API.G_RET_STS_ERROR;
124: x_msg :='Object_id ' ||p_object_id ||' not found ';
125:
126: WHEN OTHERS THEN
127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
128: x_msg:=substr(sqlerrm, 1, 255);
129:
130: END unfreeze_worksheet;
131:
165: WHERE object_id = p_object_id;
166:
167: IF(SQL%ROWCOUNT > 0)
168: THEN
169: x_return_status := FND_API.G_RET_STS_SUCCESS;
170: x_msg :='Row updated successfully';
171: ELSE
172: x_return_status := FND_API.G_RET_STS_ERROR;
173: x_msg :='Object_id ' ||p_object_id ||' not found ';
168: THEN
169: x_return_status := FND_API.G_RET_STS_SUCCESS;
170: x_msg :='Row updated successfully';
171: ELSE
172: x_return_status := FND_API.G_RET_STS_ERROR;
173: x_msg :='Object_id ' ||p_object_id ||' not found ';
174: END IF;
175:
176: COMMIT;
177:
178: EXCEPTION
179:
180: WHEN OTHERS THEN
181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
182: x_msg:=substr(sqlerrm, 1, 255);
183:
184: END refresh_worksheet;
185: