223: OPEN C;
224: FETCH C INTO Recinfo;
225: If (C%NOTFOUND) then
226: CLOSE C;
227: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
228: APP_EXCEPTION.RAISE_EXCEPTION;
229: End If;
230: CLOSE C;
231: if (
295: AND ( x_STATUS = NULL )))
296: ) then
297: return;
298: else
299: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
300: APP_EXCEPTION.RAISE_EXCEPTION;
301: End If;
302: END Lock_Row;
303:
354: WHERE person_interest_id = x_person_interest_id;
355:
356: EXCEPTION
357: WHEN NO_DATA_FOUND THEN
358: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
359: --2890664, Changed this message token
360: FND_MESSAGE.SET_TOKEN('RECORD', 'PERSON_INTEREST_REC');
361: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(x_person_interest_id));
362: FND_MSG_PUB.ADD;
356: EXCEPTION
357: WHEN NO_DATA_FOUND THEN
358: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
359: --2890664, Changed this message token
360: FND_MESSAGE.SET_TOKEN('RECORD', 'PERSON_INTEREST_REC');
361: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(x_person_interest_id));
362: FND_MSG_PUB.ADD;
363: RAISE FND_API.G_EXC_ERROR;
364:
357: WHEN NO_DATA_FOUND THEN
358: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
359: --2890664, Changed this message token
360: FND_MESSAGE.SET_TOKEN('RECORD', 'PERSON_INTEREST_REC');
361: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(x_person_interest_id));
362: FND_MSG_PUB.ADD;
363: RAISE FND_API.G_EXC_ERROR;
364:
365: END Select_Row;