R/AVSDevR.MarineNoiseRegistry
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed closeout-due date for multi-year after year close-out done

Browse Source
This commit is contained in:
Craig Williams
2026-06-05 11:42:46 +01:00
parent 7a92bdd6da
commit 3ebeea6cc7
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
R/db_applications.R
View File

@@ -357,7 +357,9 @@ MNR.DB.Applications <- R6::R6Class(
# Work out what the closeout closeout year should be # Work out what the closeout closeout year should be
dplyr::mutate( dplyr::mutate(
closeout_year = as.Date(paste( closeout_year = as.Date(paste(
lubridate::year(pmax(start_date, closed_at, na.rm = TRUE)), lubridate::year(
pmax(start_date, last_closeout_at, closed_at, na.rm = TRUE)
),
12L, 12L,
31L, 31L,
sep = "-" sep = "-"