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