请帮忙,我在执行这段代码的时候老是提示“DataSetsdsBizMain”这个数据集不能执行修改操作,急!!!!!!!!!!
with DataSetBroker1.DataSet do
begin
if not Active then open;
if FieldByName('FApproveTime').IsNull then
lApproveTime := 0
else
lApproveTime := FieldByName('FApproveTime').AsDateTime;
lPublicGUID:= OA_FILEDOWNLOADLIB.TDocInfoForm.Execute(
Self.Context, False, lApproveTime, '100',
FieldByName('FKind').DisplayText,
FieldByName('FTitle').AsString,
FieldByName('FDocCode').AsString,
'',
'',
'Biz:\OPERATION\OPERATIONDB.DATABASE\OA_Doc2_Master.Table\FID.Field',
FieldByName('FID').AsString, '', '', '', ''
);
if lPublicGUID <> '' then
begin
Edit;
FieldByName('FPublicGUID').AsString:= lPublicGUID;
Post;
ApplyUpdates;
end;
end; |