Re: RNQ1221 Update or delete in file <file name> without prior input operation (C G D F).

On 24-May-2017 13:38 -0600, Glenn Gundermann wrote:

This has me stymied. This program runs 50 times a day and it has had
an error 8 times in the last 4 weeks. It is getting RNQ1221 on the
delete: Update or delete in file SMWSHPPL without prior input
operation (C G D F).

fSMWSHPPL UF E K Disk

read smwshppl;
dow not %eof(smwshppl);
// some external call
delete RWSHPPL;
read smwshppl;
endDo;

*inlr = *on;
return;

Any ideas?

First thing I would do, is review the joblog for errors; e.g. any error(s) that precede(s) the msg RNQ1221.? The message means that the update capable ODP no longer has position to a record for which an update lock is held; e.g. the lock has been released, explicitly per release, or implicitly per change in position without also obtaining a record lock. If no errors, then I would expect that most likely, the external call [as broehmer alluded] was responsible for losing the position and/or record lock.