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