一个有关问题，DW中有列为Date型，怎么赋值

请教大家一个问题，DW中有列为Date型，如何赋值！
FREE格式的DW，要求窗体加载时，新插入一行，自动显示报修时间，上述代码有问题，求大侠帮看看！

SELECT to_char(sysdate,'YYYYMMDD') ,Cast(Nvl(MAX(substr(BXDBH,9,4)),0) as int), sysdate into :str_bxdh,:int_bxdh,:date_bxsj FROM T_GZBX
WHERE SUBSTR(bxdbh,1,8)=to_char(sysdate,'YYYYMMDD') ;
dw_1.object.BXDBH[1]=str_bxdh+right("0000"+string(int_bxdh+1),4); 
//dw_1.object.BXSJ[1]=Date(date_bxsj); 出错
dw_1.setitem(1,'BXSJ',Date(date_bxsj)); 文本框不显示值

------解决方案--------------------
//dw_1.object.BXSJ[1]=Date(date_bxsj); 出错
提示是什么错了？
------解决方案--------------------
哪里要这么麻烦，直接在数据窗口的initial value 赋默认值就行了 写个today就是了