server <- function(input, output) { buchungenServer("buchungen_tab") }