Que tal!, me parece efectiva la solución para saber si un año es bisiesto o no, yo lo necesitaba en PL/SQL pero con la explicación basto para desarrollar la función. Aqui anexo la función en PL por si algún día la requieran...nos vermox....
FUNCTION f_es_anio_bisiesto
(
pe_fecha IN DATE
)
RETURN BOOLEAN
IS
--
l_anio NUMBER;
l_es_divisible_4 BOOLEAN;
l_es_divisible_100 BOOLEAN;
l_es_divisible_400 BOOLEAN;
l_es_bisiesto BOOLEAN;
--
BEGIN
--
l_anio := TO_NUMBER ( TO_CHAR ( pe_fecha , 'YYYY' ) );
--
l_es_divisible_4 := ( MOD ( l_anio , 4 ) = 0 );
l_es_divisible_100 := ( MOD ( l_anio , 100 ) = 0 );
l_es_divisible_400 := ( MOD ( l_anio , 400 ) = 0 );
--
IF ( ( l_es_divisible_4 )
AND
( NOT l_es_divisible_100
OR l_es_divisible_400 )
)
THEN
--
l_es_bisiesto := TRUE;
--
ELSE
--
l_es_bisiesto := FALSE;
--
END IF;
--
RETURN l_es_bisiesto;
--
EXCEPTION
WHEN OTHERS
THEN
RETURN FALSE;
--
END f_es_anio_bisiesto;
YO TAMBIEN TENGO UNA DUDA SOBRE EL AÑO 3600 SI ES BISIESTO O NO , ME QUITA EL SUEÑO POR QUE CREO QUE EN EL 3600 TENGO QUE IR A COMPRAR AL SUPER Y NO SE SI IR EL 29 DE FEBRERO O EL 1 DE MARZO , POR FAVOR AYUDARME ESTOY CON ATAQUE DE ASIENDAD Y ES UNA PENA MUY GRANDE EL NO SABERLO , LA COMPRA DEL SUPER DEL AÑO 3600 PELIGRA Y YO NO SE QUE HACER
MUCHAS GRACIAS
yo lo encuentro como las *%$#@!
28/4/09
Año BisiestoPor: Flopy :pGRACIAS POR LA DATA! FUISTE MI PRIMERA ELECION EN GOOGLE Y LA MAS PRACTICA DE TODO!! DesearrolladorWeb ESTAS EN Mis Favoritos!!! (Apesar que aun siga programando en COBOL JEJJE)