31: -- Issue a savepoint
32: --
33: savepoint per_merge_vendor;
34:
35: update per_all_assignments_f
36: set vendor_id=p_vendor_id
37: where vendor_id=p_dup_vendor_id;
38:
39: update per_all_assignments_f
35: update per_all_assignments_f
36: set vendor_id=p_vendor_id
37: where vendor_id=p_dup_vendor_id;
38:
39: update per_all_assignments_f
40: set vendor_site_id=p_vendor_site_id
41: where vendor_site_id=p_dup_vendor_site_id;
42:
43: p_return_status := FND_API.G_RET_STS_SUCCESS;