appclnt.kb 的例行程序


AppConnection

文件名

appclnt.kb

语法

AppConnection(AppNum: INTEGER)

参数

AppNum - 某连接在连接列表中的位置

返回

布尔值 - 如果存在当前有效的连接,则返回 True

副作用

说明

如果到了重新尝试连接应用程序服务器的时侯,则进行该尝试。否则,将认为有效的首次网络连接返回调用的过程。如果没有其他有效的连接,则将重试设置为 FALSE。如果存在被认为有效的另一个网络连接,则将重试设置为 TRUE。

调用的对话框窗体


ClientNetListener

文件名

appclnt.kb

语法

ClientNetListener

参数

ClientData - 网络监听器实例数据

返回

副作用

说明

这是主客户机网络监听器。所有应用程序服务器请求都通过该监听器发送。通常情况下,将把所有的消息从该监听器发送到管理单个请求状态的请求窗口。

调用的对话框窗体


ConnectToServer

文件名

appclnt.kb

语法

ConnectToServer(ServerName: STRING, PortNum: INTEGER)

参数

ServerName - 要连接到的服务器的名称或 IP

PortNum - 调遣器正在监听的端口

返回

整数 - 成功时返回 1

副作用

说明

尝试连接到在 ServerName 中命名的应用程序服务器。如果连接成功,则将该连接添加到客户机保持的可用连接列表中。“连接”列表中的第一个服务器是主服务器。所有其他连到备份服务器的连接只在失败模式中使用。

调用的对话框窗体


CreateRemoteTask

文件名

appclnt.kb

语法

参数

rw_id - 相应的 remote_work 记录的标识

site_id - 任务目的站点

返回

数据库错误或在成功时为 1

副作用

说明

在各个传入站点上为传入的远程工作创建远程任务记录。

调用的对话框窗体


DeRegisterServices

文件名

appclnt.kb

语法

DeRegisterServices

参数

返回

整数 - 成功时返回 1

副作用

说明

断开所有与服务器的连接,并从连接列表上删除这些连接。此外,还将暂停网络监听器。

调用的对话框窗体


DisconnectFrom

文件名

appclnt.kb

语法

DisconnectFrom AllServers

参数

返回

副作用

说明

断开所有与服务器的连接,并从连接列表上删除这些连接。

调用的对话框窗体


ES_RequestRemoteWork

文件名

appclnt.kb

语法

ES_RequestRemoteWork(TransactionType: INTEGER, rw_id: INTEGER)

参数

TransactionType - 表示要执行的工作类型

rw_id - 表示要在其上执行此工作的数据集

返回

整数

副作用

说明

在 TPM 已创建 RemoteWork 条目并需要调用代理来执行此工作时,调用该函数。

调用的对话框窗体


GetAppServerInfo

文件名

appclnt.kb

语法

GetAppServerinfo(AppServer, Port, Cookie: STRING)

参数

AppServer - 应用程序服务器名称

Port - 应用程序服务器正在监听的端口

Cookie - 使用应用程序服务器所需要的 cookie

返回

副作用

说明

查找有效的应用程序服务器,并返回有关如何与它相连接的信息。

调用的对话框窗体


GetASDetails

文件名

appclnt.kb

语法

GetASDetails(appnum: INTEGER, AppServer: STRING, Port: STRING, apphdl: NETCONNECTION)

参数

appnum - 表示要为其获取信息的连接

AppServer - 在此处返回应用程序服务器名称

Port - 在此处返回与其相连接的端口

apphdl - 在此处返回连接的 NetCOnnection

返回

副作用

说明

在连接列表中查找有关命名参数 appnum 的特定连接的信息。其他参数返回特定连接的有关数据。

调用的对话框窗体


GetASHandle

文件名

appclnt.kb

语法

GetASHandle(appnum: INTEGER, apphdl: NETCONNECTION)

参数

appnum - 该参数返回在可用服务器的“连接”列表中的位置

apphdl - 与可用服务器相关联的连接的 NetConnection 句柄

返回

副作用

说明

查找到可用服务器标识,并通过发送给例行程序的 REF 参数传回有关怎样接触该服务器标识的信息。

调用的对话框窗体


GetClientListenPort

文件名

appclnt.kb

语法

GetClientListenPort

参数

返回

整数 - 该客户机正在监听的端口的编号

副作用

说明

返回当前客户机正在监听的端口的编号。

调用的对话框窗体


GetServerInfo

文件名

appclnt.kb

语法

GetServerInfo(Connected, Disconnected: LIST OF STRING)

参数

Connected - 已连接的 appnums 列表

Disconnected - 已断开的 appnums 列表

返回

副作用

说明

获取已连接和已断开连接的服务器的列表。

调用的对话框窗体


InitNetServices

文件名

appclnt.kb

语法

InitNetServices(ParamFile: STRING, DebugMde: BOOLEAN)

参数

ParamFile - 要向其存储和从中检索设置的 ini 文件

DebugMode - 如为 TRUE,则将事件作为日志记入窗口。

返回

整数 - 成功时返回 1

副作用

说明

该例行程序初始化网络服务。它将启动网络监听器并使应用程序作好连接到服务器的准备。要执行此操作,需要一个数据库连接。

调用的对话框窗体


LogEvent

文件名

appclnt.kb

语法

LogEvent(aline: STIRNG)

参数

aline - 要写入日志窗口的行

返回

副作用

说明

向调试窗口写入行。

调用的对话框窗体


NDB_InitNetServices

文件名

appclnt.kb

语法

NDB_InitNetServices(ParamFile: STRING, DebugMde: BOOLEAN, Cookie: STRING)

