DECLARE
year_date number;
leap Boolean;
BEGIN
year_date:=2010;
if mod(year_date,4)<>0 then
leap:=false;
elsif mod(year_date,100)<>0 then
leap:=true;
elsif mod(year_date,400)<>0 then
leap:=false;
else
leap:=true;
end if;
if leap then
dbms_output.put_line(year_date || '是闰年');
else
dbms_output.put_line(year_date || '是平年');
end if;
END;
/
其中 蓝色部分可以被下面代替：
if mod(num,400)=0 then
leap:=true;
elsif mod(num,100)=0 then
leap:=false;
elsif mod(num,4)=0 then
leap:=true;
else
leap:=false;
end if;
注：oracle中取余数不用%，而用mod()方法。