Re: My very first PL/pgSQL procedure...

Hi,

The only solution I've found to get the same reliable result, but
without locking, is the dirty way (loops) :
---------------------------------------------------------------------------------------------------------------------
CREATE OR REPLACE FUNCTION seq_min(sequence_name varchar, minval
integer) RETURNS VOID AS $$
DECLARE
sequence_record RECORD;
BEGIN
-- Get the current sequence value :
FOR sequence_record IN EXECUTE 'SELECT last_value FROM ' ||
sequence_name LOOP
NULL;
END LOOP;
-- Loop to bring the sequence to (at least) minval :
WHILE sequence_record.last_value < minval LOOP
-- Increment by 1 the sequence (and get the new value) :
FOR sequence_record IN EXECUTE 'SELECT nextval(''' || sequence_name
|| ''') AS last_value' LOOP
NULL;
END LOOP;
END LOOP;
RETURN;
END;
$$ LANGUAGE plpgsql;
---------------------------------------------------------------------------------------------------------------------

It gives the result I expect (and it doesn't interfere with concurrent
uses of the sequence), but it is not very optimized !
So, if someone have a better idea, I'm still open !

Thank you,
Philippe Ferreira.