cobol open文件写文件 a 换行 b 换行 c，怎么实现

在 COBOL 中，要实现将 "a", "b", "c" 写入文件并在它们之间换行，可以使用多个 WRITE statement 并在数据项后添加新行符。例如：

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

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

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

在上面的例子中，使用了 NEWLINE 数据项来表示新行符。这个数据项的值取决于所使用的操作系统和文件类型，但通常是 CRLF（回车换行）符号。

相关问题

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 数据项将新文本写入文件。如果写入失败，将显示一条错误消息。

cobol 写文件实例

下面是一个简单的 COBOL 代码示例，用于将数据写入文件：

IDENTIFICATION DIVISION.
PROGRAM-ID. WRITE-FILE.

ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
    SELECT MY-FILE ASSIGN TO 'my-file.dat'
           ORGANIZATION IS LINE SEQUENTIAL.

DATA DIVISION.
FILE SECTION.
FD MY-FILE.
01 EMPLOYEE-DATA.
   05 EMPLOYEE-NAME     PIC X(20).
   05 EMPLOYEE-ID       PIC 9(5).

WORKING-STORAGE SECTION.
01 WS-RECORD.
   05 WS-NAME           PIC X(20).
   05 WS-ID             PIC 9(5).

PROCEDURE DIVISION.
MAIN-LOGIC.
    OPEN OUTPUT MY-FILE.
    MOVE 'John Smith' TO WS-NAME
    MOVE 12345 TO WS-ID.
    MOVE WS-NAME TO EMPLOYEE-NAME
    MOVE WS-ID TO EMPLOYEE-ID
    WRITE EMPLOYEE-DATA
    CLOSE MY-FILE.

    STOP RUN.

这个程序定义了一个名为 MY-FILE 的文件，其中包含两个字段： EMPLOYEE-NAME 和 EMPLOYEE-ID。程序使用 WORKING-STORAGE SECTION 中的 WS-RECORD 变量来存储要写入文件的数据。在 PROCEDURE DIVISION 中，程序打开 MY-FILE 文件，将数据写入 WS-RECORD，然后将 WS-RECORD 的值写入 MY-FILE，最后关闭 MY-FILE 文件。