Problem:

I have got my project working wtih about 80 COBOL programs.  The only thing left is to figure out how to redirect SYSOUT (Display statments inside COBOL) to somewhere where I can see them immediately when they come out.

How do I do that?

Resolution:

For a batch program using JCL in MFE, one needs to have three things:

- use the OUTDD directive

- code a //SYSOUT DD SYSOUT=*

- use a DISPLAY UPON CONSOLE

Example:

           DISPLAY 'TESTING 1'

           DISPLAY 'TESTING 2'

           DISPLAY 'TESTING 3'

           DISPLAY 'FINISHED'

           DISPLAY 'Console Test 1' UPON CONSOLE

           DISPLAY 'Console Test 2' UPON CONSOLE

           DISPLAY 'Console Test 3' UPON CONSOLE

Start debugging and select the TSO tab and leave it blank and click OK.

At the TSO Ready prompt type CALL DISTEST (program name) and hit enter.

Step through the program and you will see everything in the Application Output window.

You can also use the non-mainframe tab and recompile the program with NOOUTDD and this will allow you to see everything in the application output window.

And, you can also use jcl and see the information in the application window if the program was compiled with NOOUTDD.