READ 语句的一般形式:READ 文件名 RECORD [INTO 标识符] [AT END 执行语句] , 例如: READ IN-FILE INTO TEMP-RECORD AT END STOP RUN 该语句除了将读到的数据传送到IN-RECORD之外,还传送到TEMP-RECORD中。在遇到文件尾时,程序结束运行。 4。WRITE语句:将内存中的数据输出到外部设备,主要是由WRITE 语句来完...
READ 语句的一般形式:READ 文件名 RECORD [INTO 标识符] [AT END 执行语句] , 例如: READ IN-FILE INTO TEMP-RECORD AT END STOP RUN 该语句除了将读到的数据传送到IN-RECORD之外,还传送到TEMP-RECORD中。在遇到文件尾时,程序结束运行。 4。WRITE语句:将内存中的数据输出到外部设备,主要是由WRITE 语句来完...
READ file-name NEXT RECORD INTO ws-file-structure AT END DISPLAY 'End of File' NOT AT END DISPLAY 'Record Details:' ws-file-structure END-READ. 1. 2. 3. 4. 下面是所使用的参数: NEXT RECORD是可选的,在顺序读取索引顺序文件时指定。 INTO子句是可选的。ws-file-structure在工作存储节中定义,...
READ 语句就是从外部文件上读入数据输 出到程序中的数据项中。在程序中用到的所有文件都需要在环境部中指定程序中用到的文件名与实际外部文件的联系。数据部也要对文件加以描述。指定数据结构各数据项所占的内存单元长度以及数据形式。 COBOL 的存取是以文件为对象以记录为单位的。 READ语句的最简单的格式为: READ...
.MOVEUSERNAMETOPA-USERNAME.MOVESPACESTOPA-AGE.STARTPAKEYNOTLESSTHANPA-KEYINVALIDKEYMOVE"40"TOSTATUS-PA.IFSTATUS-PANOT=IOKGOTO100-PROCESS-EXITEND-IF.*开始读文件,这时候读文件要用到next,来移动游标READPANEXTATENDMOVE"10"TOSTATUS-PA.IFSTATUS-PANOT=IOKMOVE"Y"TOEND-OF-CBGOTO200-PROCESS-EXITEND-...
READ 顺序访问方式读文件。一定要有NEXT字样。 READ file-name [NEXT] RECORD [INTO data1] [AT END statements][NOT AT END statements] [END-READ] 如果READ成功且有INTO,将读到的数据写入data1。 如果文件中没有记录,执行AT ENDstatements,如果没有就执行USE。
READ语句的一般形式:READ文件名RECORD [INTO标识符] [AT END执行语句],例如: READ IN-FILE INTO TEMP-RECORD AT END STOP RUN该语句除了将读到的数据传送到IN-RECORD之外,还传送到TEMP-RECORD中。在遇到文件尾时,程序结束运行。 4。WRITE语句:将内存中的数据输出到外部设备,主要是由WRITE语句来完成的。WRITE语...
READ 语句的一般形式:READ 文件名 RECORD INTO 标识符 AT END 执行语句 , 例如:READ 18、;IN-FILE INTO TEMP-RECORD AT END STOP RUN 该语句除了将读到的数据传送到IN-RECORD之外,还传送到TEMP-RECORD中。在遇到文件尾时,程序结束运行。4。WRITE语句:将内存中的数据输出到外部设备,主要是由WRITE 语句来完成...
ACCESS MODE IS DYNAMIC • 在读取文件时应使用: READ 文件名 NEXT RECORD [INTO 标识符] [; AT END 强制语句] 注意: READ语句有两种形式,而对于WRITE,REWRITE和 DELETE语句,没有NEXT可选项,只能用随机方 式处理。 对索引文件的READ NEXT语句的用法也是一样的。 ?
read语句得一般形式 :read文件名recordinto标识符atend执行语句 ,例如:readin-fileintotemp-recordatendstoprun该语句除了将读到 11、得数据传送到 in-record之外, 还传送到 temp-record中。在遇到文件尾时 , 程序结束运行。4。write语句: 将内存中得数据输出到外部设备, 主要就是由 write 语句来完成得。write...