OPEN "mode" file-name. 复制 在这里,文件名是字符串文字,您将使用它来命名您的文件。可以在以下模式下Open 文件 - 序号模式与说明 1 Input 输入模式用于现有文件。在这种模式下,我们只能读取文件,不允许对文件进行其他操作。 2 Output 输出模式用于在文件中插入记录。如果一个sequential file被使用并且文件...
OPEN1.INPUT只读2.OUTPUT只写3.I-O读写4.EXTEND写（文件末尾追加）顺序文件（程序部） OPEN1.INPUT只读2.OUTPUT只写3.I-O读写4.EXTEND写（文件末尾追加）顺序文件（程序部） 读文件READfile-name[ATENDstatements][NOTATENDstatements]END-READ 顺序文件（程序部）写文件WRITErecord-name[fromident...
OPEN INPUT InputFile. OPEN OUTPUT OutputFile. PERFORM UNTIL EOF READ InputFile INTO InputRecord AT END SET EOF TO TRUE NOT AT END PERFORM FilterData. CLOSE InputFile. PERFORM SortData. PERFORM WRITEOutput. CLOSE OutputFile. STOP RUN. FilterData. IF InputRecord(1:1) = 'A' THEN ADD 1 ...
INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT OutputFile ASSIGN TO 'report.txt' ORGANIZATION IS LINE SEQUENTIAL. DATA DIVISION. FILE SECTION. FD OutputFile. 01 OutputRecord PIC X(80). WORKING-STORAGE SECTION. 01 WS-Report PIC X(80). PROCEDURE DIVISION. Open-File. OPEN OUTPUT OutputFile. Write...
语法:OPEN INPUT/OUPUT 文件名1[,文件名2……] 5.CLOSE(关闭语句):关闭文件。 语法:CLOSE 文件名1[,文件名2……] 二.算术运算语句 1.ADD(加法语句) 举例:ADD A TO B A+B→B ADD 15 TO C 15+C→C ADD A,B TO C A+B+C→C ADD 15,25 TO C 15+25+C→C ADD A,B GIVING C A+B--...
OPEN READ WRITE CLOSE 打开语句(OPEN 语句) OPEN 语句一般格式: OPEN INPUT OUTPUT 内部文件名 I-O EXPEND INPUT 方式:文件只能读取。如果要打开的输入文件不存在,则会触发出错误处理。 OUTPUT 方式:生成程序写入记录的新文件。如果要打开的输出文件已经存在,则所有记录被删除,否则生成新文件 ...
COBOL 基本语句--好东西
INPUT 文件名1 [,文件名2]。。。 OPEN OUTPUT 文件名3 [,文件名4]。。。 。。。 6。CLOSE语句:当对一个文件的读或写的操作已完成,就应关闭该文件。 CLOSE语句的一般格式为: CLOSE 文件名 1 [,文件名2]。。。 COBOL通过2位长度的文件状态字(FILE-STATUS)来表示文件的操作结果是否成功,常见的文件状态值...
OPEN "mode" file-name. 这里,file-name是字符串文字,您将使用它来命名文件。 可以在以下模式下打开文件 - 阅读动词 读动词用于读取文件记录。 read的功能是从文件中获取记录。 在每个读动词中,只能将一个记录读入文件结构。 要执行读取操作,请在INPUT或IO模式下打开文件。 在每个读取语句中,文件指针递增,因此读...
OPEN 41 文件已经打开 CLOSE 42 文件未打开 Delete,REWRITE 43 最近的操作不是READ WRITE,REWRITE 44 纪录长度非法 READ 46 没有有效的下一个记录 READ,START 47 文件未在INPUT或I–O方式中打开 WRITE 48 文件未在OUTPUT或EXTEND方式中打开 Delete,REWRITE 49 文件未在I–O方式中打开 ...