|
发表于 2008-7-11 09:21:26
|
显示全部楼层
协同系统\任务\任务中心信息\任务导航(基类)
procedure TTASKNAV.DoGetTaskFields(var ATaskFields: string);
begin
ATaskFields := 'FSUBJECT, FCREATETIME, FPLANSTARTTIME, FPLANFINISHTIME, FSTARTTIME, FFINISHTIME, FSTATE, ' +
'FGUID, FTYPE, FFUNCURL, FUPDATEFLAG, FPROCURL, ' +
'FSPERSONNAME, FSOGNNAME, FSDEPTNAME, FSPOSITIONNAME';
end; |
|