Re: SLAMRUN doesn't work after applying T8C2332


[ Follow Ups ] [ Post Followup ] [ IOF Q&A Message Board ] [ FAQ ]

Posted by Jim Walker on September 20, 2007 at 09:46:04:

In Reply to: Re: SLAMRUN doesn't work after applying T8C2332 posted by Jim Walker on September 12, 2007 at 15:31:24:

Fix T8C2332 deleted 3 lines, but should have deleted only 2 lines.

The quickest fix will be for you to manually edit the SLAMRUN clist.
FIND PAUSE in column 1
Just after the RETURN statement, insert
ENDO

So the routine now reads:

/*-------Pause subroutine -----------------------------------------*/
PAUSE: PROC 1 SECONDS
OPERCMD ENABLE
PAUSE &EVAL(100 * &SECONDS)
SET PCC = &LASTCC
IF &PCC = 0 THEN RETURN CODE(0)
TSICOPY NAME(OPERCMD) SECTION(PANEL) TO(CLIST)
%SLAMMSG OPERCMD VAR(&OPERCMD) FROM(SLAMRUN)
IF &OPERCMD = RESET THEN SET GOTRESET = YES
RETURN CODE(0)
ENDO

Please excuse this inconvenience.



Follow Ups:



Post a Followup

Name:

What is the MVS job entry subsystem supported by IOF?
We ask this question to reduce bogus postings to this bulletin board
Answer:

E-Mail:

Subject:

Comments:

Optional Link URL:
Link Title:
Optional Image URL:


[ Follow Ups ] [ Post Followup ] [ IOF Q&A Message Board ] [ FAQ ]