cobol数组初始化的方法是什么

avatar
作者
猴君
阅读量:2

在COBOL中,可以使用以下两种方法来初始化数组:

  1. 使用INITIALIZE语句:这个语句用于为数组的所有元素赋予一个初始值。语法如下:
INITIALIZE array-name [FROM data-item] [GIVING data-item] 

其中,array-name是要初始化的数组名称,data-item是一个数据项,表示初始值。如果使用FROM子句,则将data-item的值复制给数组的每个元素;如果使用GIVING子句,则将初始值存储在data-item中。

例如,下面的代码将一个包含10个元素的数组初始化为0:

01 ARRAY-NAME OCCURS 10 TIMES. 05 ARRAY-ELEMENT PIC 9(3). ... INITIALIZE ARRAY-NAME 
  1. 使用VALUE子句:这个子句用于为数组的每个元素指定一个初始值。语法如下:
VALUE OF data-item 

其中,data-item是一个数据项,表示初始值。

例如,下面的代码将一个包含5个元素的数组初始化为1、2、3、4和5:

01 ARRAY-NAME OCCURS 5 TIMES. 05 ARRAY-ELEMENT PIC 9(3). ... VALUE OF ARRAY-ELEMENT IS 1, 2, 3, 4, 5 

无论使用哪种方法,都可以为COBOL数组提供初始值。

广告一刻

为您即时展示最新活动产品广告消息,让您随时掌握产品活动新动态!