diff --git a/R/register_study.R b/R/register_study.R index 3a9065e..84dabcd 100644 --- a/R/register_study.R +++ b/R/register_study.R @@ -60,7 +60,10 @@ add_new_study_meta <- function(id, study_meta) { "dataStatus", "grantDOI", "relatedStudies", - "studyFileviewId")] + "studyFileviewId", + "grantStartDate", + "grantEndDate", + "embargoEndDate")] if(is.null(study_meta$studyStatus) || is.na(study_meta$studyStatus)) study_meta$studyStatus <- "Active" if(is.null(study_meta$dataStatus) || is.na(study_meta$dataStatus)) study_meta$dataStatus <- "Data Pending"