49: OPEN C;
50: FETCH C INTO Recinfo;
51: if (C%NOTFOUND) then
52: CLOSE C;
53: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
54: APP_EXCEPTION.Raise_Exception;
55: end if;
56: CLOSE C;
57: if (
114: AND (X_Context IS NULL)))
115: ) then
116: return;
117: else
118: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
119: APP_EXCEPTION.Raise_Exception;
120: end if;
121: END Lock_Row;
122:
230: CLOSE c_dup;
231:
232: EXCEPTION
233: WHEN OTHERS THEN
234: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
235: fnd_message.set_token('PROCEDURE',
236: 'GL_JE_CATEGORIES_PKG.insert_reversal_cat');
237: RAISE;
238:
231:
232: EXCEPTION
233: WHEN OTHERS THEN
234: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
235: fnd_message.set_token('PROCEDURE',
236: 'GL_JE_CATEGORIES_PKG.insert_reversal_cat');
237: RAISE;
238:
239: END insert_reversal_cat;
288:
289:
290: EXCEPTION
291: WHEN OTHERS THEN
292: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
293: fnd_message.set_token('PROCEDURE',
294: 'GL_AUTOREVERSE_OPTIONS_PKG.insert_ledger_reversal_cat');
295: RAISE;
296:
289:
290: EXCEPTION
291: WHEN OTHERS THEN
292: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
293: fnd_message.set_token('PROCEDURE',
294: 'GL_AUTOREVERSE_OPTIONS_PKG.insert_ledger_reversal_cat');
295: RAISE;
296:
297: END insert_criteria_reversal_cat;