Skip to content

Commit

Permalink
Fix chart creation function to use VizConsole
Browse files Browse the repository at this point in the history
  • Loading branch information
katieb1 committed Apr 16, 2024
1 parent e135818 commit cbc5e8b
Show file tree
Hide file tree
Showing 5 changed files with 7 additions and 7 deletions.
2 changes: 1 addition & 1 deletion R/chart.R
Original file line number Diff line number Diff line change
Expand Up @@ -80,7 +80,7 @@ setMethod(
}

tt <- command(args = args, session = .session(x),
program = "SyncroSim.CPConsole.exe")
program = "SyncroSim.VizConsole.exe")

ChartId <- as.integer(strsplit(tt, ": ")[[1]][2])

Expand Down
2 changes: 1 addition & 1 deletion R/command.R
Original file line number Diff line number Diff line change
Expand Up @@ -22,7 +22,7 @@ NULL
#' @param session \code{\link{Session}} object. If \code{NULL}(default), the default
#' session will be used
#' @param program character. The name of the target SyncroSim executable.
#' Options include "SyncroSim.Console.exe" (default), "SyncroSim.CPConsole.exe",
#' Options include "SyncroSim.Console.exe" (default), "SyncroSim.VizConsole.exe",
#' "SyncroSim.PackageManager.exe" and "SyncroSim.Multiband.exe"
#' @param wait logical. If \code{TRUE}(default) R will wait for the command to finish
#' before proceeding. Note that silent(session) is ignored if \code{wait=FALSE}
Expand Down
4 changes: 2 additions & 2 deletions R/internalHelpers.R
Original file line number Diff line number Diff line change
Expand Up @@ -305,7 +305,7 @@ deleteChart <- function(x, chartId, chartName, out = list(), force){
chart = NULL, lib = .filepath(x),
cid = chartIdToDelete, force = NULL)
outBit <- command(args, session = .session(x),
program = "SyncroSim.CPConsole.exe")
program = "SyncroSim.VizConsole.exe")
} else {
outBit <- paste0("Deletion of chart ", chartNameToDelete, " skipped")
}
Expand Down Expand Up @@ -510,7 +510,7 @@ getChartData <- function(x) {
args <- list(lib = .filepath(x), list = NULL,
charts = NULL, pid = .projectId(x))
tt <- command(args = args, session = .session(x),
program = "SyncroSim.CPConsole.exe")
program = "SyncroSim.VizConsole.exe")
out <- .dataframeFromSSim(tt, localNames = TRUE, csv=FALSE)

# Clean up dataframe names and columns
Expand Down
2 changes: 1 addition & 1 deletion R/scenario.R
Original file line number Diff line number Diff line change
Expand Up @@ -192,7 +192,7 @@ setMethod(
#' \item If element/Project/SsimObject do not identify an existing Scenario and
#' do identify a Project, and element is a character string: Creates a
#' new Scenario named element in the Project. SyncroSim automatically
#' assigns an id. If sourceScenario is not \codeNULL the new Scenario will be
#' assigns an id. If sourceScenario is not \code{NULL} the new Scenario will be
#' a copy of sourceScenario.
#' }
#'
Expand Down
4 changes: 2 additions & 2 deletions R/ssimLibrary.R
Original file line number Diff line number Diff line change
Expand Up @@ -235,8 +235,8 @@ setMethod(".ssimLibrary", signature(name = "SsimObject"),
#' Example arguments:
#' \itemize{
#' \item If name is SyncroSim Project or Scenario: Returns the
#' \code\linkSsimLibrary associated with the Project or Scenario.
#' \item If name is \codeNULL: Create/open a SsimLibrary in the current working
#' \code{\link{SsimLibrary}} associated with the Project or Scenario.
#' \item If name is \code{NULL}: Create/open a SsimLibrary in the current working
#' directory with the filename SsimLibrary.ssim.
#' \item If name is a string: If string is not a valid path treat as filename
#' in working directory. If no file suffix provided in string then add
Expand Down

0 comments on commit cbc5e8b

Please sign in to comment.