FUNCTION OCCURS(in_String IN VARCHAR2, in_LookUp IN VARCHAR2) RETURN PLS_INTEGER IS i PLS_INTEGER; l_RetVal PLS_INTEGER := 0; BEGIN FOR i IN 1..9999 LOOP IF INSTR(in_String, in_LookUp, 1, i) > 0 THEN l_RetVal := l_RetVal + 1; ELSE EXIT; END IF; END LOOP; RETURN l_RetVal; END OCCURS;>Hi All,