【搞定】请教一段代码**

comqing

该代码来自于贵公司供应链业务模型\阜阳物资\商业协同系统\公共模块\供应链基础类库下的一个方法。
问题一：TCMDConditionCall、TCMDExecuteSQL、TCMDBatchCall是什么类，功能是什么？
问题二：
    CmdBatch.Add(Cmd1);
    CmdBatch.Add(Cmd2);
    CmdBatch.Add(Cmd3);
    Cmdcc.Expression := CmdGetRecords;
    Cmdcc.Add(0, CmdEmpty);
    Cmdcc.DefaultItem := CmdBatch;
    AConnection.Transaction.Execute(Cmdcc);
这段是Cmdcc这几个属性和方法是什么意思;
问题三：Cmd1、Cmd2、Cmd3这三个插入语句都执行了吗？还是根据什么条件才执行。
问题四：相应的代码换成TQuery以后效率哪个高呢？
谢谢。

atiger

请问你们在实行啥需求，是哪个用户用到了？

comqing

阜阳华润供应链，原代码出错，我想改成TQUERY来更新

atiger

好，我这里看一下，有结果马上跟贴告知

Brioken

你好！

Brioken

你好！这几个类是平台提供的批事务命令，即一些向应用服务端发出多个SQL命令，并可以根据条件执行其中的部分命令。
TCMDConditionCall：条件命令，可以根据一个条件表达式来执行不同的命令或批命令
TCMDExecuteSQL：SQL命令，一个命令可以执行一条SQL语句
TCMDBatchCall：批命令，可以打包多个TCMDExecuteSQL命令一次执行


    CmdBatch.Add(Cmd1);  //向“批命令”中增加一个TCMDExecuteSQL对象
    CmdBatch.Add(Cmd2);  //向“批命令”中增加一个TCMDExecuteSQL对象
    CmdBatch.Add(Cmd3);  //向“批命令”中增加一个TCMDExecuteSQL对象
    Cmdcc.Expression := CmdGetRecords;  //指定条件表达式为CmdGetRecords，此时CmdGetRecords返回的是记录条数
    Cmdcc.Add(0, CmdEmpty);                //增加条件分支，当CmdGetRecords返回的是0条件当时，就执行CmdEmpty
    Cmdcc.DefaultItem := CmdBatch;        //类似于if语句中的else，“否则”就执行CmdBatch内的所有命令
    AConnection.Transaction.Execute(Cmdcc);  //执行 “条件命令”

Brioken

批命令执行的效率理论上来说，应该和tquery 是一样的，差别不大。但这段逻辑可能写为存储过程可能会效率好一点。

comqing

谢谢，可以结帖了

atiger

ok