home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1997 #3 / amigamamagazinepolishissue03-1 / ma_shareware / mashare76 / proged.lha / proged22 / installproged / sasc_support / LastError.script < prev    next >
Text File  |  1996-03-11  |  451b  |  31 lines
  1. /*******************************************
  2.  *
  3.  * LastError.script
  4.  * by Giovanni Lambiase (C) 1995
  5.  *
  6.  * This Arexx macro jump to last error in
  7.  * SCMSG list.
  8.  *
  9.  *******************************************/
  10.  
  11. OPTIONS RESULTS
  12. OPTIONS FAILAT 31
  13.  
  14. IF SHOW('PORTS','SC_SCMSG') THEN
  15. DO
  16.     ADDRESS 'SC_SCMSG'
  17.  
  18.     /* If no errors -> close SCMSG */
  19.     'TEXT'
  20.     IF RESULT='' THEN
  21.     DO
  22.         'HIDE'
  23.     END
  24.     ELSE
  25.     DO
  26.         /* Jump to last error */
  27.         'BOTTOM'
  28.         'SELECT'
  29.     END
  30. END
  31.