16,755 pts.
 Pause/Wait + JCL z/0s
Is there a way to pause ZOS between each step of a job? If we had JES3 installed, I would use //**PAUSE, but we don't. My job has six commands I want to automate. F PCICST01, CEMT S TE(????)OUT, and 5 more, where ???? is the LU code needed. If I understand ZOS, it may or may not process the 6 commands in the order they were entered into the job. I am not familiar enough with mainframe assembler,rexx,c++, etc... to insert code that will produce the same thing a pausing the processing of the commands for a time of say 5 seconds. Any help would be greatly appreciated and thank you in advance.

Software/Hardware used:
ASKED: October 9, 2009  2:44 PM
UPDATED: October 13, 2009  3:17 PM

Answer Wiki:
Hi, Almost every mainframe shop has a program already in existence to "pause" a batch job. You should ask your software guys. Over the years, COBOL has grown in its capabilities. So, in this case you do not need Assembler. (Which is too bad, becasue I think Assembler is the best.) Here is a piece of COBOL code that can be used to "pause" a job. This program uses an IBM supplied module ILBOWAT. You should verify this is still correct. (This is an OLD, old program of mine...) * DESCRIPTION = * THIS PROGRAM USES IBM SUPPLIED MODULE TO "PAUSE" YOUR PROGRAM. * > A "SLEEP" FUNCTION * > MODULE NAMED ILBOWAT0. NOT ILBOWAT. * > CALLED MODULE IS AMODE 24, YOU MUST USE COMPILE OPTION DATA(24). * > PARAMETER PASSED IS IN SECONDS. * > CHECK RETURN CODE - YOU MIGHT HAVE DONE SOMETHING WRONG. * WORKING-STORAGE SECTION. 01 DELAY-SECONDS PIC S9(9) VALUE ZERO COMP. PROCEDURE DIVISION. MOVE 60 TO DELAY-SECONDS. CALL 'ILBOWAT0' USING DELAY-SECONDS. I hope this works out for you. steve (Meandyou)
Last Wiki Answer Submitted:  October 13, 2009  3:17 pm  by  Meandyou   5,205 pts.
All Answer Wiki Contributors:  Meandyou   5,205 pts.
To see all answers submitted to the Answer Wiki: View Answer History.


Discuss This Question:
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _