Isfquery has a couple of uses.

It can be used  inside a rexx exec invoked from NP to extract the environment 
variables.

When invoked outside of SDSF, as your example shows, it returns a non-zero 
return code to indicate that it is not been invoked from SDSF NP %.

The reason for this is that users can code rexx that can be called from both 
environments and can take decisions based on the RC.

As you are running SDSF rexx outside of SDSF, you will have to code the special 
variable values like ISFOWNER prior to the first ISFEXEC statement.

If this does not help you solve the problems, please open a case with IBM and 
our support will help debug.

Rob Scott
Rocket Software


Rob Scott

Principal Architect, Mainframe Systems Tools

Distinguished Engineer
Rocket Software
77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA
Tel: +1.781.684.2305<tel:+17816842305>
Email: [email protected]<mailto:[email protected]>
Web: www.rocketsoftware.com<http://www.rocketsoftware.com/>

________________________________
From: IBM Mainframe Discussion List <[email protected]> on behalf of 
Farley, Peter x23353 <[email protected]>
Sent: Wednesday, May 4, 2022 6:28:17 PM
To: [email protected] <[email protected]>
Subject: Re: SDSF - ISPF questions (wishes?)

EXTERNAL EMAIL




I see the "local workaround" in that APAR says this:

As a work-around, the SDSF special DD ISFMIGRL can be
allocated to avoid this problem.

Maybe that's the solution?

Peter

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
Phil Smith III
Sent: Wednesday, May 4, 2022 1:17 PM
To: [email protected]
Subject: Re: SDSF - ISPF questions (wishes?)

Rob Scott wrote:

>Try adding the following lines to your test exec after the ISFCALLS
statement :

>Rc=ISFQUERY("INIT")
>Say "Prefix="isfprefix " Owner="isfowner " Dest="isfdest "
>JES="isfjesname



But when I do so, those variables do not get set:

/* REXX */
arg j
rc = isfcalls('ON')

rc = isfquery('INIT')
say "RC from isfquery('INIT') was" rc
say "Prefix="isfprefix "Owner="isfowner "Dest="isfdest ,
"JES="isfjesname

isfprefix = '*'
address SDSF 'ISFEXEC ST' j
say 'RC from ISFEXEC ST' j 'was' rc';' jname.0 'jobs found'



output is:

********************************* TOP OF DATA
**********************************

READY
%ST VSH1
RC from isfquery('INIT') was 1
Prefix=ISFPREFIX Owner=ISFOWNER Dest=ISFDEST JES=ISFJESNAME RC from ISFEXEC ST 
VSH1 was 0; 1 jobs found READY END
******************************** BOTTOM OF DATA
********************************
Hm, rc from ISFQUERY was 1. Which seems to be undocumented. Mind you, Googling 
"ISFQUERY" gets a total of FOUR hits, which seems unlikely (especially since 
none of those is a copy of the SDSF User's Guide on IBM-there is one on 
manualzz). I hunted down the actual IBM SDSF User's Guide, which still doesn't 
document ISFQUERY return codes, but I found this code snippet in there:

rc=isfquery()

if rc&ltsym;&gtsym;0 then

do

Say "** SDSF environment does not exist, exec ending."

Exit 20

end

Yes, complete with &ltsym;&gtsym; -- wow. Anyway, that seems unlikely. What am 
I missing this time? I get the same results whether I put the isfquery before 
or after the isfcalls (yes, Rob, you said after, but the IBM sample has it 
before, so I tried both).

Lionel: I'm thinking that if we get this working, it would be useful output 
from your utility, since at a minimum it will save some "Why isn't this 
working?" (may lead to "How do I override it?" but at last it won't be a total 
mystery!)

Wait, just as I was about to hit send:
https://urldefense.com/v3/__https://www.ibm.com/support/pages/apar/PH27154__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!NznHebwIf8mNFJoFd4sdTJv9HmPfPQfmJ4w4P1chZcZ2i1JdkxDLILhZhVJYZkrtSy_64lyjXlHR-YH7NDY$<https://urldefense.com/v3/__https://www.ibm.com/support/pages/apar/PH27154__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!NznHebwIf8mNFJoFd4sdTJv9HmPfPQfmJ4w4P1chZcZ2i1JdkxDLILhZhVJYZkrtSy_64lyjXlHR-YH7NDY$>
 sounds like "ISFQUERY is flat-out busted in 2.4, we don't care, will fix 
eventually maybe". Am I reading that right? Or is this talking about something 
else? It would be nice if it documented what "will not complete successfully" 
meant-RC=1?

...phsiii
----------------------------------------------------------------------

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

================================
Rocket Software, Inc. and subsidiaries ? 77 Fourth Avenue, Waltham MA 02451 ? 
Main Office Toll Free Number: +1 855.577.4323
Contact Customer Support: 
https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
http://www.rocketsoftware.com/manage-your-email-preferences
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy
================================

This communication and any attachments may contain confidential information of 
Rocket Software, Inc. All unauthorized use, disclosure or distribution is 
prohibited. If you are not the intended recipient, please notify Rocket 
Software immediately and destroy all copies of this communication. Thank you.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to