Silk Performer supports the following data structures, each of which has to be defined as a string of the corresponding length and is accessed through a number of type-dependent Set and Get functions:
Queue control data structure
Event control data structure
TPINFO data structure
TXINFO data structure
dcltrans transaction TInit const USERNAME := "user"; // client user name CLIENTNAME := "*"; // application client name PASSWORD := "pass"; // application password GROUPNAME := "group"; // client group name var tpinfo: string(TPINFO_SIZE); begin // set TPINFO data structure elements SetString(tpinfo, TPINFO_USRNAME, USERNAME, Strlen(USERNAME)); SetString(tpinfo, TPINFO_CLTNAME, CLIENTNAME, Strlen(CLIENTNAME)); SetString(tpinfo, TPINFO_PASSWD, PASSWORD, Strlen(PASSWORD)); SetString(tpinfo, TPINFO_GRPNAME, GROUPNAME, Strlen(GROUPNAME)); SetLong(tpinfo, TPINFO_FLAGS, TPNOFLAGS); SetLong(tpinfo, TPINFO_DATALEN, 0); // join TUXEDO System application Tux_tpinit(tpinfo); end TInit;