trigger de auditoria

Hola Lista

tengo un trigger que me gatilla la siguiente funcion,

CREATE OR REPLACE FUNCTION auditorias.ausubgrupo () RETURNS TRIGGER
AS '
DECLARE
CONSULTA varchar;
fecha timestamp;
tipo varchar;
cols record;
usuario varchar;
id integer;
pid integer;
columna varchar;
BEGIN
select into fecha current_timestamp(0);
select into usuario inet_client_addr();
select into pid pg_backend_pid();

IF TG_OP = ''INSERT'' THEN
tipo:=''A'';
select into id new.oid;
END IF;
IF TG_OP = ''UPDATE'' THEN
tipo:=''M'';
select into id old.oid;
END IF;

FOR cols IN select attname as nombre, attnum as numero from pg_attribute
where attrelid = TG_RELID
and NOT attisdropped
and attnum > 0
LOOP

IF NEW. || cols.nombre || <> OLD. || cols.nombre || THEN
CONSULTA := ''INSERT INTO auditorias.audit
values (1 ,'' || quote_literal(tipo)
|| '','' || quote_literal(fecha)
|| '','' || quote_literal(usuario)
|| '','' || quote_literal(TG_RELNAME)
|| '','' || id
|| '','' || quote_literal(cols.nombre)
|| '','' || quote_literal(cols.nombre)
|| '','' || quote_literal(cols.nombre)
|| '','' || pid
|| '')'';

EXECUTE CONSULTA;
END IF;

RETURN NEW;

END;
'

LANGUAGE plpgsql;

Esta funcion es una adaptacion de una que santiago c. envio alguna vez
a la lista, pero al ejecutar la sentencia que me gatilla esta, me
arroja un error indicando la linea del ciclo for, pero el for esta
bien.

Lo quie quiero es colocar en un record las columnas de la tabla que
me gatilla el trigguer para que dinamicamente el vea que columna es la
que esta siendo modificada y asi se registre el evento

Saludos