层号

1层是最高层，
49层是最低层。
66层是为特殊描述符项目保留的（重命名）
77层项目用于某个组的数据项，如程序中的临时变量。
88层定义条件名（分支选择）
99层常用于定义用来存储文件是否读到最后一条记录的标志变量

 

　　COBOL程序中的数据项的定义从层号开始，01层是最高层，49层是最低层。
　　 77层项目用于某个组的数据项，如程序中的临时变量。
　　 66层是为特殊描述符项目保留的，可以更名现有的数据项或组，或以原定义未允许的方式组合。
　　 88层是用于条件判断句中的。
　　 如：
　　 03 STATE PIC XX.
　　 88 NEW-ENGLAND VALUES ARE "1","2","3","4","5".
　　 IF NEW-ENGLAND ... then do something

五．重命名子句（RENAMES子句）
作用：在不改变数据项的长度的前提下，重新定义数据区的名称和数据结构的形式（包括初等项的类型和长度）。
可以把原来已经定义的某些数据项重新组合成一个新项，并以一个新名字来代表它。但用重命名子句不能改变原来各初等项的类型、长度等属性。
格式：66 数据名1 RENAMES 数据名2 [THRU 数据名3]
说明：只能用于工作单元节中，不能用于文件节中