需要引用单元:FireGobalHelp
返回数据集:
const
vSql: string = 'select * from dKeCheng ';
Var
lDataSet: TFDMemTable;
lErrMsg: string;
if Gobal_Help.ZTManage.OpenDataFast(lDataSet, 'Erp', vSql, [], lErrMsg) then
begin
//返回数据集成功
end;
其中第一个参数为:内存表
第二个参数为:账套代码
第三个参数为:SQL语句
第四个参数为:Sql语句需要的Param的值
第五个参数为:返回的错误信息
保存数据集:
if not Gobal_Help.ZTManage.SaveDataFast(lDataSet, 'Erp', vSql, 'dKeChengPayLog', 'Id', lErrMsg) then
begin
vResultCode := 0;
vResultMsg := lErrMsg;
end;
|