Can anyone tell me what is wrong with the code that I placed in the grid refresh method. I want to reset the column header's background and forecolor

DO CASE
CASE ALLT(oVar.FilterSetTo) == "PATIENT CDC ID"
*This.Column4.Header_CdcId.BACKCOLOR = 192,192, 192
This.Column4.Header_CdcId.FORECOLOR = 0,64,128
This.Column4.Header_CdcId.FONTBOLD = .T.

** RESET DOB COLUMN HEADERS TO DEFAULT BLACK FOREGROUND
*This.Column3.Header_DOB.BACKCOLOR = 192,192, 192
This.Column3.Header_DOB.FORECOLOR = '0, 0, 0'
This.Column3.Header_DOB.FONTBOLD = .F.

CASE ALLT(oVar.FilterSetTo) == "DATE OF BIRTH"
This.Column3.Header_DOB.FORECOLOR = 0, 64, 128
This.Column3.Header_DOB.FONTBOLD = .T.

** RESET CDC ID COLUMN HEADERS TO DEFAULT BLACK FOREGROUND
This.Column4.Header_CdcId.FORECOLOR = 0, 0, 0
This.Column4.Header_CdcId.FONTBOLD = .F.
ENDCASE