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

posted on 2015-02-26 15:34  零玖视界  阅读(964)  评论(0)  编辑  收藏  举报

导航