What will happen if empty vsam file is opened for input

knd_r · New User Joined: 18 Mar 2005 Posts: 48

hi,

what will happen if empty vsam file is opened for input?

bye,
ks reddy.

kanak · Moderator Joined: 12 Mar 2005 Posts: 252 Location: India

nothing, when u will try to read on the first read only it will give eof reached.

krishh · New User Joined: 20 May 2005 Posts: 12

hai,
a vsam file which is empty and if you want to read the empty file it is treated as unavilable.
so first open the vsam file for output and write dummy record in it.

knd_r · New User Joined: 18 Mar 2005 Posts: 48

then what is the vsam status code 13?

priya · Posted: Mon May 23, 2005 10:27 pm

There is no VSAM Status Code 13 as for as I know.

superk · Posted: Tue May 24, 2005 1:55 am

I'm curious to know how this situation could ever happen? I have never heard of a shop that would allow a new VSAM file definition to be run without a step to initialize the index-key to low-values. Is this not a standard practice, or are these questions more academic than real-world?

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

There can be 2 kinds of "empty" VSAM files. Files that never contained data and files that did but was later deleted.

Attempting to READ the 1st type results in an error condition; READing the 2nd type results in an EOF condition on the 1st READ.

kanak · Moderator Joined: 12 Mar 2005 Posts: 252 Location: India

hi jack,
one query, like you said

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

Hi Kanak,

I don't understand:

kanak · Moderator Joined: 12 Mar 2005 Posts: 252 Location: India

hi jack,
i mean to say that what will happen.
will it give error??? OR it will show EOF???.
Hope now you are clear with my doubt.

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

Hi Kanak,

Any VSAM file that has never contained data cannot be successfully READ.

If a VSAM file contained data at some point in the past (i.e. records were written to it) and that data was later deleted, you could successfully READ the file but you would encounter an EOF condition on the 1st READ (SC=10).

A similar condition exists when flat files are empty. They can be uninitialized (allocated, but never successfully OPENed and CLOSEd) or they can be functioning but empty files.

kanak · Moderator Joined: 12 Mar 2005 Posts: 252 Location: India

thanks jack for ur reply.Now got more better idea abt VSAM.

akatast · New User Joined: 05 Mar 2009 Posts: 15 Location: Ohio

@Priya,
VSAM Status Code 13 is there and I got that once. go througt this link www.simotime.com/vsmfsk01.htm

dick scherrer · Posted: Sat Aug 01, 2009 6:12 am

Hello and welcome to the forum,

It is more productive to reply to currently active topics rather than one that has been inactive for over 4 years

Enjoy the forum,

d

bajibabu · New User Joined: 01 Aug 2005 Posts: 5 Location: hyderabad

you will get vsam file status 35.

Anuj Dhawan · Posted: Thu Jan 13, 2011 1:00 pm

Dick - I can read your post, can others?

dick scherrer · Posted: Thu Jan 13, 2011 8:38 pm

Hi Anuj,

Most can - many don't

We can only try. . .

d

Phrzby Phil · Posted: Thu Jan 13, 2011 10:38 pm

You mean I waded thru all of this again for

dick scherrer · Posted: Fri Jan 14, 2011 12:45 am

Hi Phil,

Wade if ya wanna. . . we won't charge any extra

I tend to scrool down to the most current posts and then (if needed) look at the earlier stuff. . .

d

Frank Yaeger · Posted: Fri Jan 14, 2011 2:09 am

"scrool" - I imagine you meant scroll, but thinking about it, "scrool" could be a pretty cool word.

We just need to think of a real good definition for it - like "screaming drool" or "school rules" or ...

dick scherrer · Posted: Fri Jan 14, 2011 2:41 am

Yup, went keylexic - wrong double-letter. . . and they're so close on the keyboard . . .

Bill O'Boyle · Posted: Fri Jan 14, 2011 2:43 am

As soon as the program gains control, issue a CALL to IKJEFT01, building a PRINT INDATASET('YOUR.VSAM.FILE') COUNT(0) TSO command.

To make things easier, pass the DSN in a PARM card and let the program extract the DSN.

Upon return from IKJEFT01, if the LASTCC=0, then the file has data or had a record (or multiple records) written to it at one time and its/they've been deleted. It can then be opened as INPUT or I-O.

If the LASTCC=4, then the file is truly < EMPTY > and it needs to be opened as OUTPUT.

If the LASTCC is other than 0 and other than 4, then you've got other problems, such as the file is open/enabled to CICS.

You'll get several hundred hits for "IKJEFT01" when searched-for on all the IBMMAINFRAME forums.

You can experiment with the PRINT INDATASET('YOUR.VSAM.FILE') COUNT(0) TSO command after exiting ISPF, then followed by the Ready prompt and from here you can enter the command.

HTH....

Bill

Robert Sample · Posted: Fri Jan 14, 2011 2:45 am

I don't know ... I like the sound of

Frank Yaeger · Posted: Fri Jan 14, 2011 2:53 am