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

