調用詠南中間件插件演示

function GetSvrData(const accountNo, defineId: WideString; inParams: OleVariant): OleVariant; virtual; abstract;
// accountNo，帳套編號
// defineId=3位插件編號+2位自定義編號，defineId必須是唯一的
// inParams，TDataSet.Params的OLEVARIANT序列，如果沒有輸入參數就賦值NULL，否則 PackageParams()序列TPARAMS為OLEVARIANT
// 返回：NULL--默認不返回結果，非NULL--返回結果數據

客戶端調用這個遠程方法來調用服務端插件
客戶端調用示例：
示例一：
clientdataset1.data:= GetSvrData('0', '12301', null);
示例二：

var

? p:tparams;
begin

p:=tparams.create(nil);
p.Clear;
p.CreateParam(ftString, 'paramName', ptInput).Value := 'xxx';
clientdataset1.data:= GetSvrData('0', '12301', PackageParams(p));

p.free;
end;