Ver Mensaje Individual
  #1  
Antiguo 16-07-2005
uper uper is offline
Miembro
 
Registrado: abr 2004
Posts: 296
Reputación: 23
uper Va por buen camino
Incrementar las llaves primarias con zeos

saludos

tengo una duda de los componentes zeos para hacer incrementos en los ID, me da un error, lo que hice es poner otro Zquery para ser llamado desde otro Zquery, y escribir este codigo en onNewrecord de ZQdepartamentos
var ultimo:integer;
ZIncrementos.close;
ZIncrementos.ClearFields;
ZIncrementos.SQL.Add('select Max(ID_DEP) from Departamentos');
ZIncrementos.Open;
with ZIncrementos.Fields[0] do
if isnull then
ultimo:=1
else
ultimo:=ASINTEGER+1;
ZQDeptosID_DEP.Value:=ULTIMO;
ZQDeptos.Post;
muchas gracias.
Responder Con Cita