On Thu, 21 May 2009 08:25:01 -0500, McKown, John <[email protected]>
wrote:
>I could use some help. I am writing a REXX exec which interfaces with the
ADDRESS SDSF stuff. Almost everything is working. But, from the H display, I
cannot get the JOBID field populated. The REXX exec looks like:
>
>
>/* REXX */
>XX=ISFCALLS('ON')
>IF XX <> 0 THEN DO
> SAY 'ISFCALLS FAILED. RC='XX
> EXIT 16
>END
>ISFPREFIX='*'
>ADDRESS SDSF "ISFEXEC H (DELAYED ALTERNATE)"
>SAY 'ISFDISPLAY='ISFDISPLAY
>SAY 'ISFCOLS='ISFCOLS
>SAY 'ISFDCOLS='ISFDCOLS
>IF RC <> 0 THEN DO
> SAY 'ISFEXEC H * FAILED. RC='RC
> EXIT 16
>END
>SAY 'ISFROWS='ISFROWS
>DO I=1 TO ISFROWS
>SAY JNAME.I JTYPE.I JNUM.I JOBID.I OWNERID.I OCLASS.I FORMS.I STATUS.I,
> TIMER.I DATER.I
>END
>
>My output is:
>
>
>ISFDISPLAY=PREFIX=* DEST=LOCAL OWNER=* SYSNAME=
>
>ISFCOLS=JNAME TOKEN JTYPE JNUM DSDATE OCLASS FORMS DESTN DEST NODE OGNAME
RECCNT ROOMN PNAME ACCTN NOTIFY ISYSID TIMER DATER ESYSID
>
I don't see JOBID on your alternate panel.
Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[email protected]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
