>Set exec-parm1-ptr to address of exec-parm1 >Set exec-parm2-ptr to address of exec-parm2 >Call 'execl' using by value exec-path-ptr >by value exec-parm1-ptr >by value null-ptr >returning rc >if rc = 0 then >display 'tsocmd worked' >end-if
Not answering to the question regarding command output, but I find the example a bit misleading. Any of the exec type UNIX functions will replace the current program with the new program. In MVS speak, it will end the current job step and initiate a new one. I've never done this in COBOL, but I see no reason it would behave differently. Now assuming it does start a new job step, all DDs from the previous (initial) job step are lost. The new step running the "tsocmd" command will have no DDs at all. Also, the command will never return to the COBOL code. That is gone as well. -- Peter Hunkeler ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
