RE: Insert a record

["Reeve Fritchman" <reeve@xxxxxxxxxx>]

This could be a problem if your file has a million records, right?  Relative
record number process implies physical proximity.  So, you have to
physically move the downstream records out of the way to insert one
upstream.  Remember, we're hardware-independent, so there isn't some
hardware trick you can use.

This must be an interesting application if you're using direct files...

Some solutions:
1. Write a program to start at the end of the file and move each record down
1 position (4-->5, 3-->4, etc.); then insert your record.
2. Add a sequencing field, add the record to the end, RGZPFM by key, and
then reset your sequence numbers.
3. Redesign the application to use keys.

You don't have to undelete a deleted record in a direct file.  "Write" to a
black hole is okay; at this level, the system sees the space as available.

-----Original Message-----
From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]On
Behalf Of Condon, Mike
Sent: Monday, October 22, 2001 10:26 AM
To: 'rpg400-l@midrange.com'
Subject: RE: Insert a record

Here's an example:

File with records

(RRN1) AAAA
(RRN2) BBBB
(RRN3) CCCC
(RRN4) DDDD

I would like to insert record 1234 using RRN3 so the file looks like:
(RRN1) AAAA
(RRN2) BBBB
(RRN3) 1234
(RRN4) CCCC
(RRN5) DDDD


-----Original Message-----
From: bill.reger@convergys.com [mailto:bill.reger@convergys.com]
Sent: Monday, October 22, 2001 9:00 AM
To: rpg400-l@midrange.com
Subject: RE: Insert a record



Mike,

This is a bit confusing to us.  Are you wishing to specify a RRN that is a
deleted record so that you can "insert" a record over the top of a deleted
record?  If this is your intent, you must "undelete" the RRN first and then
update it.

Bill




"Condon, Mike" <M1C@ingersoll-imc.com>@midrange.com on 10/22/2001 09:53:29
AM

Please respond to rpg400-l@midrange.com

Sent by:  rpg400-l-admin@midrange.com


To:   "'rpg400-l@midrange.com'" <rpg400-l@midrange.com>
cc:
Subject:  RE: Insert a record


Yes, exactly.

-----Original Message-----
From: Booth Martin [mailto:Booth@MartinVT.com]
Sent: Monday, October 22, 2001 8:39 AM
To: rpg400-l@midrange.com
Subject: Re: Insert a record


"Insert" implies to me that you wish to place the new record in the midst
of
existing records?

--------------------------------------------
Booth Martin
Boothm@Goddard.edu
802-454-8315 x235
--------------------------------------------
-------Original Message-------
From: rpg400-l@midrange.com
Date: Monday, October 22, 2001 09:21:31 AM
To: 'rpg400-l@midrange.com'
Subject: Insert a record
Is there a way to insert a record into a physical file using the relative
record number?
_______________________________________________
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
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@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.




--

NOTICE:  The information contained in this electronic mail transmission is
intended by Convergys Corporation for the use of the named individual or
entity to which it is directed and may contain information that is
privileged or otherwise confidential.  If you have received this electronic
mail transmission in error, please delete it from your system without
copying or forwarding it, and notify the sender of the error by reply email
or by telephone (collect), so that the sender's address records can be
corrected.


_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
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@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.