Cursor para ordenar datos horizontalmente

[leo_acn]

Hola a todos les cuento mi problema, trabajo con dos tablas, la tabla prueba y la tabla libro. Para que es quede mas claro, a tabla prueba tiene el campo llamado "rut" que es un identificador y un campo llamado "telcontacto" que son números telefónicos. la tabla libro tiene los campos del identificador "rut" y los teléfonos del 1 al 20.

Tabla Prueba
origen varchar(15)
rut decimal(9)
telconsolidado char(18)
fecha datetime(8)

Tabla Libro
rut nvarchar(50)
fono1 nvarchar(50)
fono2 nvarchar(50)
...
fono20 nvarchar(50)

En la tabla prueba pueden haber rut que tengan mas de un teléfono, hasta 10 casi siempre, y lo que necesito hacer es tomar el rut y el telñefono de la tabla prueba y guardarlos en la tabla libro, perooo guardar solo un campo rut e incluirle los telefonos hacia la derecha, por ejemplo si tenemos los siguientes datos

rut fono
123 25632
123 25874
254 1254
586 1257

Esto debería quedar asi en la tabla libro:

rut fono1 fono2..... fono20
123 25632 25874
254 1254
586 1257

Ahora bien, para hacer esto la mejor solución que pense es un cursor el que les dejo a continuación para que me digan donde me estoy equivocando porque lo ejecuto, pero no me guarda ningun dato en la tabla libro, algun consejo por favor? gracias :)




-- Declaracion de variables para el cursor
DECLARE @rut decimal,
@fono char(18)

-- Declaración del cursor
DECLARE Fono CURSOR FOR
SELECT rut, telconsolidado FROM prueba

-- Apertura del cursor
OPEN Fono

-- Lectura de la primera fila del cursor
FETCH Fono INTO @rut, @fono
WHILE (@@FETCH_STATUS = 0 )
BEGIN
select rut from prueba where rut = @rut
if @@rowcount = 0
insert into libro (rut, fono1) values (@rut, @fono)
else
begin
select fono2 from libro where rut = @rut and fono2 > 0
if @@rowcount = 0
update libro set fono2 = @fono where rut = @rut
else
begin
select fono3 from libro where rut = @rut and fono3 > 0
if @@rowcount = 0
update libro set fono3 = @fono where rut = @rut
else
begin
select fono4 from libro where rut = @rut and fono4 > 0
if @@rowcount = 0
update libro set fono4 = @fono where rut = @rut
else
begin
select fono5 from libro where rut = @rut and fono5 > 0
if @@rowcount = 0
update libro set fono5 = @fono where rut = @rut
else
begin
select fono6 from libro where rut = @rut and fono6 > 0
if @@rowcount = 0
update libro set fono6 = @fono where rut = @rut
else
begin
select fono7 from libro where rut = @rut and fono7 > 0
if @@rowcount = 0
update libro set fono7 = @fono where rut = @rut
else
begin
select fono8 from libro where rut = @rut and fono8 > 0
if @@rowcount = 0
update libro set fono8 = @fono where rut = @rut
else
begin
select fono9 from libro where rut = @rut and fono9 > 0
if @@rowcount = 0
update libro set fono9 = @fono where rut = @rut
else
begin
select fono10 from libro where rut = @rut and fono10 > 0
if @@rowcount = 0
update libro set fono10 = @fono where rut = @rut
else
begin
select fono11 from libro where rut = @rut and fono11 > 0
if @@rowcount = 0
update libro set fono11 = @fono where rut = @rut
else
begin
select fono12 from libro where rut = @rut and fono12 > 0
if @@rowcount = 0
update libro set fono12 = @fono where rut = @rut
else
begin
select fono13 from libro where rut = @rut and fono13 > 0
if @@rowcount = 0
update libro set fono13 = @fono where rut = @rut
else
begin
select fono14 from libro where rut = @rut and fono14 > 0
if @@rowcount = 0
update libro set fono14 = @fono where rut = @rut
else
begin
select fono15 from libro where rut = @rut and fono15 > 0
if @@rowcount = 0
update libro set fono15 = @fono where rut = @rut
else
begin
select fono16 from libro where rut = @rut and fono16 > 0
if @@rowcount = 0
update libro set fono16 = @fono where rut = @rut
else
begin
select fono17 from libro where rut = @rut and fono17 > 0
if @@rowcount = 0
update libro set fono17 = @fono where rut = @rut
else
begin
select fono18 from libro where rut = @rut and fono18 > 0
if @@rowcount = 0
update libro set fono18 = @fono where rut = @rut
else
begin
select fono19 from libro where rut = @rut and fono19 > 0
if @@rowcount = 0
update libro set fono19 = @fono where rut = @rut
else
update libro set fono20 = @fono where rut = @rut
end
end
end
end
end
end
end
end
end
end
end
end
end
end
end
end
end
end
FETCH Fono INTO @rut, @fono
END

