On Sat, 2 Aug 2025 23:32:23 -0500, Brian Westerman <[email protected]> wrote:
>i "think" that SSI 80 (extended status) would allow me to go through by >owner/JOBNAME/JOBID > >Does anyone have an assembler program they can share with me that will help me >figure this out? The sample is in the doc. I suspect you will also find it in JES2 samplib (search for IAZSSST). If not, then copy / paste from the doc. The doc is located at https://www.ibm.com/docs/en/zos/3.1.0?topic=sfcd-extended-status-function-call-ssi-function-code-80 With the new details, this could be the solution you desire. I'm still making assumptions. I quickly scanned the doc and here are my comments: IAZSSST is the mapping macro for extended status (SSI function code 80). Doc says it's in SYS1.MACLIB. I suspect verbose request gives you the desired information. The doc says don't use SSI broadcast but ISSUED TO says broadcast is processed by the primary JES. Primary JES will be the first SSCT entry typically named JES2 or JES3. If I couldn't test with a secondary JES running, then I would probably opt for directed to the first SSCT. Review the IAZSSST mapping macro for requirements and useful information. E.g. specify min JES version, include special dsects or ???. It should contain "POINTED BY" lists that will help you understand the chains. I suggest creating a simple diagram as a reference. The DSN is available but requires parsing. STVSPRCD has the proc name. STVSSTPD has the step name. STVSDDND has the DDN. Various tokens are available. I suggest that you test with a proc within a proc within another proc using same named steps and steps at each proc level. Call the first proc twice and make sure you can locate the desired DD. If you have z/XDC, then #DIE after the IEFSSREQ because you can display the chained control blocks to understand the structures. If not, then insert x'00DEAD00' and capture the S0C1 abend dump allowing you to use IPCS. I suggest you create IPCS mapping or REXX to format the control blocks. If you don't have such a tool, let us know. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
