75:
76: --Standard Start of API SAVEPOINT
77: SAVEPOINT GROUP_DYNAMIC_SP;
78:
79: x_return_status := fnd_api.g_ret_sts_success;
80:
81: --Standard Call to check API compatibility
82: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
83: THEN
78:
79: x_return_status := fnd_api.g_ret_sts_success;
80:
81: --Standard Call to check API compatibility
82: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
83: THEN
84: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
85: END IF;
86:
80:
81: --Standard Call to check API compatibility
82: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
83: THEN
84: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
85: END IF;
86:
87: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
88: IF FND_API.To_boolean(P_INIT_MSG_LIST)
84: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
85: END IF;
86:
87: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
88: IF FND_API.To_boolean(P_INIT_MSG_LIST)
89: THEN
90: FND_MSG_PUB.Initialize;
91: END IF;
92:
100:
101: -- JTF_RESOURCE_UTL.VALIDATE_USAGE(l_usage,
102: -- l_return_status);
103: --
104: -- IF(l_return_status <> fnd_api.g_ret_sts_success)
105: -- THEN
106: -- x_return_status := fnd_api.g_ret_sts_unexp_error;
107: -- fnd_message.set_name ('JTF', 'JTF_RS_USAGE_ERR');
108: -- FND_MSG_PUB.add;
102: -- l_return_status);
103: --
104: -- IF(l_return_status <> fnd_api.g_ret_sts_success)
105: -- THEN
106: -- x_return_status := fnd_api.g_ret_sts_unexp_error;
107: -- fnd_message.set_name ('JTF', 'JTF_RS_USAGE_ERR');
108: -- FND_MSG_PUB.add;
109: -- RAISE fnd_api.g_exc_unexpected_error;
110: -- END IF;
105: -- THEN
106: -- x_return_status := fnd_api.g_ret_sts_unexp_error;
107: -- fnd_message.set_name ('JTF', 'JTF_RS_USAGE_ERR');
108: -- FND_MSG_PUB.add;
109: -- RAISE fnd_api.g_exc_unexpected_error;
110: -- END IF;
111:
112:
113:
127: X_MSG_DATA => l_msg_data,
128: X_GROUP_ID => l_group_id,
129: X_GROUP_NUMBER => l_group_number);
130:
131: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
132: IF l_return_status = fnd_api.g_ret_sts_error THEN
133: RAISE fnd_api.g_exc_error;
134: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
135: RAISE fnd_api.g_exc_unexpected_error;
128: X_GROUP_ID => l_group_id,
129: X_GROUP_NUMBER => l_group_number);
130:
131: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
132: IF l_return_status = fnd_api.g_ret_sts_error THEN
133: RAISE fnd_api.g_exc_error;
134: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
135: RAISE fnd_api.g_exc_unexpected_error;
136: END IF;
129: X_GROUP_NUMBER => l_group_number);
130:
131: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
132: IF l_return_status = fnd_api.g_ret_sts_error THEN
133: RAISE fnd_api.g_exc_error;
134: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
135: RAISE fnd_api.g_exc_unexpected_error;
136: END IF;
137: END IF;
130:
131: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
132: IF l_return_status = fnd_api.g_ret_sts_error THEN
133: RAISE fnd_api.g_exc_error;
134: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
135: RAISE fnd_api.g_exc_unexpected_error;
136: END IF;
137: END IF;
138: /*
131: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
132: IF l_return_status = fnd_api.g_ret_sts_error THEN
133: RAISE fnd_api.g_exc_error;
134: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
135: RAISE fnd_api.g_exc_unexpected_error;
136: END IF;
137: END IF;
138: /*
139: IF(l_return_status <> fnd_api.g_ret_sts_success)
135: RAISE fnd_api.g_exc_unexpected_error;
136: END IF;
137: END IF;
138: /*
139: IF(l_return_status <> fnd_api.g_ret_sts_success)
140: THEN
141: x_return_status := fnd_api.g_ret_sts_unexp_error;
142: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_INS_ERR');
143: FND_MSG_PUB.add;
137: END IF;
138: /*
139: IF(l_return_status <> fnd_api.g_ret_sts_success)
140: THEN
141: x_return_status := fnd_api.g_ret_sts_unexp_error;
142: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_INS_ERR');
143: FND_MSG_PUB.add;
144: RAISE fnd_api.g_exc_unexpected_error;
145: END IF;
140: THEN
141: x_return_status := fnd_api.g_ret_sts_unexp_error;
142: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_INS_ERR');
143: FND_MSG_PUB.add;
144: RAISE fnd_api.g_exc_unexpected_error;
145: END IF;
146: */
147: x_group_id := l_group_id;
148: x_group_number := l_group_number;
150:
151:
152: EXCEPTION
153:
154: WHEN fnd_api.g_exc_error THEN
155: ROLLBACK TO group_dynamic_sp;
156: x_return_status := fnd_api.g_ret_sts_error;
157: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
158: p_data => x_msg_data);
152: EXCEPTION
153:
154: WHEN fnd_api.g_exc_error THEN
155: ROLLBACK TO group_dynamic_sp;
156: x_return_status := fnd_api.g_ret_sts_error;
157: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
158: p_data => x_msg_data);
159: WHEN fnd_api.g_exc_unexpected_error THEN
160: ROLLBACK TO group_dynamic_sp;
155: ROLLBACK TO group_dynamic_sp;
156: x_return_status := fnd_api.g_ret_sts_error;
157: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
158: p_data => x_msg_data);
159: WHEN fnd_api.g_exc_unexpected_error THEN
160: ROLLBACK TO group_dynamic_sp;
161: x_return_status := fnd_api.g_ret_sts_unexp_error;
162: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
163: p_data => x_msg_data);
157: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
158: p_data => x_msg_data);
159: WHEN fnd_api.g_exc_unexpected_error THEN
160: ROLLBACK TO group_dynamic_sp;
161: x_return_status := fnd_api.g_ret_sts_unexp_error;
162: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
163: p_data => x_msg_data);
164: WHEN OTHERS THEN
165: ROLLBACK TO group_dynamic_sp;
167: fnd_message.set_token('P_SQLCODE',SQLCODE);
168: fnd_message.set_token('P_SQLERRM',SQLERRM);
169: fnd_message.set_token('P_API_NAME', l_api_name);
170: FND_MSG_PUB.add;
171: x_return_status := fnd_api.g_ret_sts_unexp_error;
172: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
173: p_data => x_msg_data);
174: /*
175: WHEN fnd_api.g_exc_unexpected_error
171: x_return_status := fnd_api.g_ret_sts_unexp_error;
172: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
173: p_data => x_msg_data);
174: /*
175: WHEN fnd_api.g_exc_unexpected_error
176: THEN
177: ROLLBACK TO GROUP_DYNAMIC_SP;
178: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
179: FND_MSG_PUB.add;
176: THEN
177: ROLLBACK TO GROUP_DYNAMIC_SP;
178: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
179: FND_MSG_PUB.add;
180: x_return_status := fnd_api.g_ret_sts_unexp_error;
181: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
182: WHEN OTHERS
183: THEN
184: ROLLBACK TO GROUP_DYNAMIC_SP;
183: THEN
184: ROLLBACK TO GROUP_DYNAMIC_SP;
185: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
186: FND_MSG_PUB.add;
187: x_return_status := fnd_api.g_ret_sts_unexp_error;
188: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
189: */
190: END create_dynamic_groups;
191:
255:
256: --Standard Start of API SAVEPOINT
257: SAVEPOINT GROUP_DYNAMIC_SP;
258:
259: x_return_status := fnd_api.g_ret_sts_success;
260:
261: --Standard Call to check API compatibility
262: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
263: THEN
258:
259: x_return_status := fnd_api.g_ret_sts_success;
260:
261: --Standard Call to check API compatibility
262: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
263: THEN
264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
265: END IF;
266:
260:
261: --Standard Call to check API compatibility
262: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
263: THEN
264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
265: END IF;
266:
267: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
268: IF FND_API.To_boolean(P_INIT_MSG_LIST)
264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
265: END IF;
266:
267: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
268: IF FND_API.To_boolean(P_INIT_MSG_LIST)
269: THEN
270: FND_MSG_PUB.Initialize;
271: END IF;
272:
294: X_MSG_COUNT => l_msg_count,
295: X_MSG_DATA => l_msg_data
296: );
297:
298: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
299: IF l_return_status = fnd_api.g_ret_sts_error THEN
300: RAISE fnd_api.g_exc_error;
301: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
302: RAISE fnd_api.g_exc_unexpected_error;
295: X_MSG_DATA => l_msg_data
296: );
297:
298: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
299: IF l_return_status = fnd_api.g_ret_sts_error THEN
300: RAISE fnd_api.g_exc_error;
301: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
302: RAISE fnd_api.g_exc_unexpected_error;
303: END IF;
296: );
297:
298: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
299: IF l_return_status = fnd_api.g_ret_sts_error THEN
300: RAISE fnd_api.g_exc_error;
301: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
302: RAISE fnd_api.g_exc_unexpected_error;
303: END IF;
304: END IF;
297:
298: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
299: IF l_return_status = fnd_api.g_ret_sts_error THEN
300: RAISE fnd_api.g_exc_error;
301: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
302: RAISE fnd_api.g_exc_unexpected_error;
303: END IF;
304: END IF;
305: /*
298: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
299: IF l_return_status = fnd_api.g_ret_sts_error THEN
300: RAISE fnd_api.g_exc_error;
301: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
302: RAISE fnd_api.g_exc_unexpected_error;
303: END IF;
304: END IF;
305: /*
306: IF(l_return_status <> fnd_api.g_ret_sts_success)
302: RAISE fnd_api.g_exc_unexpected_error;
303: END IF;
304: END IF;
305: /*
306: IF(l_return_status <> fnd_api.g_ret_sts_success)
307: THEN
308: x_return_status := fnd_api.g_ret_sts_unexp_error;
309: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_UPDATE_ERR');
310: FND_MSG_PUB.add;
304: END IF;
305: /*
306: IF(l_return_status <> fnd_api.g_ret_sts_success)
307: THEN
308: x_return_status := fnd_api.g_ret_sts_unexp_error;
309: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_UPDATE_ERR');
310: FND_MSG_PUB.add;
311: RAISE fnd_api.g_exc_unexpected_error;
312: END IF;
307: THEN
308: x_return_status := fnd_api.g_ret_sts_unexp_error;
309: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_UPDATE_ERR');
310: FND_MSG_PUB.add;
311: RAISE fnd_api.g_exc_unexpected_error;
312: END IF;
313: */
314: EXCEPTION
315:
312: END IF;
313: */
314: EXCEPTION
315:
316: WHEN fnd_api.g_exc_error THEN
317: ROLLBACK TO group_dynamic_sp;
318: x_return_status := fnd_api.g_ret_sts_error;
319: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
320: p_data => x_msg_data);
314: EXCEPTION
315:
316: WHEN fnd_api.g_exc_error THEN
317: ROLLBACK TO group_dynamic_sp;
318: x_return_status := fnd_api.g_ret_sts_error;
319: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
320: p_data => x_msg_data);
321: WHEN fnd_api.g_exc_unexpected_error THEN
322: ROLLBACK TO group_dynamic_sp;
317: ROLLBACK TO group_dynamic_sp;
318: x_return_status := fnd_api.g_ret_sts_error;
319: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
320: p_data => x_msg_data);
321: WHEN fnd_api.g_exc_unexpected_error THEN
322: ROLLBACK TO group_dynamic_sp;
323: x_return_status := fnd_api.g_ret_sts_unexp_error;
324: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
325: p_data => x_msg_data);
319: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
320: p_data => x_msg_data);
321: WHEN fnd_api.g_exc_unexpected_error THEN
322: ROLLBACK TO group_dynamic_sp;
323: x_return_status := fnd_api.g_ret_sts_unexp_error;
324: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
325: p_data => x_msg_data);
326: WHEN OTHERS THEN
327: ROLLBACK TO group_dynamic_sp;
329: fnd_message.set_token('P_SQLCODE',SQLCODE);
330: fnd_message.set_token('P_SQLERRM',SQLERRM);
331: fnd_message.set_token('P_API_NAME', l_api_name);
332: FND_MSG_PUB.add;
333: x_return_status := fnd_api.g_ret_sts_unexp_error;
334: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
335: p_data => x_msg_data);
336: /*
337: WHEN fnd_api.g_exc_unexpected_error
333: x_return_status := fnd_api.g_ret_sts_unexp_error;
334: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
335: p_data => x_msg_data);
336: /*
337: WHEN fnd_api.g_exc_unexpected_error
338: THEN
339: ROLLBACK TO GROUP_DYNAMIC_SP;
340: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
341: FND_MSG_PUB.add;
338: THEN
339: ROLLBACK TO GROUP_DYNAMIC_SP;
340: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
341: FND_MSG_PUB.add;
342: x_return_status := fnd_api.g_ret_sts_unexp_error;
343: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
344: WHEN OTHERS
345: THEN
346: ROLLBACK TO GROUP_DYNAMIC_SP;
345: THEN
346: ROLLBACK TO GROUP_DYNAMIC_SP;
347: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
348: FND_MSG_PUB.add;
349: x_return_status := fnd_api.g_ret_sts_unexp_error;
350: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
351: */
352: END update_dynamic_groups;
353:
389:
390: --Standard Start of API SAVEPOINT
391: SAVEPOINT GROUP_DYNAMIC_SP;
392:
393: x_return_status := fnd_api.g_ret_sts_success;
394:
395: --Standard Call to check API compatibility
396: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
397: THEN
392:
393: x_return_status := fnd_api.g_ret_sts_success;
394:
395: --Standard Call to check API compatibility
396: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
397: THEN
398: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
399: END IF;
400:
394:
395: --Standard Call to check API compatibility
396: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
397: THEN
398: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
399: END IF;
400:
401: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
402: IF FND_API.To_boolean(P_INIT_MSG_LIST)
398: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
399: END IF;
400:
401: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
402: IF FND_API.To_boolean(P_INIT_MSG_LIST)
403: THEN
404: FND_MSG_PUB.Initialize;
405: END IF;
406:
421: X_MSG_COUNT => l_msg_count,
422: X_MSG_DATA => l_msg_data
423: );
424:
425: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
426: IF l_return_status = fnd_api.g_ret_sts_error THEN
427: RAISE fnd_api.g_exc_error;
428: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
429: RAISE fnd_api.g_exc_unexpected_error;
422: X_MSG_DATA => l_msg_data
423: );
424:
425: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
426: IF l_return_status = fnd_api.g_ret_sts_error THEN
427: RAISE fnd_api.g_exc_error;
428: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
429: RAISE fnd_api.g_exc_unexpected_error;
430: END IF;
423: );
424:
425: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
426: IF l_return_status = fnd_api.g_ret_sts_error THEN
427: RAISE fnd_api.g_exc_error;
428: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
429: RAISE fnd_api.g_exc_unexpected_error;
430: END IF;
431: END IF;
424:
425: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
426: IF l_return_status = fnd_api.g_ret_sts_error THEN
427: RAISE fnd_api.g_exc_error;
428: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
429: RAISE fnd_api.g_exc_unexpected_error;
430: END IF;
431: END IF;
432: /*
425: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
426: IF l_return_status = fnd_api.g_ret_sts_error THEN
427: RAISE fnd_api.g_exc_error;
428: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
429: RAISE fnd_api.g_exc_unexpected_error;
430: END IF;
431: END IF;
432: /*
433: IF(l_return_status <> fnd_api.g_ret_sts_success)
429: RAISE fnd_api.g_exc_unexpected_error;
430: END IF;
431: END IF;
432: /*
433: IF(l_return_status <> fnd_api.g_ret_sts_success)
434: THEN
435: x_return_status := fnd_api.g_ret_sts_unexp_error;
436: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_DELETE_ERR');
437: FND_MSG_PUB.add;
431: END IF;
432: /*
433: IF(l_return_status <> fnd_api.g_ret_sts_success)
434: THEN
435: x_return_status := fnd_api.g_ret_sts_unexp_error;
436: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_DELETE_ERR');
437: FND_MSG_PUB.add;
438: RAISE fnd_api.g_exc_unexpected_error;
439: END IF;
434: THEN
435: x_return_status := fnd_api.g_ret_sts_unexp_error;
436: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_DELETE_ERR');
437: FND_MSG_PUB.add;
438: RAISE fnd_api.g_exc_unexpected_error;
439: END IF;
440: */
441: EXCEPTION
442:
439: END IF;
440: */
441: EXCEPTION
442:
443: WHEN fnd_api.g_exc_error THEN
444: ROLLBACK TO group_dynamic_sp;
445: x_return_status := fnd_api.g_ret_sts_error;
446: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
447: p_data => x_msg_data);
441: EXCEPTION
442:
443: WHEN fnd_api.g_exc_error THEN
444: ROLLBACK TO group_dynamic_sp;
445: x_return_status := fnd_api.g_ret_sts_error;
446: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
447: p_data => x_msg_data);
448: WHEN fnd_api.g_exc_unexpected_error THEN
449: ROLLBACK TO group_dynamic_sp;
444: ROLLBACK TO group_dynamic_sp;
445: x_return_status := fnd_api.g_ret_sts_error;
446: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
447: p_data => x_msg_data);
448: WHEN fnd_api.g_exc_unexpected_error THEN
449: ROLLBACK TO group_dynamic_sp;
450: x_return_status := fnd_api.g_ret_sts_unexp_error;
451: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
452: p_data => x_msg_data);
446: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
447: p_data => x_msg_data);
448: WHEN fnd_api.g_exc_unexpected_error THEN
449: ROLLBACK TO group_dynamic_sp;
450: x_return_status := fnd_api.g_ret_sts_unexp_error;
451: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
452: p_data => x_msg_data);
453: WHEN OTHERS THEN
454: ROLLBACK TO group_dynamic_sp;
456: fnd_message.set_token('P_SQLCODE',SQLCODE);
457: fnd_message.set_token('P_SQLERRM',SQLERRM);
458: fnd_message.set_token('P_API_NAME', l_api_name);
459: FND_MSG_PUB.add;
460: x_return_status := fnd_api.g_ret_sts_unexp_error;
461: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
462: p_data => x_msg_data);
463: /*
464: WHEN fnd_api.g_exc_unexpected_error
460: x_return_status := fnd_api.g_ret_sts_unexp_error;
461: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
462: p_data => x_msg_data);
463: /*
464: WHEN fnd_api.g_exc_unexpected_error
465: THEN
466: ROLLBACK TO GROUP_DYNAMIC_SP;
467: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
468: FND_MSG_PUB.add;
465: THEN
466: ROLLBACK TO GROUP_DYNAMIC_SP;
467: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
468: FND_MSG_PUB.add;
469: x_return_status := fnd_api.g_ret_sts_unexp_error;
470: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
471: WHEN OTHERS
472: THEN
473: ROLLBACK TO GROUP_DYNAMIC_SP;
472: THEN
473: ROLLBACK TO GROUP_DYNAMIC_SP;
474: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
475: FND_MSG_PUB.add;
476: x_return_status := fnd_api.g_ret_sts_unexp_error;
477: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
478: */
479: END delete_dynamic_groups;
480: