Rexx calling a cobol pgm

[mrc2]

I have a rexx pgm that calls a cobol program to do some logic. I have display statements in my cobol program. Is there anyway to trap those messages in my rexx program? Using the Outtrap command does not work. Or is there any other way to get messages back to my rexx program?

Thanks for any help!!

 

[KarlheinzWittemann]

cobol DISPLAY goes to SYSOUT. make sure, that SYSOUT is assigned to TERMINAL like:

ALLOC DD(SYSOUT) DA(*) SHR REUSE

put the call of your cobol-program in a separate REXX and set the output trapping before you call this rexx program.

also you can assign SYSOUT to a temporarely file and read it after calling the cobol program by execio.

HTH
Heinz