-- Cierre del cursor
CLOSE Fono

-- Liberar los recursos
DEALLOCATE Fono

[leo_acn]

Disculpen pero ya encontre la respuesta, estaba en este trozo de código en el primer BEGIN
BEGIN
select rut from prueba where rut = @rut

estaba mal direccionado el select, debia solamente hacerlo a la tabla libro en vez de la tabla prueba, creo que pedi ayuda sin haberme esforzado lo suficiente, pero gracias, analize mas el código gracias a eso :) saludos

[Libras]

sin cursores y con querys dinamicos :)

Código SQL:

CREATE TABLE #temp(
rut INT,
fono INT
)
 
INSERT INTO #temp VALUES (123,25632)
INSERT INTO #temp VALUES (123,25874)
INSERT INTO #temp VALUES (123,22222)
INSERT INTO #temp VALUES (123,11111)
INSERT INTO #temp VALUES (123,33333)
INSERT INTO #temp VALUES (123,55555)
INSERT INTO #temp VALUES (123,66666)
INSERT INTO #temp VALUES (123,77777)
INSERT INTO #temp VALUES (123,88888)
INSERT INTO #temp VALUES (254,1254)
INSERT INTO #temp VALUES (586,1257)
 
 
DECLARE @TABLE nvarchar(MAX)
DECLARE @x INT
DECLARE @y INT
DECLARE @query nvarchar(MAX)
DECLARE @fono INT
DECLARE @rut INT
DECLARE @z INT
 
SELECT @x=MAX(total) FROM(
SELECT COUNT(rut) total FROM #temp GROUP BY rut
) t1
 
SET @y=1
SET @TABLE='create table ##temp2 (rut int,'
while @y<=@x
BEGIN
IF @y=@x
SET @TABLE=@TABLE + 'fono' + CONVERT(VARCHAR(10),@y) + ' int)'
ELSE
SET @TABLE=@TABLE + 'fono' + CONVERT(VARCHAR(10),@y) + ' int,'
SET @y=@y+1
END 
EXECUTE sp_executesql @TABLE
 
 
 
SELECT rut,IDENTITY(INT,1,1) rn INTO #temp3 FROM #temp GROUP BY rut
SET @x=1
 
