COBOL File status 90 - Why?

Deepti Bhopatkar · New User Joined: 11 Apr 2006 Posts: 8 Location: Pune

What does file status 90 means? i am encountering it in a flat file which is opened in an I-O mode? ( As per the info from error assist it says that it is some VSAM logic error . But in my case it is a flat file ).

DavidatK · Posted: Wed May 10, 2006 7:06 pm

Hi

First, here is the link to the COBOL status keys. Look for File Status key 90.

/references/a27.html

If you can post the entire program, if it's not to big, would be best. But if not, would you please post important parts, SELECT, FD, OPEN, READ, etc.

and any messages you might get pertaining to this in sysout.

Thanks,

Dave

nallapureddy · New User Joined: 27 Jul 2005 Posts: 18

i guess we cannot open a flat file in i-o mode
if at all u want to update it open it in extend mode

thanks,
nallapureddy

ranga_subham · New User Joined: 01 Jul 2005 Posts: 51

nallapureddy,

We use I-O mode to update and EXTEND mode to add records at end in a COBOL program.

Certainly, you can open a flat file in I-O mode.

Let me know if you have more doubts.

HTH.

nallapureddy · New User Joined: 27 Jul 2005 Posts: 18

in i-o mode we can just rewrite a record for sequential files.
If we want to insert a new record we must open it in extend mode.

muthuvel · Posted: Fri May 12, 2006 11:53 am

Deepti,

If my guess is correct the flat file which you are using might have been created with STORCLASS=COMPRESS mode in the PROC or JCL ,so when it is opened in I/O mode it creates the problem.To rectify this remove the COMPRESS mode during creation of the file so that this issue is resolved.

Correct me If I am wrong.

Regards,
Muthuvel.

Deepti Bhopatkar · New User Joined: 11 Apr 2006 Posts: 8 Location: Pune

Hi Muthuvel

Yes u r right .... i had just corrected this n at the same time got yr reply ...
Thanks a lot to everybody for their help !!!!

Regards,
Deepti

mmwife · Super Moderator Joined: 30 May 2003 Posts: 1592

Also remember that if the "flat file" is on tape, updating a rec in it is difficult (some at IBM say it's impossible).