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:
93: --GET USER ID AND SYSDATE
94: l_date := sysdate;
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;
111:
112:
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;
146: */
147: x_group_id := l_group_id;
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;
161: x_return_status := fnd_api.g_ret_sts_unexp_error;
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;
166: fnd_message.set_name ('JTF', 'JTF_RS_UNEXP_ERROR');
166: fnd_message.set_name ('JTF', 'JTF_RS_UNEXP_ERROR');
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: /*
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
176: THEN
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;
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
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;
185: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
182: WHEN OTHERS
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;
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:
192:
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:
273: --GET USER ID AND SYSDATE
274: l_date := sysdate;
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;
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);
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;
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;
328: fnd_message.set_name ('JTF', 'JTF_RS_UNEXP_ERROR');
328: fnd_message.set_name ('JTF', 'JTF_RS_UNEXP_ERROR');
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: /*
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
338: THEN
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;
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
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;
347: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
344: WHEN OTHERS
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;
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:
354:
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:
407: --GET USER ID AND SYSDATE
408: l_date := sysdate;
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;
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);
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;
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;
455: fnd_message.set_name ('JTF', 'JTF_RS_UNEXP_ERROR');
455: fnd_message.set_name ('JTF', 'JTF_RS_UNEXP_ERROR');
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: /*
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
465: THEN
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;
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
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;
474: fnd_message.set_name ('JTF', 'JTF_RS_DYN_GRP_PUB_ERR');
471: WHEN OTHERS
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;
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:
481: