时间验证与更新操作

datatiem ... ...  ...

//DebugBreak()
select sysdate into :ldt_sysdate from dual;
ldt_start_date = dw_mcs832dw1.GetItemdatetime(1,'DLRQ_START_DATE')
ldt_return_date = dw_mcs832dw1.GetItemdatetime(1,'DLRQ_RETURN_DATE')
if ldt_return_date >= ldt_sysdate and ldt_return_date >= ldt_start_date then
    if (dw_mcs832dw2.update() >0 ) then
        commit;       
        dw_mcs832dw2.sharedata(dw_mcs832dw1)
       dw_mcs832dw1.retrieve()       
        messagebox("Message","Save Successful!")
    else
        rollback;
        messagebox('message','save Failure!')
    end if
else
    MessageBox("Return Date Error","Return Date must >= START DATE and >= SYSDATE")
end if