获取指定日期的随机时间的Oracle函数

/*
v_date  'yyyy-mm-dd'格式的日期字符串
v_begin 随机日期的相对最小值，单位为天，默认0
v_end   随机日期的相对最大值，单位为天，默认1
*/
create or replace function r_time (v_date in varchar2, v_begin in number := 0, v_end in number := 1) return date
is
  r_date date ;
begin
  SELECT to_date(v_date,'yyyy-mm-dd') + DBMS_RANDOM.VALUE(v_begin ,v_end) into r_date FROM dual;
  return r_date ;
end r_time;