Buchungen-popup funktioniert

2026-02-24 11:17:17 +01:00
parent 32c0b8edb4
commit 622bdf0281
13 changed files with 304 additions and 48 deletions
@@ -0,0 +1,9 @@
+get_project_choices <- function(conn) {
+  projekte <- tbl(conn, "projects") |>
+    select(id, projektname) |>
+    collect() |>
+    arrange(projektname)
+  
+  choices <- setNames(as.character(projekte$id), projekte$projektname)
+  c("-" = "", choices)
+}