How to generate random number with Oracle?


Does anyone know if there is a function to generate a random number in Oracle?


Ans:
 

In Oracle8.0 and up -- yes.  Its in the package called dbms_random.

In 7.x you can use the following instead:

create or replace package random
is
 pragma restrict_references( random, WNDS, RNPS );

 procedure srand( new_seed in number );

 function rand return number;
 pragma restrict_references( rand, WNDS  );

 procedure get_rand( r OUT number );

 function rand_max( n IN number ) return number;
 pragma restrict_references( rand_max, WNDS);

 procedure get_rand_max( r OUT number, n IN number );

end random;
/

create or replace package body random
is
 multiplier constant number         := 22695477;
 increment constant number         := 1;
 "2^32"  constant number   := 2 ** 32;
 "2^16"  constant number         := 2 ** 16;
 "0x7fff" constant number         := 32767;
 Seed  number := 1;
--
 procedure srand( new_seed in number )
 is
 begin
  Seed := new_seed;
 end srand;
--
 function rand return number
 is
 begin
  seed := mod( multiplier * seed + increment, "2^32" );
  return bitand( seed/"2^16", "0x7fff" );
 end rand;
--
 procedure get_rand( r OUT number )
 is
 begin
  r := rand;
 end get_rand;
--
 function rand_max( n IN number ) return number
 is
 begin
  return mod( rand, n ) + 1;
 end rand_max;
--
 procedure get_rand_max( r OUT number, n IN number )
 is
 begin
  r := rand_max( n );
 end get_rand_max;
--
begin
 select userenv( 'SESSIONID' ) into seed from dual;
end random;
/

 
Thomas Kyte
[email protected]
Oracle Service Industries
Reston, VA   USA

--
http://govt.us.oracle.com/    -- downloadable utilities
 
----------------------------------------------------------------------------
Opinions are mine and do not necessarily reflect those of Oracle Corporation
 

Hosted by www.Geocities.ws

1