JoltSetRequestPriority Function

Example

var
  hSession, hSessionAttr, hInquiry: number;
 dcltrans
  transaction TInit
  begin
    JavaSetOption(JAVA_VERSION, JAVA_V11);
    JavaSetOption(JAVA_HOME, "c:/jdk1.1.7");
    JavaSetOption(JAVA_CLASSPATH, "c:/jdk1.1.7");
    JoltInit();    hSessionAttr := JoltSessionAttributesNew();
    JoltSetString(hSessionAttr, APPADDRESS, "//lab:8000");
    hSession := JoltSessionNew(hSessionAttr, "", "ATM", "", "");
    hInquiry := JoltRemoteServiceNew("INQUIRY", hSession);
  end TInit; 

  transaction TMain
  var
    sBalance: string;
  begin
    JoltSetRequestPriority(hInquiry, 1);
    JoltSetInt(hInquiry, "ACCOUNT_ID", 10001);
    JoltCall(hInquiry);
    JoltGetString(hInquiry, "SBALANCE", "", sBalance);
  end TMain;

  transaction TShutdown
  begin
    JoltEndSession(hSession);
    JoltFreeObject(hInquiry);
    JoltFreeObject(hSession);
    JoltFreeObject(hSessionAttr);
  end TShutdown;