RE: RPG Subfile run time error message

[steema@xxxxxxxxxxxxx]

Yep thanks guys, I hadn't seen that problem before. I was out of
programming for a few years until recently.

> Steve,
>       The message is telling you that you have other code that has
> already locked that DB record to this current job (note the member
> reference in the message).  It could be that the same program or a
> utility program that has *INLR off has that particular record already
> locked for another reason.  It has nothing to do with your sub-file.  I
> have done this in the past when I use a PF and LF in the same program
> both with update capabilities and attempt to get the same record using
> somewhat different keys lists.  I get around this by always loading the
> sub-file with out the lock capability (ie, read (N)) and using only one
> file definition as the update source.
>
> Thanks, Matt
>
>
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of steema@xxxxxxxxxxxxx
> Sent: Thursday, March 16, 2006 8:08 AM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: RPG Subfile run time error message
>
> Nope, it craps out on RRN 175. Makes 0 sense at the moment.
>
>> Is it possible that your date range in days is greater than the size
> of
>> the field holding it, so it rolls around and begins again?
>>
>> lets say the delta of days is 4 years, or 1300 days.  If your field is
>> 3/0 then it can only hold 999 days.
>>
>> steema@xxxxxxxxxxxxx wrote:
>>> HI I am running a fairly basic subfile program in RPG ILE. I get this
>>> message that is stumping me. For the dates from and to, when I put in
> a
>>> huge range this is what occurs. When I put in a smaller range, it
> does
>>> not
>>> occur.
>>>
>>>  CALL PGM(EDRHKSP) PARM('1' '  ')
>>>  Record 144 member EFLJ6HKPA already locked to this job.
>>>  C
>>>  Record 144 member EFLJ6HKPA already locked to this job.
>>>  C
>>>  I/O error CPF5032 was detected in file EFLJ6HKPA.
>>>  I/O error CPF5032 was detected in file EFLJ6HKPA.
>>>  Unmonitored exception at line 244
>>>
>>> Any help would be greatly appreciated,
>>> Steve
>>>
>> --
>> 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.
>>
>>
>
> --
>
> 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.
>
>
> --
> 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.
>
>