29:
30: IF c_dup%FOUND THEN
31: CLOSE c_dup;
32: fnd_message.set_name( 'SQLGL', 'GL_DUPLICATE_REC_RULE' );
33: app_exception.raise_exception;
34: END IF;
35:
36: CLOSE c_dup;
37:
35:
36: CLOSE c_dup;
37:
38: EXCEPTION
39: WHEN app_exceptions.application_exception THEN
40: RAISE;
41: WHEN OTHERS THEN
42: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
43: fnd_message.set_token('PROCEDURE',
58: WHERE r.recurring_header_id = x_header_id
59: AND r.recurring_line_num = x_old_line_num;
60:
61: EXCEPTION
62: WHEN app_exceptions.application_exception THEN
63: RAISE;
64: WHEN OTHERS THEN
65: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
66: fnd_message.set_token('PROCEDURE',
503: WHERE RECURRING_HEADER_ID = x_header_id
504: AND RECURRING_LINE_NUM = x_line_num;
505:
506: EXCEPTION
507: WHEN app_exceptions.application_exception THEN
508: RAISE;
509: WHEN OTHERS THEN
510: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
511: fnd_message.set_token('PROCEDURE',
780: FETCH C INTO Recinfo;
781: if (C%NOTFOUND) then
782: CLOSE C;
783: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
784: APP_EXCEPTION.Raise_Exception;
785: end if;
786: CLOSE C;
787: if (
788:
931: ) then
932: return;
933: else
934: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
935: APP_EXCEPTION.Raise_Exception;
936: end if;
937: END Lock_Row;
938:
939: