APPS.GL_ALLOC_BATCHES_PKG dependencies on GL_ALLOC_BATCHES

Line 1: PACKAGE BODY gl_alloc_batches_pkg AS

1: PACKAGE BODY gl_alloc_batches_pkg AS
2: /* $Header: glimabab.pls 120.5 2005/05/05 01:11:27 kvora ship $ */
3:
4: --
5: -- PUBLIC FUNCTIONS

Line 11: FROM GL_ALLOC_BATCHES gab

7:
8: PROCEDURE check_unique(batch_name VARCHAR2, row_id VARCHAR2, coa_id NUMBER) IS
9: CURSOR chk_duplicates is
10: SELECT 'Duplicate'
11: FROM GL_ALLOC_BATCHES gab
12: WHERE gab.name = batch_name
13: AND ( row_id is null
14: OR gab.rowid <> row_id)
15: AND gab.chart_of_accounts_id = coa_id;

Line 34: fnd_message.set_token('PROCEDURE', 'gl_alloc_batches_pkg.check_unique');

30: WHEN app_exceptions.application_exception THEN
31: RAISE;
32: WHEN OTHERS THEN
33: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
34: fnd_message.set_token('PROCEDURE', 'gl_alloc_batches_pkg.check_unique');
35: RAISE;
36: END check_unique;
37:
38: FUNCTION get_unique_id RETURN NUMBER IS

Line 40: SELECT gl_alloc_batches_s.NEXTVAL

36: END check_unique;
37:
38: FUNCTION get_unique_id RETURN NUMBER IS
39: CURSOR get_new_id IS
40: SELECT gl_alloc_batches_s.NEXTVAL
41: FROM dual;
42: new_id number;
43: BEGIN
44: OPEN get_new_id;

Line 53: fnd_message.set_token('SEQUENCE', 'GL_ALLOC_BATCHES_S');

49: return(new_id);
50: ELSE
51: CLOSE get_new_id;
52: fnd_message.set_name('SQLGL', 'GL_ERROR_GETTING_UNIQUE_ID');
53: fnd_message.set_token('SEQUENCE', 'GL_ALLOC_BATCHES_S');
54: app_exception.raise_exception;
55: END IF;
56:
57: EXCEPTION

Line 62: fnd_message.set_token('PROCEDURE', 'gl_alloc_batches_pkg.get_unique_id');

58: WHEN app_exceptions.application_exception THEN
59: RAISE;
60: WHEN OTHERS THEN
61: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
62: fnd_message.set_token('PROCEDURE', 'gl_alloc_batches_pkg.get_unique_id');
63: RAISE;
64: END get_unique_id;
65:
66: PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,

Line 79: CURSOR C IS SELECT rowid FROM GL_ALLOC_BATCHES

75: X_Created_By NUMBER,
76: X_Last_Update_Login NUMBER,
77: X_Description VARCHAR2
78: ) IS
79: CURSOR C IS SELECT rowid FROM GL_ALLOC_BATCHES
80: WHERE allocation_batch_id = X_Allocation_Batch_Id;
81:
82: BEGIN
83:

Line 86: x_allocation_batch_id := gl_alloc_batches_pkg.get_unique_id;

82: BEGIN
83:
84: -- Get batch id if it was not provided
85: IF (X_allocation_batch_id IS NULL) THEN
86: x_allocation_batch_id := gl_alloc_batches_pkg.get_unique_id;
87: END IF;
88:
89: INSERT INTO GL_ALLOC_BATCHES(
90: allocation_batch_id,

Line 89: INSERT INTO GL_ALLOC_BATCHES(

85: IF (X_allocation_batch_id IS NULL) THEN
86: x_allocation_batch_id := gl_alloc_batches_pkg.get_unique_id;
87: END IF;
88:
89: INSERT INTO GL_ALLOC_BATCHES(
90: allocation_batch_id,
91: name,
92: chart_of_accounts_id,
93: validation_status,

Line 140: FROM GL_ALLOC_BATCHES

136:
137: ) IS
138: CURSOR C IS
139: SELECT *
140: FROM GL_ALLOC_BATCHES
141: WHERE rowid = X_Rowid
142: FOR UPDATE of Allocation_Batch_Id NOWAIT;
143: Recinfo C%ROWTYPE;
144: BEGIN

Line 186: UPDATE GL_ALLOC_BATCHES

182: X_Description VARCHAR2
183:
184: ) IS
185: BEGIN
186: UPDATE GL_ALLOC_BATCHES
187: SET
188: allocation_batch_id = X_Allocation_Batch_Id,
189: name = X_Name,
190: chart_of_accounts_id = X_Chart_Of_Accounts_Id,

Line 229: DELETE FROM GL_ALLOC_BATCHES

225: -- Delete all of the associated formulas
226: gl_alloc_formulas_pkg.delete_rows(
227: allocation_batch_id);
228:
229: DELETE FROM GL_ALLOC_BATCHES
230: WHERE rowid = X_Rowid;
231:
232: if (SQL%NOTFOUND) then
233: Raise NO_DATA_FOUND;

Line 408: 'GL_ALLOC_BATCHES_PKG.Autocopy');

404: RAISE;
405: WHEN OTHERS THEN
406: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
407: fnd_message.set_token('PROCEDURE',
408: 'GL_ALLOC_BATCHES_PKG.Autocopy');
409: RAISE;
410:
411: END Autocopy;
412:

Line 435: END gl_alloc_batches_pkg;

431: END IF;
432:
433: END check_batch;
434:
435: END gl_alloc_batches_pkg;