DBA Data[Home] [Help]

APPS.GL_BUDGET_ENTITIES_PKG dependencies on GL_BUDGET_ENTITIES

Line 1: PACKAGE BODY gl_budget_entities_pkg AS

1: PACKAGE BODY gl_budget_entities_pkg AS
2: /* $Header: glibdorb.pls 120.8 2005/05/05 01:01:46 kvora ship $ */
3:
4: --
5: -- PRIVATE FUNCTIONS

Line 18: -- gl_budget_entities_pkg.select_row(recinfo)

14: -- 21-MAR-93 D. J. Ogg Created
15: -- Arguments
16: -- recinfo Various information about the row
17: -- Example
18: -- gl_budget_entities_pkg.select_row(recinfo)
19: -- Notes
20: --
21: PROCEDURE select_row( recinfo IN OUT NOCOPY gl_budget_entities%ROWTYPE) IS
22: BEGIN

Line 21: PROCEDURE select_row( recinfo IN OUT NOCOPY gl_budget_entities%ROWTYPE) IS

17: -- Example
18: -- gl_budget_entities_pkg.select_row(recinfo)
19: -- Notes
20: --
21: PROCEDURE select_row( recinfo IN OUT NOCOPY gl_budget_entities%ROWTYPE) IS
22: BEGIN
23: SELECT *
24: INTO recinfo
25: FROM gl_budget_entities

Line 25: FROM gl_budget_entities

21: PROCEDURE select_row( recinfo IN OUT NOCOPY gl_budget_entities%ROWTYPE) IS
22: BEGIN
23: SELECT *
24: INTO recinfo
25: FROM gl_budget_entities
26: WHERE budget_entity_id = recinfo.budget_entity_id;
27: END SELECT_ROW;
28:
29:

Line 38: FROM GL_BUDGET_ENTITIES be

34: PROCEDURE check_unique(lgr_id NUMBER, org_name VARCHAR2,
35: row_id VARCHAR2) IS
36: CURSOR chk_duplicates is
37: SELECT status_code
38: FROM GL_BUDGET_ENTITIES be
39: WHERE be.ledger_id = lgr_id
40: AND be.name = org_name
41: AND ( row_id is null
42: OR be.rowid <> row_id);

Line 67: 'gl_budget_entities_pkg.check_unique');

63: RAISE;
64: WHEN OTHERS THEN
65: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
66: fnd_message.set_token('PROCEDURE',
67: 'gl_budget_entities_pkg.check_unique');
68: RAISE;
69: END check_unique;
70:
71: FUNCTION check_for_all(lgr_id NUMBER, row_id VARCHAR2) RETURN BOOLEAN IS

Line 74: FROM GL_BUDGET_ENTITIES be, gl_lookups l

70:
71: FUNCTION check_for_all(lgr_id NUMBER, row_id VARCHAR2) RETURN BOOLEAN IS
72: CURSOR check_for_all is
73: SELECT 'Exists'
74: FROM GL_BUDGET_ENTITIES be, gl_lookups l
75: WHERE l.lookup_type = 'LITERAL'
76: AND l.lookup_code = 'ALL'
77: AND upper(be.name) = upper(l.meaning)
78: AND be.ledger_id = lgr_id

Line 100: 'gl_budget_entities_pkg.check_for_all');

96: RAISE;
97: WHEN OTHERS THEN
98: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
99: fnd_message.set_token('PROCEDURE',
100: 'gl_budget_entities_pkg.check_for_all');
101: RAISE;
102: END check_for_all;
103:
104: FUNCTION has_ranges(org_id NUMBER) RETURN BOOLEAN IS

Line 128: 'gl_budget_entities_pkg.has_ranges');

124: RAISE;
125: WHEN OTHERS THEN
126: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
127: fnd_message.set_token('PROCEDURE',
128: 'gl_budget_entities_pkg.has_ranges');
129: RAISE;
130: END has_ranges;
131:
132: FUNCTION get_unique_id RETURN NUMBER IS

Line 134: SELECT gl_budget_entities_s.NEXTVAL

130: END has_ranges;
131:
132: FUNCTION get_unique_id RETURN NUMBER IS
133: CURSOR get_new_id IS
134: SELECT gl_budget_entities_s.NEXTVAL
135: FROM dual;
136: new_id number;
137: BEGIN
138: OPEN get_new_id;

Line 147: fnd_message.set_token('SEQUENCE', 'GL_BUDGET_ENTITIES_S');

143: return(new_id);
144: ELSE
145: CLOSE get_new_id;
146: fnd_message.set_name('SQLGL', 'GL_ERROR_GETTING_UNIQUE_ID');
147: fnd_message.set_token('SEQUENCE', 'GL_BUDGET_ENTITIES_S');
148: app_exception.raise_exception;
149: END IF;
150:
151: EXCEPTION

Line 157: 'gl_budget_entities_pkg.get_unique_id');

153: RAISE;
154: WHEN OTHERS THEN
155: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
156: fnd_message.set_token('PROCEDURE',
157: 'gl_budget_entities_pkg.get_unique_id');
158: RAISE;
159: END get_unique_id;
160:
161: PROCEDURE lock_organization(org_id NUMBER) IS

Line 164: FROM GL_BUDGET_ENTITIES be

160:
161: PROCEDURE lock_organization(org_id NUMBER) IS
162: CURSOR lock_org is
163: SELECT 'Locked organization'
164: FROM GL_BUDGET_ENTITIES be
165: WHERE be.budget_entity_id = org_id
166: AND not be.status_code = 'D'
167: FOR UPDATE OF status_code;
168: dummy VARCHAR2(100);

