Re: Write a record at a specific RRN

Don't think you ever "write" in a direct file, just read and update. The
record's already there, so write should fail.

If you have a file with 1,000 records, you can access them via RRN. Want
to add a new record? Just redefine the file as *OUTPUT and use a normal
(non-direct) write...and then you can access record 1,001 via its RRN.

On Wed, Aug 11, 2021 at 1:51 PM Brian Parkins <goodprophet.bp@xxxxxxxxx>
wrote:

On 11/08/2021 20:47, Paul Nicolay wrote:

Now the question is still... how do I "fill" such a deleted record

(either via native IO or even better via SQL) ?

Something along these lines?

Dcl-F MyFile Disk Usage(*Output:*Delete) RecNo(RRNVar);
Dcl-S RRNVar Int(5);

// Build new record to add
RRNVar = 10;
Write DepartFmt; // Record overwrites RRN 10

Brian.
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com