【结】程序设置标准数据集更新选项语句报错**

lichao9903

如题，设置程序如下
//~~~~~~~~~~~~~~~~~~~~~~~~~~
FDataSetData.UpdateOptions.Enabled:=True;  FDataSetData.UpdateOptions.UpdateMode:=TUpdateMode.upWhereKeyOnly;
FDataSetData.UpdateOptions.InsertSQL:=cAInsTemp;
FDataSetData.UpdateOptions.UpdateSQL:=cAUpdTemp;
FDataSetData.UpdateOptions.DeleteSQL:=cADelTemp;
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~
语句常量如下
cAInsTemp='INSERT INTO TABLE_RUNTIMEDATA'#13#10'( FDateTime , FTargetCode , '
    +'FValue , FEntity )'#13#10'VALUES ( :FDateTime , :FTargetCode , :FVALUE , '
    +':FENTITY )'#13#10#13#10'INSERT INTO TABLE_ATEMPRUNTIMEDATA'#13#10'( '
    +'FDateTime , FTargetCode , FValue , FEntity )'#13#10'VALUES ( :FDateTime ,'
    +' :FTargetCode , :FVALUE , :FENTITY )'#13#10#13#10;

cAUpdTemp='UPDATE TABLE_RUNTIMEDATA '#13#10'SET  FDateTime = :FDateTime  '
    +','#13#10'FTargetCode = :FTargetCode  ,'#13#10'FValue = :FVALUE  ,'#13#10'FEntity'
    +' = :FENTITY'#13#10'WHERE  ( FDateTime = :OLD__FDateTime )'#13#10'AND  ( '
    +'FTargetCode = :OLD__FTargetCode )'#13#10#13#10'UPDATE TABLE_ATEMPRUNTIMEDATA '#13#10'SET'
    +'  FDateTime = :FDateTime  ,'#13#10'FTargetCode = :FTargetCode  ,'#13#10'FValue'
    +' = :FVALUE  ,'#13#10'FEntity = :FENTITY'#13#10'WHERE  ( FDateTime = :OLD__FDateTime'
    +' )'#13#10'AND  ( FTargetCode = :OLD__FTargetCode )'#13#10#13#10;
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
提交时报错：
invoke batch method error, error occur during invoke ApplyUpdates method, ORA-00933: SQL command not properly ended

lichao9903

晕，怎么那么多表情，表情那儿应该是右括号

Akon

从这个错误ORA-00933来看，应该是您的sql语句有问题，你拿到sql查询分析器试试，有问题不？

lichao9903

sql没问题

shangxy

楼主把代码定位到FDataSetData.ApplyUpdates上面然后查一下 FDataSetData.DataFetch.CommandText 看一下取出来的sql是什么？

lichao9903

SELECT TABLE_ATEMPRUNTIMEDATA.FDateTime, TABLE_ATEMPRUNTIMEDATA.FTargetCode, TABLE_ATEMPRUNTIMEDATA.FVALUE, TABLE_ATEMPRUNTIMEDATA.FSTATE, TABLE_ATEMPRUNTIMEDATA.FENTITY, TABLE_TARGET.FTARGETDEFCODE, TABLE_TARGET.FENTITYCODE, TABLE_TARGET.FINTERNALCODE, TABLE_TARGET.FSTATRANGECODE, TABLE_TARGET.FDATASOURCECODE, TABLE_TARGET.FSTATMETHODCODE, TABLE_TARGET.FBIZTYPECODE
  FROM TABLE_ATEMPRUNTIMEDATA, TABLE_TARGET
  WHERE (TABLE_ATEMPRUNTIMEDATA.FTARGETCODE = TABLE_TARGET.FTARGETCODE) AND ((FEntityCode like 'CD%' and FStatRangeCode = 'D' and FDateTime = to_date('2008-04-13 00:00:00', 'yyyy-mm-dd hh24:mi:ss')))

lichao9903

FDataSetData.UpdateOptions.InsertSQL:
INSERT INTO TABLE_RUNTIMEDATA
( FDateTime , FTargetCode , FValue , FEntity )
VALUES ( :FDateTime , :FTargetCode , :FVALUE , :FENTITY )

INSERT INTO TABLE_ATEMPRUNTIMEDATA
( FDateTime , FTargetCode , FValue , FEntity )
VALUES ( :FDateTime , :FTargetCode , :FVALUE , :FENTITY )

DataSetData.UpdateOptions.UpdateSQL:
UPDATE TABLE_RUNTIMEDATA
SET  FDateTime = :FDateTime  ,
FTargetCode = :FTargetCode  ,
FValue = :FVALUE  ,
FEntity = :FENTITY
WHERE  ( FDateTime = :OLD__FDateTime )
AND  ( FTargetCode = :OLD__FTargetCode )

UPDATE TABLE_ATEMPRUNTIMEDATA
SET  FDateTime = :FDateTime  ,
FTargetCode = :FTargetCode  ,
FValue = :FVALUE  ,
FEntity = :FENTITY
WHERE  ( FDateTime = :OLD__FDateTime )
AND  ( FTargetCode = :OLD__FTargetCode )

lichao9903

我的更新和 插入 都是同时对两个表操作，是不是两个语句中间需要什么分隔符，或者结尾需要结束符？ 表情那儿应该是右括号

alang

每一个你都只保留一条看看呢

lichao9903

保留一条可以，我试过，但是此处必须更新两个表