home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS 1992 September / Simtel20_Sept92.cdr / msdos / kermit / easyk110.arc / CICS.INI < prev    next >
Encoding:
Text File  |  1988-07-29  |  1.3 KB  |  18 lines
  1. ECHO \13\10Sending VTAM the command to enter CICS next...                  ;1 
  2. PAUSE 2                                                                    ;2
  3. OUTPUT nercics\13                                                          ;3
  4. PAUSE 2                                                                    ;4
  5. ECHO \13\10 Waiting for "ENTER SELECTION HERE" to enter "2"...             ;5
  6. INPUT 20 ENTER SELECTION HERE                                              ;6
  7. IF SUCCESS GOTO CLOG                                                       ;7
  8. ECHO \13\10Did not get CICS log-in selection menu; returning to EasyK...   ;8
  9. PAUSE 2                                                                    ;9
  10. STOP                                                                       ;10
  11. :CLOG                                                                      ;11
  12. OUTPUT 2\13                                                                ;12
  13. INPUT 20 SIGNING ON)                                                       ;13
  14. OUTPUT 12345678001                                                         ;14
  15. OUTPUT \07                                                                 ;15
  16. SET INPUT ECHO ON                                                          ;16
  17. CONNECT
  18.