COBOL上的基本类型大致分为:常量、变量、直接数和结构体。下面只是简单介绍下COBOL中的常量。
常量包括普通常量和象征常量两种,普通常量的内容在定义的同时通过VALUE语句给出,如:"01 NAME PIC 9 VALUE 3.",象征常量通过COBOL中的关键字表示,两种常量的使用方式一样,只是象征常量不用定义,可以直接使用,SPACE(SPACES)代表空格,ZERO代表0,例如:变量NAME的长度为10个字符,则通过语句:MOVE SPACES TO NAME后,NAME的值为10个空格。
接下来看看COBOL中数据的定义方式:
1.字符型 通过PIC X语句定义,定义方式有以下三种:
A. 01 NAME PIC X NAME为长度为1的字符
B. 01 NAME PIC XXX NAME为长度为3的字符
C. 01 NAME PIC X(10) NAME为长度为10的字符
以上的定义中,X的个数与字符的长度一致,长度过长时,可以通过括号来说明字符的长度。
2.整型 通过PIC 9语句定义,这里“9”的含义、用法与上面的"X"相似。
A. 01 NAME PIC 9 NAME为长度为1的整型
B. 01 NAME PIC 999 NAME为长度为3的整型
C. 01 NAME PIC 9(10) NAME为长度为10的整型
定义整型的“9”和定义字符型的“X”是可以同时出现的,表示字符型的数据,如语句:“01 MIX PIC XXX9(3)XXX”,其中“9”出现的位置只能存放数字。
需要说明的是通过这种方式定义的整型是无符号的,代码:
MOVE -10 TO NUM
ADD 10 TO NUM
DISPLAY 'NUM:' , NUM
的输出为:NUM:20
3.浮点数 通过定义符号V表示小数点的位置。如:“01 NAME PIC 99V99”,表示小数点前有两位,小数点后有两位,不过需要注意的是:符号“V”并不占用实际存储空间,也就是说程序只是记录了小数点的位置,但并不开辟一个字节空间来存放小数点,所以对浮点数直接输出时,是看不到小数点的。例如语句:
MOVE 10.09 TO AGE.
DISPLAY AGE.
的输出为1009,而不是期望的10.09,浮点数的输出要通过“Numeric Edited Fields”格式来输出。
4.Signed Numbers符号类型 通过在“9”前面加S来定义,如:“01 AGE PIC S99”,其中“S”和浮点数中的“V”一样,不占存储空间,所以也不能直接输出(+10和-10输出后都是“10”),要通过“Numeric Edited Fields”来输出。
分享到:
相关推荐
COBOL_DB2_数据类型对应关系的介绍
Java解析cobol程序,自动解析cobol接口生成javabean和Java读取类
COBOL(COmmonBusinessOrientedLanguage)——是数据处理领域最为广泛的程序设计语言,是第一个广泛使用的高级编程语言。在企业管理中,数值计算并不复杂,但数据处理信息量却很大。为专门解决经企管理问题,于1959年,由...
java function 把cobol的comp类型转为浮点型
提出了一种功能等价的类型封装和嵌套方法,可以有效地将COBOL数据描述映射到Java类型系统。该方法已在所开发的COBOL2Java翻译系统中进行应用,通过了近400万行的真实银行商用系统的测试。实验结果表明,此方法正确...
cobol大型主机相关课程第三章知识内容代码ppt,
作用:不同的数据项可以共用内存中的同一段...例如已给数据项A分配了一段内存空间,在经过某一段的过程后,A已经不再使用了,但它仍占着内存这部分空间,为了节约内存,可以将另一数据项B也分配在A所占的这段内存空间。
要在COBOL中使用文件
学习cobol的好东西
使用GraalVM Community Edition和GnuCOBOL编译并执行CoBOLGraalVM Oracle多语言虚拟机GraalVM支持多种语言,包括Java,JavaScript,Ruby,Python,R,WebAssembly,C / C ++ 。 在另一个文档 Oracle使用称为低级...
Beginning COBOL for Programmers is a comprehensive, sophisticated tutorial and modular skills reference on the COBOL programming language for established programmers. This book is for you if you are a...
面对2000年及传统代码的维护和改进等问题,当代程序员无不感到巨大的压力。...第三部分讲述了COBOL的现代编程问题,介绍了结构化COBOL,面向对象COBOL,图形用户接口,与其它语言集成,以及使用COBOL 2000等问题。
详细介绍cobol语法和关键字
IBM-COBOL关于cobol的资料,cOBOL技术资料
如何用VC实现COBOL系统的数据到SQL Server的迁移.pdf
COBOL COBOL是Common Business Oriented Language (通 用商业语言)的缩写。广泛应用于数据管理领域,例 如财会工作,统计报表,计划编制,人事管理等。被 称为“用于管理的语言”。...交易功能,都是用COBOL来实现。
COBOL的教案第一章 COBOL语言概述
cobol大机操作语言的历程,都是本人在学习过程中写的,有疑问可以联系我qq341661392
COBOL语言数据文件格式分析及其转换.pdf