in COBOL Lesen Ich verwende OpenCobolIDE 4.7.4 unter Windows 10 (es auf Gnucobol basiert) und versucht, dieses Programm zu kompilieren eine Datei zum Lesen öffnen:Öffnungs Datei für
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT STUDENT ASSIGN TO 'input.txt'
ORGANIZATION IS LINE SEQUENTIAL.
DATA DIVISION.
FILE SECTION.
FD STUDENT.
01 STUDENT-FILE.
05 STUDENT-ID PIC 9(5).
05 NAME PIC A(25).
WORKING-STORAGE SECTION.
01 WS-STUDENT.
05 WS-STUDENT-ID PIC 9(5).
05 WS-NAME PIC A(25).
01 WS-EOF PIC A(1).
PROCEDURE DIVISION.
OPEN INPUT STUDENT.
PERFORM UNTIL WS-EOF='Y'
READ STUDENT INTO WS-STUDENT
AT END MOVE 'Y' TO WS-EOF
NOT AT END DISPLAY WS-STUDENT
END-READ
END-PERFORM.
CLOSE STUDENT.
STOP RUN.
Die input.txt ist im selben Verzeichnis wie die Quelle coude, aber ich bin immer noch die folgende Fehlermeldung erhalten:
Main.cob:24: libcob: File does not exist (STATUS = 35) File : 'input.txt'
Was mache ich falsch?
Sie hatten Recht, diese IDE legt ausführbare Dateien im bin-Verzeichnis des aktuellen Benutzers. – Quentin