matrices en firebird

[GustavoCruz]

Hola amigos del foro, mi inquietud hoy es sobre las matrices en firebird, si es posible declarar una variable de ese tipo y cómo se hace... O si es necesario crear una pequeña tabla temporal para que haga esa función.

Nuevamente un millón de gracias por el tiempo que invierten en visitar y responder las preguntas de personas que como yo están en la tarea de aprender nuevas cosas.


Afectuosamente,

Gustavo Cruz

[jhonny]

Tipo, como de "tipos array" en Firebird no he visto aún, pero como bien dices... puedes utilizar alguna tabla temporal (Que si mal no recuerdo tu usas FB 2.1), entonces podrias hacerlo de la forma como lo explico someramente en el punto 3 del articulo "Lo nuevo de Firebird 2.1".

[jconnor82]

Ahora estaba buscando informacion sobre arrays en firebird (uso la 2.5) aunq en anteriores tambien se ecuentra esta informacion

la forma en la cual los implemento es

Código SQL [-]
CREATE DOMAIN D_ARRAY_TEXT AS VARCHAR(20)[4];

donde VARCHAR(20) es el tipo de elementos
[4] las dimensiones de arreglo
[m, n] en caso de ser bidimensional

si se quiere usar como campo de un tabla el modo de asignar esta en USING ARRAYS IN PSQL, otros ejemplos de usos en firebird con FIBPlus estan en sus ejemplos.

ahora si les pongo mi consulta, estoy intentado hacer un procedimiento en el cual paso un parametro como arreglo, el problema esta en como leer el arreglo ingresado

Código SQL [-]
/* Dominio creado */

CREATE DOMAIN D_ARRAY_TEXT AS VARCHAR(20)[4];

...

SET TERM ^ ;

CREATE OR ALTER PROCEDURE BUSCADOR (
  P_NOMBRES TYPE OF D_ARRAY_TEXT )
RETURNS (
  RECORDS_FOUND INTEGER )
AS
  DECLARE NOMBRE1 VARCHAR(20);
  DECLARE NOMBRE2 VARCHAR(20);
  DECLARE NOMBRE3 VARCHAR(20);
  DECLARE NOMBRE4 VARCHAR(20);
BEGIN
  NOMBRE1 = P_NOMBRES[1];
  NOMBRE2 = P_NOMBRES[2];
  NOMBRE3 = P_NOMBRES[3];
  NOMBRE4 = P_NOMBRES[4];

  SELECT
    COUNT(*)
  FROM
    USUARIOS
  WHERE
    (:NOMBRE1 IS NULL OR NOMBRE LIKE '%' || :NOMBRE1 || '%')
    AND (:NOMBRE2 IS NULL OR NOMBRE LIKE '%' || :NOMBRE2 || '%')
    AND (:NOMBRE3 IS NULL OR NOMBRE LIKE '%' || :NOMBRE3 || '%')
    AND (:NOMBRE4 IS NULL OR NOMBRE LIKE '%' || :NOMBRE4 || '%')
  INTO :RECORDS_FOUND;
  SUSPEND;
END^

SET TERM ; ^

si alguien tiene informacion de como usarlos en psql, agradeceria su ayuda.

[jhonny]

Interesante, a simple vista parece que no hay mucha documentación al respecto, pero pues a leer y probar se dijo .

[jhonny]

Según parece, en PSQL no es posible declarar un array directamente, incluso, tampoco es posible hacerlo declarando una variable del tipo "dominio" que a su vez sea un arreglo (Tal y cual como tratas de hacerlo en el ejemplo que nos muestras), pues el PSQL no tiene en cuenta el arreglo de dicho dominio, si no solamente el tipo y nada mas.

Incluso en el Link que nos muestras, mencionan eso, pues aunque si es posible hacer referencia a un dato que se encuentra en un arreglo (Alojado en una tabla por ejemplo), el PSQL aún no soporta los arreglos como su tipo de dato.

De todas formas en lo que a mi concierne, estaré al tanto de dicha característica, pues siendo esta incluida en el PSQL, sería una caracteristica bastante interesante. Sin embargo seguire buscando alguna alternativa, a ver si la encuentro (Aunque la verdad lo dudo por el momento)... jconnor82, si tu encuentras la manera de hacerlo, creo que sería bastante útil que nos lo comentaras .

[jconnor82]

Es cierto no he podido acceder al array usando el indice, espero y haya una funcion que permita trabajar con ellos porque cuando se accede por campo de tabla si que se puede hacer, cito una parte del libro The Firebird eBook

Limited Dynamic SQL Access
The following example is a simple demonstration of how a DSQL application can get limited read access to an array slice through a stored procedure:

Código SQL [-]
create procedure getcharslice(
  low_elem smallint, high_elem smallint)
returns (id integer, list varchar(50))
as
  declare variable i smallint;
  declare variable string varchar(10);
begin
  for select a1.ID from ARRAYS a1 into :id do
  begin
    i= low_elem;
    list = '';
    while (i <= high_elem) do
    begin
      select a2.CHARARRAY[:i] from arrays a2
      where a2.ID = :id
      into :string;
      list = list||string;
      if (i < high_elem) then
      list = list||',';
      i = i + 1;
    end
    suspend;
  end
end

donde la tabla array es de esta forma:

Código SQL [-]
CREATE TABLE ARRAYS
(ID BIGINT,
CHARARRAY CHAR(14)[8]);