97: END IF;
98:
99: -- Initialize message list if p_init_msg_list is set to TRUE
100: IF fnd_api.to_boolean(p_init_msg_list) THEN
101: fnd_msg_pub.initialize;
102: END IF;
103:
104: -- Initialize API return status to success
105: x_return_status := fnd_api.g_ret_sts_success;
582: COMMIT WORK;
583: END IF;
584:
585: -- Standard call to get message count and if count is 1, get message info
586: fnd_msg_pub.count_and_get
587: ( p_count => x_msg_count,
588: p_data => x_msg_data );
589: EXCEPTION
590: WHEN fnd_api.g_exc_error THEN
589: EXCEPTION
590: WHEN fnd_api.g_exc_error THEN
591: ROLLBACK TO create_interaction_pvt;
592: x_return_status := fnd_api.g_ret_sts_error ;
593: fnd_msg_pub.count_and_get
594: ( p_count => x_msg_count,
595: p_data => x_msg_data );
596: WHEN fnd_api.g_exc_unexpected_error THEN
597: ROLLBACK TO create_interaction_pvt;
595: p_data => x_msg_data );
596: WHEN fnd_api.g_exc_unexpected_error THEN
597: ROLLBACK TO create_interaction_pvt;
598: x_return_status := fnd_api.g_ret_sts_unexp_error ;
599: fnd_msg_pub.count_and_get
600: ( p_count => x_msg_count,
601: p_data => x_msg_data );
602: WHEN OTHERS THEN
603: ROLLBACK TO create_interaction_pvt;
601: p_data => x_msg_data );
602: WHEN OTHERS THEN
603: ROLLBACK TO create_interaction_pvt;
604: x_return_status := fnd_api.g_ret_sts_unexp_error ;
605: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
606: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
607: END IF;
608: fnd_msg_pub.count_and_get
609: ( p_count => x_msg_count,
602: WHEN OTHERS THEN
603: ROLLBACK TO create_interaction_pvt;
604: x_return_status := fnd_api.g_ret_sts_unexp_error ;
605: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
606: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
607: END IF;
608: fnd_msg_pub.count_and_get
609: ( p_count => x_msg_count,
610: p_data => x_msg_data );
604: x_return_status := fnd_api.g_ret_sts_unexp_error ;
605: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
606: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
607: END IF;
608: fnd_msg_pub.count_and_get
609: ( p_count => x_msg_count,
610: p_data => x_msg_data );
611: END Create_Interaction;
612: