home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / slip-cm.zip / CMStop.CMD < prev    next >
OS/2 REXX Batch file  |  1994-04-06  |  670b  |  21 lines
  1. /*************************************************************/
  2. /* CMSTOP                                                    */
  3. /*                                                           */
  4. /*   Send a STOP request to CMANAGER, which will place the   */
  5. /*   SLIP connection in a quiesce mode until all active      */
  6. /*   sockets have disconnected.                              */
  7. /*************************************************************/
  8.  
  9. trace OFF
  10.  
  11.   signal on HALT name CLEANUP
  12.   signal on FAILURE name CLEANUP
  13.   signal on SYNTAX name CLEANUP
  14.  
  15.   parse arg caller
  16.  
  17.   completed = CMPerform('STOP', caller)
  18.  
  19. CLEANUP: exit (completed == 1)
  20.  
  21.