BD.FUNC.CEN FUNC LISTA COLAS

1 Descripción

USE `nimitz`;

DROP function IF EXISTS `nimitz`.`CEN_FUNC_LISTA_COLAS`;

DELIMITER $$

USE `nimitz`$$

CREATE DEFINER=`adminNimitz`@`%` FUNCTION `CEN_FUNC_LISTA_COLAS`() RETURNS varchar(128) CHARSET utf8

MODIFIES SQL DATA

DETERMINISTIC

BEGIN

DECLARE VAR_NOMBRE VARCHAR(64);

DECLARE VAR_COLAS VARCHAR(255);

DECLARE VAR_NO_HAY BOOLEAN;

DECLARE num_filas INT DEFAULT 0;

DECLARE SQL_CEN_COLAS CURSOR for

select C_NOMBRE FROM CEN_COLAS;

DECLARE CONTINUE HANDLER FOR NOT FOUND

SET VAR_NO_HAY = TRUE;

SET VAR_COLAS = "";

OPEN SQL_CEN_COLAS;

select FOUND_ROWS() into num_filas;

bucle: LOOP

FETCH SQL_CEN_COLAS INTO VAR_NOMBRE;

IF VAR_NO_HAY then

CLOSE SQL_CEN_COLAS;

LEAVE bucle;

END IF;

SET VAR_COLAS=CONCAT(VAR_COLAS,VAR_NOMBRE,";");

END LOOP bucle;

RETURN VAR_COLAS;

END$$

DELIMITER ;