1.74. setaddsequence( integer, integer, text, text )

関数特性

言語: PLPGSQL

戻り値: bigint

setAddSequence (set_id, seq_id, seq_fqname, seq_comment) セット set_id に対するオリジンノードで、シーケンス seq_fqname を複製セットに追加し、これが購読ノードに複製されるよう SET_ADD_SEQUENCE を立ち上げます。

declare
	p_set_id			alias for $1;
	p_seq_id			alias for $2;
	p_fqname			alias for $3;
	p_seq_comment		alias for $4;
	v_set_origin		int4;
begin
	-- ----
	-- 中枢構成にロックを取得
	-- ----
	lock table sl_config_lock;

	-- ----
	-- 私たちがセットのオリジンかの検査
	-- ----
	select set_origin into v_set_origin
			from sl_set
			where set_id = p_set_id;
	if not found then
		raise exception 'Slony-I: setAddSequence(): set % not found', p_set_id;
	end if;
	if v_set_origin != getLocalNodeId('_schemadoc') then
		raise exception 'Slony-I: setAddSequence(): set % has remote origin', p_set_id;
	end if;

	if exists (select true from sl_subscribe
			where sub_set = p_set_id)
	then
		raise exception 'Slony-I: cannot add sequence to currently subscribed set %',
				p_set_id;
	end if;

	-- ----
	-- シーケンスをセットに追加し、SET_ADD_SEQUENCE 事象を生成します。
	-- ----
	perform setAddSequence_int(p_set_id, p_seq_id, p_fqname,
			p_seq_comment);
	return  createEvent('_schemadoc', 'SET_ADD_SEQUENCE',
			p_set_id, p_seq_id, p_fqname, p_seq_comment);
end;