Line 186: 'gl_budget_entities_pkg.lock_organization');

182: RAISE;
183: WHEN OTHERS THEN
184: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
185: fnd_message.set_token('PROCEDURE',
186: 'gl_budget_entities_pkg.lock_organization');
187: RAISE;
188: END lock_organization;
189:
190: PROCEDURE select_columns( entity_id NUMBER,

Line 196: recinfo gl_budget_entities%ROWTYPE;

192: password_required_flag IN OUT NOCOPY VARCHAR2,
193: encrypted_password IN OUT NOCOPY VARCHAR2,
194: status_code IN OUT NOCOPY VARCHAR2
195: ) IS
196: recinfo gl_budget_entities%ROWTYPE;
197:
198: BEGIN
199: recinfo.budget_entity_id := entity_id;
200:

Line 230: 'gl_budget_entities_pkg.budget_and_acount_seg_info');

226: RAISE;
227: WHEN OTHERS THEN
228: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
229: fnd_message.set_token('PROCEDURE',
230: 'gl_budget_entities_pkg.budget_and_acount_seg_info');
231: RAISE;
232: END budget_and_account_seg_info;
233:
234: --** Added Security_Flag for Definition Access Set enhancement

Line 295: CURSOR C IS SELECT rowid FROM gl_budget_entities

291: X_All_Name BOOLEAN,
292: X_Chart_Of_Accounts_Id NUMBER,
293: X_Security_Flag VARCHAR2
294: ) IS
295: CURSOR C IS SELECT rowid FROM gl_budget_entities
296: WHERE budget_entity_id = X_Budget_Entity_Id;
297:
298: L_Status_Code VARCHAR2(1);
299:

Line 303: gl_budget_entities_pkg.check_for_all(

299:
300: BEGIN
301: -- Make sure only one ALL organization
302: IF (X_All_Name AND
303: gl_budget_entities_pkg.check_for_all(
304: X_Ledger_Id,
305: X_Rowid)) THEN
306: fnd_message.set_name('SQLGL', 'GL_BUDGET_ONLY_ONE_ALL');
307: app_exception.raise_exception;

Line 337: INSERT INTO gl_budget_entities(

333: X_Last_Updated_By,
334: X_Last_Update_Login);
335:
336:
337: INSERT INTO gl_budget_entities(
338:
339: budget_entity_id,
340: name,
341: ledger_id,

Line 468: 'gl_budget_entities_pkg.insert_row');

464: RAISE;
465: WHEN OTHERS THEN
466: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
467: fnd_message.set_token('PROCEDURE',
468: 'gl_budget_entities_pkg.insert_row');
469: RAISE;
470: END Insert_Row;
471:
472: --** Added Security_Flag for Definition Access Set enhancement

Line 536: gl_budget_entities_pkg.check_for_all(

532: BEGIN
533:
534: -- Make sure only one ALL organization
535: IF (X_All_Name AND
536: gl_budget_entities_pkg.check_for_all(
537: X_Ledger_Id,
538: X_Rowid)) THEN
539: fnd_message.set_name('SQLGL', 'GL_BUDGET_ONLY_ONE_ALL');
540: app_exception.raise_exception;

Line 543: UPDATE gl_budget_entities

539: fnd_message.set_name('SQLGL', 'GL_BUDGET_ONLY_ONE_ALL');
540: app_exception.raise_exception;
541: END IF;
542:
543: UPDATE gl_budget_entities
544: SET
545: budget_entity_id = X_Budget_Entity_Id,
546: name = X_Name,
547: ledger_id = X_Ledger_Id,

Line 610: 'gl_budget_entities_pkg.update_row');

606: RAISE;
607: WHEN OTHERS THEN
608: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
609: fnd_message.set_token('PROCEDURE',
610: 'gl_budget_entities_pkg.update_row');
611: RAISE;
612: END Update_Row;
613:
614: --** Added for Definition Access Set enhancement

Line 720: FROM Gl_Budget_Entities

716: Attribute9,
717: Attribute10,
718: Context,
719: Security_Flag
720: FROM Gl_Budget_Entities
721: WHERE ROWID = X_Rowid
722: FOR UPDATE OF Budget_Entity_Id NOWAIT;
723: recinfo C%ROWTYPE;
724:

Line 1014: GL_BUDGET_ENTITIES_PKG.Insert_Row(

1010: ELSE
1011: L_All_Org := FALSE;
1012: END IF;
1013:
1014: GL_BUDGET_ENTITIES_PKG.Insert_Row(
1015: X_Rowid,
1016: X_Budget_Entity_Id,
1017: X_Name,
1018: X_Ledger_Id,

Line 1080: 'GL_BUDGET_ENTITIES_PKG.Insert_Org');

1076: RAISE;
1077: WHEN OTHERS THEN
1078: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
1079: fnd_message.set_token('PROCEDURE',
1080: 'GL_BUDGET_ENTITIES_PKG.Insert_Org');
1081: RAISE;
1082: END Insert_Org;
1083:
1084:

Line 1123: 'GL_BUDGET_ENTITIES_PKG.Insert_Org');

1119: RAISE;
1120: WHEN OTHERS THEN
1121: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
1122: fnd_message.set_token('PROCEDURE',
1123: 'GL_BUDGET_ENTITIES_PKG.Insert_Org');
1124: RAISE;
1125:
1126: END Submit_Assign_Ranges_Request;
1127:

Line 1160: END gl_budget_entities_pkg;

1156: 'GL_BUDGET_ORG_PKG.Set_BC_Timestamp');
1157: RAISE;
1158: END Set_BC_Timestamp;
1159:
1160: END gl_budget_entities_pkg;