There are some view that you could use to write your own script that would monitor the archive process...

v$archive
v$archive_process
and
v$archived_log

Other wise you could set an OEM event to monitor the archive process...

Sam