Buchungs modal um actions erweitert
This commit is contained in:
@@ -5,9 +5,12 @@ read_accounts <- function(conn){
|
||||
|
||||
|
||||
get_account_choices <- function(conn) {
|
||||
tbl(conn, "accounts") |>
|
||||
choices <- tbl(conn, "accounts") |>
|
||||
select(id, account_name) |>
|
||||
collect() |>
|
||||
arrange(account_name) |>
|
||||
(\(df) setNames(df$id, df$account_name))()
|
||||
return(c("Kein Konto" = 0, choices))
|
||||
}
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user