388 B
388 B
F_EVENTO_SCADUTO
Codice Sorgente
FUNCTION F_EVENTO_SCADUTO
(
DATA_SCADENZA IN DATE,
STATO_EVENTO IN NUMBER,
STATO_FROM IN NUMBER,
STATO_TO IN NUMBER
) RETURN NUMBER AS
BEGIN
if trunc(DATA_SCADENZA) <= trunc(sysdate)
and STATO_EVENTO between STATO_FROM and STATO_TO
then
return 1;
else
return 0;
end if;
END F_EVENTO_SCADUTO;