Ability to query for DD's found in the JCL for CoZ step

[sctebnt]

Is there a function, or could there be a function, to allow us to gather a list of DD's associated with the current step running CoZ Launcher.

We are looking for the ability to pass the list of DDs (including concatenated files) to our unix shell from the CoZ L step of the JCL.

Thanks,
Scott

[dovetail]

Scott,

We don't have anything like this currently. What would be required would be a z/OS shell program that prints out the DDNAMES in the TIOT. If you have z/OS Unix command or even a REXX script that does this, we could show you how to call it remotely from within the Co:Z Launcher remote script.

[sctebnt]

I was able to write an assembler module to extract the DD information from the TIOT and JFCB. The module is working and I am able to execute the program using the cozclient command. However the output from the assembler is written to SYSOUT instead of STDOUT.

Is there an option or technique to have SYSOUT be redirected to STDOUT?

[dovetail]

Scott,

The best thing to do would be to write to Unix stdout from your assembler program. You can use the BPX1WRT service to do this:

Code: Select all

         CALL BPX1WRT,        Write to a file                          +
               (=F'1',        FD for stdout                            +
               ABUF,          pBuffer                                  +
               =F'0',         Buffer ALET                              +
               ABUFLEN,       Number of bytes to write                 +
               RETVAL,        Return value -1 or bytes written         +
               RETCODE,        Return code                             +
               RSNCODE),       Reason code                             +
               VL,MF=(E,PLIST) 

Note: each line should end with a X'15' newline character.