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.12010000.2 2009/03/20 06:03:02 skotakar 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 197: recinfo gl_budget_entities%ROWTYPE;

193: encrypted_password IN OUT NOCOPY VARCHAR2,
194: status_code IN OUT NOCOPY VARCHAR2,
195: security_flag IN OUT NOCOPY VARCHAR2--Added as part of bug7382899
196: ) IS
197: recinfo gl_budget_entities%ROWTYPE;
198:
199: BEGIN
200: recinfo.budget_entity_id := entity_id;
201:

Line 232: 'gl_budget_entities_pkg.budget_and_acount_seg_info');

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

Line 297: CURSOR C IS SELECT rowid FROM gl_budget_entities

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

Line 305: gl_budget_entities_pkg.check_for_all(

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

Line 339: INSERT INTO gl_budget_entities(

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

Line 470: 'gl_budget_entities_pkg.insert_row');

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

Line 538: gl_budget_entities_pkg.check_for_all(

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

Line 545: UPDATE gl_budget_entities

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

Line 612: 'gl_budget_entities_pkg.update_row');

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

Line 722: FROM Gl_Budget_Entities

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

Line 1016: GL_BUDGET_ENTITIES_PKG.Insert_Row(

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

Line 1082: 'GL_BUDGET_ENTITIES_PKG.Insert_Org');

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

Line 1125: 'GL_BUDGET_ENTITIES_PKG.Insert_Org');

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

Line 1162: END gl_budget_entities_pkg;

1158: 'GL_BUDGET_ORG_PKG.Set_BC_Timestamp');
1159: RAISE;
1160: END Set_BC_Timestamp;
1161:
1162: END gl_budget_entities_pkg;