home *** CD-ROM | disk | FTP | other *** search
/ Mega Top 1 / os2_top1.zip / os2_top1 / APPS / PROG / REXX / CMD / I265.ZIP / RXMSG.CMD < prev    next >
Encoding:
Text File  |  1992-08-05  |  297 b   |  10 lines
  1. /* RXMSG.CMD - A fragment to verify replacement of file */
  2. call RxFuncAdd 'SysLoadFuncs', RexxUtil , 'SysLoadFuncs'
  3. call SysLoadFuncs
  4.  
  5. do
  6.      reply = RxMessageBox("Do you want to replace the file", ,
  7.                "Replace File?", "YesNo", "Question")
  8.      if reply = 7 then return
  9. end
  10.