COBCH0576S Preceding statement is not imperative

2 posts / 0 new
Last post
Anonymous (not verified)
COBCH0576S Preceding statement is not imperative

 

 

 

 

 

I am getting compile error in the following program when it is compiled on Mainframe express using the compiler directive COBOL for OS/390
 
           OPEN INPUT INPUTFL.
           MOVE 'N' TO  EOF-INPUT-FILE.
           PERFORM UNTIL EOF-INPUT
             READ INPUTFL AT END
                SET EOF-INPUT TO TRUE
             IF NOT EOF-INPUT
                DISPLAY FILE-SIZE
             END-IF
           END-PERFORM
           STOP RUN.
 
 
Can someone please let me know what could be the issue?
"; ; ; ;
Anonymous (not verified)
reply

 

Use END-READ to terminate the READ statement
 
             READ INPUTFL AT END
                SET EOF-INPUT TO TRUE
             END-READ 
Log in or register to post comments
Sponsored Listing

Click the +1 button  below to share it with your friends and colleagues

 

Share this if you liked it!

 

Disclaimer

Navigation