CREATE OR REPLACE FUNCTION "up_sys"."str_explode" (str varchar, separator char) RETURNS varchar [] AS
$body$

DECLARE
       ret varchar[];
       i int2;
       c int2;
       tmp_val varchar( 255 );
       tmp_char char;
       len int2;
BEGIN
  i :=  0 ;
  c :=  1 ;
  len = length(str) +  1 ;
    WHILE i <= len LOOP
      tmp_char := substr(str, i,  1 );
        IF tmp_char = separator OR i = len THEN
          ret[c] := tmp_val;
          tmp_val := '';
          c := c +  1 ;
        ELSE
          tmp_val := tmp_val || tmp_char;
        END IF;
      i := i +  1 ;
    END LOOP;
  RETURN ret;
END;
$body$
LANGUAGE 'plpgsql' VOLATILE CALLED ON NULL INPUT SECURITY INVOKER;

 0 :: CREATE OR REPLACE FUNCTION "up_sys"."str_explode" (str varchar, separator char) RETURNS varchar [] AS
 1 :: $body$
 2 :: DECLARE
 3 ::   ret varchar[] := '{}';
 4 ::   i int2 :=  0 ;
 5 ::   c int2 :=  1 ;
 6 ::   tmp_val varchar( 255 ) := '';
 7 ::   tmp_char char := '';
 8 ::   len int2 :=  0 ;
 9 :: BEGIN
 10 ::   len = length(str) +  1 ;
 11 ::   WHILE i <= len LOOP
 12 ::     tmp_char := substr(str, i,  1 );
 13 ::       IF tmp_char = separator OR i = len THEN
 14 ::         ret[c] := tmp_val;
 15 ::         tmp_val := '';
 16 ::         c := c +  1 ;
 17 ::       ELSE
 18 ::         tmp_val := tmp_val || tmp_char;
 19 ::       END IF;
 20 ::     i := i +  1 ;
 21 ::   END LOOP;
 22 ::   RETURN ret;
 23 :: END;
 24 :: $body$
 25 :: LANGUAGE 'plpgsql' VOLATILE CALLED ON NULL INPUT SECURITY INVOKER;