insert into tabla values (select *... ¿?

[jorgesl]

Hey !!
SI, definitivamente si los ordena en orden alfabetico...
Hay alguna forma de que los ingrese secuencialmente ??

[JOSEA]

Hola jorgesl:
No estoy muy seguro, pero si en la tabla que recibe los datos no tiene indices, creo que lo ingresará con el "order by" que tengas puesto en la Query.

[JOSEA]

Definitivamente si jorgesl.
Hice la prueba ordenando por varios campos y los ingresa por el orden de la Query. Tambien lo hice sin poner order by en la Query y los inserta en el orden que encuentra en la tabla.

[jorgesl]

Esto es parte de lo que hago:

Código Delphi [-]
with query do
begin

...

      insSQL:='select * from SOSTAT_RESUL where PNTNAM like arametro and SUBNAM like :sSubE AND OBJNAM like "SUBESTACION%" order by PNTNAM';
      SQL.Text:= insSQL;
      Prepare;
      ParamByName('sSubE').AsString := sSubE;
      parametro := tipo + '-%';
      ParamByName('parametro').AsString := parametro;
      Open;
      First;
      while not EoF do
      begin
        objeto := FieldByName('PNTNAM').AsString;
        {}Qinte.SQL.Text := 'select * from SOSTAT_RESUL where PNTNAM like bjeto';
        {}Qinte.Prepare;
        {}Qinte.Prepare;
        {}Qinte.ParamByName('objeto').AsString := objeto;
        {}Qinte.Open;
        {}Table1.BatchMove(Qinte,batappend);
        {}Table1.Next;
        {}Qinte.Close;
...

end

Hay alguna manera de hacer que esa instruccion los agregue en el orden que los vaya encontrando en el query ?
osea, uno abajo del otro :P

Es lo unico que que necesito, con insert no funciona y lo que requiero es un insert, que siemrpe los reguistros los agregue al final de la tabla...

Esa instruccion sirve para mover el contenido de una tabla a otra, pero yo lo hago con un query, el contenido del query lo muevo a la tabla destino y el query, siempre me regresa un solo registro.

[jorgesl]

Sigo con el mismo prblema.
Ya traté haciendo

Código Delphi [-]
        {}Table1.BatchMove(Qinte,batCopy);

Pero al final, sólo deja la tabla con un registro (el último)

[jorgesl]

Algo muy raro ha pasado.

De repente funciono...

Código Delphi [-]
        {}Qinte.SQL.Text := 'select * from SOSTAT_RESUL where PNTNAM like bjeto';
        {}Qinte.Prepare;
        {}Qinte.ParamByName('objeto').AsString := objeto;
        {}Qinte.Open;
        {}Table1.BatchMove(Qinte,batAppend);
        {}Table1.Next;
        {}Qinte.Close;

Pero ahora quiero implementarlo en otra función... y lo hace mal de nuevo...
No entiendo
lo unico que cambia es Table1 por Table2...

Esta embrujado mi DevStudo 2006?