Displaying 1 result from an estimated 1 matches for "aad_trader".
2008 Nov 06
1
problem packaging S4 class that contains a slot of jobjRef class
...teger(0),
    host        = "",
    port        = as.integer(7496),
    reference   = .jnull())
)
setMethod("initialize", "twsConnect", function(
  .Object, clientId = 0, host = "", port = 7496, ...)
  {
    # hook up to the TWS
    ref <- .jnew("dev/AAD_Trader", as.integer(clientId), host,
                 as.integer(port))
    if (class(ref)[1] != "jobjRef")
      stop("Could not connect.  Check your settings.")
    .Object at clientId <- as.integer(clientId)
    .Object at host <- as.character(host)
    .Object at port...