home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / gec4000 / gecsvr.jcl < prev    next >
Text File  |  2020-01-01  |  2KB  |  58 lines

  1. OS4000  does  not support LOGIN/LOGOUT from the micro Kermit.  However,
  2. it is possible for a System Manager to arrange a Kermit login option so
  3. that a user only needs to connect once.
  4.  
  5. What I have done is the following:
  6.  
  7. add the lines:
  8.  
  9.         OPTION KERMIT
  10.               MODE NODP
  11.               JCL SYS.INITKERM
  12.               PROF SYSFILES.NDPUSR
  13.               CONTEXT DIRECTRY 
  14.  
  15. to  the  global  declarations  in the ACCOUNTS source file (if it suits
  16. your system  better,  you  could  just  as  well  have  MODE  NORM  and
  17. SYSFILES.USER).  Then set up SYS.INITKERM as:
  18.  
  19.         // INITJCL FOR AN AUTO-KERMIT USER.
  20.          
  21.         // RESTRICTED USER PROFORMAE
  22.         // Note that for 5.5 ( COMM v. 930 ), if MODE='NODP', proformas must be
  23.         //  this way round.
  24.         PROFORMA KERMIT  (T=-1 C=-1) IN       = STREAM 1 (*) -
  25.                           OUT      = STREAM 2 (*/NEW) -
  26.                           WITH     = STREAM 5 (SINK)
  27.          
  28.         PROFORMA CONTROL  IN       = STREAM 1 (%C) -
  29.                           OUT      = STREAM 2 (*/NEW)
  30.          
  31.         //ENABLE BACKSPACE DELETES
  32.         CONTROL IN=%H+
  33.         ?XC?H08
  34.         +
  35.          
  36.         //INFINITE FILE SIZE
  37.         DEFAULT /I
  38.          
  39.         END
  40.          
  41.         SAY
  42.         SAY Use GET <GEC filename> or SEND <local filename>. Remember to type
  43.         SAY FINISH when you have finished.
  44.         SAY
  45.         KERMIT WITH %H;
  46.         SERVER
  47.         EXIT
  48.         ;
  49.         IF ERROR THEN CONTINUE
  50.         LOGOUT
  51.  
  52.  
  53. With  this  set-up, all the user has to do is CONNECT and log in to the
  54. GEC as UUUUUU AAAAAA KERMIT.  This starts GEC Kermit up in Server mode.
  55. Then  the  user can escape to his/her local Kermit and SEND and GET the
  56. required files.  When (s)he types FINISH, (s)he gets  logged  out  from
  57. the GEC.
  58.