está mal hecho el selet, debes hacerlo de la siguiente manera:
Código:
CREATE PROCEDURE CONSU_PERSONAS (
BARRIO CHAR(2)
) RETURNS (
DNI INTEGER,
APENOM CHAR(43)
) AS
BEGIN
for SELECT dni,apenom,barrio FROM befe_adultos
WHERE barrio = :barrio
into :dni , :apenom, :barrio ;
suspend;
End
de esta manera te devolverá una o varias filas