cobol open文件写文件如何换行

在 COBOL 中，写入文件时可以使用 WRITE statement 来实现。要换行，可以在数据项后添加一个新行符，如下所示：

WRITE file-name RECORD
    INVALID KEY
        DISPLAY "Error writing record"
    END-WRITE

在数据项后添加一个新行符的方法取决于所使用的操作系统和文件类型。例如，对于 Windows 平台上的文本文件，可以使用 CRLF（回车换行）符号来表示新行，如下所示：

WRITE file-name RECORD
    INVALID KEY
        DISPLAY "Error writing record"
    END-WRITE

ADD 1 TO line-counter
MOVE line-counter TO line-number
MOVE "This is a new line of text" TO line-text
WRITE file-name AFTER ADVANCING 1 LINE
    line-number
    line-text
    INVALID KEY
        DISPLAY "Error writing record"
    END-WRITE

在上面的例子中，WRITE statement 的 AFTER ADVANCING 1 LINE 选项告诉 COBOL 在写入数据项后将光标向下移动一行。然后，使用 line-number 和 line-text 数据项将新文本写入文件。如果写入失败，将显示一条错误消息。