怎么样用TOraStoredProc调用dbms_defer_sys.schedule_push?

Question

oracle同构复制比较复杂,客户不会用,现在我想用delphi做一个oracle同构复制的工具,但在用TOraStoredProc调用dbms_defer_sys.schedule_push时,其参interval不知道是什么格式,我试过了"2007-07-05 10:10:20","05-7月-07 10:10:20",提示不合适,请问哪位高手能帮帮忙!

Answer 1

OraSpSub.Active := False;
    OraSpSub.StoredProcName := 'dbms_defer_sys.schedule_push';
    OraSpSub.Prepare;
    OraSpSub.ParamByName('destination').AsString := 'AODB.SPEEDNET.NET';
    OraSpSub.ParamByName('stop_on_error').AsBoolean := False;
    OraSpSub.ParamByName('parallelism').AsString := '0';
    OraSpSub.ParamByName('delay_seconds').AsInteger := sePushDelay.Value;
    OraSpSub.ParamByName('next_date').AsDateTime := StrToDateTime(FormatDateTime('yyyy-mm-dd hh:mm:ss',cxdPushStart.Date));
    OraSpSub.ParamByName('interval').AsString := DateTime2Str14(cxdPushStart.Date + 15/(24*60*60));这是我的代码,我是用delphi写的,怎么用to_date呢?delphi不带这个参数,而且interval是string型的

Answer 2

OraSpSub.ParamByName('interval').AsString := 'sysdate+15/(24*60*60)';