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 SORTJOIN - Copy Matched and Unmatched... Steve Ironmonger DFSORT/ICETOOL 5 Tue Jan 17, 2017 4:26 pm
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm


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