25: ) is
26: l_proc varchar2(72) := g_package||'merge_vendor';
27: begin
28: --
29: hr_utility.set_location('Entering:'|| l_proc, 10);
30: --
31: -- Issue a savepoint
32: --
33: savepoint irc_merge_vendor;
47: from fnd_profile_options
48: where profile_option_name='IRC_AGENCY_NAME');
49:
50: p_return_status := FND_API.G_RET_STS_SUCCESS;
51: hr_utility.set_location('Leaving:'|| l_proc, 20);
52:
53: exception when others then
54: rollback to irc_merge_vendor;
55: FND_MSG_PUB.count_and_get(p_count => p_msg_count,
54: rollback to irc_merge_vendor;
55: FND_MSG_PUB.count_and_get(p_count => p_msg_count,
56: p_data => p_msg_data);
57: p_return_status := FND_API.G_RET_STS_ERROR;
58: hr_utility.set_location('Leaving:'|| l_proc, 30);
59:
60:
61: end merge_vendor;
62: