Progress-bar

Is there any function,package or something else which may help me with making "progress-bar"?.
For example i have 1 000 000 records to update and It take long time. User may suppose that update "hang - up" and reset connection. Progress - bar in PL/SQL may look as below:

loop
  a:=1;
  Display status bar i.e.next line with grow-up number of "#"   Do something with "a" to grow up
end loop;

Regard,
Roblop Received on Thu Jul 20 2000 - 00:00:00 CDT