Hello friends; I have a doubt with the following, if I write in this way, it works:

SELECT CContratos.NOMBRE, CContratos.CONTRATO, CContratos.DECHA, CContratos.PRESTAMOA, CContratos.IMPORTE, CContratos.FECHAREF, CContratos.FECHACOMER, CContratos.STAT;
FROM CContracts WHERE CContratos.NAME LIKE "% JORGE%" INTO Cursor CONTRNOMB readwrite
Thisform.Grid1.RecordSourceType = 1
ThisForm.Grid1.RecordSource = 'CONTRNOMB'
Thisform.Grid1.Refresh

But nevertheless; When I do this one, it does not work ... what is the error?

lNomb = ALLTRIM (This.Value)

SELECT CContratos.NOMBRE, CContratos.CONTRATO, CContratos.DECHA, CContratos.PRESTAMOA, CContratos.IMPORTE, CContratos.FECHAREF, CContratos.FECHACOMER, CContratos.STAT;
FROM CContracts WHERE CContratos.NAME LIKE "% lNomb%" INTO Cursor CONTRNOMB readwrite
Thisform.Grid1.RecordSourceType = 1
ThisForm.Grid1.RecordSource = 'CONTRNOMB'
Thisform.Grid1.Refresh