RE: CPF3130

[Buck Calabro <mcalabro@xxxxxxxxxxxx>]

Ron,
Run it again, and when it falls over with the CPF3130, look at the job
(DSPJOB or Sys Request 3) Look at the call stack - is the program you've
been compiling in there, or is a weirdly named program in QRPLOBJ in there?
If the latter, you're running the original copy of the program (pre MONMSG
perhaps?) and not the latest and greatest.  This is an artifact of
REPLACE(*YES).  If this is the case, end the job and start again with a new
job.  That will release the pointer to the old object (which was copied into
QRPLOBJ).
Check the job log for any previous errors.
Check the library list to make sure you're calling the program you think you
are.
Check the object (DSPPGM) to be sure it compiled at the date and time you
think it did.
Check the compiler listing for errors.

Buck Calabro
Aptis; Albany, NY

> -----Original Message-----
> From: Klein Ron 
> Sent: Monday, November 29, 1999 3:53 PM
> To:   'MIDRANGE-L (E-mail)
> Subject:      CPF3130
> 
> We have a CL program which needs to do a CLRPFM before the RPGILE program
> starts to write to it.  Right after the CLRPFM we do a MONMSG CPF3130.
> When
> we run the program it still blows up with the message that a CPF3130 has
> occurred because the file is in use.  And yes it is, we were holding it
> open
> with DBU.  Then I tried an ALCOBJ with the same MONMSG and go to the end
> of
> the program on that error; same result.  What am I doing wrong?  
> 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---