What messages are above "Job holds large number of locks"? This message
is saying the job is holding a suspiciously large number of locks and
may not be releasing locks. See message CPI1466. It gives you some
steps to follow.


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Rusling, John
Sent: Wednesday, April 27, 2011 12:23 PM
To: midrange-l@xxxxxxxxxxxx
Subject: RE: If MSGTYPE has *NEXT or *PRV specified, MSGKEY is required.

Hi Chuck,

I found out more -

Job holds large number of locks.
Job holds large number of locks.
Journal receivers BPCS022193 and *N detached.
Journal receivers JBA0001285 and *N detached.
Error message CPF4128 appeared during OPEN for file EDDALT (C S D F).
Reply . . : D
Subsystem ZMHTTPSRV in library ZMODEDIIP starting.

Doing an F1 on the cpf4128 line reveals -

Message ID . . . . . . : RNQ1216 Severity . . . . . . . : 99

Message type . . . . . : Inquiry

Date sent . . . . . . : 04/25/11 Time sent . . . . . . :

Message . . . . : Error message CPF4128 appeared during OPEN for file
(C S D F).

Cause . . . . . : RPG procedure ED098 in program EDI4XXPGM/ED098
the message CPF4128 while performing an implicit OPEN operation on
EDDALT. The actual file is EDDALT.

Recovery . . . : Check the job log for a complete description of
CPF4128, and contact the person responsible for program maintenance.
If the
file has a device type of SPECIAL, there may be no message in the job
Possible choices for replying to message . . . . . . . . . . . . . . . :

D -- Obtain RPG formatted printout of system storage.

S -- Obtain printout of system storage.

I think you're right about the testing with cpf1002 in place of cpf4128,
which also may be a couple layers deep (higher) in the call stack...

Rethinking ....

John B

IMPORTANT NOTICE: This message is intended only for the addressee and
may contain confidential, privileged information.
If you are not the intended recipient, you may not use, copy or disclose
any information contained in the message.
If you have received this message in error, please notify the sender by
reply e-mail and delete the message.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].