Example 17-40: Package to handle dynamic discussion forum site search

CREATE OR REPLACE PACKAGE ForumSearch IS
  TYPE ref_cursor IS REF CURSOR;
  FUNCTION Find(forumid   NUMBER   := -1,
                daysAgo   NUMBER   := 0,
                searchIn  VARCHAR2 := 'S',
                searchFor VARCHAR2 := NULL) RETURN ref_cursor;
  FUNCTION Hits(forumid   NUMBER   := -1,
                daysAgo   NUMBER   := 0,
                searchIn  VARCHAR2 := 'S',
                searchFor VARCHAR2 := NULL) RETURN NUMBER;
END;