get diagnostics row_count y cursores

Hola señores, tengo la siguiente funcion:

CREATE OR REPLACE FUNCTION test() RETURNS integer AS
$body$
declare
vl integer;
vlvalor varchar;
begin
select columnaX into vlvalor from tablaX;
if not found then
raise notice 'no hay datos';
else
get diagnostics vl := row_count;
raise notice 'deberia mostrar el numero de filas devueltas: %',vl;
end if;
return vl;
end;
$body$
LANGUAGE 'plpgsql';

Lo que espero que me devuelva la funcion es el numero de filas
recuperado por el select pero siempre devuelve 1. Que es lo que estoy
haciendo mal ?

Mil gracias de antemano y saludos.

--
Juan Pablo Yañez
Grupo DBA