declare   
  d2   date;
  d1   date:=sysdate;
begin
    select   to_char(d1,'yyyy-mm')     into   d2   from       dual;
end;

select d1 into d2 from dual;

thanks!

什么意思