|
|
| Author |
Message |
chkiran2
New User
Joined: 24 Jun 2004
Posts: 25
Location: Gurgoan
|
|
|
|
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 |
|
 |
References
|
|
 |
sandip_datta
EXPERT
Joined: 02 Dec 2003
Posts: 152
Location: Tokyo, Japan
|
|
|
|
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 |
|
|
|
|
|
