declare
  M_action integer;
begin
  select count(*)
    into M_action
    from MNEWS
   where MYEAR = :P18_YEAR and MMONTH = :P18_MONTH;

  if( M_action >= 1 )
  then
    :P18_SELECT := 2;
  else 
    :P18_SELECT := 1;
  end if;
end;