diff --git a/R/CohortConstruction.R b/R/CohortConstruction.R index d29953b..29820f5 100644 --- a/R/CohortConstruction.R +++ b/R/CohortConstruction.R @@ -243,7 +243,7 @@ generateCohort <- function(cohortId = NULL, connection <- DatabaseConnector::connect(connectionDetails) on.exit(DatabaseConnector::disconnect(connection)) } - ParallelLogger::logInfo(i, "/", nrow(cohortDefinitionSet), "- Generating cohort: ", cohortName) + ParallelLogger::logInfo(i, "/", nrow(cohortDefinitionSet), "- Generating cohort: ", cohortName, " (id = ", cohortId, ")") sql <- cohortDefinitionSet$sql[i] if (!isSubset) {