【结贴】修改流程主题

江振辉

现在我定义了一个业务参数，根据流程字段取出业务字段改变流程主题；在运行的时候单步调试发现取出的流程字段为空；不知道怎么解决；请版主帮我看一下，
我定义取名为“项目名称”的业务参数代码是这样写的：
var
  lFlowControl: TFlowControl;  //这个类引用 Business.Model.Flow
  lProUnitId: String;
  lQuery: TQuery;
  lProName: String;
  lContext: TContext;
begin
  Result := '';
  lContext := AContext.GetParentContext(BizSys.IL_FLOW); //通过系统变量BizSys.IL_FLOW 得到当前环境的上一级上下文
  if Assigned(lContext) then
    begin
      lFlowControl := lContext.Owner as TFlowControl;       //Owner是TContext的一个属性,这个属性是 TBizObject 类型的一个对象
    lProUnitId := lFlowControl.Flow.ID;[U] [B] //单步调试为空[/B]  [/U]   
    end;
    lQuery := TQuery.Create(nil);
    try
       lQuery.ConnectionString :='DATABASEURL=Biz:CBSGLXT_NEW
xc_pd_cmis.Database';
       lQuery.CommandText := 'select pro_name from T_PRO_INFO where pro_id = ''' + lProUnitId + '''';
       lQuery.Open;
       lQuery.First;
       lProName := lQuery.FieldByName('pro_name').AsString;
       Value := lProName;
     finally
       lQuery.Close;
       lQuery.Free;
     end;
end;
我的设置如下图：流程 启动规则——流程值填充定义——流程主题（选“通过表达式取得”）——参数

江振辉

？？？？？？？？？？？？？？？

江振辉

顶一下？

江振辉

怎么没人回答

lixy

你这样试验下。在流程窗体打开后，取下这个业务参数。看看那个id是不是空。
如果不是，那说明你这样做法有问题，取的时机不对。

江振辉

你说的流程窗体，是不是流程环节对应功能的窗体，如果是，肯定能取到这个参数！这样的话我就需要在每个窗体上都做哟，有没有办法在1楼“流程主题”参数那设置呢？

lixy

最初由 lixy 发布
[B]你这样试验下。在流程窗体打开后，取下这个业务参数。看看那个id是不是空。
如果不是，那说明你这样做法有问题，取的时机不对。 [/B]

时机不对，那就没办法。只能一个一个去做，或者做基类窗体上。

江振辉

好的，谢谢！结了吧！