DBA Data[Home] [Help]

APPS.GL_ELIMINATION_JOURNALS_PKG dependencies on GL_ELIMINATION_JOURNALS

Line 1: PACKAGE BODY gl_elimination_journals_pkg As

1: PACKAGE BODY gl_elimination_journals_pkg As
2: /* $Header: gliejoub.pls 120.3 2005/05/05 01:06:58 kvora ship $ */
3:
4: ---
5: --- PRIVATE VARIABLES

Line 15: -- Returns nextval from gl_elimination_journals_s

11:
12: -- Function
13: -- get_unique_id
14: -- Purpose
15: -- Returns nextval from gl_elimination_journals_s
16: -- Parameters
17: -- None
18: -- Notes
19: --

Line 23: SELECT gl_elimination_journals_s.NEXTVAL

19: --
20: FUNCTION get_unique_id RETURN NUMBER IS
21:
22: CURSOR get_new_id IS
23: SELECT gl_elimination_journals_s.NEXTVAL
24: FROM dual;
25: new_id number;
26:
27: BEGIN

Line 37: fnd_message.set_token('SEQUENCE', 'GL_ELIMINATION_JOURNALS_S');

33: return(new_id);
34: ELSE
35: CLOSE get_new_id;
36: fnd_message.set_name('SQLGL', 'GL_ERROR_GETTING_UNIQUE_ID');
37: fnd_message.set_token('SEQUENCE', 'GL_ELIMINATION_JOURNALS_S');
38: app_exception.raise_exception;
39: END IF;
40:
41: EXCEPTION

Line 50: 'gl_elimination_journals_pkg.get_unique_id');

46: WHEN OTHERS THEN
47: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
48: fnd_message.set_token(
49: 'PROCEDURE',
50: 'gl_elimination_journals_pkg.get_unique_id');
51: RAISE;
52: END get_unique_id;
53:
54:

Line 110: FROM gl_elimination_journals

106: CURSOR name_count IS
107: SELECT 1
108: FROM DUAL
109: WHERE EXISTS (SELECT 1
110: FROM gl_elimination_journals
111: WHERE journal_name = X_name
112: AND elimination_set_id = X_setid
113: AND ((X_rowid IS NULL) OR (rowid <> X_rowid)));
114: BEGIN

Line 139: End gl_elimination_journals_pkg;

135: 'gl_elimination_sets_pkg.check_unique_name');
136: RAISE;
137: END check_unique_name;
138:
139: End gl_elimination_journals_pkg;