function returning a record

Hi,

I'm trying to return a RECORD from a function, but when I try to use the
variable I have the following error:
ERROR: record "r" has no field "id"

Here's an example:

CREATE OR REPLACE FUNCTION test()
RETURNS CHARACTER VARYING AS '
DECLARE r RECORD;
BEGIN
SELECT INTO r get_id(''mytable'');

RETURN r.id::TEXT || '' : '' || r.name;
END;' LANGUAGE 'plpgsql';

CREATE OR REPLACE FUNCTION get_id(CHARACTER VARYING)
RETURNS RECORD AS '
DECLARE
mytable ALIAS FOR $1;
r RECORD;
BEGIN
FOR r IN EXECUTE
''SELECT id, name FROM '' || mytable || '' WHERE id = 1''
LOOP
RAISE NOTICE ''r: %, %'', r.id, r.name;
RETURN r;
END LOOP;

RETURN NULL;
END;' LANGUAGE 'plpgsql';

test=> select test();
NOTICE: r: 1, ttt
CONTEXT: PL/pgSQL function "test" line 3 at select into variables
ERROR: record "r" has no field "id"
CONTEXT: PL/pgSQL function "test" line 5 at return

Any idea welcomed ;-)

Thanks,
Pascal