Ver Mensaje Individual
  #5  
Antiguo 23-05-2012
Avatar de gmontes
gmontes gmontes is offline
Miembro
 
Registrado: jul 2004
Ubicación: Culiacán, Sinaloa, México
Posts: 668
Reputación: 20
gmontes Va por buen camino
yo trabajo con zeos y firebird y esto hago

Código:
Close;

    DMSIU.cdsMedicos.Active:=false;
    SQL.Clear;
    SQL.Add('SELECT * FROM Medicos WHERE 1=1');
    case rdgBuscar.ItemIndex of
     0:SQL.Add(' AND nombre LIKE ''%'+txtNombreBusq.Text+'%''');
     1:SQL.Add(' AND rfc STARTING '''+txtRfcBusq.Text+'''');
    end;
    case rdgOrden.ItemIndex of
     0:SQL.Add(' ORDER By nombre');
     1:SQL.Add(' ORDER BY RFC');
    end;
    Open;
    DMSIU.cdsMedicos.Active:=true;
otro ejemplo es


Código:
Close;
     SQL.Clear;
     DMSIU.cdsFac.Active:=false;
     sql.add('select f.clavef, f.documento, f.remision, c.nombre, f.fechae, f.paciente, f.estatus, f.importet, f.condicion, f.sustitu, f.sdoc, fechacan');
     sql.add('from facturas f, clientes c where f.tipo =''F'' and SUBSTRING(f.documento from 1 for 1) = ''A'' and f.clavec = c.clavec and '+sCampo+' Like ''%'+Edit1.Text+'%'' ORDER BY f.documento DESC');
     Open;
algunos pasos de parametros estan muy a fuerzas, pero no me he tomado el timpo de corregir eso
__________________
Todos llevamos nuestros demonios a cuestas..
Responder Con Cita