Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Confusion in READ statement if the file is empty

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
dipanshu

New User


Joined: 16 Jan 2006
Posts: 53
Location: pune

PostPosted: Wed Feb 08, 2006 6:38 pm    Post subject: Confusion in READ statement if the file is empty
Reply with quote

READ FILE1
AT END
MOVE 'NO' TO ARE-THER-MOR-RECS
NOT AT END
PERFORM CHK-STATUS

Confusion - If the file is empty will it execute (chk-status para) ie not-end part

Pls assist
Back to top
View user's profile Send private message

Rupesh.Kothari

Member of the Month


Joined: 27 Apr 2005
Posts: 464

PostPosted: Wed Feb 08, 2006 7:03 pm    Post subject: Re: confusion in read stmt
Reply with quote

HI,

Quote:
READ FILE1
AT END
MOVE 'NO' TO ARE-THER-MOR-RECS
NOT AT END
PERFORM CHK-STATUS

Confusion - If the file is empty will it execute (chk-status para) ie not-end part



If file is empty then it will not execute CHK-STATUS

Hope this helps

Regards
Rupesh
Back to top
View user's profile Send private message
umeshkmrsh

New User


Joined: 21 Sep 2005
Posts: 79
Location: India

PostPosted: Fri Feb 10, 2006 5:35 pm    Post subject:
Reply with quote

umeshkmrsh wrote:
It will not execute CHK-STATUS.
Back to top
View user's profile Send private message
priti

New User


Joined: 29 Sep 2005
Posts: 3

PostPosted: Fri Feb 10, 2006 6:54 pm    Post subject: Re: confusion in read stmt
Reply with quote

The file being empty, the 'AT END ' clause will be executed
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Sat Feb 11, 2006 6:14 am    Post subject:
Reply with quote

Hi,

There are 2 kinds of empty:

1) If the file was never opened/closed, it is uninitialized and not a valid file.

2) If it was opened/closed but never written to, it is a valid file with no records.

In the 1st instance, if you attempt to open the file, it will produce an error.
In the 2nd, the open is successful and the 1st read produces an EOF condition.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts COB2 file processing rizwanaccy COBOL Programming 8 Tue Jan 02, 2018 1:00 pm
No new posts KSDS and Index file in cobol deepak14450 COBOL Programming 9 Fri Dec 22, 2017 9:36 am
No new posts Preserve order in Input File pshongal DFSORT/ICETOOL 13 Thu Dec 21, 2017 4:20 pm
No new posts ISSUE IN copying Sequential file reco... thesumitk JCL & VSAM 2 Wed Dec 13, 2017 3:07 pm
No new posts File Tailoring -- Temporary dataset i... samzee71 CLIST & REXX 3 Fri Dec 01, 2017 3:12 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us