Hi, that's my problem:
IDENTIFICATION DIVISION.
PROGRAM-ID.
BEISP13.
AUTHOR.
D. GOLDEN.
DATE-WRITTEN.
September 29, 1986.
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT ZEILENAUSGABE-DAT ASSIGN TO S-OUTPUT.
DATA DIVISION.
FILE SECTION.
FD ZEILENAUSGABE-DAT
LABEL RECORDS ARE OMITTED.
01 ZEILEN-SATZ PICTURE X(26).
PROCEDURE DIVISION.
AOOO-AUSGABE-NAME-UND-ADRESSE.
OPEN OUTPUT ZEILENAUSGABE-DAT.
MOVE 'DONALD G. GOLDEN' TO ZEILEN-SATZ.
WRITE ZEILEN-SATZ.
MOVE 'CIS DEPARTMENT' TO ZEILEN-SATZ.
WRITE ZEILEN-SATZ.
MOVE 'CLEVELAND STATE UNIVERSITY' TO ZEILEN-SATZ.
WRITE ZEILEN-SATZ.
MOVE 'CLEVELAND, OHIO 44115' TO ZEILEN-SATZ.
WRITE ZEILEN-SATZ.
CLOSE ZEILENAUSGABE-DAT.
STOP RUN.
What's wrong?
Micro Focus Publishing
Personal Cobol, Version 2.0.02
bianca
IDENTIFICATION DIVISION.
PROGRAM-ID.
BEISP13.
AUTHOR.
D. GOLDEN.
DATE-WRITTEN.
September 29, 1986.
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT ZEILENAUSGABE-DAT ASSIGN TO S-OUTPUT.
DATA DIVISION.
FILE SECTION.
FD ZEILENAUSGABE-DAT
LABEL RECORDS ARE OMITTED.
01 ZEILEN-SATZ PICTURE X(26).
PROCEDURE DIVISION.
AOOO-AUSGABE-NAME-UND-ADRESSE.
OPEN OUTPUT ZEILENAUSGABE-DAT.
MOVE 'DONALD G. GOLDEN' TO ZEILEN-SATZ.
WRITE ZEILEN-SATZ.
MOVE 'CIS DEPARTMENT' TO ZEILEN-SATZ.
WRITE ZEILEN-SATZ.
MOVE 'CLEVELAND STATE UNIVERSITY' TO ZEILEN-SATZ.
WRITE ZEILEN-SATZ.
MOVE 'CLEVELAND, OHIO 44115' TO ZEILEN-SATZ.
WRITE ZEILEN-SATZ.
CLOSE ZEILENAUSGABE-DAT.
STOP RUN.
What's wrong?
Micro Focus Publishing
Personal Cobol, Version 2.0.02
bianca