I've found that using MPEX and a message file, works real well in single
threading jobs.
If your interested, I can send you an example.
Later
"Gerald R. Dillard" <[log in to unmask]> on 06/26/2000 12:05:15 PM
Please respond to [log in to unmask]
To: [log in to unmask]
cc: (bcc: Ron R Horner/CHI/Seabury)
Subject: Re: While Loop aborting...
In a message dated 06/26/2000 12:18:43 PM Eastern Daylight Time,
[log in to unmask] writes:
> !SETVAR CH_JOBNO010 "J" + CH_JOBNO010
> !SETVAR COUNT010 FALSE
> !WHILE COUNT010 <> TRUE DO
> ! PAUSE 60;JOB="CHILDT01,ISDEV.AIHWORK";INTERVAL=10;EXIST
> ! IF CIERROR = 0
> ! LISTSPF O@;SELEQ=[JOBNUM=!CH_JOBNO010 AND &
> ! JOBNAME=!CH_JOBNM010 AND FILEDES = $STDLIST AND JOBABORT =
FALSE]
> ! IF CIERROR = 4809
> ! TELL @.!HPACCOUNT *E*
> ! TELL @.!HPACCOUNT *E* !CH_JOBNM010 HAS ABORTED......
> ! TELL @.!HPACCOUNT *E* !HPJOBNAME IS ABORTING IN STEP : 020
> ! TELL @.!HPACCOUNT *E*
> ! ABORT > $NULL
> ! ENDIF
> ! SETVAR COUNT010 TRUE
> ! ELSE
> ! IF CIERROR = 9032
> ! COMMENT ** TIME LIMIT EXCEEDED. STARTING PAUSE FROM FRESH **
> ! TELL @.!HPACCOUNT *I* !HPJOBNAME IS WAITING ON !CH_JOBNM010
> ! PAUSE 120
> ! SETJCW CIERROR 0
> ! ELSE
> ! ECHO *E*
> ! ECHO *E* !HPJOBNAME ABORT : PAUSE ON !CH_JOBNM010 ABORTED..
> ! ECHO *E*
> ! ABORT > $NULL
Is this a typo in the following line or should this line be prefixed with a
"!"?
> ENDIF
> ! ENDIF
> !ENDWHILE
> !DELETEVAR COUNT010 > $NULL
>
Hope this helps.
Gerald R. Dillard
Outer Banks Solutions, Inc.
<A HREF="[log in to unmask]">[log in to unmask]</A>
<A HREF="www.outerbankssolutions.com">www.outerbankssolutions.com</A>
Phone: 919-231-2171 Fax: 919-231-7077 Sales: 800-558-5336