-都是符号位,数字型是以小数点位对齐,这种应该和z型一样属于表示型的定义。如果A定义成ZZZ9. B定义成9(4).C定义成---9.D定义成+++9 如果用135分别赋值,A显示成135,B显示成0135,C显示成135,D显示成135 如果用+1分别赋值,A显示成1,B显示成0001,C显示成+1,D显示成+1 如果用-...
•例1:01TABLEVALUEISZERO.03AOCCURS20TIMESPIC9(3).•例2:UNIT-PRICE03UNIT-PRICE-TABLE.05FILLERPICX(10)VALUE‘0100001350’.05FILLERPICX(10)VALUE‘0200001420’.UNIT-PRICE-TABLE03UNIT-PRICE-TABLE-RUNIT-PRICEREDEFINESUNIT-PRICE-TABLE.05TABLEOCCURS2TIMES.PROD07PROD-CODEPICX(4).PROD07PROD-PRICE...
02.COBOL数据表示
10 item-number pic 9(3). 10 item-price pic s99v99. 01 price-table-record. 05 pt-item-number pic 9(3). 05 pt-item-price pic s99v99. Procedure division 100-load-table. perform with test after varying price-table-sub from 1 by 1 until ptable-eof ===>(ptable-eof-switch = ―...
答案:可以。high-value的实际值是2进制的所有位都是1,即二进制的最大值。MOVE A变量 TO B变量时,假如B变量是9型,A变量可以是X,也可以是9,都可以赋值成功,就是说假设你A中存的是'ABCD' 也同样可以MOVE TO给B变量,只是最后的结果不一定是你想要的而已。
COBOL常用操作
cobol学习笔记 9 COBOL的数据描述2010 07 1315 07程序中所有数据间的关系在数据部中通过层指示符和层号来定义。层指示符 levelindicator 和其描述条目一起指定了程序中的每个文件。FD是文件描述的层指示符,SD是sort merge文件描述的层指示符。层号 level number 和其描述条目一起指定了具体数据的属性。层号包括范...
COBOL Z类型的取值范围相对较大,可以存储的整数范围通常为-9,999,999,999到9,999,999,999。这使得COBOL Z类型非常适合处理大型数值计算和金融数据。 COBOL Z类型可以进行基本的算术运算,如加法、减法、乘法和除法。这使得开发人员可以方便地进行数值计算和数据处理。 除了基本的算术运算,COBOL Z类型还支持一些特殊的...
如今,懂得COBOL编程的人千金难求。 虽然不够好,但值得一试 COBOL并不是炙手可热的新编程语言。甚至都不如Python那般令我爱恨交加。也不是热门的数据科学或人工智能编程语言。 如果你选择使用COBOL,则可能需要进行维护工作。你需要学习数十年前的业务逻辑,而不是开发先进的算法。你会感觉进入了计算机科学的石器时代...
comp-3 和9()比较会出错吗? 只看楼主收藏回复 杭州小名 1L喂熊 1 定义01 a pic s9(7) comp-3 01 b pic s9(7) 在if a=b中会出错吗? 送TA礼物 1楼2008-09-20 13:13回复 cobolparttime 1L喂熊 1 不会,应该是你的程序不知道哪里出错了� 2楼2008-09-20 16:15 回复 cobolparttime...