topic-16744

Posts: 199

Joined: Thu Oct 06, 2005 09:07 PM

dbgobottom() en SQL
Posted: Fri Sep 18, 2009 06:32 AM

En Clipper/FW para llegar al final del dbf e incrementar por ejemplo el folio haciamos algo asi.

base->( dbgobottom())
nRegistro := base->registro+1

y listo, teniamos el siguiente folio, pero en MySql como se hace?

Saludos,
Mauricio

Posts: 1364

Joined: Wed Jun 21, 2006 12:39 AM

Re: dbgobottom() en SQL
Posted: Fri Sep 18, 2009 12:34 PM

Si trabajas con ado podés usar esta función oRecordSet : MoveLast()

Posts: 132

Joined: Thu Mar 08, 2007 06:12 PM

Re: dbgobottom() en SQL
Posted: Fri Sep 18, 2009 03:19 PM

Si usas TMysQl Prueba usando cQuery:RecCount() + 1
Espero que te sirva

Harbour / Bcc / MinGW / Fwh 13.9

Posts: 158

Joined: Tue Oct 11, 2005 03:10 PM

Re: dbgobottom() en SQL
Posted: Fri Sep 18, 2009 04:45 PM

Modifica el campo para que tenga las propiedades

"NOT NULL"
"AUTO INC"
Y asi cada que insertes un registro en esa tabla, tu ya no te preocupas por ese dato.

Saludos

Posts: 817

Joined: Sun Jun 15, 2008 07:47 PM

Re: dbgobottom() en SQL
Posted: Fri Sep 18, 2009 06:29 PM

En Eagle1 sería así:

nRegistro := oBase:LastRec() + 1

o de una forma análoga como tú lo hacias:

oBase:gobottom()
nRegistro := oBase:RecNo() + 1

Aunque tal vez lo mejor sea crear un campo auto-incremental, hay que saber el contexto.

Para más información sobre Eagle1 mira aquí: http://es.groups.yahoo.com/group/eagle1

______________________________________________________________________________

Sevilla - Andalucía

Posts: 199

Joined: Thu Oct 06, 2005 09:07 PM

Re: dbgobottom() en SQL
Posted: Sun Sep 20, 2009 09:26 PM

Gracias a todos,

probare las soluciones que comentan,

saludos,
Mauricio

FiveTech Support Forums