while @x<=(SELECT COUNT(*) FROM #temp3)
BEGIN
SELECT @rut=rut FROM #temp3 WHERE rn=@x
    SET @y=1
    SET @z=1    
    SET @query='insert into ##temp2 (rut,'
    SELECT fono,IDENTITY(INT,1,1) rn INTO #temp4 FROM #temp WHERE rut=@rut
    
    while @z<=(SELECT COUNT(*) FROM #temp WHERE rut=@rut)
    BEGIN
        IF @z=(SELECT COUNT(*) FROM #temp WHERE rut=@rut)
        SET @query=@query + 'fono' + CONVERT(VARCHAR(10),@z) + ')'
        ELSE
        SET @query=@query + 'fono' + CONVERT(VARCHAR(10),@z) + ','
        SET @z=@z+1
    END
    SET @query=@query + ' values (' + CONVERT(VARCHAR(10),@rut) + ','
    print @query
    while @y<=(SELECT COUNT(*) FROM #temp WHERE rut=@rut)
    BEGIN
       IF @y=(SELECT COUNT(*) FROM #temp WHERE rut=@rut)            
        SET @query=@query + CONVERT(VARCHAR(10),(SELECT fono FROM #temp4 WHERE rn=@y)) + ')'
       ELSE
        SET @query=@query + CONVERT(VARCHAR(10),(SELECT fono FROM #temp4 WHERE rn=@y)) + ','            
        SET @y=@y+1
    END
    DROP TABLE #temp4
    EXECUTE sp_executesql @query
SET @x=@x+1
END
SELECT * FROM ##temp2
DROP TABLE ##temp2
DROP TABLE #temp3
--drop table #temp4
 

[GeriReshef]

Esta es mi contribución:

Código SQL:

WITH T AS
(SELECT ROW_NUMBER() OVER(Partition BY rut ORDER BY fono) Nm,
        *
FROM    #temp)
SELECT  rut,
        MAX(CASE WHEN Nm=1 THEN fono END) [01],
        MAX(CASE WHEN Nm=2 THEN fono END) [02],
        MAX(CASE WHEN Nm=3 THEN fono END) [03],
        MAX(CASE WHEN Nm=4 THEN fono END) [04],
        MAX(CASE WHEN Nm=5 THEN fono END) [05],
        MAX(CASE WHEN Nm=6 THEN fono END) [06],
        MAX(CASE WHEN Nm=7 THEN fono END) [07],
        MAX(CASE WHEN Nm=8 THEN fono END) [08],
        MAX(CASE WHEN Nm=9 THEN fono END) [09],
        MAX(CASE WHEN Nm=10 THEN fono END) [10],
        MAX(CASE WHEN Nm=11 THEN fono END) [11],
        MAX(CASE WHEN Nm=12 THEN fono END) [12],
        MAX(CASE WHEN Nm=13 THEN fono END) [13],
        MAX(CASE WHEN Nm=14 THEN fono END) [14],
        MAX(CASE WHEN Nm=15 THEN fono END) [15],
        MAX(CASE WHEN Nm=16 THEN fono END) [16],
        MAX(CASE WHEN Nm=17 THEN fono END) [17],
        MAX(CASE WHEN Nm=18 THEN fono END) [18],
        MAX(CASE WHEN Nm=19 THEN fono END) [19],
        MAX(CASE WHEN Nm=20 THEN fono END) [20]
FROM    T
GROUP BY rut
ORDER BY rut;
 

[leo_acn]

Mil gracias por el código, aqui todos los dias se aprende algo nuevo ;)

[Libras]

Iniciado por GeriReshef

Esta es mi contribución:

Código SQL:

WITH T AS
(SELECT ROW_NUMBER() OVER(Partition BY rut ORDER BY fono) Nm,
        *
FROM    #temp)
SELECT  rut,
        MAX(CASE WHEN Nm=1 THEN fono END) [01],
        MAX(CASE WHEN Nm=2 THEN fono END) [02],
        MAX(CASE WHEN Nm=3 THEN fono END) [03],
        MAX(CASE WHEN Nm=4 THEN fono END) [04],
        MAX(CASE WHEN Nm=5 THEN fono END) [05],
        MAX(CASE WHEN Nm=6 THEN fono END) [06],
        MAX(CASE WHEN Nm=7 THEN fono END) [07],
        MAX(CASE WHEN Nm=8 THEN fono END) [08],
        MAX(CASE WHEN Nm=9 THEN fono END) [09],
        MAX(CASE WHEN Nm=10 THEN fono END) [10],
        MAX(CASE WHEN Nm=11 THEN fono END) [11],
        MAX(CASE WHEN Nm=12 THEN fono END) [12],
        MAX(CASE WHEN Nm=13 THEN fono END) [13],
        MAX(CASE WHEN Nm=14 THEN fono END) [14],
        MAX(CASE WHEN Nm=15 THEN fono END) [15],
        MAX(CASE WHEN Nm=16 THEN fono END) [16],
        MAX(CASE WHEN Nm=17 THEN fono END) [17],
        MAX(CASE WHEN Nm=18 THEN fono END) [18],
        MAX(CASE WHEN Nm=19 THEN fono END) [19],
        MAX(CASE WHEN Nm=20 THEN fono END) [20]
FROM    T
GROUP BY rut
ORDER BY rut;
 

Esta bien la idea jejeje, pero el mio es para N valores jejejeje saludos y feliz año :)

[GeriReshef]

Código SQL:

DECLARE @SQL VARCHAR(MAX);
WITH T AS
(SELECT ROW_NUMBER() OVER(Partition BY rut ORDER BY fono) Nm,
        *
FROM    #temp),
Numeros AS
(SELECT DISTINCT Nm
FROM    T)
SELECT  @SQL=IsNull(@SQL+','+CHAR(13),'')+'     Max(Case When Nm='+CAST(Nm AS VARCHAR)+' Then fono End) ['+CAST(Nm AS VARCHAR)+']'
FROM    Numeros;
SELECT  @SQL=
'With T As
(Select Row_Number() Over(Partition By rut Order By fono) Nm,
        *
From    #temp)
Select  rut,'+CHAR(13)+
+@SQL+CHAR(13)+
'From   T
Group By rut
Order By rut;'
Print   @SQL;
EXEC(@SQL);
SELECT  CAST(0x460065006C0069007A0020006100F1006F0020006E007500650076006F00 AS NVarchar);
 

[Libras]

Iniciado por GeriReshef

Código SQL:

DECLARE @SQL VARCHAR(MAX);
WITH T AS
(SELECT ROW_NUMBER() OVER(Partition BY rut ORDER BY fono) Nm,
        *
FROM    #temp),
Numeros AS
(SELECT DISTINCT Nm
FROM    T)
SELECT  @SQL=IsNull(@SQL+','+CHAR(13),'')+'     Max(Case When Nm='+CAST(Nm AS VARCHAR)+' Then fono End) ['+CAST(Nm AS VARCHAR)+']'
FROM    Numeros;
SELECT  @SQL=
'With T As
(Select Row_Number() Over(Partition By rut Order By fono) Nm,
        *
From    #temp)
Select  rut,'+CHAR(13)+
+@SQL+CHAR(13)+
'From   T
Group By rut
Order By rut;'
Print   @SQL;
EXEC(@SQL);
SELECT  CAST(0x460065006C0069007A0020006100F1006F0020006E007500650076006F00 AS NVarchar);
 

cool :) buen codigo