Oracle PL/SQL - TIPS

declare
    当月 char(6);
    前月 char(6);
begin
    当月 := '200401';
    前月 := to_char(add_months(to_date(当月, 'YYYYMM'), 1), 'YYYYMM');
end;