28: l_consolidated_note VARCHAR2(2000);
29:
30: BEGIN
31: -- Initialize to success
32: x_return_status := fnd_api.g_ret_sts_success;
33: -- Initialize other fields
34: x_msg_data := fnd_api.g_null_char;
35: x_msg_count := fnd_api.g_null_num;
36: IF (p_operation <> 'update') THEN
30: BEGIN
31: -- Initialize to success
32: x_return_status := fnd_api.g_ret_sts_success;
33: -- Initialize other fields
34: x_msg_data := fnd_api.g_null_char;
35: x_msg_count := fnd_api.g_null_num;
36: IF (p_operation <> 'update') THEN
37: IF (p_operation = 'create') THEN
38: fnd_message.set_name('CN','CNR12_NOTE_PE_ELIGPROD_CREATE');
31: -- Initialize to success
32: x_return_status := fnd_api.g_ret_sts_success;
33: -- Initialize other fields
34: x_msg_data := fnd_api.g_null_char;
35: x_msg_count := fnd_api.g_null_num;
36: IF (p_operation <> 'update') THEN
37: IF (p_operation = 'create') THEN
38: fnd_message.set_name('CN','CNR12_NOTE_PE_ELIGPROD_CREATE');
39: fnd_message.set_token('PROD', p_quota_rule_uplift.rev_class_name);
161:
162:
163: END IF;
164: EXCEPTION
165: WHEN fnd_api.g_exc_error
166: THEN
167: x_return_status := fnd_api.g_ret_sts_error;
168: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
169: WHEN fnd_api.g_exc_unexpected_error
163: END IF;
164: EXCEPTION
165: WHEN fnd_api.g_exc_error
166: THEN
167: x_return_status := fnd_api.g_ret_sts_error;
168: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
169: WHEN fnd_api.g_exc_unexpected_error
170: THEN
171: x_return_status := fnd_api.g_ret_sts_unexp_error;
164: EXCEPTION
165: WHEN fnd_api.g_exc_error
166: THEN
167: x_return_status := fnd_api.g_ret_sts_error;
168: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
169: WHEN fnd_api.g_exc_unexpected_error
170: THEN
171: x_return_status := fnd_api.g_ret_sts_unexp_error;
172: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
165: WHEN fnd_api.g_exc_error
166: THEN
167: x_return_status := fnd_api.g_ret_sts_error;
168: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
169: WHEN fnd_api.g_exc_unexpected_error
170: THEN
171: x_return_status := fnd_api.g_ret_sts_unexp_error;
172: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
173: WHEN OTHERS
167: x_return_status := fnd_api.g_ret_sts_error;
168: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
169: WHEN fnd_api.g_exc_unexpected_error
170: THEN
171: x_return_status := fnd_api.g_ret_sts_unexp_error;
172: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
173: WHEN OTHERS
174: THEN
175: x_return_status := fnd_api.g_ret_sts_unexp_error;
168: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
169: WHEN fnd_api.g_exc_unexpected_error
170: THEN
171: x_return_status := fnd_api.g_ret_sts_unexp_error;
172: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
173: WHEN OTHERS
174: THEN
175: x_return_status := fnd_api.g_ret_sts_unexp_error;
176: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
171: x_return_status := fnd_api.g_ret_sts_unexp_error;
172: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
173: WHEN OTHERS
174: THEN
175: x_return_status := fnd_api.g_ret_sts_unexp_error;
176: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
177: THEN
178: fnd_msg_pub.add_exc_msg (g_pkg_name, 'add_system_note');
179: END IF;
176: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
177: THEN
178: fnd_msg_pub.add_exc_msg (g_pkg_name, 'add_system_note');
179: END IF;
180: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
181:
182: END add_system_note;
183:
184:
190: -- Pre-reqs : None.
191: -- Parameters :
192: -- IN : p_api_version IN NUMBER Required
193: -- p_init_msg_list IN VARCHAR2 Optional
194: -- Default = FND_API.G_FALSE
195: -- p_commit IN VARCHAR2 Optional
196: -- Default = FND_API.G_FALSE
197: -- p_validation_level IN NUMBER Optional
198: -- Default = FND_API.G_VALID_LEVEL_FULL
192: -- IN : p_api_version IN NUMBER Required
193: -- p_init_msg_list IN VARCHAR2 Optional
194: -- Default = FND_API.G_FALSE
195: -- p_commit IN VARCHAR2 Optional
196: -- Default = FND_API.G_FALSE
197: -- p_validation_level IN NUMBER Optional
198: -- Default = FND_API.G_VALID_LEVEL_FULL
199: -- p_quota_rule_uplift IN quota_rule_uplift_rec_type
200: -- OUT : x_return_status OUT VARCHAR2(1)
194: -- Default = FND_API.G_FALSE
195: -- p_commit IN VARCHAR2 Optional
196: -- Default = FND_API.G_FALSE
197: -- p_validation_level IN NUMBER Optional
198: -- Default = FND_API.G_VALID_LEVEL_FULL
199: -- p_quota_rule_uplift IN quota_rule_uplift_rec_type
200: -- OUT : x_return_status OUT VARCHAR2(1)
201: -- x_msg_count OUT NUMBER
202: -- x_msg_data OUT VARCHAR2(2000)
205: --
206: -- End of comments
207: PROCEDURE validate_uplift (
208: p_api_version IN NUMBER,
209: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
210: p_commit IN VARCHAR2 := fnd_api.g_false,
211: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
212: p_action IN VARCHAR2,
213: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
206: -- End of comments
207: PROCEDURE validate_uplift (
208: p_api_version IN NUMBER,
209: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
210: p_commit IN VARCHAR2 := fnd_api.g_false,
211: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
212: p_action IN VARCHAR2,
213: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
214: p_old_quota_rule_uplift IN quota_rule_uplift_rec_type := g_miss_quota_uplift_rec,
207: PROCEDURE validate_uplift (
208: p_api_version IN NUMBER,
209: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
210: p_commit IN VARCHAR2 := fnd_api.g_false,
211: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
212: p_action IN VARCHAR2,
213: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
214: p_old_quota_rule_uplift IN quota_rule_uplift_rec_type := g_miss_quota_uplift_rec,
215: x_return_status OUT NOCOPY VARCHAR2,
225: -- Standard Start of API savepoint
226: SAVEPOINT validate_uplift;
227:
228: -- Standard call to check for call compatibility.
229: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
230: THEN
231: RAISE fnd_api.g_exc_unexpected_error;
232: END IF;
233:
227:
228: -- Standard call to check for call compatibility.
229: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
230: THEN
231: RAISE fnd_api.g_exc_unexpected_error;
232: END IF;
233:
234: -- Initialize message list if p_init_msg_list is set to TRUE.
235: IF fnd_api.to_boolean (p_init_msg_list)
231: RAISE fnd_api.g_exc_unexpected_error;
232: END IF;
233:
234: -- Initialize message list if p_init_msg_list is set to TRUE.
235: IF fnd_api.to_boolean (p_init_msg_list)
236: THEN
237: fnd_msg_pub.initialize;
238: END IF;
239:
237: fnd_msg_pub.initialize;
238: END IF;
239:
240: -- Initialize API return status to success
241: x_return_status := fnd_api.g_ret_sts_success;
242:
243: -- if the Quota Rule uplift iD is null then Error message
244: IF p_quota_rule_uplift.quota_rule_uplift_id IS NULL
245: THEN
248: fnd_message.set_name ('CN', 'CN_INVALID_UPDATE_REC');
249: fnd_msg_pub.ADD;
250: END IF;
251:
252: RAISE fnd_api.g_exc_error;
253: END IF;
254:
255: IF p_action = 'DELETE'
256: THEN
264: p_loading_status => l_loading_status,
265: x_loading_status => l_loading_status
266: );
267:
268: IF (x_return_status <> fnd_api.g_ret_sts_success)
269: THEN
270: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
271: THEN
272: fnd_message.set_name ('CN', 'CN_UPLIFT_DELETE_NOT_ALLOWED');
272: fnd_message.set_name ('CN', 'CN_UPLIFT_DELETE_NOT_ALLOWED');
273: fnd_msg_pub.ADD;
274: END IF;
275:
276: RAISE fnd_api.g_exc_error;
277: END IF;
278: END IF;
279:
280: -- API body
277: END IF;
278: END IF;
279:
280: -- API body
281: IF (x_return_status <> fnd_api.g_ret_sts_success)
282: THEN
283: RAISE fnd_api.g_exc_error;
284: END IF;
285:
279:
280: -- API body
281: IF (x_return_status <> fnd_api.g_ret_sts_success)
282: THEN
283: RAISE fnd_api.g_exc_error;
284: END IF;
285:
286: -- End of API body.
287: -- Standard check of p_commit.
284: END IF;
285:
286: -- End of API body.
287: -- Standard check of p_commit.
288: IF fnd_api.to_boolean (p_commit)
289: THEN
290: COMMIT WORK;
291: END IF;
292:
290: COMMIT WORK;
291: END IF;
292:
293: -- Standard call to get message count and if count is 1, get message info.
294: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
295: EXCEPTION
296: WHEN fnd_api.g_exc_error
297: THEN
298: ROLLBACK TO validate_uplift;
292:
293: -- Standard call to get message count and if count is 1, get message info.
294: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
295: EXCEPTION
296: WHEN fnd_api.g_exc_error
297: THEN
298: ROLLBACK TO validate_uplift;
299: x_return_status := fnd_api.g_ret_sts_error;
300: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
295: EXCEPTION
296: WHEN fnd_api.g_exc_error
297: THEN
298: ROLLBACK TO validate_uplift;
299: x_return_status := fnd_api.g_ret_sts_error;
300: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
301: WHEN fnd_api.g_exc_unexpected_error
302: THEN
303: ROLLBACK TO validate_uplift;
296: WHEN fnd_api.g_exc_error
297: THEN
298: ROLLBACK TO validate_uplift;
299: x_return_status := fnd_api.g_ret_sts_error;
300: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
301: WHEN fnd_api.g_exc_unexpected_error
302: THEN
303: ROLLBACK TO validate_uplift;
304: x_return_status := fnd_api.g_ret_sts_unexp_error;
297: THEN
298: ROLLBACK TO validate_uplift;
299: x_return_status := fnd_api.g_ret_sts_error;
300: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
301: WHEN fnd_api.g_exc_unexpected_error
302: THEN
303: ROLLBACK TO validate_uplift;
304: x_return_status := fnd_api.g_ret_sts_unexp_error;
305: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
300: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
301: WHEN fnd_api.g_exc_unexpected_error
302: THEN
303: ROLLBACK TO validate_uplift;
304: x_return_status := fnd_api.g_ret_sts_unexp_error;
305: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
306: WHEN OTHERS
307: THEN
308: ROLLBACK TO validate_uplift;
301: WHEN fnd_api.g_exc_unexpected_error
302: THEN
303: ROLLBACK TO validate_uplift;
304: x_return_status := fnd_api.g_ret_sts_unexp_error;
305: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
306: WHEN OTHERS
307: THEN
308: ROLLBACK TO validate_uplift;
309: x_return_status := fnd_api.g_ret_sts_unexp_error;
305: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
306: WHEN OTHERS
307: THEN
308: ROLLBACK TO validate_uplift;
309: x_return_status := fnd_api.g_ret_sts_unexp_error;
310:
311: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
312: THEN
313: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
312: THEN
313: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
314: END IF;
315:
316: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
317: END validate_uplift;
318:
319: -- Start of comments
320: -- API name : Create_Quota_Uplift
323: -- Pre-reqs : None.
324: -- Parameters :
325: -- IN : p_api_version IN NUMBER Required
326: -- p_init_msg_list IN VARCHAR2 Optional
327: -- Default = FND_API.G_FALSE
328: -- p_commit IN VARCHAR2 Optional
329: -- Default = FND_API.G_FALSE
330: -- p_validation_level IN NUMBER Optional
331: -- Default = FND_API.G_VALID_LEVEL_FULL
325: -- IN : p_api_version IN NUMBER Required
326: -- p_init_msg_list IN VARCHAR2 Optional
327: -- Default = FND_API.G_FALSE
328: -- p_commit IN VARCHAR2 Optional
329: -- Default = FND_API.G_FALSE
330: -- p_validation_level IN NUMBER Optional
331: -- Default = FND_API.G_VALID_LEVEL_FULL
332: -- p_quota_rule_uplift IN quota_rule_uplift_rec_type
333: -- OUT : x_return_status OUT VARCHAR2(1)
327: -- Default = FND_API.G_FALSE
328: -- p_commit IN VARCHAR2 Optional
329: -- Default = FND_API.G_FALSE
330: -- p_validation_level IN NUMBER Optional
331: -- Default = FND_API.G_VALID_LEVEL_FULL
332: -- p_quota_rule_uplift IN quota_rule_uplift_rec_type
333: -- OUT : x_return_status OUT VARCHAR2(1)
334: -- x_msg_count OUT NUMBER
335: -- x_msg_data OUT VARCHAR2(2000)
339: --
340: -- End of comments
341: PROCEDURE create_uplift (
342: p_api_version IN NUMBER,
343: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
344: p_commit IN VARCHAR2 := fnd_api.g_false,
345: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
346: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
347: x_return_status OUT NOCOPY VARCHAR2,
340: -- End of comments
341: PROCEDURE create_uplift (
342: p_api_version IN NUMBER,
343: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
344: p_commit IN VARCHAR2 := fnd_api.g_false,
345: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
346: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
347: x_return_status OUT NOCOPY VARCHAR2,
348: x_msg_count OUT NOCOPY NUMBER,
341: PROCEDURE create_uplift (
342: p_api_version IN NUMBER,
343: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
344: p_commit IN VARCHAR2 := fnd_api.g_false,
345: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
346: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
347: x_return_status OUT NOCOPY VARCHAR2,
348: x_msg_count OUT NOCOPY NUMBER,
349: x_msg_data OUT NOCOPY VARCHAR2
364: -- Standard Start of API savepoint
365: SAVEPOINT create_quota_rule_uplift;
366:
367: -- Standard call to check for call compatibility.
368: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
369: THEN
370: RAISE fnd_api.g_exc_unexpected_error;
371: END IF;
372:
366:
367: -- Standard call to check for call compatibility.
368: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
369: THEN
370: RAISE fnd_api.g_exc_unexpected_error;
371: END IF;
372:
373: -- Initialize message list if p_init_msg_list is set to TRUE.
374: IF fnd_api.to_boolean (p_init_msg_list)
370: RAISE fnd_api.g_exc_unexpected_error;
371: END IF;
372:
373: -- Initialize message list if p_init_msg_list is set to TRUE.
374: IF fnd_api.to_boolean (p_init_msg_list)
375: THEN
376: fnd_msg_pub.initialize;
377: END IF;
378:
376: fnd_msg_pub.initialize;
377: END IF;
378:
379: -- Initialize API return status to success
380: x_return_status := fnd_api.g_ret_sts_success;
381:
382: -- API body
383:
384: -- 1. name can not be null
382: -- API body
383:
384: -- 1. name can not be null
385: --clku
386: IF (p_quota_rule_uplift.start_date IS NULL) OR (p_quota_rule_uplift.start_date = fnd_api.g_miss_date)
387: THEN
388: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
389: THEN
390: fnd_message.set_name ('CN', 'CN_INPUT_CANT_NULL');
391: fnd_message.set_token ('INPUT_NAME', cn_api.get_lkup_meaning ('SD', 'INPUT_TOKEN'));
392: fnd_msg_pub.ADD;
393: END IF;
394:
395: RAISE fnd_api.g_exc_error;
396: END IF;
397:
398: -- 2. quota rule uplift name must be unique
399: SELECT DECODE (p_quota_rule_uplift.quota_rule_id, fnd_api.g_miss_num, NULL, p_quota_rule_uplift.quota_rule_id),
395: RAISE fnd_api.g_exc_error;
396: END IF;
397:
398: -- 2. quota rule uplift name must be unique
399: SELECT DECODE (p_quota_rule_uplift.quota_rule_id, fnd_api.g_miss_num, NULL, p_quota_rule_uplift.quota_rule_id),
400: DECODE (p_quota_rule_uplift.start_date, fnd_api.g_miss_date, NULL, p_quota_rule_uplift.start_date),
401: DECODE (p_quota_rule_uplift.end_date, fnd_api.g_miss_date, NULL, p_quota_rule_uplift.end_date),
402: DECODE (p_quota_rule_uplift.payment_factor, NULL, 0, p_quota_rule_uplift.payment_factor),
403: DECODE (p_quota_rule_uplift.quota_factor, NULL, 0, p_quota_rule_uplift.quota_factor),
396: END IF;
397:
398: -- 2. quota rule uplift name must be unique
399: SELECT DECODE (p_quota_rule_uplift.quota_rule_id, fnd_api.g_miss_num, NULL, p_quota_rule_uplift.quota_rule_id),
400: DECODE (p_quota_rule_uplift.start_date, fnd_api.g_miss_date, NULL, p_quota_rule_uplift.start_date),
401: DECODE (p_quota_rule_uplift.end_date, fnd_api.g_miss_date, NULL, p_quota_rule_uplift.end_date),
402: DECODE (p_quota_rule_uplift.payment_factor, NULL, 0, p_quota_rule_uplift.payment_factor),
403: DECODE (p_quota_rule_uplift.quota_factor, NULL, 0, p_quota_rule_uplift.quota_factor),
404: p_quota_rule_uplift.org_id,
397:
398: -- 2. quota rule uplift name must be unique
399: SELECT DECODE (p_quota_rule_uplift.quota_rule_id, fnd_api.g_miss_num, NULL, p_quota_rule_uplift.quota_rule_id),
400: DECODE (p_quota_rule_uplift.start_date, fnd_api.g_miss_date, NULL, p_quota_rule_uplift.start_date),
401: DECODE (p_quota_rule_uplift.end_date, fnd_api.g_miss_date, NULL, p_quota_rule_uplift.end_date),
402: DECODE (p_quota_rule_uplift.payment_factor, NULL, 0, p_quota_rule_uplift.payment_factor),
403: DECODE (p_quota_rule_uplift.quota_factor, NULL, 0, p_quota_rule_uplift.quota_factor),
404: p_quota_rule_uplift.org_id,
405: p_quota_rule_uplift.quota_rule_id
429: fnd_message.set_name ('CN', 'CN_RC_INVALID_DATE_RANGE');
430: fnd_msg_pub.ADD;
431: END IF;
432:
433: RAISE fnd_api.g_exc_error;
434: END IF;
435:
436: SELECT r.NAME,
437: q.NAME
466: p_quota_rule_uplift.rev_class_name_old := l_rev_uplift_rec_tbl (1).rev_class_name_old;
467: p_quota_rule_uplift.start_date_old := l_rev_uplift_rec_tbl (1).start_date_old;
468: p_quota_rule_uplift.end_date_old := l_rev_uplift_rec_tbl (1).end_date_old;
469:
470: IF (x_return_status <> fnd_api.g_ret_sts_success)
471: THEN
472: RAISE fnd_api.g_exc_error;
473: END IF;
474:
468: p_quota_rule_uplift.end_date_old := l_rev_uplift_rec_tbl (1).end_date_old;
469:
470: IF (x_return_status <> fnd_api.g_ret_sts_success)
471: THEN
472: RAISE fnd_api.g_exc_error;
473: END IF;
474:
475: -- Calling proc to add system note for create
476: add_system_note(
481: x_return_status,
482: x_msg_count,
483: x_msg_data
484: );
485: IF (x_return_status <> fnd_api.g_ret_sts_success)
486: THEN
487: RAISE fnd_api.g_exc_error;
488: END IF;
489:
483: x_msg_data
484: );
485: IF (x_return_status <> fnd_api.g_ret_sts_success)
486: THEN
487: RAISE fnd_api.g_exc_error;
488: END IF;
489:
490: -- End of API body.
491: -- Standard check of p_commit.
488: END IF;
489:
490: -- End of API body.
491: -- Standard check of p_commit.
492: IF fnd_api.to_boolean (p_commit)
493: THEN
494: COMMIT WORK;
495: END IF;
496:
494: COMMIT WORK;
495: END IF;
496:
497: -- Standard call to get message count and if count is 1, get message info.
498: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
499: EXCEPTION
500: WHEN fnd_api.g_exc_error
501: THEN
502: ROLLBACK TO create_quota_rule_uplift;
496:
497: -- Standard call to get message count and if count is 1, get message info.
498: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
499: EXCEPTION
500: WHEN fnd_api.g_exc_error
501: THEN
502: ROLLBACK TO create_quota_rule_uplift;
503: x_return_status := fnd_api.g_ret_sts_error;
504: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
499: EXCEPTION
500: WHEN fnd_api.g_exc_error
501: THEN
502: ROLLBACK TO create_quota_rule_uplift;
503: x_return_status := fnd_api.g_ret_sts_error;
504: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
505: WHEN fnd_api.g_exc_unexpected_error
506: THEN
507: ROLLBACK TO create_quota_rule_uplift;
500: WHEN fnd_api.g_exc_error
501: THEN
502: ROLLBACK TO create_quota_rule_uplift;
503: x_return_status := fnd_api.g_ret_sts_error;
504: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
505: WHEN fnd_api.g_exc_unexpected_error
506: THEN
507: ROLLBACK TO create_quota_rule_uplift;
508: x_return_status := fnd_api.g_ret_sts_unexp_error;
501: THEN
502: ROLLBACK TO create_quota_rule_uplift;
503: x_return_status := fnd_api.g_ret_sts_error;
504: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
505: WHEN fnd_api.g_exc_unexpected_error
506: THEN
507: ROLLBACK TO create_quota_rule_uplift;
508: x_return_status := fnd_api.g_ret_sts_unexp_error;
509: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
504: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
505: WHEN fnd_api.g_exc_unexpected_error
506: THEN
507: ROLLBACK TO create_quota_rule_uplift;
508: x_return_status := fnd_api.g_ret_sts_unexp_error;
509: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
510: WHEN OTHERS
511: THEN
512: ROLLBACK TO create_quota_rule_uplift;
505: WHEN fnd_api.g_exc_unexpected_error
506: THEN
507: ROLLBACK TO create_quota_rule_uplift;
508: x_return_status := fnd_api.g_ret_sts_unexp_error;
509: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
510: WHEN OTHERS
511: THEN
512: ROLLBACK TO create_quota_rule_uplift;
513: x_return_status := fnd_api.g_ret_sts_unexp_error;
509: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
510: WHEN OTHERS
511: THEN
512: ROLLBACK TO create_quota_rule_uplift;
513: x_return_status := fnd_api.g_ret_sts_unexp_error;
514:
515: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
516: THEN
517: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
516: THEN
517: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
518: END IF;
519:
520: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
521: END create_uplift;
522:
523: -- Start of comments
524: -- API name : Update_Uplift
527: -- Pre-reqs : None.
528: -- Parameters :
529: -- IN : p_api_version IN NUMBER Required
530: -- p_init_msg_list IN VARCHAR2 Optional
531: -- Default = FND_API.G_FALSE
532: -- p_commit IN VARCHAR2 Optional
533: -- Default = FND_API.G_FALSE
534: -- p_validation_level IN NUMBER Optional
535: -- Default = FND_API.G_VALID_LEVEL_FULL
529: -- IN : p_api_version IN NUMBER Required
530: -- p_init_msg_list IN VARCHAR2 Optional
531: -- Default = FND_API.G_FALSE
532: -- p_commit IN VARCHAR2 Optional
533: -- Default = FND_API.G_FALSE
534: -- p_validation_level IN NUMBER Optional
535: -- Default = FND_API.G_VALID_LEVEL_FULL
536: -- p_quota_rule_uplift IN quota_rule_uplift_rec_type
537: -- OUT : x_return_status OUT VARCHAR2(1)
531: -- Default = FND_API.G_FALSE
532: -- p_commit IN VARCHAR2 Optional
533: -- Default = FND_API.G_FALSE
534: -- p_validation_level IN NUMBER Optional
535: -- Default = FND_API.G_VALID_LEVEL_FULL
536: -- p_quota_rule_uplift IN quota_rule_uplift_rec_type
537: -- OUT : x_return_status OUT VARCHAR2(1)
538: -- x_msg_count OUT NUMBER
539: -- x_msg_data OUT VARCHAR2(2000)
542: --
543: -- End of comments
544: PROCEDURE update_uplift (
545: p_api_version IN NUMBER,
546: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
547: p_commit IN VARCHAR2 := fnd_api.g_false,
548: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
549: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
550: x_return_status OUT NOCOPY VARCHAR2,
543: -- End of comments
544: PROCEDURE update_uplift (
545: p_api_version IN NUMBER,
546: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
547: p_commit IN VARCHAR2 := fnd_api.g_false,
548: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
549: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
550: x_return_status OUT NOCOPY VARCHAR2,
551: x_msg_count OUT NOCOPY NUMBER,
544: PROCEDURE update_uplift (
545: p_api_version IN NUMBER,
546: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
547: p_commit IN VARCHAR2 := fnd_api.g_false,
548: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
549: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
550: x_return_status OUT NOCOPY VARCHAR2,
551: x_msg_count OUT NOCOPY NUMBER,
552: x_msg_data OUT NOCOPY VARCHAR2
576: -- Standard Start of API savepoint
577: SAVEPOINT update_quota_rule_uplift;
578:
579: -- Standard call to check for call compatibility.
580: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
581: THEN
582: RAISE fnd_api.g_exc_unexpected_error;
583: END IF;
584:
578:
579: -- Standard call to check for call compatibility.
580: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
581: THEN
582: RAISE fnd_api.g_exc_unexpected_error;
583: END IF;
584:
585: -- Initialize message list if p_init_msg_list is set to TRUE.
586: IF fnd_api.to_boolean (p_init_msg_list)
582: RAISE fnd_api.g_exc_unexpected_error;
583: END IF;
584:
585: -- Initialize message list if p_init_msg_list is set to TRUE.
586: IF fnd_api.to_boolean (p_init_msg_list)
587: THEN
588: fnd_msg_pub.initialize;
589: END IF;
590:
588: fnd_msg_pub.initialize;
589: END IF;
590:
591: -- Initialize API return status to success
592: x_return_status := fnd_api.g_ret_sts_success;
593:
594: -- API body
595:
596: -- 1. name can not be null
602: fnd_message.set_token ('INPUT_NAME', cn_api.get_lkup_meaning ('SD', 'INPUT_TOKEN'));
603: fnd_msg_pub.ADD;
604: END IF;
605:
606: RAISE fnd_api.g_exc_error;
607: END IF;
608:
609: -- 2. trx type must be unique
610: SELECT COUNT (1)
623: fnd_message.set_token ('INPUT_NAME', cn_api.get_lkup_meaning ('SD', 'INPUT_TOKEN'));
624: fnd_msg_pub.ADD;
625: END IF;
626:
627: RAISE fnd_api.g_exc_error;
628: END IF;
629:
630: OPEN l_old_quota_rule_uplift_cr;
631:
633: INTO l_old_quota_rule_uplift;
634:
635: CLOSE l_old_quota_rule_uplift_cr;
636:
637: SELECT DECODE (p_quota_rule_uplift.quota_rule_id, fnd_api.g_miss_num, l_old_quota_rule_uplift.quota_rule_id, p_quota_rule_uplift.quota_rule_id),
638: DECODE (p_quota_rule_uplift.start_date, fnd_api.g_miss_date, l_old_quota_rule_uplift.start_date, p_quota_rule_uplift.start_date),
639: DECODE (p_quota_rule_uplift.end_date, fnd_api.g_miss_date, l_old_quota_rule_uplift.end_date, p_quota_rule_uplift.end_date),
640: DECODE (p_quota_rule_uplift.payment_factor, NULL, 0, p_quota_rule_uplift.payment_factor),
641: DECODE (p_quota_rule_uplift.quota_factor, NULL, 0, p_quota_rule_uplift.quota_factor),
634:
635: CLOSE l_old_quota_rule_uplift_cr;
636:
637: SELECT DECODE (p_quota_rule_uplift.quota_rule_id, fnd_api.g_miss_num, l_old_quota_rule_uplift.quota_rule_id, p_quota_rule_uplift.quota_rule_id),
638: DECODE (p_quota_rule_uplift.start_date, fnd_api.g_miss_date, l_old_quota_rule_uplift.start_date, p_quota_rule_uplift.start_date),
639: DECODE (p_quota_rule_uplift.end_date, fnd_api.g_miss_date, l_old_quota_rule_uplift.end_date, p_quota_rule_uplift.end_date),
640: DECODE (p_quota_rule_uplift.payment_factor, NULL, 0, p_quota_rule_uplift.payment_factor),
641: DECODE (p_quota_rule_uplift.quota_factor, NULL, 0, p_quota_rule_uplift.quota_factor),
642: l_old_quota_rule_uplift.start_date,
635: CLOSE l_old_quota_rule_uplift_cr;
636:
637: SELECT DECODE (p_quota_rule_uplift.quota_rule_id, fnd_api.g_miss_num, l_old_quota_rule_uplift.quota_rule_id, p_quota_rule_uplift.quota_rule_id),
638: DECODE (p_quota_rule_uplift.start_date, fnd_api.g_miss_date, l_old_quota_rule_uplift.start_date, p_quota_rule_uplift.start_date),
639: DECODE (p_quota_rule_uplift.end_date, fnd_api.g_miss_date, l_old_quota_rule_uplift.end_date, p_quota_rule_uplift.end_date),
640: DECODE (p_quota_rule_uplift.payment_factor, NULL, 0, p_quota_rule_uplift.payment_factor),
641: DECODE (p_quota_rule_uplift.quota_factor, NULL, 0, p_quota_rule_uplift.quota_factor),
642: l_old_quota_rule_uplift.start_date,
643: l_old_quota_rule_uplift.end_date,
672: fnd_message.set_name ('CN', 'CN_RECORD_CHANGED');
673: fnd_msg_pub.ADD;
674: END IF;
675:
676: RAISE fnd_api.g_exc_error;
677: END IF;
678:
679: IF (l_rev_uplift_rec_tbl (1).start_date < l_start_date) OR (NVL (l_rev_uplift_rec_tbl (1).end_date, l_null_date) > l_end_date)
680: THEN
683: fnd_message.set_name ('CN', 'CN_RC_INVALID_DATE_RANGE');
684: fnd_msg_pub.ADD;
685: END IF;
686:
687: RAISE fnd_api.g_exc_error;
688: END IF;
689:
690: SELECT r.NAME,
691: q.NAME
726: p_quota_rule_uplift.rev_class_name_old := l_rev_uplift_rec_tbl (1).rev_class_name_old;
727: p_quota_rule_uplift.start_date_old := l_rev_uplift_rec_tbl (1).start_date_old;
728: p_quota_rule_uplift.end_date_old := l_rev_uplift_rec_tbl (1).end_date_old;
729:
730: IF (x_return_status <> fnd_api.g_ret_sts_success)
731: THEN
732: RAISE fnd_api.g_exc_error;
733: END IF;
734:
728: p_quota_rule_uplift.end_date_old := l_rev_uplift_rec_tbl (1).end_date_old;
729:
730: IF (x_return_status <> fnd_api.g_ret_sts_success)
731: THEN
732: RAISE fnd_api.g_exc_error;
733: END IF;
734:
735: -- Calling proc to add system note for update
736: add_system_note(
741: x_return_status,
742: x_msg_count,
743: x_msg_data
744: );
745: IF (x_return_status <> fnd_api.g_ret_sts_success)
746: THEN
747: RAISE fnd_api.g_exc_error;
748: END IF;
749:
743: x_msg_data
744: );
745: IF (x_return_status <> fnd_api.g_ret_sts_success)
746: THEN
747: RAISE fnd_api.g_exc_error;
748: END IF;
749:
750:
751: -- End of API body.
749:
750:
751: -- End of API body.
752: -- Standard check of p_commit.
753: IF fnd_api.to_boolean (p_commit)
754: THEN
755: COMMIT WORK;
756: END IF;
757:
755: COMMIT WORK;
756: END IF;
757:
758: -- Standard call to get message count and if count is 1, get message info.
759: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
760: EXCEPTION
761: WHEN fnd_api.g_exc_error
762: THEN
763: ROLLBACK TO update_quota_rule_uplift;
757:
758: -- Standard call to get message count and if count is 1, get message info.
759: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
760: EXCEPTION
761: WHEN fnd_api.g_exc_error
762: THEN
763: ROLLBACK TO update_quota_rule_uplift;
764: x_return_status := fnd_api.g_ret_sts_error;
765: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
760: EXCEPTION
761: WHEN fnd_api.g_exc_error
762: THEN
763: ROLLBACK TO update_quota_rule_uplift;
764: x_return_status := fnd_api.g_ret_sts_error;
765: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
766: WHEN fnd_api.g_exc_unexpected_error
767: THEN
768: ROLLBACK TO update_quota_rule_uplift;
761: WHEN fnd_api.g_exc_error
762: THEN
763: ROLLBACK TO update_quota_rule_uplift;
764: x_return_status := fnd_api.g_ret_sts_error;
765: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
766: WHEN fnd_api.g_exc_unexpected_error
767: THEN
768: ROLLBACK TO update_quota_rule_uplift;
769: x_return_status := fnd_api.g_ret_sts_unexp_error;
762: THEN
763: ROLLBACK TO update_quota_rule_uplift;
764: x_return_status := fnd_api.g_ret_sts_error;
765: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
766: WHEN fnd_api.g_exc_unexpected_error
767: THEN
768: ROLLBACK TO update_quota_rule_uplift;
769: x_return_status := fnd_api.g_ret_sts_unexp_error;
770: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
765: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
766: WHEN fnd_api.g_exc_unexpected_error
767: THEN
768: ROLLBACK TO update_quota_rule_uplift;
769: x_return_status := fnd_api.g_ret_sts_unexp_error;
770: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
771: WHEN OTHERS
772: THEN
773: ROLLBACK TO update_quota_rule_uplift;
766: WHEN fnd_api.g_exc_unexpected_error
767: THEN
768: ROLLBACK TO update_quota_rule_uplift;
769: x_return_status := fnd_api.g_ret_sts_unexp_error;
770: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
771: WHEN OTHERS
772: THEN
773: ROLLBACK TO update_quota_rule_uplift;
774: x_return_status := fnd_api.g_ret_sts_unexp_error;
770: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
771: WHEN OTHERS
772: THEN
773: ROLLBACK TO update_quota_rule_uplift;
774: x_return_status := fnd_api.g_ret_sts_unexp_error;
775:
776: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
777: THEN
778: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
777: THEN
778: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
779: END IF;
780:
781: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
782: END update_uplift;
783:
784: -- Start of comments
785: -- API name : Delete_Uplift
788: -- Pre-reqs : None.
789: -- Parameters :
790: -- IN : p_api_version IN NUMBER Required
791: -- p_init_msg_list IN VARCHAR2 Optional
792: -- Default = FND_API.G_FALSE
793: -- p_commit IN VARCHAR2 Optional
794: -- Default = FND_API.G_FALSE
795: -- p_validation_level IN NUMBER Optional
796: -- Default = FND_API.G_VALID_LEVEL_FULL
790: -- IN : p_api_version IN NUMBER Required
791: -- p_init_msg_list IN VARCHAR2 Optional
792: -- Default = FND_API.G_FALSE
793: -- p_commit IN VARCHAR2 Optional
794: -- Default = FND_API.G_FALSE
795: -- p_validation_level IN NUMBER Optional
796: -- Default = FND_API.G_VALID_LEVEL_FULL
797: -- p_quota_rule_uplift IN quota_rule_uplift_rec_type
798: -- OUT : x_return_status OUT VARCHAR2(1)
792: -- Default = FND_API.G_FALSE
793: -- p_commit IN VARCHAR2 Optional
794: -- Default = FND_API.G_FALSE
795: -- p_validation_level IN NUMBER Optional
796: -- Default = FND_API.G_VALID_LEVEL_FULL
797: -- p_quota_rule_uplift IN quota_rule_uplift_rec_type
798: -- OUT : x_return_status OUT VARCHAR2(1)
799: -- x_msg_count OUT NUMBER
800: -- x_msg_data OUT VARCHAR2(2000)
803: --
804: -- End of comments
805: PROCEDURE delete_uplift (
806: p_api_version IN NUMBER,
807: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
808: p_commit IN VARCHAR2 := fnd_api.g_false,
809: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
810: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
811: x_return_status OUT NOCOPY VARCHAR2,
804: -- End of comments
805: PROCEDURE delete_uplift (
806: p_api_version IN NUMBER,
807: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
808: p_commit IN VARCHAR2 := fnd_api.g_false,
809: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
810: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
811: x_return_status OUT NOCOPY VARCHAR2,
812: x_msg_count OUT NOCOPY NUMBER,
805: PROCEDURE delete_uplift (
806: p_api_version IN NUMBER,
807: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
808: p_commit IN VARCHAR2 := fnd_api.g_false,
809: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
810: p_quota_rule_uplift IN OUT NOCOPY quota_rule_uplift_rec_type,
811: x_return_status OUT NOCOPY VARCHAR2,
812: x_msg_count OUT NOCOPY NUMBER,
813: x_msg_data OUT NOCOPY VARCHAR2
825: -- Standard Start of API savepoint
826: SAVEPOINT delete_quota_rule_uplift;
827:
828: -- Standard call to check for call compatibility.
829: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
830: THEN
831: RAISE fnd_api.g_exc_unexpected_error;
832: END IF;
833:
827:
828: -- Standard call to check for call compatibility.
829: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
830: THEN
831: RAISE fnd_api.g_exc_unexpected_error;
832: END IF;
833:
834: -- Initialize message list if p_init_msg_list is set to TRUE.
835: IF fnd_api.to_boolean (p_init_msg_list)
831: RAISE fnd_api.g_exc_unexpected_error;
832: END IF;
833:
834: -- Initialize message list if p_init_msg_list is set to TRUE.
835: IF fnd_api.to_boolean (p_init_msg_list)
836: THEN
837: fnd_msg_pub.initialize;
838: END IF;
839:
837: fnd_msg_pub.initialize;
838: END IF;
839:
840: -- Initialize API return status to success
841: x_return_status := fnd_api.g_ret_sts_success;
842:
843: -- API body
844: SELECT r.NAME,
845: q.NAME,
874: x_loading_status => l_loading_status
875: );
876:
877:
878: IF (x_return_status <> fnd_api.g_ret_sts_success)
879: THEN
880: RAISE fnd_api.g_exc_error;
881: END IF;
882:
876:
877:
878: IF (x_return_status <> fnd_api.g_ret_sts_success)
879: THEN
880: RAISE fnd_api.g_exc_error;
881: END IF;
882:
883: p_quota_rule_uplift.rev_class_name := l_rev_uplift_rec_tbl (1).rev_class_name;
884: -- Calling proc to add system note for delete
890: x_return_status,
891: x_msg_count,
892: x_msg_data
893: );
894: IF (x_return_status <> fnd_api.g_ret_sts_success)
895: THEN
896: RAISE fnd_api.g_exc_error;
897: END IF;
898:
892: x_msg_data
893: );
894: IF (x_return_status <> fnd_api.g_ret_sts_success)
895: THEN
896: RAISE fnd_api.g_exc_error;
897: END IF;
898:
899: -- End of API body.
900: -- Standard check of p_commit.
897: END IF;
898:
899: -- End of API body.
900: -- Standard check of p_commit.
901: IF fnd_api.to_boolean (p_commit)
902: THEN
903: COMMIT WORK;
904: END IF;
905:
903: COMMIT WORK;
904: END IF;
905:
906: -- Standard call to get message count and if count is 1, get message info.
907: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
908: EXCEPTION
909: WHEN fnd_api.g_exc_error
910: THEN
911: ROLLBACK TO delete_quota_rule_uplift;
905:
906: -- Standard call to get message count and if count is 1, get message info.
907: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
908: EXCEPTION
909: WHEN fnd_api.g_exc_error
910: THEN
911: ROLLBACK TO delete_quota_rule_uplift;
912: x_return_status := fnd_api.g_ret_sts_error;
913: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
908: EXCEPTION
909: WHEN fnd_api.g_exc_error
910: THEN
911: ROLLBACK TO delete_quota_rule_uplift;
912: x_return_status := fnd_api.g_ret_sts_error;
913: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
914: WHEN fnd_api.g_exc_unexpected_error
915: THEN
916: ROLLBACK TO delete_quota_rule_uplift;
909: WHEN fnd_api.g_exc_error
910: THEN
911: ROLLBACK TO delete_quota_rule_uplift;
912: x_return_status := fnd_api.g_ret_sts_error;
913: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
914: WHEN fnd_api.g_exc_unexpected_error
915: THEN
916: ROLLBACK TO delete_quota_rule_uplift;
917: x_return_status := fnd_api.g_ret_sts_unexp_error;
910: THEN
911: ROLLBACK TO delete_quota_rule_uplift;
912: x_return_status := fnd_api.g_ret_sts_error;
913: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
914: WHEN fnd_api.g_exc_unexpected_error
915: THEN
916: ROLLBACK TO delete_quota_rule_uplift;
917: x_return_status := fnd_api.g_ret_sts_unexp_error;
918: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
913: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
914: WHEN fnd_api.g_exc_unexpected_error
915: THEN
916: ROLLBACK TO delete_quota_rule_uplift;
917: x_return_status := fnd_api.g_ret_sts_unexp_error;
918: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
919: WHEN OTHERS
920: THEN
921: ROLLBACK TO delete_quota_rule_uplift;
914: WHEN fnd_api.g_exc_unexpected_error
915: THEN
916: ROLLBACK TO delete_quota_rule_uplift;
917: x_return_status := fnd_api.g_ret_sts_unexp_error;
918: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
919: WHEN OTHERS
920: THEN
921: ROLLBACK TO delete_quota_rule_uplift;
922: x_return_status := fnd_api.g_ret_sts_unexp_error;
918: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
919: WHEN OTHERS
920: THEN
921: ROLLBACK TO delete_quota_rule_uplift;
922: x_return_status := fnd_api.g_ret_sts_unexp_error;
923:
924: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
925: THEN
926: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
925: THEN
926: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
927: END IF;
928:
929: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
930: END delete_uplift;
931:
932: END cn_quota_rule_uplift_pvt;