[请求]事务commit的时候报错！**

alvenz

存储过程
create or replace procedure SP_TEST_INSERT is
begin
  insert into SJB1(ZD1, ZD2, ZD3)values('1000', '1000', '1000');
end SP_TEST_INSERT;


var
  lConnection: TConnection;
  h: TTransactionHandle;
begin
  lConnection := TConnection.Create(nil);
  with lConnection do
  try
    ConnectionString := 'DATABASEURL=Biz:HAJ_DSDSEZHAJ_TJSJK.Database';
    Connected := True;
    with Transaction do
    begin
      h := Start(False);
      try
        with TStoredProc.Create(nil) do
        try
          Connection := lConnection;
          StoredProcName := 'SP_TEST_INSERT';
          Execute;
        finally
          Free;
        end;
        Commit(h);
      except
        RollBack(h);
        Raise;
      end;
    end
  finally
    Free;
  end;

alvenz

为什么存储过程一定要带参数执行才不会报错呢？

yancm

你的存储过程要求传入参数了吧？

alvenz

我现在就是想执行不带参数的存储过程，
可是老报错！
郁闷！！！

yancm

我试一下

zfang

楼主，经过测试，我用楼主给的存储过程，然后调用，执行没有问题（平台版本2819，数据库sqlserver2000/oracle10两种环境下均没有楼主所描述的问题）

alvenz

不会吧，可能是你的版本比较高一些！？
我的是2401
疯掉了？这可啥整呢？

zfang

那如果实在不行的话，就只能升级版本，或者就用带参数的存储过程了！

yancm

如果不升级的话，传一个参数不去处理它，只能这样规避一下