fix 'UE|Buildings*' on ref run, fix some warnings

Author: orichters

modules/36_buildings/simple/datainput.gms

@@ -55,7 +55,13 @@ $include "./modules/36_buildings/simple/input/f36_uedemand_build.cs4r"
 $offdelim
 /
 ;
-p36_uedemand_build(ttot,regi,in) = f36_uedemand_build(ttot,regi,"%cm_demScen%","%cm_rcp_scen_build%",in);
+
+*** load UE demand for reporting from input_ref.gdx cm_startyear
+if (cm_startyear gt 2005,
+  execute_load "input_ref.gdx", p36_uedemand_build;
+);
+
+p36_uedemand_build(t,regi,in) = f36_uedemand_build(t,regi,"%cm_demScen%","%cm_rcp_scen_build%",in);
 
 *** Scale UE demand and floor space in the building sector
 $ifthen.scaleDemand not "%cm_scaleDemand%" == "off"

scripts/output/single/MAGICC7_AR6.R

@@ -242,6 +242,6 @@ if (dir.exists(workersFolder)) {
   }
 }
 
-logmsg <- paste0(logmsg, date(), "MAGICC7_AR6.R finished\n")
+logmsg <- paste0(logmsg, date(), "  MAGICC7_AR6.R finished\n")
 cat(logmsg)
 capture.output(cat(logmsg), file = logFile, append = TRUE)

scripts/output/single/checkProjectSummations.R

@@ -19,7 +19,7 @@ scen <- lucode2::getScenNames(outputdir)
 mif  <- file.path(outputdir, paste0("REMIND_generic_", scen, ".mif"))
 mifdata <- as.quitte(mif)
 envi <- new.env()
-load(file.path(outputdir, "config.Rdata"), env =  envi)
+load(file.path(outputdir, "config.Rdata"), envir = envi)
 
 stopmessage <- NULL
 

scripts/output/single/fixOnRef.R

@@ -78,7 +78,7 @@ fixOnMif <- function(outputdir) {
 
   # load config of first outputdir (the folder we are checking)
   envi <- new.env()
-  load(configs[[1]], env =  envi)
+  load(configs[[1]], envir = envi)
   title <- envi$cfg$title
   stopifnot(title == scens[[1]])
   startyear <- envi$cfg$gms$cm_startyear