UBS appoints Sabine Keller-Busse as president of Swiss unit