* @param port
   * @param queryId
   * @param taskId
   * @param subtaskId
   * @param database
   * @param parameters
   * @return Stella_Object
   */
  public static Stella_Object runFetchQuery(String host, int port, String queryId, String taskId, String subtaskId, String database, String parameters) {
    { Object old$PrintreadablyP$000 = Stella.$PRINTREADABLYp$.get();

      try {
        Native.setBooleanSpecial(Stella.$PRINTREADABLYp$, false);
        { OutputStringStream url = OutputStringStream.newOutputStringStream();
          InputStream reply = null;

          url.nativeStream.print("/agent/runner?plan=");
          Stella.writeHtmlEscapingUrlSpecialCharacters(url.nativeStream, queryId);
          url.nativeStream.print("&TaskID=");
          Stella.writeHtmlEscapingUrlSpecialCharacters(url.nativeStream, taskId);
          url.nativeStream.print("-");
          Stella.writeHtmlEscapingUrlSpecialCharacters(url.nativeStream, subtaskId);
          url.nativeStream.print("&Database=");
          Stella.writeHtmlEscapingUrlSpecialCharacters(url.nativeStream, database);
          url.nativeStream.print("&");
          url.nativeStream.print(parameters);
          reply = ((InputStream)(edu.isi.stella.javalib.Native.funcall(Stella.autoload("HTTP/HTTP-GET-DATA", "webtools", RDBMS.SGT_RDBMS_RUN_FETCH_QUERY, true), null, new java.lang.Object [] {host, new Integer(port), url.theStringReader(), null})));
          { Stella_Object exp = null;
            XmlExpressionIterator iter000 = InputStream.xmlExpressions(reply, null);

            while (iter000.nextP()) {
              exp = iter000.value;
              if (Stella_Object.isaP(exp, RDBMS.SGT_STELLA_CONS) &&
                  Stella_Object.isaP(((Cons)(exp)).value, RDBMS.SGT_STELLA_XML_ELEMENT)) {
                { XmlElement item000 = ((XmlElement)(((Cons)(exp)).value));

                  if (Stella.stringEqlP(item000.name, "PlanExecution") &&
                      Stella.stringEqlP(item000.namespaceUri, null)) {
                    return (exp);
                  }
                  else if (Stella.stringEqlP(item000.name, "Error") &&
                      Stella.stringEqlP(item000.namespaceUri, null)) {
                    { OutputStringStream stream000 = OutputStringStream.newOutputStringStream();

                      stream000.nativeStream.print("`" + ((StringWrapper)(((Cons)(exp)).rest.rest.value)).wrapperValue + "'");
                      throw ((StellaException)(StellaException.newStellaException(stream000.theStringReader()).fillInStackTrace()));
                    }
                  }
                  else {
                  }
                }
              }
            }
          }
          throw ((StellaException)(StellaException.newStellaException("Fetch Query Error: No answer element found.").fillInStackTrace()));
        }

      } finally {
        Stella.$PRINTREADABLYp$.set(old$PrintreadablyP$000);
      }
    }
  }