DBA Data[Home] [Help]

APPS.GL_ACCESS_SETS_PKG dependencies on GL_ACCESS_SETS

Line 1: PACKAGE BODY gl_access_sets_pkg AS

1: PACKAGE BODY gl_access_sets_pkg AS
2: /* $Header: glistaxb.pls 120.9 2005/05/05 01:22:42 kvora ship $ */
3:
4: --
5: -- Procedure

Line 15: PROCEDURE select_row(recinfo IN OUT NOCOPY gl_access_sets%ROWTYPE) IS

11: -- Arguments
12: -- recinfo Varies information about the row
13: -- Notes
14: --
15: PROCEDURE select_row(recinfo IN OUT NOCOPY gl_access_sets%ROWTYPE) IS
16: BEGIN
17: SELECT *
18: INTO recinfo
19: FROM gl_access_sets

Line 19: FROM gl_access_sets

15: PROCEDURE select_row(recinfo IN OUT NOCOPY gl_access_sets%ROWTYPE) IS
16: BEGIN
17: SELECT *
18: INTO recinfo
19: FROM gl_access_sets
20: WHERE access_set_id = recinfo.access_set_id;
21: END select_row;
22:
23: --

Line 29: SELECT GL_ACCESS_SETS_S.NEXTVAL

25: --
26:
27: FUNCTION get_unique_id RETURN NUMBER IS
28: CURSOR get_new_id IS
29: SELECT GL_ACCESS_SETS_S.NEXTVAL
30: FROM dual;
31: new_id NUMBER;
32: BEGIN
33: OPEN get_new_id;

Line 42: fnd_message.set_token('SEQUENCE', 'GL_ACCESS_SETS_S');

38: RETURN (new_id);
39: ELSE
40: CLOSE get_new_id;
41: fnd_message.set_name('SQLGL', 'GL_ERROR_GETTING_UNIQUE_ID');
42: fnd_message.set_token('SEQUENCE', 'GL_ACCESS_SETS_S');
43: app_exception.raise_exception;
44: END IF;
45:
46: EXCEPTION

Line 51: fnd_message.set_token('PROCEDURE', 'gl_access_sets_pkg.get_unique_id');

47: WHEN app_exceptions.application_exception THEN
48: RAISE;
49: WHEN OTHERS THEN
50: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
51: fnd_message.set_token('PROCEDURE', 'gl_access_sets_pkg.get_unique_id');
52: RAISE;
53: END get_unique_id;
54:
55: FUNCTION has_details_in_db (X_Access_Set_Id NUMBER) RETURN BOOLEAN IS

Line 96: FROM GL_ACCESS_SETS

92: BEGIN
93: SELECT default_ledger_id, last_updated_by,
94: last_update_login, last_update_date
95: INTO def_ledger_id, updated_by, update_login, update_date
96: FROM GL_ACCESS_SETS
97: WHERE access_set_id = X_Access_Set_ID;
98:
99: OPEN default_ledger_assign(def_ledger_id);
100: FETCH default_ledger_assign INTO dumnum;

Line 188: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'gl_access_sets_pkg.get_value_set_id');

184: WHEN APP_EXCEPTION.APPLICATION_EXCEPTION THEN
185: RAISE;
186: WHEN OTHERS THEN
187: FND_MESSAGE.SET_NAME('SQLGL', 'GL_UNHANDLED_EXCEPTION');
188: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'gl_access_sets_pkg.get_value_set_id');
189: RAISE;
190: END get_value_set_id;
191:
192: PROCEDURE select_columns(X_access_set_id NUMBER,

Line 199: recinfo gl_access_sets%ROWTYPE;

195: X_coa_id IN OUT NOCOPY NUMBER,
196: X_period_set_name IN OUT NOCOPY VARCHAR2,
197: X_accounted_period_type IN OUT NOCOPY VARCHAR2,
198: X_auto_created_flag IN OUT NOCOPY VARCHAR2) IS
199: recinfo gl_access_sets%ROWTYPE;
200: BEGIN
201: recinfo.access_set_id := X_access_set_id;
202: select_row(recinfo);
203:

Line 229: X_Access_Set_Id := GL_ACCESS_SETS_PKG.get_unique_id;

225: X_Access_Set_Id NUMBER(15) := null;
226: X_Row_Id ROWID := null;
227: BEGIN
228: -- Get unique access set id
229: X_Access_Set_Id := GL_ACCESS_SETS_PKG.get_unique_id;
230:
231: -- Create an implicit access set header for the corresponding new created ledger.
232: GL_ACCESS_SETS_PKG.Insert_Row(
233: X_Row_Id,

Line 232: GL_ACCESS_SETS_PKG.Insert_Row(

228: -- Get unique access set id
229: X_Access_Set_Id := GL_ACCESS_SETS_PKG.get_unique_id;
230:
231: -- Create an implicit access set header for the corresponding new created ledger.
232: GL_ACCESS_SETS_PKG.Insert_Row(
233: X_Row_Id,
234: X_Access_Set_Id,
235: X_Name,
236: X_Security_Segment_Code,

Line 262: UPDATE GL_ACCESS_SETS

258: IS
259: BEGIN
260: -- Update the name of an implicit access set header when it is updated
261: -- for the corresponding ledger.
262: UPDATE GL_ACCESS_SETS
263: SET
264: name = X_Name,
265: last_update_date = X_Last_Update_Date,
266: last_updated_by = X_Last_Updated_By,

Line 309: FROM GL_ACCESS_SETS

305: X_Attribute15 VARCHAR2 DEFAULT NULL
306: ) IS
307: CURSOR C IS
308: SELECT rowid
309: FROM GL_ACCESS_SETS
310: WHERE access_set_id = X_Access_Set_Id;
311: BEGIN
312: INSERT INTO GL_ACCESS_SETS (
313: access_set_id,

Line 312: INSERT INTO GL_ACCESS_SETS (

308: SELECT rowid
309: FROM GL_ACCESS_SETS
310: WHERE access_set_id = X_Access_Set_Id;
311: BEGIN
312: INSERT INTO GL_ACCESS_SETS (
313: access_set_id,
314: name,
315: security_segment_code,
316: enabled_flag,

Line 423: UPDATE GL_ACCESS_SETS

419: X_Attribute14 VARCHAR2 DEFAULT NULL,
420: X_Attribute15 VARCHAR2 DEFAULT NULL
421: ) IS
422: BEGIN
423: UPDATE GL_ACCESS_SETS
424: SET
425: access_set_id = X_Access_Set_Id,
426: name = X_Name,
427: security_segment_code = X_Security_Segment_Code,

Line 496: FROM GL_ACCESS_SETS

492: X_Attribute15 VARCHAR2 DEFAULT NULL
493: ) IS
494: CURSOR C IS
495: SELECT *
496: FROM GL_ACCESS_SETS
497: WHERE rowid = X_Rowid
498: FOR UPDATE of Access_Set_Id NOWAIT;
499: Recinfo C%ROWTYPE;
500: BEGIN

Line 616: END gl_access_sets_pkg;

612: end if;
613:
614: END Lock_Row;
615:
616: END gl_access_sets_pkg;