参数

ParamFile - 要向其存储和从中检索设置的 ini 文件

DebugMode - 如为 TRUE,则将事件作为日志记入窗口

Cookie - 应用程序服务器保证服务器和客户机使用同一数据库所需的令牌

返回

整数 - 成功时返回 1

副作用

说明

该例行程序初始化网络服务。它启动网络监听器并使应用程序作好连接到服务器的准备。要执行此操作,不需要数据库连接。

调用的对话框窗体


NetDebugEvent

文件名

appclnt.kb

语法

NetDebugEvent

参数

返回

副作用

说明

网络调试窗口的事件处理器。该函数除 $NullHandler 之外的唯一操作是在 $MsgClose 之上复位调试模式。

调用的对话框窗体


NetSetAppName

文件名

appclnt.kb

语法

NetSetAppName(NewAppName: STRING)

参数

NewAppname - 在注册到服务器时使用的名称

返回

副作用

说明

设置名称,该处理在连接到服务器时使用它来进行注册。

调用的对话框窗体


NetSetUserId

文件名

appclnt.kb

语法

NetSetuserId(NewUserId: STRING)

参数

NewUserId - 在注册到服务器时使用的用户标识

返回

副作用

说明

设置标识,该处理在连接到服务器时使用它来进行注册。

调用的对话框窗体


PostASynchronous

文件名

appclnt.kb

语法

PostASynchronous(Request: SERVER_REQUEST)

参数

Request - 要发送到服务器的数据

返回

整数 - 成功时返回 1

副作用

说明

向服务器出口传送数据的异步调用。不期望返回数据。

调用的对话框窗体

appclnt.dfc[requestwindow]


RequestCallback

文件名

appclnt.kb

语法

RequestCallback(VAL whdl: WINDOW, req: SERVER_REQUEST)

参数

whdl - 正在请求回调的窗口

req - 请求的结构

返回

在用于该请求的服务器连接列表中的位置。

如果没有可用的服务器,

则返回 -1。

副作用

说明

向应用程序服务器发送回调请求。如果发送失败,将尝试与服务器的其他连接。如果没有能够接收该消息的服务器,则返回失败信息。

调用的对话框窗体


RTBuildError

文件名

appclnt.kb

语法

RTBuildError(sProcess: STRING, ProcParmlist: LIST OF STRING, sAction: STRING, ActionParmList: LIST OF STRING

参数

sProcess - 基本消息字符串

ProcParmList - 要放入 sProcess 的值

sAction - 基本消息字符串

ProcParmList - 要放入 sAction 的值

返回

字符串 - 完成字符串

副作用

说明

调用该函数来构造消息字符串,进行构造的基础是某些基本字符串以及该字符串中将被当作参数替换的值。

调用的对话框窗体


RTPostError

文件名

appclnt.kb

语法

RTPostError(errNum: INTEGER, errMsg: STRING

参数

errNum - 要显示的消息代码

errMsg - 要显示的出错消息

返回

副作用

说明

向服务器发送消息,该消息将被投递到控制面板。

调用的对话框窗体


SendASynchronous

文件名

appclnt.kb

语法

SendASynchronous(Request: SERVER_REQUEST, hldReq: WINDOW, RetFunction: STRING)

参数

Request - 要发送到服务器的数据

hdlReq - 等待获取服务器返回数据的窗口句柄

返回

整数 - 成功时返回 1

副作用

说明

向服务器出口传送数据的异步调用。在服务器满足请求时,将把返回数据传送给窗口句柄 hdlReq。

调用的对话框窗体


SendRequestEvent

文件名

appclnt.kb

语法

SendRequestEvent

参数

TheRequest - 用于请求窗口的实例数据

返回

副作用

说明

这是请求窗口事件处理器。它管理发送给应用程序服务器的各个连接,以确定服务器是否已经注意到它。如果服务器对请求长时间无反应,则将该服务器视为关闭的,并将请求发送给其他服务器。

调用的对话框窗体


SendSynchronous

文件名

appclnt.kb

语法

SendSynchronous(Request: SERVER_REQUEST)

参数

Request - 要发送到服务器的数据

返回

SERVER_REQUEST - 从服务器返回数据

副作用

说明

将数据传送给服务器并将其返回给调用函数的同步调用。

调用的对话框窗体

appclnt.dfc[requestwindow]


SetASDisabled

文件名

appclnt.kb

语法

SetASDisabled(appnum: INTEGER, NumSeconds: INTEGER)

参数

appnum - 指示要禁用的连接

NumSeconds - 指示禁用连接的时间范围

返回

副作用

说明

该例行程序将由 appnum 标识的连接禁用指定的秒数。如果传入 0,则使用缺省值 (从 softart.ini 文件读取)。

调用的对话框窗体


SetRequestParentWindow

文件名

appclnt.kb

语法

SetRequestParentWindow(pwhdl: WINDOW)

参数

pwhdl - 用作请求窗口的父窗口的窗口

返回

WINDOW - 原来的请求窗口句柄

副作用

说明

该函数设置用作请求父窗口的窗口。在执行 SendSynchronous 消息时,这将确保请求窗口是应用程序对话框的模式窗口,从而确保在完成该请求之前不使用它。

调用的对话框窗体


TSD_AppServerConnect

文件名

appclnt.kb

语法

TSD_AppServerConnect

参数

返回

副作用

说明

从 softart.ini 文件读取主应用程序服务器和次应用程序服务器的有关信息。将调用 ConnectToServer 函数来执行连接逻辑。

调用的对话框窗体