diff --git a/R/buchungen_mod.R b/R/buchungen_mod.R index 1709c3d..6504a57 100644 --- a/R/buchungen_mod.R +++ b/R/buchungen_mod.R @@ -91,8 +91,7 @@ buchungenServer <- function(id, conn) { observeEvent(input$add_trans, { new_t_id <- max_id(conn, "entries") + 1 dbxInsert(conn, "entries", data.frame(id = new_t_id)) - - p_id1 <- max_id(conn, "postings") + 1 + p_id1 <- max_id(conn, "postings") + 1 p_id2 <- p_id1 + 1 dbxInsert(conn, "postings", data.frame( id = c(p_id1, p_id2), @@ -111,11 +110,6 @@ buchungenServer <- function(id, conn) { ## ** Re-render erzwingen → Filter wird zurückgesetzt, neue Zeile selektiert ---- reset_trigger(isolate(reset_trigger()) + 1) scroll_to_row(ns("buchungen_table"), neue_zeile) - showNotification( - "Filter zurückgesetzt – neue Transaktion ist jetzt sichtbar.", - type = "message", - duration = 3 - ) }) # * Transaktion löschen ---- @@ -123,12 +117,10 @@ buchungenServer <- function(id, conn) { req(selected_trans_id()) dbxDelete(conn, "postings", where = data.frame(entry_id = selected_trans_id())) dbxDelete(conn, "entries", where = data.frame(id = selected_trans_id())) - postings_data(read_buch_tabelle(conn)) current_main_idx(NULL) selected_trans_id(NULL) details_data(NULL) - updateReactable("buchungen_table", data = postings_data()) # details_table re-rendert automatisch weil details_data(NULL) → req() schlägt fehl })