Simple help please in rollback

Question

I have a button (to go to another block) containing this code:
declare
     alert_id alert;
     al_but number;
begin
     if get_block_property('courses_block', status) = 'QUERY' then
          go_item ('block1.courses_info');
     else
          alert_id := find_alert('alert3');
          set_alert_property(alert_id, alert_message_text, 'Do you want to save changes?');
          al_but := show_alert(alert_id);
          if al_but = ALERT_BUTTON1 THEN
               commit;
               go_block('block1');
          elsif al_but = ALERT_BUTTON2 THEN
               rollback;
               commit;
               go_block('block1');
          end if;
     end if;
end;
when I click this button, and choose No (don't save changes), this message appears before going to the another block:
(Do you want to save the changes you have made?)
this means for me that the rollback did not executed properly.
plase help me to make correct rollback.
thanks
Salah

Answer 1

sorry manu, this commit appeared by mistake,
the code is:
declare
alert_id alert;
al_but number;
begin
if get_block_property('courses_block', status) = 'QUERY' then
go_item ('block1.courses_info');
else
alert_id := find_alert('alert3');
set_alert_property(alert_id, alert_message_text, 'Do you want to save changes?');
al_but := show_alert(alert_id);
if al_but = ALERT_BUTTON1 THEN
commit;
go_block('block1');
elsif al_but = ALERT_BUTTON2 THEN
rollback;
go_block('block1');
end if;
end if;
end;