Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups 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 Changing of LRECL of a file abdulrafi DFSORT/ICETOOL 2 Fri Mar 24, 2017 3:25 pm
No new posts splitting a file abdulrafi DFSORT/ICETOOL 3 Fri Mar 24, 2017 11:51 am
No new posts Receive a file using PCOMM macro Harald.v.K IBM Tools 0 Thu Mar 23, 2017 6:50 pm
No new posts Export flat file data into excel sheet murali.andaluri DFSORT/ICETOOL 2 Mon Mar 20, 2017 5:39 pm
No new posts Formatting VB File Learncoholic DFSORT/ICETOOL 3 Mon Mar 20, 2017 12:29 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us