cobol (笔记1)

今天第一次接触cobol,讲师是一英国人,听起课来真是吃力呀,唉....英语不好,国内有两本书感觉还行,cobol简明教程和cobol程序语言设计（谭浩强）

下面是第一个程序和一个hello程序,使用工具为fujitsu cobol 3.0

首先打开programming-staff,file-->new出现editor区,file-->new写入你的程序,保存关闭,回到programming-staff在tools菜单下选wincob-->source file-->ok出现msg提示,STATISTICS: HIGHEST SEVERITY CODE=I, PROGRAM UNIT=1
表示正确编译

接下来在programming-staff中选tools 菜单,winlink-->link file输入框中输入文件如:C:/COBOLSource/PROG-2.OBJ这里在target输入框中会出现相同的文件路径,这时我把COBOLSource必为COBOLLOAD,改为我在没改的情况下,操作失业,COBOLLOAD文件夹要先建好.然后点击ok,新窗口,关闭除staff窗口外的其余窗口.

最后下步.tools-->winexec-->在command line办入框入输入你的经过link之后的文件名如我的是:C:/COBOLLOAD/PROG-2.EXE-->点击OK,出现新窗口在list输表中选择你想要相关项,我暂时用的是@IconName=COB85EXE其它项我还不太清楚,和讲师语言不通,想问都不行呀.-->ok运行

保存文件名为prog1

 @OPTIONS MAIN
 IDENTIFICATION DIVISION.
 PROGRAM-ID. PROG1
 AUTHOR. JEFF
 ENVIRONMENT DIVISION.
 CONFIGURATION SECTION.
 SOURCE-COMPUTER. IBM-PC.
 OBJECT-COMPUTER. IBM-PC.
 INPUT-OUTPUT SECTION .
 FILE-CONTROL.
     SELECT IN-FILE ASSIGN "INPUT.TXT"
    ORGANIZATION LINE SEQUENTIAL.
 DATA DIVISION.
 FILE SECTION.
 FD IN-FILE.
    01 IN-RECORD   PICTURE X(80).
 PROCEDURE DIVISION.
     OPEN INPUT IN-FILE.
     READ IN-FILE.
     DISPLAY IN-RECORD.
     CLOSE IN-FILE.
     STOP RUN. 
 

hello程序保存文件名为hello

 @OPTIONS MAIN
 IDENTIFICATION DIVISION.
 PROGRAM-ID HELLO.
 AUTHOR. LIUYA
 ENVIRONMENT DIVISION.
 DATA DIVISION.
 PROCEDURE DIVISION.
     DISPLAY "HELLO COBOL".
     STOP RUN.