Oracle函數：求兩個數的最小公倍數

 1 CREATE or replace function GetGbs(num1 NUMBER,num2 NUMBER) RETURN NUMBER is
 2   resultnum NUMBER;
 3   maxnum NUMBER;
 4   num3 NUMBER;
 5 begin
 6   IF num1 <= num2 THEN
 7     maxnum := num2;
 8   ELSE
 9     maxnum := num1;
10   END IF;
11    num3 := maxnum;
12    LOOP
13      IF ( MOD(num3,num1)=0 AND MOD(num3,num2)=0)THEN
14        resultnum := num3;
15        EXIT;  --若是if條件成功就跳出loop循環。
16      END IF;
17      num3 := num3 + 1;
18    END LOOP;
19   return(Resultnum);
20 end GetGbs;

該函數運用了loop的基本循環。

2015-02-26 15:34:21