Seleccionar ambito de apellidos por inicial

[fidel]

Hola:

Aclaro que es una tabla FireBird 1.5

CONTAING me da errror, y además creo que no serviría

select * from socios where apellidos between 'A%' and 'D%';

El problema que parece que hay es que no funciona el comodín %
Con Like si que funciona el comodín, pero no se como se puede hacer

Esto va correcto

Código SQL [-]
DM.IBDSSocios.SelectSQL.Text := 'select * from SOCIOS where UPPER(APELLIDOS) Between :LDESDE and :LHASTA';
DM.IBDSSocios.ParamByName('LDESDE').AsString := AnsiUpperCase('A');
DM.IBDSSocios.ParamByName('LHASTA').AsString := AnsiUpperCase('Gil Olmos');

Abad Antúnez
....
Gil Olmos

Esto con comodín % no funciona

Código SQL [-]
DM.IBDSSocios.SelectSQL.Text := 'select * from SOCIOS where UPPER(APELLIDOS) Between :LDESDE and :LHASTA';
DM.IBDSSocios.ParamByName('LDESDE').AsString := AnsiUpperCase('A');
DM.IBDSSocios.ParamByName('LHASTA').AsString := AnsiUpperCase('G') + '%';

Abad Antúnez
....
Fuentes Hiniesta

¿Alguna idea?, gracias.

Un saludo.