Función para un disparador (control del campo serial)

Buenas a todos,

En el e-mail que envie sobre el problema que tenía con la modificación del campo serial cuando daba un error, he modificado la función pero sale un mensaje de error pero el indice del campo serial lo modifica correctamente, pero el error que sale es el siguiente: la consulta no tiene un destino para los datos de resultado. Si se quiere descartar los resultados de una select, utilice PERFORM y me indica la línea donde está ubicada la consulta que es un SELECT last_value INTO ultimo FROM salida_salcod_seq; Como ya he utilizado el SELECT INTO pero desde una tabla que controlaba un contador y no me dá problemas tendré que obtar por crear una tabla que lleve el contador por no utilizar los OID's.

Saludos,
Joac

conta entrada.entsto%TYPE;
ultimo integer;
BEGIN

-- Modificar el campo entrada Stock con las salidas que vayan produciendose.

Select entsto into conta from entrada where entpar=new.entpar;

IF conta = 0 THEN
SELECT last_value INTO ultimo FROM salida_salcod_seq;
SELECT setval('salida_salcod_seq',ultimo-1);
RAISE EXCEPTION 'No se puede registrar la salida ya que no hay stock';
END IF;

IF new.salcan > conta THEN
SELECT last_value into ultimo FROM salida_salcod_seq;
SELECT setval('salida_salcod_seq',ultimo-1);
RAISE EXCEPTION 'No se puede registrar la salida ya que la cantidad selecciona es mayor a la que hay en stock';
ELSE
conta := conta - new.salcan;
update entrada SET entsto = conta where entpar=new.entpar;
END IF;


RETURN NEW;

END;

_________________________________________________________________
Escucha a quienes ya han probado Windows 7 ¡Hazlo aquí!
http://www.sietesunpueblodeexpertos.com/index_windows7.html