Andy, Invoke a stored procedure with a wait in it.
Harry > Date: Fri, 5 Jun 2009 16:28:57 +0100 > From: [email protected] > Subject: Re: Wait under CICS > To: [email protected] > > I have just gotten a panicy request from an applications group who are > getting -911 SQL abends under CICS. > > These are of course timeouts. > > They want some way to wait n seconds and retry. > > > Simple, sez you - but the kicker is that it is highly desirable the > relevant programs in these applications not contain EXEC CICS statements, > for reasons which are basically down to wanting to share source code across > the batch and CICS environments. > > They want a CALLable subprogram to do the job. > > > > We are at z/OS 1.8 so CEE3DLY CEE3DLYM are not yet available > > ILBOWAT0 and BPX1SLP are AFAIK not useable under CICS, nor are things like > STIMER WAIT > > I can't see how to do it. > > > So, has anyone got any bright ideas??????? > > > > > Andy Robertson > > ********************************************************************** > This email is confidential and may contain copyright material of the John > Lewis Partnership. > If you are not the intended recipient, please notify us immediately and > delete all copies of this message. > (Please note that it is your responsibility to scan this message for > viruses). Email to and from the > John Lewis Partnership is automatically monitored for operational and lawful > business reasons. > ********************************************************************** > > John Lewis plc > Registered in England 233462 > Registered office 171 Victoria Street London SW1E 5NN > > Websites: http://www.johnlewis.com > http://www.waitrose.com > http://www.greenbee.com > http://www.johnlewispartnership.co.uk > > ********************************************************************** > > ---------------------------------------------------------------------- > 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
