delphi调用存储过程

最新推荐文章于 2021-01-19 17:34:36 发布

阿炳技术

最新推荐文章于 2021-01-19 17:34:36 发布

阅读量984

点赞数

文章标签：存储数据 delphi

本文链接：https://blog.csdn.net/lclbc/article/details/18411739

版权

这篇博客展示了如何在Delphi中调用存储过程。首先，通过设置参数执行存储过程'report_1'，接着执行第二个存储过程'pro_2'。最后，更新并打开两个frxDBDataset以显示数据。

摘要由CSDN通过智能技术生成

{统计数据}
    with MyStoredProc1 do
    begin
      StoredProcName := 'report_1';{存储过程名称}
      Params.ParamByName('timebegin').Value := datetimebegin;{参数}
      Params.ParamByName('timeend').Value := datetimeend;
      Params.ParamByName('billbegin').Value := billbegin;
      Params.ParamByName('billend').Value := billend;
      Params.ParamByName('user_id').Value := userid;
      ExecProc;
    end;
    {数据}
    with MyStoredProc2 do
    begin
      StoredProcName := 'pro_2';
      Params.ParamByName('timebegin').Value := datetimebegin;
      Params.ParamByName('timeend').Value := datetimeend;
      Params.ParamByName('user_id').Value := userid;
      ExecProc;
    end;
    {数据更新}
    frxDBDataset1.Close;
    frxDBDataset1.FieldAliases.Clear;
    frxDBDataset1.Open;
    frxDBDataset1.DataSet.FieldList.Update;