Oracle 函数，知道的可以帮忙下吗？

CREATE OR REPLACE FUNCTION IS_LEAP_YEAR(IN_YEAR_STRING VARCHAR2)

  RETURN NUMBER IS

  --加个输入参数

  YEAR_DATE VARCHAR2(8)

  --V_DATE    DATE

BEGIN

  局皮旦--V_TEST_DATE := TO_CHAR(1900) || '0229'

  --V_TEST_DATE := IN_YEAR_STRING

  桐扰--V_DATE := TO_DATE(V_TEST_DATE, 'yyyymmdd')

  --RETURN 1

  YEAR_DATE := IN_YEAR_STRING

  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 || '是闰年')

  握衫  RETURN 1

  ELSE

    DBMS_OUTPUT.PUT_LINE(YEAR_DATE || '是平年')

    RETURN 0

  END IF

EXCEPTION

  WHEN OTHERS THEN

    RETURN 2

END

看不懂你的意思，，，自己写了个

编程代知做码如下：

#include <stdio.h>

void main ()

{

int year

printf("输年正链份：举猛孙")

scanf("%d",&year)

if((year%4==0)&&(year%100!=0)||(year%400==0))

printf("是闰年\n")

else

printf("不是闰年\n")

}。

---