默认开箱即用排序:
预期排序:
为项目任务分段键 (CS202000)设置Edit Mask
为Unicode
允许多级任务 CD(允许.
值)
要获得预期的排序,
我们将创建自定义 BQL 函数,它将数字部分填充到开箱即用的 TaskCD 字段中。
public class HierarchySorting<StringField> : BqlFormulaEvaluator<StringField>, IBqlOperand
where StringField : IBqlField
{
public override object Evaluate(PXCache cache, object item,
Dictionary<Type, object> pars)
{
PXFieldState fState = cache.GetStateExt<StringField>(item) as PXFieldState;
return GetSortOrderValueExt(Convert.ToString(fState.Value));
}
public string GetSortOrderValueExt(string taskCD)
{
return Regex.Replace(taskCD, "[0-9]+", MatchReplacer => MatchReplacer.Value.PadLeft(10, '0'));
}
}
此自定义 BQL 函数将为开箱即用的 TaskCD 值中的任何数字填充零。
我们将在 DAC 扩展中创建一个新的未绑定用户定义字段,并使用自定义 BQL 函数PMTask
进行装饰PXFormula
public class PMTaskPXExt : PXCacheExtension<PMTask>
{
public abstract class usrSortingTaskCD : IBqlField { }
[PXString(IsUnicode = true)]
[PXUIField(DisplayName = "Usr Task")]
[PXFormula(typeof(HierarchySorting<PMTask.taskCD>))]
public virtual string UsrSortingTaskCD { get; set; }
}
OrderByNew
我们将使用 的方法替换数据视图的排序PXSelectBase/PXView
。
public class ProjectEntryPXDemoExt : PXGraphExtension<ProjectEntry>
{
public override void Initialize()
{
Base.Tasks.OrderByNew<OrderBy<Asc<PMTaskPXExt.usrSortingTaskCD>>>();
}
}