subject:"Re\: SDSF REXX question"

Re: SDSF REXX question

2011-08-26 Thread Roberto Halais

Steve:

Don't knowabout IRXJCL situation  but I use:

//TSOBAT   EXEC  PGM=IKJEFT01,PARM='RXCMD'

where rxcmd is the rexx using isfexec. It works fine.

Roberto

On Fri, Aug 26, 2011 at 7:46 AM, Steve Austin wrote:

> Hello,
>
>
>
> I have a REXX exec that issues "D M=CPU" using ISFEXEC and I expect the
> ULOG output to be returned in the isfulog. stem. This works fine under
> TSO, but if I run the exec under IRXJCL the command is issued, but no
> output returned in the isfulog. stem.
>
>
>
> Any idea what I'm missing?
>
>
>
> Thanks
>
>
>
> Steve
>
>
>  -
> This email has been scanned for all known viruses by the MessageLabs Email
> Security Service and the Macro 4 internal virus protection system.
>  -
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>



-- 
"Those who can make you believe religious absurdities, can make you commit
atrocities."  Voltaire

The philosopher has never killed any priests, whereas the priest has
killed a great many philosophers.  Denis Diderot

"Men will never be free until the last king is strangled with the entrails
of the last priest." Denis Diderot

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Elardus Engelbrecht

Steve Austin wrote:

>I have a REXX exec that issues "D M=CPU" using ISFEXEC and I expect the ULOG 
>output to be returned in the isfulog. stem. This works fine under TSO, but if 
>I run the exec under IRXJCL the command is issued, but no output returned in 
>the isfulog. stem.

How are you capturing the output into that stem variable?

Please show us the statements used, if possible...

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Steve Austin

Here is the REXX exec;

rc=isfcalls("ON")   
isfcons = "NODDY"  /* EMCS console name */  
isfdelay ="10" /* WAIT time */  
ADDRESS SDSF ISFEXEC "'/D M=CPU' (WAIT VERBOSE)"
if isfmsg<>"" then  
  say isfmsg
do i2 = 1 to isfmsg2.0 /* loop though messages */   
  say isfmsg2.i2
end 
if rc <= 8 then do  
  say "Number of ulog rows returned" isfulog.0  
  if isfulog.0 > 1 then do  
do ix=1 to isfulog.0   /* loop through rows */  
  say isfulog.ix
end 
  end   
end 
RC=ISFCALLS("OFF")  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Elardus Engelbrecht
Sent: 26 August 2011 13:25
To: IBM-MAIN@bama.ua.edu
Subject: Re: SDSF REXX question

Steve Austin wrote:

>I have a REXX exec that issues "D M=CPU" using ISFEXEC and I expect the
ULOG output to be returned in the isfulog. stem. This works fine under
TSO, but if I run the exec under IRXJCL the command is issued, but no
output returned in the isfulog. stem.

How are you capturing the output into that stem variable?

Please show us the statements used, if possible...

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

 

-
This email has been scanned for all known viruses by the MessageLabs
Email
Security Service and the Macro 4 internal virus protection system.
 

-

 -
This email has been scanned for all known viruses by the MessageLabs Email
Security Service and the Macro 4 internal virus protection system.
 -

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Elardus Engelbrecht

Steve Austin wrote:

>Here is the REXX exec;

isfcons = "NODDY"  

:-D I asked BIGEARS with help and ... :-D

Thanks. I tried it out in TSO / ISPF and also with this JCL:

//ZYX  EXEC PGM=IKJEFT01
//SYSPROC  DD  DISP=SHR,DSN=<...>.REXX  
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD *   
  PROF NOPREF 
  %SDSF2  

READY   
  %SDSF2
COMMAND ISSUED  
ISF754I Command 'SET CONSOLE NODDY' generated from associated variable ISFCONS. 
ISF754I Command 'SET DELAY 10' generated from associated variable ISFDELAY. 
ISF766I Request completed, status: COMMAND ISSUED.  
NUMBER OF ULOG ROWS RETURNED 34 
  2011238  14:49:24.56 ISF031I CONSOLE NODDY ACTIVATED  
  2011238  14:49:24.56-D M=CPU  
  2011238  14:49:24.57 IEE174I 14.49.24 DISPLAY M
   PROCESSOR STATUS 
   ID  CPU  SERIAL  

Output is shown in SYSTSPRT...

Is this what you wanted? Perhaps I missed something from your original post?

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Steve Austin

I too have the REXX exec working under TSO, but I'm trying to get it to
work in batch under IRXJCL.

Thanks

Steve 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Elardus Engelbrecht
Sent: 26 August 2011 13:56
To: IBM-MAIN@bama.ua.edu
Subject: Re: SDSF REXX question

Steve Austin wrote:

>Here is the REXX exec;

isfcons = "NODDY"  

:-D I asked BIGEARS with help and ... :-D

Thanks. I tried it out in TSO / ISPF and also with this JCL:

