44:
45: --Standard Start of API SAVEPOINT
46: SAVEPOINT ROLE_RELATE_AUDIT;
47:
48: x_return_status := fnd_api.g_ret_sts_success;
49:
50: --Standard Call to check API compatibility
51: IF NOT FND_API.Compatible_API_CALL(l_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
52: THEN
47:
48: x_return_status := fnd_api.g_ret_sts_success;
49:
50: --Standard Call to check API compatibility
51: IF NOT FND_API.Compatible_API_CALL(l_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
52: THEN
53: RAISE FND_API.G_EXC_ERROR;
54: END IF;
55:
49:
50: --Standard Call to check API compatibility
51: IF NOT FND_API.Compatible_API_CALL(l_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
52: THEN
53: RAISE FND_API.G_EXC_ERROR;
54: END IF;
55:
56: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
57: IF FND_API.To_boolean(P_INIT_MSG_LIST)
53: RAISE FND_API.G_EXC_ERROR;
54: END IF;
55:
56: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
57: IF FND_API.To_boolean(P_INIT_MSG_LIST)
58: THEN
59: FND_MSG_PUB.Initialize;
60: END IF;
61:
91: X_LAST_UPDATED_BY => l_user_id,
92: X_LAST_UPDATE_LOGIN => l_login_id
93: );
94:
95: IF fnd_api.to_boolean (p_commit)
96: THEN
97: COMMIT WORK;
98: END IF;
99:
99:
100: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
101:
102: EXCEPTION
103: WHEN fnd_api.g_exc_unexpected_error
104: THEN
105: ROLLBACK TO role_relate_audit;
106: --x_return_status := fnd_api.g_ret_sts_unexp_error;
107: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
102: EXCEPTION
103: WHEN fnd_api.g_exc_unexpected_error
104: THEN
105: ROLLBACK TO role_relate_audit;
106: --x_return_status := fnd_api.g_ret_sts_unexp_error;
107: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
108: WHEN fnd_api.g_exc_error
109: THEN
110: ROLLBACK TO role_relate_audit;
104: THEN
105: ROLLBACK TO role_relate_audit;
106: --x_return_status := fnd_api.g_ret_sts_unexp_error;
107: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
108: WHEN fnd_api.g_exc_error
109: THEN
110: ROLLBACK TO role_relate_audit;
111: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
112:
117: fnd_message.set_token('P_SQLCODE',SQLCODE);
118: fnd_message.set_token('P_SQLERRM',SQLERRM);
119: fnd_message.set_token('P_API_NAME',L_API_NAME);
120: FND_MSG_PUB.add;
121: x_return_status := fnd_api.g_ret_sts_unexp_error;
122: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
123:
124:
125: END INSERT_ROLE_RELATE;
191:
192: --Standard Start of API SAVEPOINT
193: SAVEPOINT ROLE_RELATE_AUDIT;
194:
195: x_return_status := fnd_api.g_ret_sts_success;
196:
197: --Standard Call to check API compatibility
198: IF NOT FND_API.Compatible_API_CALL(l_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
199: THEN
194:
195: x_return_status := fnd_api.g_ret_sts_success;
196:
197: --Standard Call to check API compatibility
198: IF NOT FND_API.Compatible_API_CALL(l_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
199: THEN
200: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
201: END IF;
202:
196:
197: --Standard Call to check API compatibility
198: IF NOT FND_API.Compatible_API_CALL(l_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
199: THEN
200: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
201: END IF;
202:
203: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
204: IF FND_API.To_boolean(P_INIT_MSG_LIST)
200: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
201: END IF;
202:
203: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
204: IF FND_API.To_boolean(P_INIT_MSG_LIST)
205: THEN
206: FND_MSG_PUB.Initialize;
207: END IF;
208:
235: l_start_date_active := rr_old_rec.start_date_active;
236: l_start_date_active_n := p_start_date_active;
237: end if;
238: if /* (p_end_date_active <> rr_old_rec.end_date_active) OR
239: (p_end_date_active is null AND rr_old_rec.end_date_active <> FND_API.G_MISS_DATE) OR
240: (p_end_date_active is not null AND rr_old_rec.end_date_active = FND_API.G_MISS_DATE) */
241: nvl(p_end_date_active, fnd_api.g_miss_date) <> nvl(rr_old_rec.end_date_active, fnd_api.g_miss_date)
242: then
243: l_end_date_active := rr_old_rec.end_date_active ;
236: l_start_date_active_n := p_start_date_active;
237: end if;
238: if /* (p_end_date_active <> rr_old_rec.end_date_active) OR
239: (p_end_date_active is null AND rr_old_rec.end_date_active <> FND_API.G_MISS_DATE) OR
240: (p_end_date_active is not null AND rr_old_rec.end_date_active = FND_API.G_MISS_DATE) */
241: nvl(p_end_date_active, fnd_api.g_miss_date) <> nvl(rr_old_rec.end_date_active, fnd_api.g_miss_date)
242: then
243: l_end_date_active := rr_old_rec.end_date_active ;
244: l_end_date_active_n := p_end_date_active ;
237: end if;
238: if /* (p_end_date_active <> rr_old_rec.end_date_active) OR
239: (p_end_date_active is null AND rr_old_rec.end_date_active <> FND_API.G_MISS_DATE) OR
240: (p_end_date_active is not null AND rr_old_rec.end_date_active = FND_API.G_MISS_DATE) */
241: nvl(p_end_date_active, fnd_api.g_miss_date) <> nvl(rr_old_rec.end_date_active, fnd_api.g_miss_date)
242: then
243: l_end_date_active := rr_old_rec.end_date_active ;
244: l_end_date_active_n := p_end_date_active ;
245: end if;
280:
281:
282:
283:
284: IF fnd_api.to_boolean (p_commit)
285: THEN
286: COMMIT WORK;
287: END IF;
288:
289: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
290:
291:
292: EXCEPTION
293: WHEN fnd_api.g_exc_unexpected_error
294: THEN
295: ROLLBACK TO role_relate_audit;
296: x_return_status := fnd_api.g_ret_sts_unexp_error;
297: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
292: EXCEPTION
293: WHEN fnd_api.g_exc_unexpected_error
294: THEN
295: ROLLBACK TO role_relate_audit;
296: x_return_status := fnd_api.g_ret_sts_unexp_error;
297: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
298: WHEN fnd_api.g_exc_error
299: THEN
300: ROLLBACK TO role_relate_audit;
294: THEN
295: ROLLBACK TO role_relate_audit;
296: x_return_status := fnd_api.g_ret_sts_unexp_error;
297: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
298: WHEN fnd_api.g_exc_error
299: THEN
300: ROLLBACK TO role_relate_audit;
301: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
302:
307: fnd_message.set_token('P_SQLCODE',SQLCODE);
308: fnd_message.set_token('P_SQLERRM',SQLERRM);
309: fnd_message.set_token('P_API_NAME',l_api_name);
310: FND_MSG_PUB.add;
311: x_return_status := fnd_api.g_ret_sts_unexp_error;
312: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
313:
314:
315: END UPDATE_ROLE_RELATE;
365:
366: --Standard Start of API SAVEPOINT
367: SAVEPOINT ROLE_RELATE_AUDIT;
368:
369: x_return_status := fnd_api.g_ret_sts_success;
370:
371: --Standard Call to check API compatibility
372: IF NOT FND_API.Compatible_API_CALL(l_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
373: THEN
368:
369: x_return_status := fnd_api.g_ret_sts_success;
370:
371: --Standard Call to check API compatibility
372: IF NOT FND_API.Compatible_API_CALL(l_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
373: THEN
374: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
375: END IF;
376:
370:
371: --Standard Call to check API compatibility
372: IF NOT FND_API.Compatible_API_CALL(l_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
373: THEN
374: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
375: END IF;
376:
377: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
378: IF FND_API.To_boolean(P_INIT_MSG_LIST)
374: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
375: END IF;
376:
377: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
378: IF FND_API.To_boolean(P_INIT_MSG_LIST)
379: THEN
380: FND_MSG_PUB.Initialize;
381: END IF;
382:
430:
431:
432:
433:
434: IF fnd_api.to_boolean (p_commit)
435: THEN
436: COMMIT WORK;
437: END IF;
438:
438:
439: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
440:
441: EXCEPTION
442: WHEN fnd_api.g_exc_unexpected_error
443: THEN
444: ROLLBACK TO role_relate_audit;
445: x_return_status := fnd_api.g_ret_sts_unexp_error;
446: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
441: EXCEPTION
442: WHEN fnd_api.g_exc_unexpected_error
443: THEN
444: ROLLBACK TO role_relate_audit;
445: x_return_status := fnd_api.g_ret_sts_unexp_error;
446: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
447: WHEN fnd_api.g_exc_error
448: THEN
449: ROLLBACK TO role_relate_audit;
443: THEN
444: ROLLBACK TO role_relate_audit;
445: x_return_status := fnd_api.g_ret_sts_unexp_error;
446: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
447: WHEN fnd_api.g_exc_error
448: THEN
449: ROLLBACK TO role_relate_audit;
450: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
451:
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, p_data => x_msg_data);
462:
463:
464: