reading file with out lock

[shaily123]

Hi, I am new to cobol. I have to read an index file for specific key but with out locking the file. That specific key is not unique.


I looked in to books and got confuse. Do i have to first START the file then READ it with NEXT.

or I can directly read the file.

Please help.....

 

[MuadDubby]

If your key is not unique, then you'll have to do a START, and then READ NEXT until EOF or the key value changes.

some pseudo code:

start my-file my-file-key2 >= ws-key-value

read my-file next record

perform until eof or my-file-key2 not = ws-key-value
  do logic on record
  read my-file next record
end-perform

.DaviD.

 

[shaily123]

Thamks David.

 

[fredericofonseca]

If you wish to read the record without locking the file you will need to open the file as input, or to issue a read no lock (if you only wish not to lock the record).

Depending on your compiler/os you may need to do further things.

Regards

Frederico Fonseca
SysSoft Integrated Ltd

http://www.syssoft-int.com

 

[MuadDubby]

You're welcome shaily. Hope you're ok now.

.DaviD.