como hago esto....

[Patricio]

que me conviene hacer ya la consulta asi o encararlo por el lado de los reportes, ya que la idea es poder imprimirlo

[Patricio]

buscando en la web encontre esto. que explica varias opciones de realizarlo, pero no comprendo bien el codigo, al escribirlo me tira que no conoce seq lo cual es entendible....

https://www.simple-talk.com/content/...px?article=539

  SELECT CategoryId,
           MAX( CASE seq WHEN 1 THEN ProductName ELSE '' END ) + ', ' +
           MAX( CASE seq WHEN 2 THEN ProductName ELSE '' END ) + ', ' +
           MAX( CASE seq WHEN 3 THEN ProductName ELSE '' END ) + ', ' +
           MAX( CASE seq WHEN 4 THEN ProductName ELSE '' END )
      FROM ( SELECT p1.CategoryId, p1.ProductName,
                    ( SELECT COUNT(*)
                        FROM Northwind.dbo.Products p2
                        WHERE p2.CategoryId = p1.CategoryId
                        AND p2.ProductName <= p1.ProductName )
             FROM Northwind.dbo.Products p1 ) D ( CategoryId, ProductName, seq )
     GROUP BY CategoryId ;

[tmsanchez]

Probablemente te sirva esto:

https://firebird21.wordpress.com/201...e-una-columna/

o esto:

https://firebird21.wordpress.com/201...s-de-cada-dia/

saludos.

[Patricio]

gracias lo voy a probar pero tiene buena pinta

[Patricio]

probe y me tiro que no conoce la funcion list, podra ser que en interbase no este no?

SELECT
   CodOperacion,
   LIST(CodTercero, ';')
FROM
   OperacionActivos
GROUP BY
   CodOperacion

[Patricio]

creo que puedo hacerlo con un store procedure, cree un ejemplo pero me tira un
Dynamic SQL Error
SQL error code = -104
Unexpected end of command

y no logro ver,....

Código SQL [-]
CREATE PROCEDURE spTelefono RETURNS
(CodTercero INTEGER, Apellido Varchar(50), Nombre Varchar(50), Telefonos VARCHAR(200)) 
AS DECLARE VARIABLE strTelefonos VARCHAR(50);
BEGIN
FOR SELECT CodTercero, Apellido, Nombre FROM Persona
INTO :CodTercero, :Apellido, :Nombre
DO
  BEGIN
    Telefonos = '';
    FOR SELECT Numero FROM Telefono WHERE Telefono.CodTercero = :CodTercero
    INTO strTelefonos
    DO
      BEGIN 
         Telefonos = Telefonos || ' ' || strTelefonos; 
      END     
         SUSPEND;
  END
END;

[Casimiro Noteví]

Pero ese código no tiene absolutamente nada que ver con lo que explicaste al principio