¿Cómo copiar todos los registros de una tabla a otra?

[roman]

Empezado por Casimiro Notevi

Código Delphi [-]
insert into tabla_b
select *, 0 from tabla_a

Pues aparentemente no funciona de ese modo, es lo primero que probé

Ya, pues..., ni qué decir que en MySQL funciona a la perfección

// Saludos

[guillotmarc]

Empezado por Casimiro Notevi

Hola, sí, desde delphi no hay problema, es que quiero hacerlo en la base de datos, desde un stored procedure, por ejemplo.

Entonces puedes hacer lo mismo en el procedimiento almacenado, consultando las tablas de sistema para obtener los nombres de los campos, y construyendo una sentencia SQL a ejecutar en un EXECUTE STATEMENT (no soy muy aficionado a construir sentencias dinámicamente, pero no parece que en este caso tengas más opciones).

[guillotmarc]

Empezado por Casimiro Notevi

insert into tabla_b select *, 0 from tabla_a

Pues aparentemente no funciona de ese modo, es lo primero que probé

Debería funcionar correctamente, yo lo utilizo en ocasiones. Pruébalo de esta forma (con el alias de la tabla donde hay que coger todos los campos) :

insert into tabla_b select 0, tabla_a.* from tabla_a

Saludos.

[Casimiro Noteví]

Empezado por roman

Ya, pues..., ni qué decir que en MySQL funciona a la perfección // Saludos

Sabía que ese iba a ser tu siguiente comentario

Empezado por guillotmarc

Entonces puedes hacer lo mismo en el procedimiento almacenado, consultando las tablas de sistema para obtener los nombres de los campos, y construyendo una sentencia SQL a ejecutar en un EXECUTE STATEMENT (no soy muy aficionado a construir sentencias dinámicamente, pero no parece que en este caso tengas más opciones).

Parece que va a ser la solución, aunque tampoco me gusta mucho.

[Casimiro Noteví]

¡¡¡ FUNCIONA !!!

Cómo he sido tan burro de no probar con alias.

Código SQL [-]
insert into tabla-B
select 0, a.* from tabla-A a

[Casimiro Noteví]

Román, con firebird también se puede, ja, ja, ja...


¡¡¡ Gracias a todos, amigos !!!

[[Caral]]

Hola
Pero esto no le va a poner un 0 al campo0 ?.
Osea, cero en todos los items ?.
Saludos

[Casimiro Noteví]

Empezado por Caral

Hola
Pero esto no le va a poner un 0 al campo0 ?.
Osea, cero en todos los items ?.
Saludos

Bueno, puedes poner el valor que quieras, en mi caso es un número de un generador:
1. Extraer el número que toca, desde un generador
2. Ejecutar la sentencia.

Más o menos así: ejemplo:

Código SQL [-]
iID = GEN_ID(GEN_GLOBAL,1);

insert into tbapunteshistorico
select iID, a.* from tbapuntes a

Supongo que funcionará, voy a probarlo.

[[Caral]]

Hola
Ah, ya decía yo que había gato encerrado en esto.
Saludos

[[Caral]]

Hola
Este tema lo deberías marcar aquí en Firebird.
Es muy interesante y educativo (todo un tutorial)
Por lo menos yo he aprendido muchísimo.
Saludos

[Casimiro Noteví]

Pues lo ponemos, así está más a mano

[[fjcg02]]

Código SQL [-]
SET TERM ^ ;

CREATE OR ALTER PROCEDURE PRUEBA 
returns (
    consulta1 varchar(500))
as
declare variable consulta varchar(500);
declare variable campo varchar(250);
begin
  /* Procedure Text */
 CONSULTA1= 'INSERT INTO TABLA1 ';
 CONSULTA = ' SELECT ';
  for select f.rdb$field_name
    from rdb$relation_fields f
    left join rdb$fields fs on fs.rdb$field_name = f.rdb$field_source
    left join rdb$field_dimensions d on d.rdb$field_name = fs.rdb$field_name
    left join rdb$character_sets cr on fs.rdb$character_set_id = cr.rdb$character_set_id
    left join rdb$collations co on ((f.rdb$collation_id = co.rdb$collation_id) and
    (fs.rdb$character_set_id = co.rdb$character_set_id))
    where f.rdb$relation_name = 'TABLA1'
    order by f.rdb$field_position, d.rdb$dimension
    into :CAMPO
    do
     begin
       CONSULTA= CONSULTA||TRIM(CAMPO)||',' ;
       --suspend;
     end
     CONSULTA1=CONSULTA1||CONSULTA||' from TABLA2';
end^

Poniendo un par de parámetros que sean el nombre de la tabla y el del generador, no creo que sea demasiado difícil terminar el procedimiento.
Faltaría quitar la última coma de la relación de campos, pero lo dejo como ejercicio para los principiantes

Saludos
PD: Por supuesto que algún gurú dirá que se puede optimizar; claro que sí, pero no voy a poner todo el ejercicio resuelto.

[Casimiro Noteví]

Empezado por fjcg02

PD: Por supuesto que algún gurú dirá que se puede optimizar; claro que sí, pero no voy a poner todo el ejercicio resuelto.

Claro, hombre, deja que trabajen las neuronas de los demás, que se van a atrofiar

Bueno, pienso que con todo lo comentado aquí ya puede servir de guía para problemas similares, abarcando distintos enfoques, métodos y formas diferentes de encarar un problema de ese tipo.

Gracias a todos

[[RONPABLO]]

Yo uso este query, ahí mando tres datos nuevos, la fecha en que borro, el motivo de haber borrado que entra como parametro y un consecutivo independiente (que a ratos creo que es necesario)... eso sí ya me ha pasado varias cenes el error de crear un campo en TEgresos y no crearla en TEgresos_Borrados pero por lo menos el erro que sale es muy diciente.

Código SQL [-]
insert into TEGRESO_BORRADOS
select A.*, CAST('NOW' AS DATE), :motivoBorrar, gen_id(TEGRESO_RELACION_GEN,1) from TEGRESO a 
where a.ID = :ID

[Casimiro Noteví]

Gracias por el aporte, me puede ser de utilidad.

[TJose]

Empezado por Casimiro Notevi

¿Quién diría que eres un novato?
Ambas tablas siempre se diferenciarán en un campo. Si una se modifica, entonces la otra también.

tabla-A
 campo1
 campo2
 campo3
 campo4
 campo5
 campo6
 campo7
 campo8
 ...
 campoXXX

tabla-B
 campo0  <- único campo distinto
 campo1
 campo2
 campo3
 campo4
 campo5
 campo6
 campo7
 campo8
 ...
 campoXXX

Hola Casimiro

¿Por qué modificas la estructura de la tabla?
¿Por cambios en las reglas de negocio o por otra razón?

Saludos
TJose

[[mightydragonlor]]

Pues a mi la mejor solució, por lo compresiva a nivel humano es:

Código SQL [-]
insert into Members (number, name)
  select number, name from NewMembers where Accepted = 1
    union
  select number, name from SuspendedMembers where Vindicated = 1

Sacado de la página de Firebird, lo busqué en google hace mucho tiempo como Insert into select =P

Saludos.

[Casimiro Noteví]

Hola, de esta pregunta hace 10 meses, ya casi ni me acuerdo, pero el problema es que lleva un generador también, creo que no la has leido desde el principio

[Casimiro Noteví]

Empezado por TJose

Hola Casimiro
¿Por qué modificas la estructura de la tabla?
¿Por cambios en las reglas de negocio o por otra razón?
Saludos
TJose

Sí, por ese motivo, nuevos campos que son necesarios según los clientes van pidiendo nuevas funcionalidades.

[[mightydragonlor]]

Empezado por Casimiro Notevi

Hola, de esta pregunta hace 10 meses, ya casi ni me acuerdo, pero el problema es que lleva un generador también, creo que no la has leido desde el principio

El principio si, pero no todo jajajajjaa =P