Skip to main content

Problem:

I would like to use the CICS transaction CNCL . At the moment I must use a 3270 emulator . Is it possible to  run this transaction from Unix command line

Resolution:

This is a Cobol example that runs the cas3270  command to run CICS transaction :

       01 Z1 PIC X(80).

       01 Z2 PIC X(20).

       ACCEPT Z2 FROM COMMAND-LINE.

       STRING

123456 "cas3270 -rESDEMO <<!" delimited by size

       X"0A1B" delimited by size

       "CNCL " delimited by size

       Z2  delimited by spaces

       X"0A" delimited by size

       "EXIT" delimited by size

       X"0A" delimited by size

       "!" delimited by size

       X"00" delimited by size

       into Z1.

       CALL "system" using Z1.

       stop run.

cob -x essai.cbl

essai { program name  }

Old KB# 2338