PB中update 语句更新sql2000数据库中datetime字段的求助。

[pcwwa]

我在sql2000数据库中有一个表:renyuan
id (int型)
open_date(datetime型) 8位长度

id open_date
里面有数据例如：10001 2006.02.20
10002 2006.03.11
10003 2006.03.21
... ...
需求:想让所有表的日期都自动加上10天!

在PB中直接执行 update renyuan set open_date= open_date +10 ; 就能添加

如果我把它(天数10)放到一个变量ts中,
integer ts
ts=10
在PB中执行 update renyuan set open_date= (open_date + :ts);
这样就不好用了,请问应该如何更改语句或定义变量?

[I_am_Z]

string ls_sql

ls_sql = "update renyuan set open_date= open_date + " + string( ts )
EXECUTE IMMEDIATE :ls_sql using sqlca;

[SKY_4K_PPM]

RELATIVEDATE(OPEN_DATE,10)!

STRING LS_SQL
LS_SQL="UPDATE RENYUAN SET OPEN_DATE=RELATIVEDATE(OPEN_DATE,10)"
EXCUTE IMMDIATE:LS_SQL ;

[zhgwbzhd]

推荐使用2楼回复的。

[pmwb]

二楼讲的不错，核心的内容已说了。
现补充点小提示。
string ls_sql

ls_sql = "update renyuan set open_date= open_date + " + string( ts )
EXECUTE IMMEDIATE :ls_sql using sqlca;

IF sqlca.sqlcode = 0 THEN
COMMIT ;
messagebox("成功提示","已增加"+string(ts) +"天!");
ELSE
rollback;
messagebox("出错提示","操作失败，原因为"+string(SQLCA.SQLErrText));
END IF

[青锋-SS]

//可以直接调用SQL的日期函数
update renyuan 
set open_date = dateadd(d,:ts,open_date);

[qiyousyc]

open_date = dateadd(d,:ts,open_date)