JoltUnsubscribe Function

Example

var
  hSession, hSessionAttr, hUserEvent: 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", "", "");
    hUserEvent := JoltUserEventNew("*", NULL, hSession);
  end TInit; 

  transaction TShutdown
  begin
    JoltUnsubscribe(hUserEvent);
    JoltEndSession(hSession);
    JoltFreeObject(hUserEvent);
    JoltFreeObject(hSession);
    JoltFreeObject(hSessionAttr);
  end TShutdown;