Thomas,
You're not alone :)
I think your ISFMSG2 stem variable is empty...
Try adding a VERBOSE parameter on your ISFACT call. That should put some
diagnostic messages in ISFMSG2 which may help you debug.
Gil.
On Fri, May 2, 2008 at 9:07 AM, Thomas Berg <[EMAIL PROTECTED]> wrote:
> *Am I the only one that uses the SDSF REXX interface ?
> Or is is time to buf IBM ?
>
> TIA
> Thomas Berg
>
> *
> ====== Thomas Berg ====== wrote 2008-04-30 14:37:
>
> Hi!
> > I have a problem when running SDSF REXX commands.
> > When looping the returned isfrows after ISFEXEC ST command, the second
> > ISFACT returns "INVALID COMMAND" (and rc = 0).
> > I can't see why.
> > The REXX:
> > /* REXX */ Trace R x =
> > Isfcalls('ON') isfprefix =
> > 'S000TBE5' isfcols = 'JNAME JOBID OWNERID
> > JCLASS POS STATUS' , 'SYSNAME WORKLOAD CPU TRANACT SRVCLS SRVCLASS
> > ACTSYS' ,
> > 'SYSAFF TOKEN PRTDEST' Address SDSF
> > 'ISFEXEC ST (ALTERNATE)' isfcols2 = ,
> > 'DDNAME STEPN PROCS DSID OCLASS RECCNT BYTECNT
> > DSNAME' Do i = 1
> > To isfrows Address SDSF "ISFACT ST
> > TOKEN('"token.i"')" , 'PARM(NP ?)'
> > Trace N
> > Say rc Say isfmsg
> >
> > Do j = 1 To isfmsg2.0
> > Say isfmsg2.j End
> >
> > Do j = 1 To dsname.0
> > Say dsname.j End
> >
> > Trace R
> > End
> > x = Isfcalls('OFF')
> > Exit 0
> > The output:
> > 2 *-* x = Isfcalls('ON')
> >
> > >>> "0"
> >
> > 3 *-* isfprefix = 'S000TBE5'
> >
> > >>> "S000TBE5"
> >
> > 4 *-* isfcols = 'JNAME JOBID OWNERID JCLASS POS STATUS' ,
> > 'SYSNAME WORKLOAD CPU TRANACT SRVC
> > LS SRVCLASS ACTSYS' , 'SYSAFF TOKEN PRTDEST'
> >
> > >>> "JNAME JOBID OWNERID JCLASS POS STATUS SYSNAME WORKLOAD
> > CPU TRANACT SRVCLS SRVCLASS ACTSYS SYSAFF TOKEN PRTDEST" 7 *-*
> > Address SDSF 'ISFEXEC ST (ALTERNATE)'
> >
> > >>> "ISFEXEC ST (ALTERNATE)"
> >
> > 8 *-* isfcols2 = ,
> > 'DDNAME STEPN PROCS DSID OCLASS RE
> > CCNT BYTECNT DSNAME'
> >
> > >>> "DDNAME STEPN PROCS DSID OCLASS RECCNT BYTECNT DSNAME"
> >
> > 11 *-* Do i = 1 To isfrows
> >
> > >>> "1"
> >
> > >>> "2"
> >
> > 12 *-* Address SDSF "ISFACT ST TOKEN('"token.i"')" ,
> > 'PARM(NP ?)' >>> "ISFACT ST
> > TOKEN('6jkSNicbJpKic/D1m8LEQNp38PrbwuNA6yKmVtAgRrDmEzI1o1LFTisSNjQ6IReE4
> > tDw6OPDUEDj+XPw4rJGQOP4fPDrExO
> > CEgEGCBQ=') PARM(NP ?)"
> >
> > 14 *-* Trace N
> >
> > 0
> >
> >
> > ISF754I Command 'PREFIX S000TBE5' generated from associated variable
> > ISFPREFIX.
> > S000TBE.S000TBE5.JOB01687.D0000002.JESMSGLG
> >
> > S000TBE.S000TBE5.JOB01687.D0000003.JESJCL
> >
> > S000TBE.S000TBE5.JOB01687.D0000004.JESYSMSG
> >
> > S000TBE.S000TBE5.JOB01687.D0000104.?
> >
> > S000TBE.S000TBE5.JOB01687.D0000108.?
> >
> > S000TBE.S000TBE5.JOB01687.D0000111.?
> >
> > 27 *-* End
> >
> > 11 *-* Do i = 1 To isfrows
> >
> > 12 *-* Address SDSF "ISFACT ST TOKEN('"token.i"')" ,
> > 'PARM(NP ?)' >>> "ISFACT ST
> > TOKEN('6jkSNicbJpKic/D1esLEQNp38PrbwuNA67SCN30gRrDmEzI1o1LFTisSNjQ6IReE4
> > tDw6OPAUEDj+XPw4kpGQOP4c/DhUsT
> > K4vH1c+PDVMPi8fh849MUliAAAQYbNapb/Q768OPGPQ==') PARM(NP ?)"
> >
> > 14 *-* Trace N
> >
> > 0
> >
> > INVALID COMMAND
> >
> > ISF754I Command 'PREFIX S000TBE5' generated from associated variable
> > ISFPREFIX.
> > S000TBE.S000TBE5.JOB01687.D0000002.JESMSGLG
> >
> > S000TBE.S000TBE5.JOB01687.D0000003.JESJCL
> >
> > S000TBE.S000TBE5.JOB01687.D0000004.JESYSMSG
> >
> > S000TBE.S000TBE5.JOB01687.D0000104.?
> >
> > S000TBE.S000TBE5.JOB01687.D0000108.?
> >
> > S000TBE.S000TBE5.JOB01687.D0000111.?
> >
> > 27 *-* End
> >
> > 11 *-* Do i = 1 To isfrows
> >
> > 29 *-* x = Isfcalls('OFF')
> >
> > >>> "0"
> >
> > 30 *-* Exit 0
> >
> > >>> "0"
> >
> > ***
> >
> > TIA
> > Thomas Berg
> > ______________________________________
> > Thomas Berg Specialist IT-U SWEDBANK
> >
> > ----------------------------------------------------------------------
> > 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
> >
> >
> >
> >
>
> --
>
> __________________________
>
> Mundus Vult Decipi __________________________
>
> They that can give up essential liberty to obtain a little temporary
> safety deserve neither liberty nor safety.
> - Benjamin Franklin
>
> Military justice is to justice what military music is to music.
> - Groucho Marx
>
>
>
>
> ----------------------------------------------------------------------
> 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
>
>
----------------------------------------------------------------------
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
