SQL> create or replace procedure spGetCurrentTime
  2  (nYear out integer ,
  3         nMonth out integer  ,
  4         nDay  out integer ,
  5         nHour out integer ) is
  6  
  7   begin
  8    nYear:=to_number(TO_CHAR(SYSDATE, 'YYYY'));
  9    nMonth:=to_number(to_char(sysdate,'mm'));
 10    nDay:=to_number(to_char(sysdate,'dd'));
 11    nhour:=to_number(to_char(sysdate,'hh24'));
 12  end ;
 13  /Procedure created