这是我的 cobol 代码。我的 cobol 文件夹中有 testinput.txt。我编译了它,它没有错误,但是当我尝试运行它时,
有一条消息说 RCL0002: File status 39 on < unopened-file > 在程序 TEST 的段 00 的偏移量 0046 处检测到错误
IDENTIFICATION DIVISION.
PROGRAM-ID. transactionIN.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-PC.
OBJECT-COMPUTER. IBM-PC.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT INFILE ASSIGN TO 'testinput.txt'.
SELECT OUTFILE ASSIGN TO 'testoutput'.
DATA DIVISION.
FILE SECTION.
FD INFILE
LABEL RECORD IS STANDARD
DATA RECORD IS INREC.
01 INREC.
02 AC PIC X(99).
FD OUTFILE
LABEL RECORD IS OMITTED
DATA RECORD IS OUTREC.
01 OUTREC.
02 …Run Code Online (Sandbox Code Playgroud)