火神中间件服务端:根据账套和SQL 提交保存内存表的改动到数据库

欢迎加入全网最大Delphi 技术交流群 682628230

需要引用单元: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;

 

© 版权声明
THE END
喜欢就支持一下吧
点赞12 分享