1: PACKAGE BODY gl_budget_assignment_pkg AS
2: /* $Header: glibdasb.pls 120.6 2005/08/25 22:55:46 djogg ship $ */
3:
4: --
5: -- PRIVATE FUNCTIONS
63: RAISE;
64: WHEN OTHERS THEN
65: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
66: fnd_message.set_token('PROCEDURE',
67: 'gl_budget_assignment_pkg.check_unique');
68: RAISE;
69: END check_unique;
70:
71: PROCEDURE delete_range_assignments(xrange_id NUMBER) IS
79: WHEN OTHERS THEN
80: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
81: fnd_message.set_token(
82: 'PROCEDURE',
83: 'gl_budget_assignment_pkg.delete_range_assignments');
84: RAISE;
85: END delete_range_assignments;
86:
87:
101: WHEN OTHERS THEN
102: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
103: fnd_message.set_token(
104: 'PROCEDURE',
105: 'gl_budget_assignment_pkg.delete_assignment');
106: RAISE;
107: END delete_assignment;
108:
109:
139: RAISE;
140: WHEN OTHERS THEN
141: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
142: fnd_message.set_token('PROCEDURE',
143: 'GL_BUDGET_ASSIGNMENT_PKG.is_budget_calculated');
144: RAISE;
145:
146: END is_budget_calculated;
147:
176: RAISE;
177: WHEN OTHERS THEN
178: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
179: fnd_message.set_token('PROCEDURE',
180: 'GL_BUDGET_ASSIGNMENT_PKG.is_acct_stat_enterable');
181: RAISE;
182:
183: END is_acct_stat_enterable;
184:
449: RAISE NO_DATA_FOUND;
450: end if;
451: END Delete_Row;
452:
453: END gl_budget_assignment_pkg;