Tema: locate Table
Ver Mensaje Individual
  #1  
Antiguo 14-11-2007
mjjj mjjj is offline
Miembro
 
Registrado: mar 2007
Posts: 652
Reputación: 20
mjjj Va por buen camino
locate Table

hola amigos... tengo un problemita que me esta dando mas de un dolor de cabeza... aer si me pueden ayudar

necesito realizar una busqueda en una tabla utilizando un IBTable... utilizo el LOCATE del componente. Tengo que buscar segun 2 campos de la tabla (empresa y periodo)

algo asi deberia ser el codigo

Código Delphi [-]
empresa:='AGUA';
ibtable1.locate('empresa;periodo', vararrayof([empresa,periodo]),[]);

el problema es que el registro del campo periodo, puede tener cualquier valor entre el primer y el ultimo dia de algun mes.

Lo logre hacer con TIQuery de la siguiente manera...

Código Delphi [-]
 IBQUERY1.SQL.ADD('SELECT AREA,SUBAREA, MONTO FROM PRESUPUESTO');
 IBQUERY1.SQL.ADD('WHERE EMPRESA ='+QUOTEDSTR(EMPRESA));
 IBQUERY1.SQL.ADD('AND PERIODO between :FECHA1 AND :FECHA2'); //+' AND (');
 ibquery1.ParamByName('fecha1').asdatetime :=encodedate(calendar1.year, calendar1.month, 1);
 ibquery1.ParamByName('fecha2').asdatetime :=encodedate(calendar1.Year, calendar1.Month,
 DaysInAMonth(calendar1.year, calendar1.month));

con el query funciona, pero es que solo se editar un registro utilizando el componente table...

Entonces.... me puede solucionar mi problema de 2 maneras...

1) con algun codigo que pueda buscar con el componente table segun 2 registros y en el registro periodo, entre 2 fechas.

2) con la manera de poder actualizar los registros directamente sobre el TIBQuery... en donde obtengo la busqueda deseada...

espero me entiendan.. gracias
Responder Con Cita