Dim HJ As B4XStringFormatter
HJ.Initialize
HotJr_ReleasedCol.StrFormatter = HJ
Dim HotJob As B4XFormatStringData = HotJr_ReleasedCol.StrFormatter.NewFormatData
HotJob.BackColor = xui.Color_Red
HotJob.FormatFont = xui.CreateDefaultBoldFont(UnSchedOpsList.LabelsFont.Size)
HotJob.SearchType = HJ.SEARCH_TYPE_EQUALS
HotJob.RangeStart = "Hot"
HotJob.RangeEnd = "Hot"
HJ.FormatFieldName = "Os_JobNum"
HotJr_ReleasedCol.StrFormatter.AddFormatData(HotJob, HJ.SEARCH_TYPE_EQUALS, True, True)