29: FETCH chk_duplicates INTO dummy;
30:
31: IF chk_duplicates%FOUND THEN
32: CLOSE chk_duplicates;
33: fnd_message.set_name('SQLGL', 'GL_DUPLICATE_AUTOPOST_COMBO');
34: app_exception.raise_exception;
35: END IF;
36:
37: CLOSE chk_duplicates;
39: EXCEPTION
40: WHEN app_exceptions.application_exception THEN
41: RAISE;
42: WHEN OTHERS THEN
43: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
44: fnd_message.set_token('PROCEDURE',
45: 'gl_autopost_options_pkg.check_unique');
46: RAISE;
47: END check_unique;
40: WHEN app_exceptions.application_exception THEN
41: RAISE;
42: WHEN OTHERS THEN
43: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
44: fnd_message.set_token('PROCEDURE',
45: 'gl_autopost_options_pkg.check_unique');
46: RAISE;
47: END check_unique;
48:
267: AND (X_Context IS NULL)))
268: ) then
269: return;
270: else
271: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
272: APP_EXCEPTION.RAISE_EXCEPTION;
273: end if;
274: END Lock_Row;
275: