home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / jsc058.zip / JSCOS2.CMD < prev    next >
OS/2 REXX Batch file  |  1998-03-08  |  393b  |  24 lines
  1. /* Run proj3 */
  2.  
  3. if RxFuncQuery('SysLoadFuncs') then do
  4.  call RxFuncAdd 'SysLoadFuncs','REXXUTIL','SysLoadFuncs'
  5.  call SysLoadFuncs
  6. end
  7.  
  8. '@echo off'
  9.  
  10. setlocal
  11.  
  12. parse upper source . . sourcefile
  13. drive = filespec('DRIVE', sourcefile)
  14. dir = filespec('PATH', sourcefile)
  15. wholepath = drive''dir
  16.  
  17. 'set classpath='wholepath'jscom.jar;%CLASSPATH%'
  18.  
  19. 'java JCApp'
  20.  
  21. endlocal
  22. exit
  23.  
  24.