COBOL文件的写入

来源：百度知道 编辑：UC知道 时间：2024/06/03 13:34:19
谁能给个简单点的例子。。。。。网上找了个教程。。。太繁杂了。。。看不懂！！
就比如说我现在随便写几句话到“E:\TEST.TXT”文件里！怎么实现？

能再简练点么。。。。我是昨天才接触COBOL的。。。

然后我是想随便写几句话（把这几句话赋给几个变量）写到一个文件里。。。不是从一个文件里读了之后再写到另一个文件里！！

IDENTIFICATION DIVISION.
PROGRAM-ID. TEST1.
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT OUT-FILE ASSIGN TO EXER03O.
DATA DIVISION.
FILE SECTION.
FD OUT-FILE LABEL RECORD IS STANDARD RECORDING MODE IS F.
01 OUT-R.
02 OUT-REC PIC X(80).
PROCEDURE DIVISION.
S. OPEN OUTPUT OUT-FILE.
MOVE SPACE TO OUT-R.
M. MOVE 'HELLO WORD!' TO OUT-REC.
WRITE OUT-R.
E. CLOSE IN-FILE , OUT-FILE.
STOP RUN.

可以随便些什么到出力文件，但是如果要输出到E:\TEST.TXT文件中，需要你在编译或者执行环境中指定才行

000010 IDENTIFICATION DIVISION.
000060 PROGRAM-ID. AKITA.
000070*