Never mind, I see the manual states the closing parenthesis is optional.
Bart

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of van der Grijn, Bart (B)
Sent: Monday, January 30, 2017 1:10 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: sdsf in rexx

Tim, I'm wondering if it ignores the WAIT because you didn't include a closing 
parenthesis on your option. So (WAIT) rather than (WAIT .
Bart

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tim Brown
Sent: Monday, January 30, 2017 12:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: sdsf in rexx

Thanks definitely a different method, still confused why mine doesn't always 
capture the result of

$DO JOBQ,READY,DEST'

Tim

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jousma, David
Sent: Monday, 30 January, 2017 11:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: sdsf in rexx


** THIS IS AN EXTERNAL EMAIL ** Use caution before opening links / attachments. 
Never supply UserID/PASSWORD information.


Tim,

I have a REXX exec I use to issue operator commands using the ISFSLASH keyword 
and writes the output to a temp file.   I think I may have stole it then 
enhanced it for my use either from IBM, or someone on this list, but the 
processing of the ISFULOG array is somewhat more complicated than you have 
listed.  I am posting the entire exec for you to play with, along with the JCL 
I use to execute.  You can have as many commands as you want in SYSIN.

...

_________________________________________________________________
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H p 616.653.8429 f 616.653.2717


-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tim Brown
Sent: Monday, January 30, 2017 10:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: sdsf in rexx

Using sdsf in rexx with command $DO JOBQ,READY,DEST

   COMMAND = '$DO JOBQ,READY,DEST'
   IF ISFCALLS('ON') <> 0 THEN EXIT 99
   ADDRESS SDSF "ISFEXEC '/"COMMAND"' (WAIT"

   DO S1 = 1 TO  ISFULOG.0
     SAY ISFULOG.S1
    END

Its supposed to return the $HASP686 messages in ISFULOG array,  which are same 
as when issued at console Sometimes it does and other times it doesn't return 
anything even when there are jobs available

It just returns these 2 and not the ones with $HASP686

"CPAC      2017030  10:45:11.13             ISF031I CONSOLE DPP ACTIVATED"
"CPAC      2017030  10:45:11.13            -$DO JOBQ,READY,DEST"



$DO JOBQ,READY,DEST
$HASP686 OUTPUT(FSP96A12)  ROUTECDE=LLW001
$HASP686 OUTPUT(FSP96A12)  ROUTECDE=LW001
$HASP686 OUTPUT(CAP81T43)  ROUTECDE=LOCAL
$HASP686 OUTPUT(CAP81T44)  ROUTECDE=LOCAL
$HASP686 OUTPUT(XTBPRT)    ROUTECDE=LX509

Tim Brown

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to