298: , G_PKG_NAME) THEN
299: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
300: END IF;
301: -- initialize messages
302: FND_MSG_PUB.initialize;
303: -- debug start
304: ozf_utility_pvt.debug_message('Private API: '||l_api_name||' Start');
305: -- set return status
306: x_return_status := FND_API.G_RET_STS_SUCCESS;
370: IF FND_API.to_boolean(p_commit) THEN
371: COMMIT WORK;
372: END IF;
373: -- collect messages
374: FND_MSG_PUB.count_and_get
375: (
376: p_count => x_msg_count
377: , p_data =>x_msg_data
378: );
380: EXCEPTION
381: WHEN FND_API.G_EXC_ERROR THEN
382: ROLLBACK TO Create_ozf_qp_discount;
383: x_return_status := FND_API.G_RET_STS_ERROR;
384: FND_MSG_PUB.count_and_get
385: (
386: p_encoded => FND_API.G_FALSE
387: , p_count => x_msg_count
388: , p_data => x_msg_data
389: );
390: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
391: ROLLBACK TO Create_ozf_qp_discount;
392: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
393: FND_MSG_PUB.count_and_get
394: (
395: p_encoded => FND_API.G_FALSE
396: , p_count => x_msg_count
397: , p_data => x_msg_data
398: );
399: WHEN OTHERS THEN
400: ROLLBACK TO Create_ozf_qp_discount;
401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
402: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
403: FND_MSG_PUB.Add_exc_msg(G_PKG_NAME,l_api_name);
404: END IF;
405: FND_MSG_PUB.count_and_get(
406: p_encoded => FND_API.G_FALSE
399: WHEN OTHERS THEN
400: ROLLBACK TO Create_ozf_qp_discount;
401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
402: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
403: FND_MSG_PUB.Add_exc_msg(G_PKG_NAME,l_api_name);
404: END IF;
405: FND_MSG_PUB.count_and_get(
406: p_encoded => FND_API.G_FALSE
407: , p_data => x_msg_data
401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
402: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
403: FND_MSG_PUB.Add_exc_msg(G_PKG_NAME,l_api_name);
404: END IF;
405: FND_MSG_PUB.count_and_get(
406: p_encoded => FND_API.G_FALSE
407: , p_data => x_msg_data
408: , p_count => x_msg_count
409: );
450: THEN
451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
452: END IF;
453: IF FND_API.to_boolean(p_init_msg_list) THEN
454: FND_MSG_PUB.initialize;
455: END IF;
456: ozf_utility_pvt.debug_message('Private API: '|| l_api_name || ' Start');
457: x_return_status := FND_API.G_RET_STS_SUCCESS;
458:
521: IF FND_API.to_boolean(p_commit) THEN
522: COMMIT WORK;
523: END IF;
524:
525: FND_MSG_PUB.count_and_get
526: (
527: p_data => x_msg_data
528: , p_count => x_msg_count
529: );
535:
536: WHEN FND_API.G_EXC_ERROR THEN
537: ROLLBACK TO Update_ozf_qp_discount;
538: x_return_status := FND_API.G_RET_STS_ERROR;
539: FND_MSG_PUB.count_and_get(
540: p_encoded => FND_API.g_false
541: , p_count => x_msg_count
542: , p_data => x_msg_data
543: );
543: );
544: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
545: ROLLBACK TO Update_ozf_qp_discount;
546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
547: FND_MSG_PUB.count_and_get(
548: p_encoded => FND_API.g_false
549: , p_count => x_msg_count
550: , p_data => x_msg_data
551: );
551: );
552: WHEN OTHERS THEN
553: ROLLBACK TO Update_ozf_qp_discount;
554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
555: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
556: FND_MSG_PUB.Add_exc_msg(G_PKG_NAME, l_api_name);
557: END IF;
558: FND_MSG_PUB.count_and_get(
559: p_encoded => FND_API.g_false
552: WHEN OTHERS THEN
553: ROLLBACK TO Update_ozf_qp_discount;
554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
555: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
556: FND_MSG_PUB.Add_exc_msg(G_PKG_NAME, l_api_name);
557: END IF;
558: FND_MSG_PUB.count_and_get(
559: p_encoded => FND_API.g_false
560: , p_count => x_msg_count
554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
555: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
556: FND_MSG_PUB.Add_exc_msg(G_PKG_NAME, l_api_name);
557: END IF;
558: FND_MSG_PUB.count_and_get(
559: p_encoded => FND_API.g_false
560: , p_count => x_msg_count
561: , p_data => x_msg_data
562: );
592: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
593: END IF;
594:
595: IF FND_API.to_boolean(p_init_msg_list) THEN
596: FND_MSG_PUB.initialize;
597: END IF;
598: ozf_utility_pvt.debug_message('Private API: '|| l_api_name|| ' Start');
599:
600: x_return_status := FND_API.G_RET_STS_SUCCESS;
612: IF FND_API.to_boolean(p_commit) THEN
613: COMMIT WORK;
614: END IF;
615:
616: FND_MSG_PUB.count_and_get(
617: p_count => x_msg_count
618: , p_data => x_msg_data
619: );
620:
621: EXCEPTION
622: WHEN FND_API.G_EXC_ERROR THEN
623: ROLLBACK TO Delete_ozf_qp_discount;
624: x_return_status := FND_API.G_RET_STS_ERROR;
625: FND_MSG_PUB.count_and_get(
626: p_encoded => FND_API.g_false
627: , p_count => x_msg_count
628: , p_data => x_msg_data
629: );
629: );
630: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
631: ROLLBACK TO Delete_ozf_qp_discount;
632: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
633: FND_MSG_PUB.count_and_get(
634: p_encoded => FND_API.g_false
635: , p_count => x_msg_count
636: , p_data => x_msg_data
637: );
637: );
638: WHEN OTHERS THEN
639: ROLLBACK TO Delete_ozf_qp_discount;
640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
641: IF FND_MSG_PUB.Check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
642: FND_MSG_PUB.Add_exc_msg(G_PKG_NAME,l_api_name);
643: END IF;
644: FND_MSG_PUB.count_and_get(
645: p_encoded => FND_API.g_false
638: WHEN OTHERS THEN
639: ROLLBACK TO Delete_ozf_qp_discount;
640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
641: IF FND_MSG_PUB.Check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
642: FND_MSG_PUB.Add_exc_msg(G_PKG_NAME,l_api_name);
643: END IF;
644: FND_MSG_PUB.count_and_get(
645: p_encoded => FND_API.g_false
646: , p_count => x_msg_count
640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
641: IF FND_MSG_PUB.Check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
642: FND_MSG_PUB.Add_exc_msg(G_PKG_NAME,l_api_name);
643: END IF;
644: FND_MSG_PUB.count_and_get(
645: p_encoded => FND_API.g_false
646: , p_count => x_msg_count
647: , p_data => x_msg_data
648: );