Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   Actualizar 500 campos con numeros consecutivos (https://www.clubdelphi.com/foros/showthread.php?t=48226)

Camilo 19-09-2007 01:33:30

Actualizar 500 campos con numeros consecutivos
 
Hola AMigos:

Como lo indico en el titulo, necesito actualizar el campo "Nconsignacion" de la tabla "Obligaciones" con un numero consecutivo que obedesca al ultimo numero consignado en otros campos; no se si este clara pero la idea es darle al tiempo un numero consecutivo a 500 personas.

Trabajo con Delphi 7 y paradox. Gracias d antemano por su tiempo y gentileza.

marcoszorrilla 19-09-2007 07:15:30

1. Ordenas la tabla por el campo que convenga.
2. Tomas el primero número
3. Haces un bucle recorriendo los registros mientras le vas poniendo el número.

Código Delphi [-]
Var
n:Integer;
begin
n:=LaTAblaQueSea_Numero.Value;

  While Not MiTabla.Eof do
  begin
  MiTabla.Edit;
  MiTAblaCampoxxx.Value:=n;
  n:=n+1;
  MiTabla.Next;
  end;
end;

Un Saludo.

Camilo 19-09-2007 21:06:07

Hola Marcos que pena la demora en volver al foro; sali a trabajar y luego encontre tu aporte. Muchas Gracias en todo caso.

Te cuento que crei que se pudiera hacer con una sentencia SQL. la dificultad que le veo es que existen 10 campos que tienen numesos conscutivos; para asignar el que sigue pues la sentencia debera leer los diez campos y asignar asi el nuevo numero. esto se hace mensaulmlente por cada campo.

Gracia marcos por tu ayuda.


La franja horaria es GMT +2. Ahora son las 05:56:34.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi