Custom Search
COBCH0576S Preceding statement is not imperative
Thu, 07/14/2011 - 08:09
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?
";
;
;
;
Thu, 09/08/2011 - 10:08
#1
reply
Use END-READ to terminate the READ statement
READ INPUTFL AT END
SET EOF-INPUT TO TRUE
END-READ
Top
Click the +1 button below to share it with your friends and colleagues
Share this if you liked it!