47:
48: IF chk_duplicates%FOUND THEN
49: CLOSE chk_duplicates;
50: IF ( status_code = 'D' ) THEN
51: fnd_message.set_name('SQLGL', 'GL_DUP_BUD_ORG_DEL_INP');
52: app_exception.raise_exception;
53: ELSE
54: fnd_message.set_name('SQLGL', 'GL_DUPLICATE_BUD_ORG_NAME');
55: app_exception.raise_exception;
50: IF ( status_code = 'D' ) THEN
51: fnd_message.set_name('SQLGL', 'GL_DUP_BUD_ORG_DEL_INP');
52: app_exception.raise_exception;
53: ELSE
54: fnd_message.set_name('SQLGL', 'GL_DUPLICATE_BUD_ORG_NAME');
55: app_exception.raise_exception;
56: END IF;
57: END IF;
58:
61: EXCEPTION
62: WHEN app_exceptions.application_exception THEN
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;
62: WHEN app_exceptions.application_exception THEN
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:
94: EXCEPTION
95: WHEN app_exceptions.application_exception THEN
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;
95: WHEN app_exceptions.application_exception THEN
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:
122: EXCEPTION
123: WHEN app_exceptions.application_exception THEN
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;
123: WHEN app_exceptions.application_exception THEN
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:
142: CLOSE get_new_id;
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:
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
151: EXCEPTION
152: WHEN app_exceptions.application_exception THEN
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;
152: WHEN app_exceptions.application_exception THEN
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:
171: FETCH lock_org INTO dummy;
172:
173: IF NOT lock_org%FOUND THEN
174: CLOSE lock_org;
175: fnd_message.set_name('SQLGL', 'GL_BUDORG_DELETED');
176: app_exception.raise_exception;
177: END IF;
178:
179: CLOSE lock_org;
180: EXCEPTION
181: WHEN app_exceptions.application_exception THEN
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;
181: WHEN app_exceptions.application_exception THEN
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:
226: EXCEPTION
227: WHEN app_exceptions.application_exception THEN
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;
227: WHEN app_exceptions.application_exception THEN
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:
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;
310: END IF;
311:
312: -- Set budget_entity_id
464: EXCEPTION
465: WHEN app_exceptions.application_exception THEN
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;
465: WHEN app_exceptions.application_exception THEN
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:
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;
543: END IF;
544:
545: UPDATE gl_budget_entities
606: EXCEPTION
607: WHEN app_exceptions.application_exception THEN
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;
607: WHEN app_exceptions.application_exception THEN
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:
728: OPEN C;
729: FETCH C INTO recinfo;
730: IF (C%NOTFOUND) THEN
731: CLOSE C;
732: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
733: app_exception.raise_exception;
734: END IF;
735: CLOSE C;
736:
923: AND (X_Attribute10 is null)))
924: ) THEN
925: return;
926: ELSE
927: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
928: app_exception.raise_exception;
929: END IF;
930:
931: END Lock_Row;
1076: EXCEPTION
1077: WHEN app_exceptions.application_exception THEN
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;
1077: WHEN app_exceptions.application_exception THEN
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:
1119: EXCEPTION
1120: WHEN request_failed THEN
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:
1120: WHEN request_failed THEN
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;
1152: EXCEPTION
1153: WHEN app_exceptions.application_exception THEN
1154: RAISE;
1155: WHEN OTHERS THEN
1156: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
1157: fnd_message.set_token('PROCEDURE',
1158: 'GL_BUDGET_ORG_PKG.Set_BC_Timestamp');
1159: RAISE;
1160: END Set_BC_Timestamp;
1153: WHEN app_exceptions.application_exception THEN
1154: RAISE;
1155: WHEN OTHERS THEN
1156: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
1157: fnd_message.set_token('PROCEDURE',
1158: 'GL_BUDGET_ORG_PKG.Set_BC_Timestamp');
1159: RAISE;
1160: END Set_BC_Timestamp;
1161: