Filter hinzugefügt

2026-03-19 17:06:40 +01:00
parent daba64c83a
commit 70a2fe2526
7 changed files with 140 additions and 19 deletions
@@ -1,5 +1,14 @@
 server <- function(input, output) {
-  
-  buchungenServer("buchungen_tab", conn) 
+  aktiver_filter <- reactive({
+    if (input$filter_giro  > 0 && 
+        input$filter_giro  == max(input$filter_giro, input$filter_monat, input$filter_alle))
+      "giro"
+    else if (input$filter_monat > 0 && 
+        input$filter_monat == max(input$filter_giro, input$filter_monat, input$filter_alle))
+      "monat"
+    else
+      "alle"
+  })
+  buchungenServer("buchungen_tab", conn, aktiver_filter = aktiver_filter) 
  
 }