obtener varios registros con un procedimiento

[foo]

si tu funcion no hace ningun proceso, entonces usa solo el lenguaje procedural SQL.

create or replace function obtenercontrol1() returns setof control as
$$
select * from control;
$$ language sql;