CREATE OR REPLACE FUNCTION dlm.get_label_sub_set(bit varying)
  RETURNS SETOF bit varying AS
$BODY$
DECLARE
	lI_pos		INT;
	lBV_label	bit varying;
	lBV_label_pos	bit varying;
	result 		bit varying;
	_rec		RECORD;
BEGIN
	DROP TABLE  IF EXISTS get_label_sub_set_result;
	CREATE TEMP TABLE get_label_sub_set_result AS SELECT '0'::label_theme_big as lb;
	lBV_label = $ 1 ;
	lBV_label_pos  = lBV_label;
	lI_pos = position('1' IN lBV_label);
	IF lI_pos >  0  THEN
		INSERT INTO get_label_sub_set_result VALUES ('1'::label_theme_big >> lI_pos- 1 );
	END IF;
	
	WHILE lI_pos >  0 
	LOOP
		lBV_label_pos =lBV_label_pos#('1'::label_theme_big >> lI_pos- 1 );
		lI_pos = position('1' IN lBV_label_pos);
		IF lI_pos >  0 
		THEN
			lBV_label = '1'::label_theme_big >> lI_pos- 1 ;
			INSERT INTO get_label_sub_set_result SELECT lb | lBV_label FROM get_label_sub_set_result;
		ELSE EXIT;
		END IF;
	END LOOP;
	
	FOR result IN SELECT  lb FROM get_label_sub_set_result
		LOOP 
			RETURN NEXT result;
		END LOOP;
	RETURN;
END;
$BODY$
  LANGUAGE 'plpgsql' IMMUTABLE STRICT;

CREATE DOMAIN label_theme_big
  AS bit( 500 );
ALTER DOMAIN label_theme_big OWNER TO postgres;