DELPHI使用UniDAC执行储存过程

最新推荐文章于 2024-09-15 23:43:06 发布

踏雪无痕

最新推荐文章于 2024-09-15 23:43:06 发布

阅读量4.8k

点赞数 1

分类专栏： UniDAC

本文链接：https://blog.csdn.net/zengcong2013/article/details/17170023

版权

UniDAC 专栏收录该内容

10 篇文章 0 订阅

订阅专栏

方法一：使用UniQuery

UniQuery. SQL.Clear;
UniQuery. SQL.Add (' INSERT INTO kvartal_prem.tReports (name, remark, report, dotmatrix) ');
UniQuery. SQL.Add (' SELECT name, remark, report, dotmatrix from kvartal_prem.tReports');
UniQuery. SQL.Add (' WHERE id =:id ');
UniQuery. ParamByName (' id ').AsInteger: = id;
UniQuery. Execute;
ShowMessage (IntToStr (UniQuery. LastInsertId));

方法二：使用UniStoredProc

UniStoredProc. StoredProcName: = ' InstReports';
UniStoredProc. PrepareSQL;
UniStoredProc. ParamByName (' pid ').AsInteger: = id;
UniStoredProc. Execute;
ShowMessage (IntToStr (UniStoredProc. ParamByName (' poutid ').AsInteger));