Re: CPF5125 error - activation group?

["Pete Clifford \(ariadne software\)" <pete@xxxxxxxxxxxxxxxxxxxxx>]

Is the file SHARE(*YES) or it it overridden to SHARE(*YES) anywhere? If so,
this is probably a factor. You can get this error if a file which is
SHARE(*YES) is opened for input first then another program attempts to open
it for update but shares the pre-existing ODP.

These things can be sporadic in the way you describe because the order of
events is significant and that can be unpredictable (e.g. it might depend on
the sequence in which a user selects options from a menu).

SHARE(*YES) is a Bad Thing IMHO. Light blue touch paper and retire
immediately...

----- Original Message ----- 
From: "John Furniss" <jfurniss@xxxxxxxxxxxxxxxxx>
To: <rpg400-l@xxxxxxxxxxxx>
Sent: Friday, August 08, 2003 4:08 PM
Subject: CPF5125 error - activation group?


> List,
>     I have an OPM program running (PROGA) that updates and writes to
> SLALLO and other Mapics files, such as MBADRES1. A trigger program
> (PROGB) with its own activation group is attached to SLALLO and also
> updates a LF over MBADREP. About once a week (usually 3:30 AM, of
> course!) the job blows up with CPF5125 I/O error was detected in
> MBADRES1, which is opened for update in PROGA. Can the activation group
> be causing this? The trigger was written and installed by a consultant,
> and I don't know enough about activation groups to know if this is
> helping or hurting my situation. Any ideas would be greatly appreciated.
>
> --
> John Furniss
> Applications Programmer
> Allied Machine & Engineering Corp.
> mailto:jfurniss@xxxxxxxxxxxxxxxxx
> Phone (330) 343-4283 ext. 8371
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
>