On Wed, 12 Nov 2008 13:20:37 -0600, Chase, John <[EMAIL PROTECTED]> wrote:

>Wonderful tool, Strobe.
>
>We've discovered among our "ancient" production code a COBOL program
>that constructs VSAM KSDS record keys of date/time with one-second
>granularity.  As we've installed newer, faster machines over the years,
>the COBOL program tended to generate more and more "duplicate keys",
>which VSAM dislikes rather intensely.  Since initially there did not
>seem to be a batch equivalent to EXEC CICS DELAY, the "programmer du
>jour" coded a spin loop within the program to make it "watch the clock"
>waiting for the next second to arrive.  It spins real fast on a z9-EC.
>
>Is there a way within COBOL to set a timer to "pop" a second later, and
>have the program just WAIT on it?  Or is this a potential "opportunity"
>for me to grind the rust off my atrophied Assembler skills and cobble up
>a "delay" routine the COBOL program could call?
>
>TIA,
>
>    -jc-

Try this:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/CEEA3180/2.2.5.5

That is the entry of CEE3DLY, which can delay execution 0 to 3600 seconds.

--
John

----------------------------------------------------------------------
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

Reply via email to