K3预警服务二开发说明.docVIP

一、接口说明 为了支持通讯平台的扩展，对于调用接口采用与接口参数无关的设计。由于目前主要考虑VB开发的组件，设计的接口图示如下。 在移动商务中能自动调用的组件将实现clsMBInterface接口，在此接口中实现以下函数： 序号 函数名 功能描述 1 GetParasDescInfo 参数的描述信息 2 GetResultDescInfo 返回结果的描述信息 3 MobileService 服务执行 4 GetErrorInfo 返回错误信息 5 Progross 执行进度事件 *参数的描述信息GetParasDescInfo 函数格式： GetParasDescInfo(ByVal strPropsString As String, Optional nID As Long = -1, Optional ByVal strFuncName As String = MobileService) As KFO.Vector 参数描述： 序号 参数名称 类型 边界 描述 1 strPropsString 文本 必需 连接信息 2 nID 数字 可选 报表ID 3 strFuncName 文本 可选 执行取数的函数 返回结果 : KFO.Vector 对象，其每一个元素为一个KFO.Dictionary对象。 vct(i)(“ParaName”)：字段名 vct(i)(“DispName”)：显示名称 vct(i)(“ParaType”)：字段类型，枚举如下： vbString：文本型 vbDouble：数字型 vbDate：日期型 vct(i)(“DefValue”)：缺省值 *返回结果的描述信息GetResultDescInfo 描述 获取执行函数返回结果的描述信息 函数格式 GetResultDescInfo(ByVal strPropsString As String, Optional nID As Long = -1, Optional ByVal strFuncName As String = MobileService) As KFO.Vector 参数 nID 当为报表时指示对应报表的ID, 当为取数函数时为对应的函数ID 返回结果 KFO.Vector 对象，其每一个元素为一个KFO.Dictionary对象。整个返回结构如下： vct(i)(“ResultName”)：字段名 vct(i)(“DispName”)：显示名称 vct(i)(“ResultType”)：字段类型 vbString：文本型 vbDouble：数字型 vbDate：日期型 *服务执行MobileService 描述 : 服务执行函数 函数格式： MobileService(ByVal dctParam As KFO.Dictionary, ByRef dctResult As KFO.Vector) As Long 参数 : dctParam KFO.Dictionary 对象： PropsString = ? PropsString关键字必有,表示对应账套的K/3标准连接串 Name1 = Value1 这里的Name1、Name2等对应GetParasDescInfo函数返回对应的 ParaName Name2 = Value2 Name3 = Value3 ... dctResult KFO.Vector 对象： 其每一个元素为一个KFO.Dictionary对象,该函数返回时填充。整个返回结构如下： Item1 Name1 = Value1 这里的Name1、Name2等对应GetResultDescInfo函数返回对应的 ResultName Name2 = Value2 ... Item2 Name1 = ? Value = ? ... 返回结果 : long，表示结果记录条数, 错误时为-1 返回错误信息GetErrorInfo 描述 : 返回错误信息 参数 : nErrorCode 当前错误代码，当nErrorCode = -1时, 取当前错误信息 strDescription 返回错误描述 执行进度事件Progross 描述 : 执行进度事件 参数 : dbl