Buchungen funktioniern mitsamt modal und laufendem saldo
This commit is contained in:
@@ -0,0 +1,35 @@
|
||||
##
|
||||
## Datum: 2024-10-17_11-38
|
||||
## Name: Christian Oswald
|
||||
## Projekt: etatverwaltung
|
||||
## Datei: f_airdatepicker.R
|
||||
## Kommentar: Funktionen für den Airdatepicker
|
||||
##
|
||||
|
||||
## * Update unter Berücksichtigung nicht vorhandern Werte
|
||||
f_updateAirdate <- function(session, id, wert){
|
||||
if(is.na(wert)){
|
||||
updateAirDateInput(session, id, clear = TRUE)
|
||||
}else{
|
||||
updateAirDateInput(session, id, value = wert)
|
||||
}
|
||||
}
|
||||
|
||||
## * Format für den Picker
|
||||
f_airdatepicker_UI <- function(id, label, value) {
|
||||
ns <- NS(id)
|
||||
airDatepickerInput(
|
||||
id,
|
||||
label = label,
|
||||
value = value,
|
||||
width = "100%",
|
||||
update_on = "close",
|
||||
readonly = FALSE, # Manuelle Eingabe erlauben
|
||||
onkeydown = "Shiny.setInputValue(this.id, this.value, {priority: 'event'});", # Übergabe an Shiny
|
||||
|
||||
|
||||
todayButton = T)
|
||||
}
|
||||
|
||||
# f_airdatepicker_UI(id, label, value)
|
||||
|
||||
Reference in New Issue
Block a user