Re: SDSF in Batch
Sri, I tried out your example and it worked like a charm. Great stuff. Thanks for sharing this with us. On Tue, 30/5/17, Sri h Kolusu wrote: Subject: Re: SDSF in Batch To: IBM-MAIN@LISTSERV.UA.EDU Received: Tuesday, 30 May, 2017, 3:11 PM Steely Mark, Assuming you always have more than 1 job to extract in the DA queue, you can use SDSF block commands (//X - //) and extract the entire log. You can use utility of choice ( I used SORT) to extract out the contents you like. Some thing like this //** //* DELETE IF OUTPUT DATASET EXISTS * //** //STEP0100 EXEC PGM=IEFBR14 //DD01 DD DSN=&SYSUID..SDSF.OUTPUT, // DISP=(MOD,DELETE),UNIT=SYSDA, // SPACE=(TRK,(1,0),RLSE) //* //** //* EXTRACT THE ENTIRE JOB OUTPUTS IN DA FOR PREFIX 'CICS' * //* USING SDSF BLOCK COMMANDS (//X - //) * //** //STEP0200 EXEC PGM=SDSF,PARM='++30,256' //ISFOUT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSTSPRT DD SYSOUT=* //SYSOUT DD SYSOUT=* //DATAOUT DD DSN=&SYSUID..SDSF.OUTPUT, // DISP=(NEW,CATLG,DELETE), // SPACE=(CYL,(25,25),RLSE), // RECFM=FB,LRECL=133,BLKSIZE=0 //ISFIN DD * PRE CICS* DA PRINT FILE DATAOUT FIND 'CICS' ++//X FIND 'CICS' LAST ++// PRINT CLOSE END /* //** //* EXTRACT THE JESMSGLG FOR EACH JOB LOOKING FOR THE TIME * //** //STEP0300 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD DISP=SHR,DSN=&SYSUID..SDSF.OUTPUT //SORTOUT DD SYSOUT=* //SYSIN DD * OPTION COPY INCLUDE COND=(2,2,ZD,EQ,NUM,AND, 4,1,CH,EQ,C'.',AND, 5,2,ZD,EQ,NUM,AND, 7,1,CH,EQ,C'.',AND, 8,2,ZD,EQ,NUM) /* P.S : The block command will fail if you just have 1 active job in the DA queue. Thanks, Kolusu From: "Steely.Mark" To: IBM-MAIN@LISTSERV.UA.EDU Date: 05/30/2017 10:17 AM Subject: SDSF in Batch Sent by: IBM Mainframe Discussion List I know this has been discussed before but I can't find anything that I am looking for. The only thing I found close was SDSFEXT from file 313 on the CBTAPE. I would like the batch SDSF job to perform PREFIX CICS*. Then DA. Then from that list print the JESMSGLG from each one listed. I have been able to do this successfully for 1 job. Any help would be appreciated. Thanks -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SDSF in Batch
Steely Mark, Assuming you always have more than 1 job to extract in the DA queue, you can use SDSF block commands (//X - //) and extract the entire log. You can use utility of choice ( I used SORT) to extract out the contents you like. Some thing like this //** //* DELETE IF OUTPUT DATASET EXISTS* //** //STEP0100 EXEC PGM=IEFBR14 //DD01 DD DSN=&SYSUID..SDSF.OUTPUT, // DISP=(MOD,DELETE),UNIT=SYSDA, // SPACE=(TRK,(1,0),RLSE) //* //** //* EXTRACT THE ENTIRE JOB OUTPUTS IN DA FOR PREFIX 'CICS' * //* USING SDSF BLOCK COMMANDS (//X - //) * //** //STEP0200 EXEC PGM=SDSF,PARM='++30,256' //ISFOUT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSTSPRT DD SYSOUT=* //SYSOUT DD SYSOUT=* //DATAOUT DD DSN=&SYSUID..SDSF.OUTPUT, //DISP=(NEW,CATLG,DELETE), //SPACE=(CYL,(25,25),RLSE), //RECFM=FB,LRECL=133,BLKSIZE=0 //ISFINDD * PRE CICS* DA PRINT FILE DATAOUT FIND 'CICS' ++//X FIND 'CICS' LAST ++// PRINT CLOSE END /* //** //* EXTRACT THE JESMSGLG FOR EACH JOB LOOKING FOR THE TIME * //** //STEP0300 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD DISP=SHR,DSN=&SYSUID..SDSF.OUTPUT //SORTOUT DD SYSOUT=* //SYSINDD * OPTION COPY INCLUDE COND=(2,2,ZD,EQ,NUM,AND, 4,1,CH,EQ,C'.',AND, 5,2,ZD,EQ,NUM,AND, 7,1,CH,EQ,C'.',AND, 8,2,ZD,EQ,NUM) /* P.S : The block command will fail if you just have 1 active job in the DA queue. Thanks, Kolusu From: "Steely.Mark" To: IBM-MAIN@LISTSERV.UA.EDU Date: 05/30/2017 10:17 AM Subject:SDSF in Batch Sent by:IBM Mainframe Discussion List I know this has been discussed before but I can't find anything that I am looking for. The only thing I found close was SDSFEXT from file 313 on the CBTAPE. I would like the batch SDSF job to perform PREFIX CICS*. Then DA. Then from that list print the JESMSGLG from each one listed. I have been able to do this successfully for 1 job. Any help would be appreciated. Thanks -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SDSF in Batch
Check out ISFREXX, it is the REXX interface that you can use in Foreground and Background https://www.ibm.com/support/knowledgecenter/SSLTBW_2.2.0/com.ibm.zos.v2r2.isfa50 0/rexx.htm Also you can check out JES2DISK (It is googleable) for an example of how to do this. (Way to go John McKown) Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Steely.Mark > Sent: Tuesday, May 30, 2017 10:17 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: SDSF in Batch > > I know this has been discussed before but I can't find anything that I am > looking for. > > The only thing I found close was SDSFEXT from file 313 on the CBTAPE. > > I would like the batch SDSF job to perform PREFIX CICS*. Then DA. Then from > that list print the JESMSGLG from each one listed. > > I have been able to do this successfully for 1 job. > > Any help would be appreciated. > > Thanks -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SDSF in Batch
Did you look into SDSF/REXX ? Sent from Mail for Windows 10 From: Steely.Mark Sent: Tuesday, May 30, 2017 1:17 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: SDSF in Batch I know this has been discussed before but I can't find anything that I am looking for. The only thing I found close was SDSFEXT from file 313 on the CBTAPE. I would like the batch SDSF job to perform PREFIX CICS*. Then DA. Then from that list print the JESMSGLG from each one listed. I have been able to do this successfully for 1 job. Any help would be appreciated. Thanks -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SDSF in Batch
I know this has been discussed before but I can't find anything that I am looking for. The only thing I found close was SDSFEXT from file 313 on the CBTAPE. I would like the batch SDSF job to perform PREFIX CICS*. Then DA. Then from that list print the JESMSGLG from each one listed. I have been able to do this successfully for 1 job. Any help would be appreciated. Thanks -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN