591: END IF;
592:
593: -- Initialize message list if p_init_msg_list is set to TRUE
594: IF FND_API.to_Boolean(p_init_msg_list) THEN
595: FND_MSG_PUB.initialize;
596: END IF;
597:
598: -- Initialize API return status to success
599: x_return_status := FND_API.G_RET_STS_SUCCESS;
631: IF l_return_status <> FND_API.g_ret_sts_success THEN
632:
633: l_api_message := 'Error: CST_EAMCOST_PUB.delete_eamperbal()';
634:
635: FND_MSG_PUB.ADD_EXC_MSG('CSTPECEP', 'ESTIMATE_WORKORDER('
636: ||TO_CHAR(l_stmt_num)
637: ||'): ', l_api_message);
638: RAISE FND_API.g_exc_error;
639:
668: IF l_return_status <> FND_API.g_ret_sts_success THEN
669:
670: l_api_message := 'Error: CST_EAMCOST_PUB.Delete_eamBalAcct()';
671:
672: FND_MSG_PUB.ADD_EXC_MSG('CSTPECEP', 'ESTIMATE_WORKORDER('
673: ||TO_CHAR(l_stmt_num)
674: ||'): ', l_api_message);
675: RAISE FND_API.g_exc_error;
676:
697: IF l_return_status <> FND_API.g_ret_sts_success THEN
698:
699: l_api_message := 'Error: CST_eamCost_PUB.Insert_tempEstimateDetails()';
700:
701: FND_MSG_PUB.ADD_EXC_MSG('CSTPECEP', 'ESTIMATE_WORKORDER('
702: ||TO_CHAR(l_stmt_num)
703: ||'): ', l_api_message);
704: RAISE FND_API.g_exc_error;
705:
727: IF l_return_status <> FND_API.g_ret_sts_success THEN
728:
729: l_api_message := 'Error: CST_EAMCOST_PUB.compute_job_estimate()';
730:
731: FND_MSG_PUB.ADD_EXC_MSG('CSTPECEP', 'ESTIMATE_WORKORDER('
732: ||TO_CHAR(l_stmt_num)
733: ||'): ', l_api_message);
734: RAISE FND_API.g_exc_error;
735:
755: COMMIT WORK;
756: END IF;
757:
758: -- Standard Call to get message count and if count = 1, get message info
759: FND_MSG_PUB.Count_And_Get (
760: p_count => x_msg_count,
761: p_data => x_msg_data );
762:
763: EXCEPTION
778:
779: x_return_status := fnd_api.g_ret_sts_error;
780:
781: -- Get message count and data
782: fnd_msg_pub.count_and_get
783: ( p_count => x_msg_count
784: , p_data => x_msg_data
785: );
786: --
801:
802: x_return_status := fnd_api.g_ret_sts_unexp_error ;
803:
804: -- Get message count and data
805: fnd_msg_pub.count_and_get
806: ( p_count => x_msg_count
807: , p_data => x_msg_data
808: );
809: --
825: END IF;
826:
827: x_return_status := fnd_api.g_ret_sts_unexp_error ;
828: --
829: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error)
830: THEN
831: fnd_msg_pub.add_exc_msg
832: ( 'CSTPECEP'
833: , 'Estimate_WorkOrder : l_stmt_num - '||to_char(l_stmt_num)
827: x_return_status := fnd_api.g_ret_sts_unexp_error ;
828: --
829: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error)
830: THEN
831: fnd_msg_pub.add_exc_msg
832: ( 'CSTPECEP'
833: , 'Estimate_WorkOrder : l_stmt_num - '||to_char(l_stmt_num)
834: );
835:
834: );
835:
836: END IF;
837: -- Get message count and data
838: fnd_msg_pub.count_and_get
839: ( p_count => x_msg_count
840: , p_data => x_msg_data
841: );
842: