Duplicar Registros

[[Chris]]

Antes de que se vaya a ir quien me pueda ayudar, mejor me apuro a hacer mi pregunta


Lo que pasa es que tengo una función para duplicar registros en el sistema que estoy desarrollando, Lo hago con código de Delphi. El problema es que también quiero duplicar los detalles de este registro por medio de SQL y con un Select anidado. No sé como hacerlo. He intentado el siguiente código.

Código SQL [-]
Insert into DetallesTable (PADRE, TIPO, CODIGO, DESCRIPCION)
VALUES
:CODIGO_NUEVOPADRE,
    (Select Tipo, Codigo, Descripcion from DetallesTable
       Where PADRE=:CODIGO_PADREORIGINAL)

Algo por el estilo he intentado hacer, pero me da el error de que el numero de Parámetros y valores no coinciden.

Literalmente, el código que manda el servidor es: "count of column list and variable list do not match"

Apreciaré cualquier ayuda al respecto que puedan proporcionarme.

[[enecumene]]

bueno lo que te propongo es mas que una idea que solucion:

Código SQL [-]
 INSERT INTO TABLA1 (CAMPO1, CAMPO2) SELECT CAMPO1, CAMPO2 FROM TABLA WHERE CAMPO=VALOR

Saludos.

[keyboy]

No parece ser necesaria una subconsulta:

Código SQL [-]
Insert into DetallesTable (PADRE, TIPO, CODIGO, DESCRIPCION)
Select :CODIGO_NUEVOPADRE, Tipo, Codigo, Descripcion from DetallesTable
Where PADRE=:CODIGO_PADREORIGINAL

Bye

[[Chris]]

Gracias enucumene por el interes, pero no me funciona. Al contrario me dice que el Select es invalido.

[[enecumene]]

Empezado por D&W

Gracias enucumene por el interes, pero no me funciona. Al contrario me dice que el Select es invalido.

Vale, ya la propuesta de KeyBoy? es casi identico al mio, por cierto, no has dicho que base de datos usas .

Saludos.

[keyboy]

Empezado por enecumene

no has dicho que base de datos usas .

Pues no sé por qué, pero juraría que es Interbase o Firebird

Bye

[[Chris]]

Empezado por enecumene

Vale, ya la propuesta de KeyBoy? es casi identico al mio, por cierto, no has dicho que base de datos usas .

Saludos.

La de KeyBoy es la misma practicamente, lo que no sé, es que si nuestro amigo se habrá equivocado tenido algún error al tepear el código, ya que hasta donde veo, no es una consulta SQL valida.

Con respecto a la base de datos que utilizo enecumente, Mira: Sube tus ojo a la parte superior izquiera de tu pantalla, abajo de un Rotulo que dice "Club Delphi" encontrás la respuesta.

Saludos.

[[enecumene]]

Vale que tonto soy, , es que estoy demasiado animado con las chicas que hay en la fiesta de Egostar...

[[enecumene]]

Por cierto, la propuesta de KeyBoy es invalida porque hay un parametro en el select y no se puede sino despues del Where, creo yo.

Saludos.

[[Chris]]

Empezado por enecumene

Por cierto, la propuesta de KeyBoy es invalida porque hay un parametro en el select y no se puede sino despues del Where, creo yo.

Saludos.

Pues se nos ha caido el sapote -a como decimos aca- enecumene, por que el código es a como lo ha puesto KeyBoy. Lo que sucede es que cuando vas a duplicar los registros o insertar regitros desde otra tabla no se necesita de la palabrita "values", simplemente queda a como lo ha dicho KeyBoy.

A inicio me dio error porque siempre utilizaba "Values"

Gracias KeyBoy.

Enecumene: También estaba viendo a las chicas .

[[egostar]]

A ver, prueba esto amigo D&W

Código SQL [-]
Insert into DetallesTable (PADRE, TIPO, CODIGO, DESCRIPCION)
VALUES :CODIGO_NUEVOPADRE, 
  (Select Tipo from DetallesTable Where PADRE = :CODIGO_PADREORIGINAL), 
  (Select Codigo from DetallesTable Where PADRE = :CODIGO_PADREORIGINAL),
  (Select Descripcion from DetallesTable Where PADRE = :CODIGO_PADREORIGINAL)

Salud OS

Edito: Vaya, pues ya tienes la solución, bien por esa keyboy

[[enecumene]]

Empezado por D&W

Pues se nos ha caido el sapote -a como decimos aca- enecumene, por que el código es a como lo ha puesto KeyBoy. Lo que sucede es que cuando vas a duplicar los registros o insertar regitros desde otra tabla no se necesita de la palabrita "values", simplemente queda a como lo ha dicho KeyBoy.

A inicio me dio error porque siempre utilizaba "Values"

Gracias KeyBoy.

Enecumene: También estaba viendo a las chicas .

Vale, no sabia que estabas poniendo values, si mi propuesta no lo tiene, pero bueno, te funciono, no?

Saludos.

[[Chris]]

Empezado por enecumene

Vale, no sabia que estabas poniendo values, si mi propuesta no lo tiene, pero bueno, te funciono, no?

Saludos.

No me funcionó porque cuando la prove no le quité el "values"

Saludos.

Empezado por egostar

A ver, prueba esto amigo D&W

Código SQL [-]Insert into DetallesTable (PADRE, TIPO, CODIGO, DESCRIPCION)
VALUES :CODIGO_NUEVOPADRE,
(Select Tipo from DetallesTable Where PADRE = :CODIGO_PADREORIGINAL),
(Select Codigo from DetallesTable Where PADRE = :CODIGO_PADREORIGINAL),
(Select Descripcion from DetallesTable Where PADRE = :CODIGO_PADREORIGINAL)


Salud OS

Edito: Vaya, pues ya tienes la solución, bien por esa keyboy

PD.: Gracias ego, se nota que eres un buen programador, en especial en SQL
Edito: Me gustan tus sub-sub-sub selects