home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / jumpkey.zip / deinst.cmd next >
OS/2 REXX Batch file  |  1996-05-14  |  1KB  |  39 lines
  1. /***********************************************************************
  2. **   DEINST.CMD
  3. **
  4. **   For an AUTOMATED de-install of JumpKey. Must be run from the
  5. **     directory where the package files are located.
  6. **
  7. **   Version 2.3.0
  8. **
  9. **   Arguments: None
  10. **
  11. **   Log files are written to the root of drive C:
  12. **
  13. ************************************************************************/
  14. srcdir = directory()                      /* Source Directory             */
  15.  
  16. catfile  = srcdir||'\JMP230.ICF'           /* Fully Qualified Catalog File */
  17. rspfile  = srcdir||'\JMP230.RSP'          /* Response File                */
  18.  
  19. elogfile = 'C:\JMPERR.LOG'                /* Error Log file               */
  20. hlogfile = 'C:\JMPINST.LOG'               /* Install History Log file     */
  21.  
  22. srctype  = 'DRIVE'                        /* Type of source               */
  23. pkgname  = '"IBM JumpKey/2"'              /* Package Name                 */
  24.  
  25. say 'This program will remove JumpKey from your system.'
  26. say "Enter 'Y' to continue, any other key to exit."
  27. parse upper pull yes
  28. if yes \= 'Y' then return 1
  29.  
  30. 'c:\ibb\epfinsts /x /a:D /c:'catfile' /l1:'elogfile' /l2:'hlogfile' /o:'srctype' /p:'pkgname' /r:'rspfile
  31. if rc = 0 then do
  32.   say 'JumpKey has been removed.'
  33.   end
  34. else do
  35.   'start e 'elogfile
  36.   say 'Error removing JumpKey, return code 'rc
  37.   end
  38. return rc
  39.