Функция для получения названия периода

 

function get_period (dDATE in date)
return varchar
as
sPERIOD varchar(50):='';
iYEAR integer;
iMONTH integer;
begin
iYEAR := to_number(to_char(dDATE,'YYYY'),'9999');
iMONTH := to_number(to_char(dDATE,'MM'),'99');
if iMONTH = 4 then
sPERIOD:='1 квартал '||iYEAR||'г.';
elsif iMONTH = 7 then
sPERIOD:='2 квартал '||iYEAR||'г.';
elsif iMONTH = 10 then
sPERIOD:='3 квартал '||iYEAR||'г.';
elsif iMONTH = 1 then
sPERIOD:='4 квартал '||iYEAR||'г.';
end if;
return sPERIOD;
end get_period;