起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 528|回复: 6

【搞定】代码启动流程后,出错~**

[复制链接]
发表于 2007-5-10 11:49:07 | 显示全部楼层 |阅读模式
假设有A 与B两个不同的流程
A流程为开始-拟建-办理-归档-结束
B流程为开始-拟建-办理-结束
A流程到归档的时候,不使用BizToolBar1当中的流转。使用一个SpeedButton完成流转功能以及启动B流程的 拟建。代码如下:
procedure TMainForm.SpeedButton1Click(Sender: TObject);
begin
    self.FlowBroker1.FlowControl.FlowOut(nil);
    TSystemCore.FuncManager.RunFunc(Context,'','Biz:BLXTGLXTSCRWSNJ.Func','',nil,false);
end;
目前可以流转,也可以启动B流程中的拟建,但是在B拟建往办理流转的时候出错,如下图:

e.jpg

960.05 KB, 下载次数: 281

回复

使用道具 举报

发表于 2007-5-10 12:20:32 | 显示全部楼层
楼主,应该是你传入的Context出问题了,请尝试:
1、获取当前人员的岗位成员环境,作为参数传入
或者
2、把TSystemCore.FuncManager.RunFunc(Context,'','Biz:\BLXTGLXT\SCRWSNJ.Func','',nil,false);写到流程的AfterFlowOut事件中
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-5-10 12:32:51 | 显示全部楼层
但是这样的话,不使用BizToolBar1当中的流转!怎样在SpeedButton中调用TMainForm.FlowBroker1AfterFlowOut这个事件!
请指点~
回复 支持 反对

使用道具 举报

发表于 2007-5-10 14:19:16 | 显示全部楼层
楼主,你在执行self.FlowBroker1.FlowControl.FlowOut(nil);时,会触发AfterFlowOut这个事件,
所以不需要你来调用。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-5-10 15:41:14 | 显示全部楼层
我将TSystemCore.FuncManager.RunFunc(Context,'','Biz:\BLXTGLXT\SCRWSNJ.Func','',nil,false);写到流程的AfterFlowOut事件中
出现的还是这个问题,B流程中拟建:流转不能使用!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-5-10 15:53:13 | 显示全部楼层
B流程中拟建:流转按键不是灰色的
只是点击流转不能流出!但是我关掉B流程中拟建窗口后
从新在代办任务中打开B流程中拟建,点击流转,却能往下流转~~
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-5-10 16:40:45 | 显示全部楼层
问题解决了,谢谢!我把TSystemCore.FuncManager.RunFunc(Context,'','Biz:\BLXTGLXT\SCRWSNJ.Func','',nil,false);增加了一个参数
TSystemCore.FuncManager.RunFunc(Context,'','Biz:\BLXTGLXT\SCRWSNJ.Func','',false,nil,false);
回复 支持 反对

使用道具 举报

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

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-1-9 17:07 , Processed in 0.042930 second(s), 18 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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