home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / smart21b.zip / MACROS / GREPFIND.REX < prev    next >
OS/2 REXX Batch file  |  1993-11-05  |  334b  |  12 lines

  1. /* Grep Find */
  2. 'S_CLEAR_MACRO_OUTPUT'
  3. 'S_PROMPT Grep Arguments, args'
  4. IF rc \= 0 THEN EXIT
  5. IF args = "CANCEL" THEN EXIT
  6. 'S_GET_CURR_SL_DIR' current_dir
  7. 'S_CD' current_dir
  8. 'S_GET_CURR_FILENAME' 'current_file'
  9. 'S_GET_REF_FILENAME 5' macro_out
  10. grepstring = 'xxx.exe' || ' ' || args current_file
  11. grepstring
  12. 'SLSTART' macro_out