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
 

 

EJECT statement help

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

New User


Joined: 24 Jun 2004
Posts: 24
Location: Gurgoan

PostPosted: Wed Aug 25, 2004 12:17 pm    Post subject: EJECT statement help
Reply with quote

Hi
I have the following layout in a COBOL program. Can some one explain me what exactly does EJECT statement do? Does coding the EJECT in this way effects the way the program is executed? And then the COPY book layout of BILPRGRET starts at which level 01 or 05?

Code:

01  WS-DISPLAY-AREA.
     05  WS-READ             PIC ZZZ,ZZZ,ZZ9      VALUE ZERO.
     05  WS-BYPASSED         PIC ZZZ,ZZZ,ZZ9      VALUE ZERO.
     05  WS-WROTE            PIC ZZZ,ZZZ,ZZ9      VALUE ZERO.
     EJECT
 
     COPY IDMS RECORD BILPRGRET.



Please help me analyzing this.

Thanks,
Kiran Kumar
Back to top
View user's profile Send private message

sandip_datta

Active User


Joined: 02 Dec 2003
Posts: 151
Location: Tokyo, Japan

PostPosted: Wed Aug 25, 2004 2:15 pm    Post subject:
Reply with quote

A little search gives me lots of result. From Manual -

Code:
The EJECT statement specifies that the next source statement is to be printed at the top of the next page.
The EJECT statement must be the only statement on the line. It can be written in either Area A or Area B, and can be terminated with a separator period.
The EJECT statement must be embedded in a program source. For example, in the case of batch applications, the EJECT statement must be placed between the CBL (PROCESS) statement and the end of the program (or the END PROGRAM marker, if specified).

The EJECT statement has no effect on the compilation of the source program itself.


Regards,
Sandip.
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 ROUNDED Problem with COMPUTE statement shalem COBOL Programming 11 Thu Feb 09, 2017 8:16 pm
No new posts VALIDATE NULL VALUE IN DB2 CASE STATE... useit DB2 5 Thu Feb 09, 2017 4:34 pm
No new posts -913/-911 Deadlock during UPDATE stat... NoSleep319 DB2 5 Fri Nov 18, 2016 12:37 am
No new posts COBOL DB2 - CALL statement - high CPU... TS70363 DB2 15 Sun Sep 11, 2016 6:07 am
No new posts Converting NULL column into NOT NULL ... Raghu navaikulam DB2 5 Sat Aug 06, 2016 3:45 pm


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