Illegal byte count for I/O (ERR=31)

  A PRINT or INPUT list invoked a function that closed an  I/O  channel.
  Change the function so that it does not close the I/O channel.