7 respuestas en este tema

[luk2009]

delphi

procedure TFRQcentral.EDCLIENTEChange(Sender: TObject);
begin
  if EDCLIENTE.TEXT <> '' then
 
  begin
 
    dmmonitoreo.zqconsultas.SQL.clear;
    dmmonitoreo.zqconsultas.SQL.Add('SELECT * from  central left join acmsub on central.csid=acmsub.csid ');
    dmmonitoreo.zqconsultas.SQL.Add('left JOIN evento ON CENTRAL.EVENTO = evento.Evento');
    dmmonitoreo.zqconsultas.SQL.Add('WHERE ' + 'ACMSUB.clientes LIKE ' + quotedstr('%' + edcliente.Text + '%'));
    dmmonitoreo.zqconsultas.SQL.Add(' and CENTRAL.FECHAN between ' + quotedstr(inicio) + 'and' + quotedstr(fin));
    dmmonitoreo.zqconsultas.SQL.Add('ORDER BY CENTRAL.FECHAn');
    dmmonitoreo.zqconsultas.Open;
 
  end;
end;

Mi problema es que en sql server 2000 no importaba si escribia la busqueda en minuscula o en mayuscula. Sin embargo en firebird si importa. como puedo arreglar esto. En la consulta? o es algo
que debo arreglar en la base de datos.

Gracias 

[enecumene]

Haz este pequeño cambio:

En vez de:

delphi

LIKE ' + quotedstr('%' + edcliente.Text + '%')

Este:

delphi

LIKE ''*' + edcliente.Text + '*''

Saludos.

[luk2009]

Me da error

[Error] UFRQcentral.pas(103): Unterminated string

o si no me da error de operador y cuando logro ajustar para que no me de error en la compilacion
me da error en la busqueda

dime como lo debo poner dentro de la consulta de delphi

delphi

dmmonitoreo.zqconsultas.SQL.Add('WHERE ' + 'ACMSUB.clientes LIKE ' + quotedstr('%' + edcliente.Text + '%'));

http://img291.images...nsultaerror.jpg

[enecumene]

sql

IF EDCLIENTE.TEXT <> '' THEN
 
  BEGIN
 
    dmmonitoreo.zqconsultas.SQL.clear;
    dmmonitoreo.zqconsultas.SQL.ADD('SELECT * from  central left join acmsub on central.csid=acmsub.csid ');
    dmmonitoreo.zqconsultas.SQL.ADD('left JOIN evento ON CENTRAL.EVENTO = evento.Evento');
    dmmonitoreo.zqconsultas.SQL.ADD(' WHERE ACMSUB.clientes LIKE '+quotedstr('%' + edcliente.Text + '%')+'');
    dmmonitoreo.zqconsultas.SQL.ADD(' and CENTRAL.FECHAN between ' + quotedstr(inicio) + ' and ' + quotedstr(fin) +'');
    dmmonitoreo.zqconsultas.SQL.ADD(' ORDER BY CENTRAL.FECHAn');
    dmmonitoreo.zqconsultas.OPEN;
 
  END;

Intenta con eso.

Saludos.

[luk2009]

No me funciona.

Funciona igual que como la tenia al principio. Lo que pasa es que algunos nombres de el campo clientes tienen partes en minuscula, aunque la mayoria estan completamente en mayuscula.
Cuando escribo cualquier parte del nombre en mayuscula, la consulta funciona bien. Pero si escribo en minuscula solo la primera letra la busca, pero de los nombres que tengan minuscula. Desde que entro la
2da letra no importa que esta exista en minuscula o no en el campo clientes.

nota: cuando escribo lo nombres en mayuscula en el edit, solo me trae los nombres que estan totalmente en mayuscula.

PD: cuando la base de datos estaba en sql server, funcionaba sin problemas

nota2: en IBexpert esta declarado el campo asi: 

VARCHAR(60) CHARACTER SET ISO8859_1

 

[Delphius]

Bueno, por el tema de las mayúsculas y minúsculas eso se debe al modo en como está definido el conjunto de caracteres. Lee ésto y ésto. Allí­ se habla al respecto.

Como una opción puedes valerse de la función UPPER para capitalizar el texto.

Saludos,

[luk2009]

delphi

procedure TFRQcentral.EDCLIENTEChange(Sender: TObject);
begin
  if EDCLIENTE.TEXT <> '' then
 
  begin
 
    dmmonitoreo.zqconsultas.SQL.clear;
    dmmonitoreo.zqconsultas.SQL.Add('SELECT * from  central left join acmsub on central.csid=acmsub.csid ');
    dmmonitoreo.zqconsultas.SQL.Add('left JOIN evento ON CENTRAL.EVENTO = evento.Evento');
    dmmonitoreo.zqconsultas.SQL.Add(' where ' + ' (upper(ACMSUB.clientes COLLATE ES_ES_CI_AI )) LIKE ' +quotedstr('%' + edcliente.Text + '%')+'');
    dmmonitoreo.zqconsultas.SQL.Add(' and CENTRAL.FECHAN between ' + quotedstr(inicio) + 'and' + quotedstr(fin));
    dmmonitoreo.zqconsultas.SQL.Add('ORDER BY CENTRAL.FECHAn');
    dmmonitoreo.zqconsultas.Open;
 
  end;
end;

Gracias Delphius estaba trabajando con upper cuando vi tu respuesta y con ella encontre la parte que me faltaba. 

En este ejemplo:
ES_ES significa el idioma espanol.
CI es case insensitive(no sensible a mayuscula o minuscula)
AI  es insensible a los acentos.

Gracias a todos

[enecumene]

Interesante el asunto, nunca me ha sucedido ese tipo de cosas con Firebird pero es bueno saber esos detalles en caso de que suceda, gracias Delphius .

Saludos.