COBOL......1

数值型数据 - “P” 描述符
为了节省内存,对低位上有若干个零的数和小数点后若干位后才有非零数字的数,可以用P 描述符。如:表示10000000 和0.000023
1. 01 A PIC 9PPPPPPPPPP.
用9999999999来描述,占10个字节。为了节省内存,低位上有若干个0的数,可以用“P”来描述。A在内存中只占1个字节,表示1x109,也可以写成:01 A PIC 9P(9).
2. 01 A PIC PPPP99. 表示0.000099
3. 描述              内存中数字    等价的算术量
   03 AMOUNT PIC 9(4)PPPP     1802      18020000
   03 WAT PIC 9(3)P(3)     015       15000
   03 WAT PIC P(3)9(2)     11       0.00011
   03 WAN PIC VPP99      87       0.0087 
4. P 描述符在COBOL中不常用  


数值型数据 - “S” 描述符
在数据项中放入一个带符号的数,可以用S 描述符。
02 D PIC S99. (S不计数据项长度,表示负号,只能在99最前面)
  
描述        数值         内存中的表示
 02 B PIC S9(4)V9(2)   126.89         012689
    02 C PIC S9(4)V9(2)   -1112.34        111234
    02 D PIC S9(4)V99    -0.25          000025
    02 E PIC S9(4)V99    -727.18         072718

字符型数据 - “A” 描述符
字母型数据用A 描述符,只能存放字母和空格。
02 A2 PIC AAAA.
02   A2 PIC A(4).
 
MOVE “ABCD” TO T
T内存中的表示 ABCD
不只能存放字母和空格以外的字符,也可以用X描述

字符型数据 - “X” 描述符
由任意的COBOL 字符组成的数据称字符型数据,字符型数据用X 描述符
01   A PIC X(2).
描述 送入的数据 内存中的情况
02 R1 PIC X(4) BOOK BOOK
02 R2 PIC X(8) SIN(X)          SIN(X)_ _
02 R3 PIC X(7) COBOL-74         COBOL-7
02 R4 PIC X(12)  DATA-NAME      DATA-NAME _ _ _
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值