How To Remove the 'Do you want to save changes?

if :System.Block_Status in( 'NEW' , 'CHANGED') then
    Clear_Block(DO_COMMIT);
      else
   Clear_Block(no_validate);   
end if;