//ZYX  EXEC PGM=IKJEFT01
//SYSPROC  DD  DISP=SHR,DSN=<...>.REXX  
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD *   
  PROF NOPREF 
  %SDSF2  

READY

  %SDSF2

COMMAND ISSUED

ISF754I Command 'SET CONSOLE NODDY' generated from associated variable
ISFCONS. 
ISF754I Command 'SET DELAY 10' generated from associated variable
ISFDELAY. 
ISF766I Request completed, status: COMMAND ISSUED.

NUMBER OF ULOG ROWS RETURNED 34

  2011238  14:49:24.56 ISF031I CONSOLE NODDY
ACTIVATED  
  2011238  14:49:24.56-D M=CPU

  2011238  14:49:24.57 IEE174I 14.49.24 DISPLAY M

   PROCESSOR STATUS

   ID  CPU
SERIAL  

Output is shown in SYSTSPRT...

Is this what you wanted? Perhaps I missed something from your original
post?

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

 

-
This email has been scanned for all known viruses by the MessageLabs
Email
Security Service and the Macro 4 internal virus protection system.
 

-

 -
This email has been scanned for all known viruses by the MessageLabs Email
Security Service and the Macro 4 internal virus protection system.
 -

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Ted MacNEIL

>I too have the REXX exec working under TSO, but I'm trying to get it to work 
>in batch under IRXJCL.

Why?
If it works don't break it.
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Elardus Engelbrecht

Steve Austin wrote:

>I too have the REXX exec working under TSO, but I'm trying to get it to work 
>in batch under IRXJCL.

Will this (tested before posting) one be suitable for you?

//STEP1EXEC PGM=IRXJCL,PARM='SDSF2'   
//SYSTSPRT DD   SYSOUT=*  
//SYSEXEC  DD   DSN=<...>.REXX,DISP=SHR 

I have used your posted example successfully for this JCL.

If not desired solution, could you be kind to tell us how you want to use 
IRXJCL?

Groete / Greetings
Elardus Engelbrecht

Q: Whats black and brown and looks good on an attorney?

A: A Doberman pinscher.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Mark Zelden

On Fri, 26 Aug 2011 12:46:12 +0100, Steve Austin  
wrote:

>Hello,
>
> 
>
>I have a REXX exec that issues "D M=CPU" using ISFEXEC and I expect the
>ULOG output to be returned in the isfulog. stem. This works fine under
>TSO, but if I run the exec under IRXJCL the command is issued, but no
>output returned in the isfulog. stem.
>
> 

Run it under the TMP in batch (TSO) instead of IRXJCL (IKJEFT01 / IKJEFT1A / 
IKJEFT1B).

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Steve Austin

Thanks,

Yes that is exactly what I want, but it is not working for me here. I
suspect an environmental problem of some sort; possibly something in
ISFPRMxx. 

Here is the REXX group in my ISPPRMxx. Can you see anything different to
yours?

/*/   
/* GROUP ISFREXX - Rexx Users*/   
/*/   
 GROUP NAME(ISFREXX),/* Group name  */
 IUID(ISFREXX),  /* Iuid*/
 ACTION(ALL),/* All route codes displayed   */
 ACTIONBAR(YES), /* Display action bar on panels*/
 APPC(ON),   /* Include APPC sysout */
 AUPDT(2),   /* Minimum auto update interval*/
 AUTH(I,O,H,DA,PREF,SE,SR,ST),   /* Authorized functions*/
 CMDAUTH(ALL),   /* Commands allowed for all jobs   */
 CMDLEV(7),  /* Authorized command level*/
 CONFIRM(ON),/* Enable cancel confirmation  */
 CURSOR(ON), /* Leave cursor on last row processed  */
 DADFLT(IN,OUT,TRANS,STC,TSU,JOB),  /* Default rows shown on DA */
 DATE(MMDD), /* Default date format */
 DATESEP('/'),   /* Default datesep format  */
 DISPLAY(OFF),   /* Do not display current values   */
 DSPAUTH(USERID,NOTIFY,AMSG),  /* Browse authority  */
 GPLEN(2),   /* Group prefix length */
 ILOGCOL(1), /* Initial display column in log   */
 ISYS(NONE), /* Initial system default for DA   */
 LANG(ENGLISH),  /* Default language*/
 LOGOPT(OPERACT),/* Default log option  */
 OWNER(NONE),/* Default owner   */
 UPCTAB(TRTAB2), /* Upper case translate table name */
 VALTAB(TRTAB),  /* Valid character translate table */
 VIO(SYSALLDA)   /* Unit name for page mode output  */
  
  NTBL NAME(ISFREXX)  
NTBLENT STRING(SA2)   

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Elardus Engelbrecht
Sent: 26 August 2011 14:12
To: IBM-MAIN@bama.ua.edu
Subject: Re: SDSF REXX question

Steve Austin wrote:

>I too have the REXX exec working under TSO, but I'm trying to get it to
work in batch under IRXJCL.

Will this (tested before posting) one be suitable for you?

