cobol之旅---基础知识3

数据部之一

一．作用：

数据部（DATA      DIVISION）是整个COBOL源程序中唯一描述数据的部分。是四个部分中的第三部分，是任何一个源程序中不可缺少的部分。

凡在程序中涉及的全部数据（包括输入的数据、输出的数据、中间数据）都要在数据部中加以说明（描述）

二．数据有两种：

1.       孤立的数据项。没有内在联系，各自占据内存中的一个域。

2.       组合的数据项。互相关联，

数据的层次和层号：

1.用来描述数据的层次结构的层号从01开始，到49.   

       2.从属项定位更大的层号。层号不必要求连续。

       3.如果几个数据项都从属于同一组合项但互不从属，则这几个数据项应具有相同的层号。

三．字型子句（PIC字句）

       是Picture的缩写。

       用来描述每一个初等数据项，说明：

（1）       数据项是什么类型的（数值型？字符型？字母型？。。。）若是数值的是否包含正负号和小数点

（2）       数据项占多大的内存域。

（3）       是否需要按打印的要求准备有关字符。

（4）       。

 例：

02       A1  PIC  9999.  占内存四个字节。

02  A2   PIC  AAAA.  可以放四个字母。

02  A3   PIC  XXXX.   可以放四个字符。

 

       数值型数据的描述：

       （1）“9”描述符。表示该位置可以放入一个0-9之间的数字。(注释：不能放空格)。

               例如：02  X  PIC  9999.      1234     1234

                        02  Y  PIC  9(5).        467    00467

                        02  Z  PIC  99.           86       86

                        02  T  PIC  9(6)       11011    011011

       （2）“V”描述符。指出在数值数据结构中隐含的小数点的位置。

              例：03  M  PIC 999V99

M在内存中占5个字节，可放五个0-9数字。

注：

A.