> .Fm_CONTAINER1.grdWorkListXMLCursor.RecordSource = '' > .Fm_CONTAINER1.grdWorkListXMLCursor.RecordSource = 'WorkListXMLCursor' > THISFORM.Fm_Container1.grdWorkListXMLCursor.SetAll("DynamicBackColor", ; > "IIF(ALLTRIM(WorkListXMLCursor.GroupHeading)='Receiver', RGB(192, 241, 190), ; > IIF(ALLTRIM(WorkListXMLCursor.GroupHeading)='Subscriber' OR ; > ALLTRIM(WorkListXMLCursor.GroupHeading)='Dependent', RGB(211, 210, 240), ; > RGB(249, 223, 223)))", "Column") > .Fm_CONTAINER1.grdWorkListXMLCursor.Refresh >How about:
TEXT TO lcDynBackColor NOSHOW PRETEXT 15 ICASE(UPPER(ALLTRIM(WorkListXMLCursor.GroupHeading)) == [RECEIVER] , RGB(192, 241, 190), INLIST(UPPER(ALLTRIM(WorkListXMLCursor.GroupHeading)), [SUBSCRIBER], [DEPENDENT]), RGB(211, 210, 240), RGB(249, 223, 223)) ENDTEXT THISFORM.Fm_Container1.grdWorkListXMLCursor.SetAll([DynamicBackColor], lcDynBackColor, [Column]) THISFORM.Fm_Container1.grdWorkListXMLCursor.Refresh()