//STEP1EXEC PGM=IRXJCL,PARM='SDSF2'   
//SYSTSPRT DD   SYSOUT=*  
//SYSEXEC  DD   DSN=<...>.REXX,DISP=SHR 

I have used your posted example successfully for this JCL.

If not desired solution, could you be kind to tell us how you want to
use IRXJCL?

Groete / Greetings
Elardus Engelbrecht


Q: What's black and brown and looks good on an attorney?
 
A: A Doberman pinscher.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

 

-
This email has been scanned for all known viruses by the MessageLabs
Email
Security Service and the Macro 4 internal virus protection system.
 

-

 -
This email has been scanned for all known viruses by the MessageLabs Email
Security Service and the Macro 4 internal virus protection system.
 -

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Pinnacle


On 8/26/2011 7:46 AM, Steve Austin wrote:

Hello,



I have a REXX exec that issues "D M=CPU" using ISFEXEC and I expect the
ULOG output to be returned in the isfulog. stem. This works fine under
TSO, but if I run the exec under IRXJCL the command is issued, but no
output returned in the isfulog. stem.



Any idea what I'm missing?





Steve,

I haven't run a test, but I'm pretty sure that SDSF requires TSO in 
order to function.  We normally run it in ISPF, but you can also run it 
with TSO SDSF.  IRXJCL only works for Rexx execs that don't require TSO 
services.


Regards,
Tom Conley

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Mark Zelden

>
>I haven't run a test, but I'm pretty sure that SDSF requires TSO in
>order to function.  We normally run it in ISPF, but you can also run it
>with TSO SDSF.  IRXJCL only works for Rexx execs that don't require TSO
>services.

SDSF is batch generally doesn't require TSO and IRKJCL is fine.  However,
ULOG probably does.

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Elardus Engelbrecht

Steve Austin wrote:

>Yes that is exactly what I want, but it is not working for me here.

Ouch. More painful than a bored attorney's fee... :-D

> I suspect an environmental problem of some sort; possibly something in 
> ISFPRMxx.

Perhaps. Try these lines just before your own ADDRESS SDSF ISFEXEC for some 
diagnostics.

ADDRESS SDSF ISFEXEC " WHO "  
DO IX=1 TO ISFRESP.0 
  SAY "ISFRESP."IX "IS:" ISFRESP.IX  
END  

Then compare the results to see what is the difference for your TSO and Batch 
execution.

You may need extra access permission in ISFPRMxx or in RACF.

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Mark Zelden

On Fri, 26 Aug 2011 08:35:46 -0500, Mark Zelden  wrote:

>>
>>I haven't run a test, but I'm pretty sure that SDSF requires TSO in
>>order to function.  We normally run it in ISPF, but you can also run it
>>with TSO SDSF.  IRXJCL only works for Rexx execs that don't require TSO
>>services.
>
>SDSF is batch generally doesn't require TSO and IRKJCL is fine.  However,
>ULOG probably does.
>

I didn't really mean "SDSF is batch".  That would be PGM=SDSF or PGM=ISFAFD.

Of course I was referring to the REXX API  since that was the subject of this
thread.   I also forgot to mention my SDSF@DR example on my web site 
which I run using PGM=IRXJCL (sample JCL is in the source).

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Steve Austin

Yes that helped identify the problem. I changed group AUTH parameter
from AUTH(I,O,H,DA,PREF,SE,SR,ST) to AUTH(ALL) and now all works as I
hoped.

Thanks

Steve 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Elardus Engelbrecht
Sent: 26 August 2011 14:40
To: IBM-MAIN@bama.ua.edu
Subject: Re: SDSF REXX question

Steve Austin wrote:

>Yes that is exactly what I want, but it is not working for me here.

Ouch. More painful than a bored attorney's fee... :-D

> I suspect an environmental problem of some sort; possibly something in
ISFPRMxx.

Perhaps. Try these lines just before your own ADDRESS SDSF ISFEXEC for
some diagnostics.

ADDRESS SDSF ISFEXEC " WHO "  
DO IX=1 TO ISFRESP.0 
  SAY "ISFRESP."IX "IS:" ISFRESP.IX  
END  

Then compare the results to see what is the difference for your TSO and
Batch execution.

You may need extra access permission in ISFPRMxx or in RACF.

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

-
This email has been scanned for all known viruses by the MessageLabs
Email
Security Service and the Macro 4 internal virus protection system.

-

 -
This email has been scanned for all known viruses by the MessageLabs Email
Security Service and the Macro 4 internal virus protection system.
 -

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

2011-08-26 Thread Shmuel Metz (Seymour J.)

In
,
on 08/26/2011
   at 12:46 PM, Steve Austin  said:

>Any idea what I'm missing?

Off the top of my head, SDSF can run either as a stand-alone TSO
command or as an ISPF facility. There are differences in behavior
depending on how you run it. How did you invoke ISPF under TSO? Does
it work the other way?

There's also the issue that IRXJCL doesn't establish a TSO environment
at all. Perhaps you need to tun under IKJEFT01.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

Re: SDSF REXX question

15 matches

Site Navigation

Mail list logo

Footer information