9型转x型 cobol_Cobol基本语法

コボル基本語法

1

コボル基本語法

一、

COBOL

基本語法

compla

項目使用的

Cobol

是

Micro Focus

公司生产的

Cobol,

采用在

HP-UNIX

上运行。

一、

cobol

的书写格式(每行)

1

、

前

6

列为序号区

(

一般不编辑

)

2

、

第

7

列为标示列，仅可以写如下几个标示符。

a.

“

＊

”

注释符

(

注释当前行的代码

)

b

“

/

“

注释符

(

注释当前行的代码

,

程序编译时，强制程序清单另起一页

,

不建议使用

)

c

“

－

“

字符串连接符

d

“

D

”

DEBUG

行标示符

(

程序为

DEBUG

模式时，标有该标示符的语句行代码执行，否则和注

释行效果一样

)

3

、第

8

列

---11

列为

A

区，包括以下内容。

a

部、节名。

b

层号

01

4

、第

12

列

---72

列为

B

区，过程部的程序必须写在

B

区中。

5

、第

72

以后部分不能编辑。

二、

cobol

的语法结构

(

几大部分

)

1

、

标

示

部

(IDENTIFICATION

DIVISION):

提

供

程

序

的

一

般

性

文

档

说

明

,

本

项

目

只

保

留

程

序

名

(PROGRAM-ID)

一项。

2

、

环境部

(ENVIRONMENT DIVISION):

提供程序外部有关的项目。

a.

配置节

(CONFIGURATION SECTION)

①

.

指定源计算机

(SOURCE-COMPUTE).

②

.

目标计算机

(OBJECT-COMPUTE).

③

.

设置

debug

模式

(SOURCE-COMPUTE H9000V

WITH DEBUGGING MODE)

④

.

指定读环境变量设置

.

SPECIAL-NAMES.

ENVIRONMENT-VALUE

IS

CNS-ENV-PARM

ENVIRONMENT-NAME

IS

CNS-ENV-NAME.

b.

输入输出节

(INPUT-OUTPUT

SECTION).

文件的物理路径的定义。

方法一：

(

写死文件路径

)

SELECT FILE-LOG ASSIGN

"/usr3/WSI/commonlog/WSI1101.log"

ORGANIZATION IS LINE SEQUENTIAL.

方法二

:(

过程部中动态指定文件

)

SELECT FILE-LOG ASSIGN

TO

SELECT-FILE

ORGANIZATION IS LINE SEQUENTIAL.

在数据部定义字符串变量

SELECT-FILE,

在文件

FILE-LOG

打开前动态指定文件路径。

方法三

:(

环境变量中动态指定文件

)