多步操作产生错误。检查每个状态值

Question

需要为德尔福7 第一次出现此错误消息的一些帮助，我将介绍一些脚本： 在MySQL程序脚本：

CREATE PROCEDURE ActualStok() 

NOT DETERMINISTIC 
CONTAINS SQL 
SQL SECURITY DEFINER 
COMMENT '' 

BEGIN 

SELECT B.KD_BRG, B.NAMA_BRG, B.UKURAN, B.SATUAN, 
(B.JUMLAH_BRG-(SELECT IFNULL(SUM(D.JUMLAH_PAKAI_BRG),0) 
        FROM DETAIL_PAKAI_BRG D 
WHERE (D.STATUS_AMBIL='0') AND (D.KD_BRG=B.KD_BRG) AND (D.UKURAN=B.UKURAN) 
                AND (D.SATUAN=B.SATUAN))), 
B.KETERANGAN_BRG 
FROM BARANG B; 
END; 

然后我检查程序 - >呼叫ActualStok （）; 它的工作。 mySQL显示我预期的结果，并罚款。没有错误。

所以Delphi的程序，我试图执行这个脚本：

程序TFrmPersediaan.Button1Click（发件人：TObject的）;

begin 
    FrmDtm.ADOQBarang.Close; 
    FrmDtm.ADOQBarang.SQL.Clear; 
    FrmDtm.ADOQBarang.SQL.Add('CALL ActualStok()'); 
    FrmDtm.ADOQBarang.Open; 
end; 

德尔福展示了我的错误消息“多步操作生成的错误。检查每个状态值。”

请有人帮我解决这个问题。 谢谢任何​​参与者。

Answer 1

这可能是由于ADO不支持的日期值。在我的情况下，错误是由我的Oracle数据库中的日期值01-01-0020引起的，ADO无法识别该日期值。