>> .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 >>>
>THISFORM.Fm_Container1.grdWorkListXMLCursor.SetAll("DynamicBackColor", ; > "ICASE(UPPER(GroupHeading) == [RECEIVER], RGB(192, 241,190), > INLIST(UPPER(GroupHeading), [SUBSCRIBER], [DEPENDENT]), RGB(211,210,240), > RGB(249,223,223))",'Column")The ALLTRIMS() is becuase
CREATE CURSOR crsTest (Fld1 C(20)) INSERT INTO crsTest VALUES ([Receiver]) ? UPPER(crsTest.Fld1) == [RECEIVER] ? UPPER(ALLTRIM(crsTest.Fld1)) == [RECEIVER]:-)