【结贴】代码发通知的任务关联定义

jakie · 发表于 2010-3-9 16:28:38

求一个代码发通知的任务关联定义说明文档

不知道如何设置
谢谢

lixy · 发表于 2010-3-9 17:13:02

http://bbs.justep.com/forum.php?mod=viewthread&tid=20177
尝试着设置下，其实只是给一个任务的类型。

jakie · 发表于 2010-3-9 17:36:51

这边写了一个代码发通知的功能，相关代码如下

  try
  lTaskBizDatarec.BizField:='Biz:\ZBGLXT\ZBGLSJK.DATABASE\TBSQB.Table\BH.Field';
  lTaskBizDataRec.Value:=ZBGLYWXX.TTBSHD(DocViewZBGLYWXX_TBSHD.Doc).DataSetBroker1.DataSet.FieldByName('BH').AsString;
  lTaskBizData.BizDataKeys.Add(lTaskBizDataRec);
  lOrgURl := TOrgURL.Create('','',ZBGLYWXX.TTBSHD(DocViewZBGLYWXX_TBSHD.Doc).DataSetBroker1.DataSet.FieldByName('TBR').AsString);
lTask.Subject:='替班通知' ;
  lTask.Kind:='ftkNotify'; //任务类型为通知
  lTask.TaskType:='INFORMATION';
  lTask.TaskTypeName:='通知替班人';
  //下面这句话是把那个功能以通知的方式发出去
lTask.FuncURL:='Biz:\ZBGLXT\FUNC\TBTZGN.Func';
lTask.BizDatas.Add(lTaskBizData);
lTask.TaskMessages.AddTaskMessage(nil, lOrgURl,
   TTaskmessagestate.tmsSend, 0, False);
   //添加到任务消息列表里
   Flow.FlowEngine.SaveTask(lTask); //保存任务
finally
lTask .Free;
end;

---------------------
运行后代办任务中出现“替班通知”，但是点击不能打开新的功能窗体，而是打开一个“我的功能”标签  ，是怎么回事

jakie · 发表于 2010-3-9 17:38:15

最初由 jakie 发布
[B]这边写了一个代码发通知的功能，相关代码如下

  try
  lTaskBizDatarec.BizField:='Biz:BGLXTBGLSJK.DATABASETBSQB.TableBH.Field';
  lTaskBizDataRec.Value:=..

以下省略...... [/B]

任务关联功能设置如下：

jakie · 发表于 2010-3-10 09:47:29

求助

shangxy · 发表于 2010-3-10 09:49:13

在业务操作组中添加一个处理的操作，然后在任务上右键处理看看运行的是那个功能？

jakie · 发表于 2010-3-15 09:12:27

最初由 shangxy 发布
[B]在业务操作组中添加一个处理的操作，然后在任务上右键处理看看运行的是那个功能？ [/B]

嗯加上处理之后可以出现窗体了
结贴吧

		自动登录	找回密码
密码			立即注册