delphi 7 执行有返回参数的oracle存储过程 20C

存储过程名 Pro_zxc
参数 : 卡号 ,编号, 数量,金额,时间,错误代码(0/1),返回消息

 exce Pro_zxc('301007087','001','1','1000',to_date('2018-03-17','yyyy-mm-dd'),:Result_Code,:Result_Code)

我用

 OrclSql := 'exce Pro_zxc(' + QuotedStr(edtID.Text) + ',' + QuotedStr(edtNum.Text) + ',''' + IntToStr(CNum) +''',' + QuotedStr(HcDBLabelEdit3.Text) + ',' + 'to_date('+QuotedStr(dateSigContractDate.Text)+','+'''yyyy-mm-dd'')'+',:Result_Code,:Result_Code)';
      WriteLog(OrclSql);
      UniQueryMoney.Close;
      UniQueryMoney.SQL.Clear;
      UniQueryMoney.SQL.Add(OrclSql);
      WriteLog('UniQueryMoney.SQL.Add(OrclSql);');
      UniQueryMoney.Open;    //报错  ora-00900  invalid sql statement
      WriteLog('UniQueryMoney.Open;');
      Result_Num := UniQueryMoney.ParamByName('Result_Code').AsString;
      WriteLog('Result_Num = '+Result_Num);
      Result_Msg := UniQueryMoney.ParamByName('Result_Msg').AsString;
      WriteLog('Result_Msg = '+Result_Msg);

这样报错,有没有大佬能够教导一下,这个存储过程我delphi7该怎样执行

1个回答

exce
是exec
你太不细心了,自己检查下sql,如果还不行,再反复检查sql

Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!