Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
Finding end of instream in COBOL Accept

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Interview Questions
Author Message
Anand78

New User


Joined: 06 Mar 2006
Posts: 48
Location: PUNE
PostPosted: Mon Aug 25, 2008 9:01 pm    Post subject: Finding end of instream in COBOL Accept
 Reply with quote
Hi ,


Like we check end of file while reading a file in cobol pgm, is there any
way , if cobol pgm uses ACCEPT to read values from SYSIN card?

//SYSIN DD *
vvvvvvv
aaaaaa
nnnnnn
/*
//

Anand
Back to top
View user's profile Send private message
References
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 989
Location: Virginia, USA
PostPosted: Mon Aug 25, 2008 9:14 pm    Post subject:
Reply with quote
Move low values to the field you are accepting, if after the accept it is still low values then you have reached the end of the sysin. Most sites do not allow multiple accepts from sysin.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Interview Questions All times are GMT + 6 Hours
Page 1 of 1