How to insert a record in between two records

Select-mf · New User Joined: 11 May 2007 Posts: 42 Location: bangalore

Hi,

I have an input indexed sequential file. The records are like

4785 John
8967 Ravi
2513 Amit
6842 Sunil

I want to insert a record say 8219 Vivek between the second and third record.
I believe I have to make use of Access mode as Dynamic and using Start Key statement in my procedure division, but I do not know how exactly I have to code it.

Thanks.

enrico-sorichetti · Posted: Mon Jun 08, 2009 6:46 pm

Your record will be inserted in the proper KEY sequence,

after the record with the key lower than YOURKEY
before the record with the key higher than YOURKEY

anyway the record sequence shown does not indicate any proper KEY sequence

please reformulate Your question in a consistent way wit a consistent data sample

Select-mf · New User Joined: 11 May 2007 Posts: 42 Location: bangalore

Hi,

I got to know that I have to move part of the value for the key in Start Key = (part of the value of key) i.e. 821 in this case and then do the Read Next.

Please let me know if I am somehow correct.

Thanks.

enrico-sorichetti · Posted: Mon Jun 08, 2009 6:47 pm

it is not clear what You are talking about...
the data sample does not match any key sequence

Select-mf · New User Joined: 11 May 2007 Posts: 42 Location: bangalore

Hi,

Do I have to move 2 to Emp-No (If Emp-No is my Key and 2 is the second record) first and then make use of Start Key = Emp-No and then use Read Next followed by Write statement inserting 8219 Vivek after the second record.

Thank.

Robert Sample · Posted: Mon Jun 08, 2009 6:59 pm

enrico-sorichetti · Posted: Mon Jun 08, 2009 7:01 pm

please use the proper terms...

indexed sequential ... specify what You mean ( VSAM KSDS most probably )

if not , what else ??

again, please, clarify better Your environment

Select-mf · New User Joined: 11 May 2007 Posts: 42 Location: bangalore

Hi Robert,

I understood now what I had to provide earlier. My Data key is Numeric field and would like to insert record between

4785 John
6842 Sunil

The output should be

2513 Amit
4785 John
8219 Vivek
6842 Sunil
8967 Ravi

Thanks.

Robert Sample · Posted: Mon Jun 08, 2009 7:10 pm

If the file is indexed sequential, you have absolutely no control over where the record is inserted. The key determines the location, not you.

enrico-sorichetti · Posted: Mon Jun 08, 2009 7:12 pm

no way to make the gentleman understand

Select-mf · New User Joined: 11 May 2007 Posts: 42 Location: bangalore

Hi,

Fine. If I have 5 records in my indexed sequential file and I want to read the records from 3rd record what should be my Start Key command?

Thanks.

Anuj Dhawan · Posted: Mon Jun 08, 2009 7:16 pm

/Rant on
Who ever invented indexed sequential Files will Suicide after looking at this thread..
/Rant off

enrico-sorichetti · Posted: Mon Jun 08, 2009 7:19 pm

look like we are all losing time...
in a keyed, indexed ... call it any way You want, there is no concept of relative record number

the relative record number does not depend on the sequence of writes/inserts
but on the key sequence

so the content of what You call the third record depends on the keys

expat · Posted: Mon Jun 08, 2009 7:20 pm

WOW, and I spent ages in the dark distant past converting ISAM to VSAM.

Are there really sites out there still back in the dark ages and really using ISAM

enrico-sorichetti · Posted: Mon Jun 08, 2009 7:21 pm

I gave the ts the benefit of doubt...

index sequential ksds do not make any difference , do not have any impact

on the TS misconception, poor understanding of things

ok for a bit of language barrier, but this is too much

Robert Sample · Posted: Mon Jun 08, 2009 8:59 pm

Marso · Posted: Tue Jun 09, 2009 2:37 am