Re: Problem with OVRDBF

[jpcarr@xxxxxxxxxxxx]

Try this.

CLP
Tag again:
DLYJOB (600)
Call XU2002    Parm(error)

If   &Error =  'Y'
goto again
endif

RPGIV
-
C         Open(E)   FileB
C         If   %error
C         Eval      Error     =  'Y'
   ***                go back to CLP and try waiting again.
C         RETURN
C         Endif

I would handle the error in the RPG and pass control back to CL.    In V5R2
I would use the new
Monitor- Try - Catch opcodes.

John Carr
-----------------------------------------------------


I have a batch program that occasionally gets locked out of a file. I have
included a portion of the job log below. I tried to change the wait time to
10 minutes, which would allow plenty of time for the other job to finish.
However, the job still only waited 120 seconds.

Why isn't he OVRDBF working?

Albert York



5800 - OVRDBF FILE(IBD) WAITFILE(600)
5900 - CALL PGM(XU2002)          /* The CALL command contains parameters
*/
    Lock space location operation not satisfied in specified time interval.

    Not able to allocate objects needed for file IBD in library FILEA
member

      or program device IBD.

    Error message CPF4128 appeared during OPEN for file IBD.