Oracle函数：求两个数的最小公倍数

CREATE or replace function GetGbs(num1 NUMBER,num2 NUMBER) RETURN NUMBER is
  resultnum NUMBER;
  maxnum NUMBER;
  num3 NUMBER;
begin
  IF num1 <= num2 THEN
    maxnum := num2;
  ELSE
    maxnum := num1;
  END IF;
   num3 := maxnum;
   LOOP
     IF ( MOD(num3,num1)=0 AND MOD(num3,num2)=0)THEN
       resultnum := num3;
       EXIT;  --如果if条件成功就跳出loop循环。
     END IF;
     num3 := num3 + 1;
   END LOOP;
  return(Resultnum);
end GetGbs;

该函数运用了loop的基本循环。

2015-02-26 15:34:21