cobol (笔记1)

最新推荐文章于 2024-08-14 16:44:43 发布

原创最新推荐文章于 2024-08-14 16:44:43 发布 · 1.7k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#cobol #statistics #tools #command #语言 #file

cobol 专栏收录该内容

4 篇文章

订阅专栏

今天第一次接触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.