CREATE TYPE resDictItem AS (iName varchar( 100 ), iID integer);
CREATE OR REPLACE FUNCTION loadDict(tblname varchar( 50 ), cPID integer, pattern_string text) returns SETOF resDictItem as $func$
DECLARE
	txt_array text[];
	tmp_pattern_string text;
	tmp_str resDictItem;
BEGIN
	tmp_pattern_string = regexp_replace(pattern_string, E'(\\x20)+', ';', 'g');
	txt_array = string_to_array(tmp_pattern_string, ';');
	for tmp_str in execute 'select name as iName, id as iID from ' || quote_ident(tblname) || ' where pid = ' || cPID || ' and name ~* all(' || txt_array || ')'
	loop
		return next tmp_str;
	end loop;
	return;
END
$func$ language plpgsql;

create or replace function createList(tblname varchar( 50 )) returns void as $func$
begin
	execute 'create table ' || quote_ident(tblname) || '( '
				|| 'id integer NOT NULL, '
				|| 'pid integer NOT NULL, '
				|| 'name varchar(100) NOT NULL, '
				|| 'PRIMARY KEY (id, pid))';
end
$func$ language plpgsql;

CREATE TYPE resDictItem AS (iName varchar( 100 ), iID integer);
CREATE OR REPLACE FUNCTION loadDict(tblname varchar( 50 ), cPID integer, pattern_string text) returns SETOF resDictItem as $func$
DECLARE
	txt_array text[];
	tmp_pattern_string text;
	tmp_str resDictItem;
BEGIN
	tmp_pattern_string = regexp_replace(pattern_string, E'([\\%\\\\_\\.\\(\\)\\[\\]\\?\\\'])+', '', 'g');--просто на всякий случай
	tmp_pattern_string = regexp_replace(tmp_pattern_string, E'(\\x20)+', ',', 'g');--склейка пробелов
	tmp_pattern_string = regexp_replace(tmp_pattern_string, E'(^,|,$)', '', 'g');--мало ли пробел в начале или конце воткнут
	tmp_pattern_string = lower(tmp_pattern_string);--обход регистров
	for tmp_str in execute 'select name as iName, id as iID from ' || quote_ident(tblname) || ' where pid = ' || cPID || ' and lower(name) ~* all(' || quote_literal('{' || tmp_pattern_string || '}') || '::text[])'
	loop
		return next tmp_str;
	end loop;
	return;
END
$func$ language plpgsql;