COBOL读取文件并进行计算然后输出？

Question

COBOL读取文件并进行计算然后输出

Answer 1

DATA DIVISION中的FILE SECTION里定义文件的field时， 把相应的字段定义为数字型的就可以了。比如FILE SAMPFILE中一个RECORD的长度是40，你想把前五位读成数字型:DATA DIIVISION.FILE SECTION.FD SAMPFILE.01 SAMPFILE-REC.05 SAMPFILE-NUM PIC 9(8).05 FILLER PIC X(32).