David,
I know the Help Text for the Copy Object command (COPY) doesn't list
CPFA09E as one of the errors, I can only surmise that it was added as an
error after the Help Text was written. Below is a snippet from two
joblogs, one that caught the error and executed the DLYJOB and one that
didn't:
Message . . . . : 10000 - COPY
OBJ('/Trnsfrin/CCHD3334')
TOOBJ('/qsys.lib/qtemp.lib/UTZ014TEMP.file/UTZ014TEMP.mbr')
TOCCSID(*CALC)
REPLACE(*YES)
CPFA09E Escape 40 06/27/08 15:02:03.708584
QP0LCCFN QSYS *STMT PUTZ014 CBSUSER *STMT
From module . . . . . . . . :
QP0LCEXH
From procedure . . . . . . :
qgc_sendpm__Fv
Statement . . . . . . . . . : 17
To module . . . . . . . . . :
PUTZ014
To procedure . . . . . . . :
PUTZ014
Statement . . . . . . . . . :
10000
Message . . . . : Object in use.
Object is /Trnsfrin/CCHD3334.
Cause . . . . . : An operation
attempted to use object /Trnsfrin/CCHD3334.
This object is currently in use.
Recovery . . . : Allow time for the
current operation to complete and
then retry. If no operation is being
performed, determine if the
object is checked out. If it is, use the Check
In Object (CHKIN) command to
check in the object and then retry. To
determine what is currently using
the object or if the object is checked
out, you can use the Retrieve
Object References (QP0LROR) API, or examine
the object's properties using
iSeries Navigator. Additionally, the Work with
Object Links (WRKLNK) or Display
Object Links (DSPLNK) commands can be used
to determine if the object is
checked out.
*NONE Command 06/27/08 15:02:03.708832
QCADRV QSYS 03AE PABZ001TST UAUSR *STMT
To module . . . . . . . . . :
PABZ001TST
To procedure . . . . . . . :
PABZ001TST
Statement . . . . . . . . . :
8400
Message . . . . : 8400 - DLYJOB
DLY(300)
\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/
\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/
\/\/\/\
Message . . . . : 10000 - COPY
OBJ('/Trnsfrin/CCHD3334')
TOOBJ('/qsys.lib/qtemp.lib/UTZ014TEMP.file/UTZ014TEMP.mbr')
TOCCSID(*CALC)
REPLACE(*YES)
CPFA09E Escape 40 06/27/08 01:20:12.076528
QP0LCCFN QSYS *STMT PUTZ014 CBSUSER *STMT
From module . . . . . . . . :
QP0LCEXH
From procedure . . . . . . :
qgc_sendpm__Fv
Statement . . . . . . . . . : 17
To module . . . . . . . . . :
PUTZ014
To procedure . . . . . . . :
PUTZ014
Statement . . . . . . . . . :
10000
Message . . . . : Object in use.
Object is /Trnsfrin/CCHD3334.
Cause . . . . . : An operation
attempted to use object /Trnsfrin/CCHD3334.
This object is currently in use.
Recovery . . . : Allow time for the
current operation to complete and
then retry. If no operation is being
5722SS1 V5R4M0 060210 Job Log
BANKUA 06/27/08 04:58:01 Page 10
Job name . . . . . . . . . . : IUPABZ001 User . . . . . . :
SVCBCHSCD Number . . . . . . . . . . . : 407629
Job description . . . . . . : QBATCH Library . . . . . :
BNKPRD01
MSGID TYPE SEV DATE TIME FROM
PGM LIBRARY INST TO PGM LIBRARY INST
performed, determine if the
object is checked out. If it is, use the Check
In Object (CHKIN) command to
check in the object and then retry. To
determine what is currently using
the object or if the object is checked
out, you can use the Retrieve
Object References (QP0LROR) API, or examine
the object's properties using
iSeries Navigator. Additionally, the Work with
Object Links (WRKLNK) or Display
Object Links (DSPLNK) commands can be used
to determine if the object is
checked out.
CPF9999 Escape 40 06/27/08 01:20:12.088040
QMHUNMSG *N PUTZ014 CBSUSER *STMT
To module . . . . . . . . . :
PUTZ014
To procedure . . . . . . . :
PUTZ014
Statement . . . . . . . . . :
10000
Message . . . . : Function check.
CPFA09E unmonitored by PUTZ014 at
statement 0000010000, instruction
X'0000'.
Cause . . . . . : An escape
exception message was sent to a program which
did not monitor for that message.
The full name of the program to which the
unmonitored message was sent is
PUTZ014 PUTZ014 PUTZ014. At the time the
message was sent the program was
stopped at higher level language statement
number(s) 0000010000. If more
than one statement number is shown, the
program was a bound program.
Optimization does not allow a single statement
number to be determined. If *N is
shown as a value, it means the actual
value was not available. Recovery
. . . : See the low level messages
previously listed to locate the
cause of the function check. Correct any
errors, and then try the request
again.
CPA0702 Sender copy 99 06/27/08 01:20:12.088328
QCLXERR QSYS 00DA QCLXERR QSYS 00DA
Message . . . . : CPFA09E
received by procedure PUTZ014. (C D I R)
Cause . . . . . : ILE Control
language (CL) procedure PUTZ014 in module
PUTZ014 in program PUTZ014 in
library CBSUSER detected an error at statement
number 0000010000. Message text
for CPFA09E is: Object in use. Object is
/Trnsfrin/CCHD3334. Use F10 (if
available) or the Display Job Log
(DSPJOBLOG) command to see the
messages in the job log for a more complete
description of what caused the
error. If you still are unable to solve the
problem, please contact your
technical support person. Recovery . . . :
This inquiry message can be
avoided by changing the procedure. Monitor for
the error (MONMSG command) and
perform error recovery within the procedure.
To continue, choose a reply
value. Possible choices for replying to message
. . . . . . . . . . . . . . . :
C -- Cancel the CL procedure. D -- Dump
the CL procedure variables and
cancel the procedure. I -- Ignore the failing
command. R -- Try the failing
command again.
*NONE Reply 06/27/08 02:23:31.705096
QMHSCLVL QSYS 068A QCLXERR QSYS 00E7
From user . . . . . . . . . :
OPRTEMP
Message . . . . : R
\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/
\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/
\/\/\/\
If this is more than is supposed to be included in these mailing list
emails, I apologize. I'm just at my wit's end trying to unravel this. By
the way, the SBMJOB parameters for these two jobs are identical.
Again, thanks for any help that anyone can give me.
Rick Marchini
Associated Banc-Corp
IT Services
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of David Gibbs
Sent: Monday, June 30, 2008 9:56 AM
To: Midrange Systems Technical Discussion
Subject: Re: CPFA09E not recoginzed by MONMSG
Marchini, Richard wrote:
Help! I have a batch job that copies a file from the IFS to my System
i5. The file comes from outside the company and is approximately 6 GB,
so it takes a little time to fully arrive in the IFS. In my CL program
I monitor for messages CPFA09E, CPA0702 and CPF0000 and execute a
DLYJOB command and return to the failing copy program until it finally
arrives. When I test this CL, it works correctly, but in production,
it doesn't "catch" the MONMSG, and the system operator receives the
CPFA09E message.
Well, the CPY command doesn't list CPFA09E as an escape message it sends
... perhaps there is a different error that you should trap? I suspect
that CPFA09E is sent as a diagnostic.
david
--
IBM System i - For when you can't afford to be out of business
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at
http://archive.midrange.com/midrange-l.
*************************** NOTICE ***************************
This e-mail and attachment(s) may contain information that is
privileged, confidential, and/or exempt from disclosure under
applicable law. If the reader of this message is not the intended
recipient, you are hereby notified that any dissemination,
distribution, or copy of this message is strictly prohibited. If
received in error, please notify the sender immediately and
delete/destroy the message and any copies thereof. Although
Associated Banc-Corp and/or its affiliates (collectively
"Associated") attempt to prevent the passage of viruses via e-mail
and attachments thereto, Associated does not guarantee that either
are virus-free, and accepts no liability for any damage sustained
as a result of any such viruses.
Any federal tax advice contained in this communication (including
any attachments) is not intended or written to be used or referred
to in the promoting, marketing, or recommending of any entity,
investment plan or agreement, nor is such advice intended or written
to be used, and cannot be used, by a taxpayer for the purpose of
avoiding penalties under the Internal Revenue Tax Code.
midrange.com
