Here's one option:
CREATE TABLE junk(a text, b text,c TIMESTAMP, d hstore);
DO
$BODY$
DECLARE
RecordVar junk%rowtype;
SqlCommand TEXT:= 'INSERT INTO junk(a,b,c,d) VALUES(';
BEGIN
RecordVar.a = 'junk''''a';
RecordVar.b = 'junkb';
RecordVar.c = NOW();
RecordVar.d = '"key1"=>"value1"';
SqlCommand := SqlCommand || '''' || RecordVar.a || '''' || ',' || '''' || RecordVar.b || '''' || ',' ||'''' || RecordVar.c || '''' || ',' ||'''' || RecordVar.d || '''' || ');';
RAISE NOTICE 'SQL = %',SqlCommand;
PERFORM dblink('dblink_logging',SqlCommand);
END;
$BODY$
Select a,b,c from junk;
junk'a|junkb|2013-01-28 09:53:22.308|"key1"=>"value1"
DROP TABLE junk;