起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 235|回复: 14

【结帖】代码执行流转到后续环节**

[复制链接]
发表于 2008-4-5 14:33:47 | 显示全部楼层 |阅读模式
如图

未命名.gif

96.83 KB, 下载次数: 140

回复

使用道具 举报

 楼主| 发表于 2008-4-5 14:36:49 | 显示全部楼层
上图画红圈的部分,我想实现当工单负责人不等于当前操作员时,弹出流转框走下一环节,当等于当前操作员时,直接结束,不用再弹出流转框了
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-4-5 14:51:06 | 显示全部楼层
刚才描述的不清楚,应该是
1。当工单负责人不等于当前操作员时,直接流转到工单负责人处,不弹出流转框
2。当工单负责人等于当前操作员,直接结束,不用再弹出流转框了
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-4-5 14:59:54 | 显示全部楼层
附加一问题
我想取TaskMessage的状态怎么取
FEventDataSet.FieldByName('FTASKMESSAGESTUAS').AsString
                :=FlowBroker.FlowControl.CurrentTask.TaskMessages.Items[0].State.ToString;
上面语句会报错
回复 支持 反对

使用道具 举报

发表于 2008-4-7 10:03:25 | 显示全部楼层
4楼必须自己做转换函数,比如:
function TMainForm.StateToString(AState:TTaskMessageState):string;
begin
//(tmsSend, tmsReceived, tmsProcessing, tmsWaiting, tmsWaited, tmsFinished, tmsCanceled, tmsAborted, tmsReturned, tmsTransmited);

  result:='99';
  case  AState of
    TTaskMessageState.tmsSend:result:='0';
    TTaskMessageState.tmsReceived:result:='1';
    TTaskMessageState.tmsProcessing:result:='2';
    TTaskMessageState.tmsWaiting:result:='3';
    TTaskMessageState.tmsWaited:result:='4';
    TTaskMessageState.tmsFinished:result:='5';
    TTaskMessageState.tmsCanceled:result:='6';
    TTaskMessageState.tmsAborted:result:='7';
    TTaskMessageState.tmsReturned:result:='8';
    TTaskMessageState.tmsTransmited:result:='9';
  end;
end;
回复 支持 反对

使用道具 举报

发表于 2008-4-7 10:10:44 | 显示全部楼层
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-4-7 10:31:23 | 显示全部楼层
Static procedure AcceptUserModify(Command: TFlowOutCommand;ANextProcUnit:string);
var
  lFlowTask:TFlowTask;
begin
  if  Command.AllowFlowTasks.Count <= 0 then
       Command.UserConfirm:=False
  else
  begin
    lFlowTask := Command.FlowTasks.FindFlowTask(ANextProcUnit);
    if lFlowTask <> nil then
    begin
      Command.UserConfirm:= lFlowTask.Executors.Count<>1;
    end;
  end;
end;

这个方法怎么使用,我应该在什么时候调用
回复 支持 反对

使用道具 举报

发表于 2008-4-7 14:16:31 | 显示全部楼层
BeforeFlowOut或者OnCreateFlowoutFlowTasks事件上
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-4-7 17:41:12 | 显示全部楼层
还有一个问题没解决,就是1。当工单负责人不等于当前操作员时,直接流转到工单负责人处,不弹出流转框,如何指定流转到工单负责人处
回复 支持 反对

使用道具 举报

发表于 2008-4-7 17:59:00 | 显示全部楼层
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-10 00:16 , Processed in 0.044513 second(s), 19 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表