JoltGetShort Function

Action

Retrieves the value of a two-byte item (“short” in Java) of a Jolt object attribute. This function is provided to retrieve values from both JoltSessionAttributes and JoltRemoteService object attributes.

Include file

Jolt.bdh

Syntax

JoltGetShort( in hJolt       : number,
              in sAttribute  : string,
              in nDefault    : number,
              in nOccurrence : number optional ): number;

Return value

Value of the specified two-byte item of the Jolt object attribute.

Parameter	Description
hJolt	Handle to a JoltSessionAttributes or JoltRemoteService object that was created with JoltSessionAttributesNew or JoltRemoteServiceNew, respectively
sAttribute	Name of the attribute that is to be accessed
nDefault	Value that the function returns if the specified attribute or item does not exist
nOccurrence	Index of the item that is to be retrieved (optional). The index of an attribute’s first item is 1 (not 0). If this parameter is omitted, the attribute’s first item is retrieved. 注: This parameter is ignored if hJolt represents a JoltSessionAttributes object.

Example

var
  hSession, hSessionAttr, hRemoteService: 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", "", "");
    hRemoteService := JoltRemoteServiceNew("SUM", hSession);
  end TInit; 
  transaction TMain
  var
    nSum: number;
  begin
    JoltSetShort(hRemoteService, "SVALUE", 23, ADD_VALUE);
    JoltSetShort(hRemoteService, "SVALUE", 11, ADD_VALUE);
    JoltCall(hRemoteService);
    nSum := JoltGetShort(hRemoteService, "RESULT", 0);
  writeln(nSum);
  end TMain; 
  transaction TShutdown
  begin
    JoltEndSession(hSession);
    JoltFreeObject(hRemoteService);
    JoltFreeObject(hSession);
    JoltFreeObject(hSessionAttr);
  end TShutdown;