170: AND object_version_number = p_object_version_number;
171:
172: IF (SQL%NOTFOUND) THEN
173: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
174: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
175: FND_MSG_PUB.add;
176: END IF;
177: RAISE FND_API.g_exc_error;
178: END IF;
189: AND USERENV('LANG') IN (language, source_lang);
190:
191: IF (SQL%NOTFOUND) THEN
192: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
193: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
194: FND_MSG_PUB.add;
195: END IF;
196: RAISE FND_API.g_exc_error;
197: END IF;
223: WHERE PROGRAM_TYPE_ID = p_PROGRAM_TYPE_ID;
224:
225: IF (SQL%NOTFOUND) THEN
226: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
227: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
228: FND_MSG_PUB.add;
229: END IF;
230: RAISE FND_API.g_exc_error;
231: END IF;
235: AND object_version_number = p_object_version_number;
236:
237: IF (SQL%NOTFOUND) THEN
238: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
239: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
240: FND_MSG_PUB.add;
241: END IF;
242: RAISE FND_API.g_exc_error;
243: END IF;
283: OPEN c;
284: FETCH c INTO Recinfo;
285: If (c%NOTFOUND) then
286: CLOSE c;
287: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
288: APP_EXCEPTION.RAISE_EXCEPTION;
289: END IF;
290: CLOSE C;
291: IF (
316: AND ( p_last_update_login IS NULL )))
317: ) THEN
318: RETURN;
319: ELSE
320: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
321: APP_EXCEPTION.RAISE_EXCEPTION;
322: END IF;
323:
324: END Lock_Row;