home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / slip-cm.zip / CMForce.CMD < prev    next >
OS/2 REXX Batch file  |  1994-04-06  |  606b  |  20 lines

  1. /*************************************************************/
  2. /* CMFORCE                                                   */
  3. /*                                                           */
  4. /*   Sends a FORCE request to CMANAGER, which will force an  */
  5. /*   immediate termination of the SLIP driver.               */
  6. /*************************************************************/
  7.  
  8. trace OFF
  9.  
  10.   signal on HALT name CLEANUP
  11.   signal on FAILURE name CLEANUP
  12.   signal on SYNTAX name CLEANUP
  13.  
  14.   parse arg caller
  15.  
  16.   completed = CMPerform('FORCE', caller)
  17.  
  18. CLEANUP: exit (completed == 1)
  19.  
  20.