pfad geändert
Merge branch 'main' of https://git.oswaldonline.de/cosw/gemfin-shiny # Conflicts: # db/data_transfer.R # db/development.sqlite # www/documents/1028.jpg # www/documents/1069.PDF
This commit is contained in:
@@ -193,11 +193,10 @@ buchungenServer <- function(id, conn, r_global) {
|
||||
## *** Anhänge anzeigen ----
|
||||
tagList(lapply(seq_len(nrow(att)), function(i) {
|
||||
ext <- tools::file_ext(att$original_name[i])
|
||||
filename <- paste0("www/documents/", att$id[i], ".", ext)
|
||||
filename <- paste0("documents/", att$id[i], ".", ext)
|
||||
|
||||
## *** Anhang öffnen ----
|
||||
observeEvent(input[[paste0("open_att_", att$id[i])]], {
|
||||
browser()
|
||||
showModal(modalDialog(
|
||||
tags$iframe(src = filename, width = "100%", height = "600px",
|
||||
style = "border:none;"),
|
||||
|
||||
@@ -27,3 +27,4 @@ resolve_contact <- function(conn, empfaenger_name, empfaenger_konto) {
|
||||
collect()
|
||||
if (nrow(bc) > 0) bc$contact_id[1] else NA_integer_
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user