home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 18 REXX / 18-REXX.zip / filerx11.zip / iterate.cmd < prev    next >
OS/2 REXX Batch file  |  1995-02-07  |  1KB  |  23 lines
  1. /******************************************************************
  2.  * ITERATE.CMD
  3.  *
  4.  * This program calls the various REXX external functions provided in the FILEREXX DLL.
  5.  *******************************************************************/
  6.  
  7.  
  8. /* The FileLoadFuncs loads all the rest of the REXX functions in the FILEREXX DLL. */
  9. /* So, we don't have to make calls to RxFuncAdd to add each one of those functions. Of */
  10. /* course, in order to call FileLoadFuncs, we have to add that one. */
  11. CALL RxFuncAdd 'FileLoadFuncs', 'FILEREXX', 'FileLoadFuncs'
  12. CALL FileLoadFuncs
  13.  
  14. arg fromname toname before after
  15. err = FileIterateExe('test.exe', fromname, toname, before, after)
  16. IF err <> 0 THEN SAY "FileIterateExe() ERROR:" err
  17.  
  18.  
  19. /* =============================================================================== */
  20. /* FileDropFuncs: This unloads all of the functions in the FILEREXX DLL. This is not necessary, and
  21.     we could otherwise leave it open for some other REXX script */
  22. CALL FileDropFuncs
  23.