moze li se i kako formatirati datum

Code:
SET TERM ^ ;

CREATE OR ALTER PROCEDURE ML_MESECI 
returns (
    mesec varchar(14))
as
declare variable godina varchar(10);
begin
for
 SELECT EXTRACT(month FROM datumobracuna),EXTRACT(year FROM datumobracuna)
 FROM ML_OBRACUN
 GROUP BY EXTRACT(month FROM datumobracuna),EXTRACT(year FROM datumobracuna)
 order by EXTRACT(month FROM datumobracuna)
 INTO
      :MESEC,
:godina
      do
      begin
      if(MESEC = 1) then MESEC = 'Januar' || ' ' ||:godina;
      if(MESEC = 2) then MESEC = 'Februar' || ' ' ||:godina;
      if(MESEC = 3) then MESEC = 'Mart' || ' ' ||:godina;
      if(MESEC = 4) then MESEC = 'April' || ' ' ||:godina;
      if(MESEC = 5) then MESEC = 'Maj' || ' ' ||:godina;
      if(MESEC = 6) then MESEC = 'Jun' || ' ' ||:godina;
      if(MESEC = 7) then MESEC = 'Jul' || ' ' ||:godina;
      if(MESEC = 8) then MESEC = 'Avgust' || ' ' ||:godina;
      if(MESEC = 9) then MESEC = 'Septembar' || ' ' ||:godina;
      if(MESEC = 10) then MESEC = 'Oktobar' || ' ' ||:godina;
      if(MESEC = 11) then MESEC = 'Novembar' || ' ' ||:godina;
      if(MESEC = 12) then MESEC = 'Decembar' || ' ' ||:godina;
  suspend;
end
end^

SET TERM ; ^

GRANT SELECT ON ML_OBRACUN TO PROCEDURE ML_MESECI;

GRANT EXECUTE ON PROCEDURE ML_MESECI TO SYSDBA;