cobol
我的天才女友
为天地立心,为生民立命,为往圣继绝学,为万世开太平。
展开
-
子程序调用
CALL 'SUBPROG' USING ORGIN-DATA NEW-DATA ON OVERFLOW ···.---PROGRAM-ID SUBPROG.---PROCEDURE DIVISION USING ORGIN-DATA NEW-DATA. ---CALL 指明调用的程序SUBPROG 被调用的程序USING 指明参数ON OVERFLOW 如果被调用程序不能载入,执行ON OVERFLOW 的内容参数传递必须保证存储空间一致子程序的终止方式:调用另一个原创 2022-05-23 20:20:04 · 754 阅读 · 0 评论 -
cobol中的表(数组)
表实际上是储存连续空间上相似数据的集合,等同于java中的数组。按照类型不同表可分为:下标表和索引表定长表和变长表下标表01 ANNUAL-DEPOSIT-TABLE. 05 DEPOSITS PIC 9(5) OCCURES 12 TIMES. 05 DEPOSITS-SUB PIC 99 USAGE IS COMP.cobol中表的定义使用OCCURES,如上图所示,DEPOSITS定义的就是一个表,里面有十二个元素,每个长度为5。DEPOSITS-SUB是为了便于访问表中的数据原创 2022-05-21 19:34:09 · 1799 阅读 · 0 评论 -
cobol - 数据的排序与合并
在cobol中自带实现对输入输出文件的排序和合并,cobol中的合并主要是将不同来源的数据整合在一起。排序1.使用SD定义排序的中间文件普通文件使用FD定义,排序的中间文件是一个临时文件,使用SD定义。ENVIRONMENT DIVISION.INPUT-OUTPUT SECTION.FILE-CONTROL. SELECT TEST-SORT-FILE ASSIGN TO S-SORT.S-SORT 是系统中所指定的一个文件名。在环境部指定文件后,便可以使用SD语句在数据部的文件节中原创 2022-05-10 21:38:59 · 1334 阅读 · 0 评论 -
cobol 流程
cobol中流程主要有顺序、分支选择和循环三种结构,这和大部分的语言都是一致的。顺序结构原创 2022-05-06 23:42:56 · 915 阅读 · 0 评论 -
cobol 逻辑运算和算术运算
cobol中关系运算和逻辑运算结果都是True和False关系运算= EQ.> GT< LT.>= GE<= LE关系运算AND OR NOT如果是复合运算从左到右运算同一变量的操作数可以省略IF TEST-NUM > 8 AND < 10原创 2022-05-05 20:14:31 · 352 阅读 · 0 评论 -
cobol算术运算
算术运算算术运算就是常见的四则运算及平方等运算。四舍五入ROUNDED使用ROUNDED对运算的第一位小数进行四舍五入运算DATA DIVISION.WORKING-STORAGE SECTION.01 NUM1 PIC 99V9.01 NUM@ PIC 99V9.01 REAL-RESULT PIC 99.9.01 RESULT PIC 99.PROCEDURE DIVISION.MOVE 12.3 TO NUM1.MOVE 45.6 TO NUM2.ADD NUM1 TO NU原创 2022-05-02 21:29:16 · 2201 阅读 · 0 评论 -
cobol - 字符串操作
STRING用来分割字符串UNSTRING原创 2022-05-02 00:58:54 · 2361 阅读 · 0 评论 -
cobol- STRING语句
字符串的定义01 STR-ONE PIC XXXXX.01 STR-TWO PIC X(10).STRINGSTRING语句用来合并字符串......DATA DIVISION.WORKING-STORAGE SECTION.01 FIRST-NAME PIC X(10).01 LAST-NAME PIC X(10).01 FULL-NAME PIC X(20).*PROCEDURE DIVISION, MOVE 'ADAM' TO FIRST-NAME. MOVE 'SMIT原创 2022-05-01 02:26:24 · 1170 阅读 · 0 评论 -
cobol - 数据类型
字符类型使用X定义为字符整数型类型使用数字9定义对于9和X同时出现的十位字符类型,不过9的位置上只能出现数字浮点数类型通过定义符号V表示小数点的位置,但是V不占用实际的存储空间,程序只是记录小数点的位置,直接输出时,不会输出小数点005900 03 ()-NAIYORYO PIC S9(04)V9 COMP-3.Signed Numbers符号类型针对于正负数01 S-NUM PIC S99V99 VALUE -12.74.S就是Signed原创 2022-04-28 23:55:44 · 1888 阅读 · 0 评论 -
cobol-基本数据类别
基本数据类别cobol中主要的数据类别为变量、常量、文字和结构。变量如上图所示,变量有变量名 PIC 变量的数据类型和长度组成一个变量的定义。常量常量可以分为普通常量和象征常量。普通常量通过value赋值。象征常量01 TEST-DATE PIC X (10).MOVE ALL 'ABC' TO TEST-DATE.TEST-DATE的值就变为ABCABCAB直接数直接赋值的值结构体一组相关的数据可以构成一个结构体...原创 2022-04-28 00:35:18 · 1404 阅读 · 0 评论 -
cobol 文件相关语句
OPENOPEN语句主要实现对文件的打开操作,OPEN还可以指定打开文件是输入还是输出操作。OPEN还可以一次打开多个文件,文件之间用空格打开。文件名必须是环境部输入、输出节中由SELECT语句所指定的文件名一致。OPEN语句可以出现在程序中的任意位置,通常在处理的第一步如果读文件之前没有打开,程序就会异常(ABEND)CLOSE和OPEN一样,CLOSE用于关闭已打开的文件,不过通常用于程序的结尾。READREAD语句从文件中读取数据,将文件中的数据读到FD语句中所定义的变量中原创 2022-04-25 17:48:00 · 1466 阅读 · 0 评论 -
cobol-ACCEPT、DISPLAY和REDEFINES
ACCEPTACCEPT语句是用于接收数据的,可以接收用户终端输入或者系统产生的变量,将其保存在cobol中定义的变量。接收系统的变量最要以时间、日期为主。DATA DIVISION.WORKING-STORAGE SECTION.01 TEST-DATE. 05 TEST-YEAR PIC 99. 05 TEST-MONTH PIC 99. 05 TEST-DAY PIC 99........*PROCEDURE DIVISION. ....... ACCEPT TEST-DAT原创 2022-04-24 23:36:00 · 2558 阅读 · 0 评论 -
cobol-PERFORM
PERFORM就是调用程序中的函数,也就是处理,每个处理有且唯一的名字。如上图所示,INIT-SYORI就是一个处理。原创 2022-04-21 23:42:54 · 746 阅读 · 0 评论 -
cobol-move语句
MOVE是cobol程序中最常见的语句,类似于java中的set语句。单个数据项的复制01 IN-STATUS PIC X(5).01 IN-GRP. 05 IN-DATA1 PIC x(4). 05 IN-DATA2 PIC X(3).01 OUT-STATUS PIC PIC X(5).复制单个数据项讲源数据放在之前,TO连接复制之后数据。可以复制特定的值,也可以变量之间进行设值。MOVE 'READY' TO IN-STATUSMOVE IN-STATUS TO OUT-ST原创 2022-04-20 23:57:04 · 1922 阅读 · 0 评论 -
cobol语言简介
机缘巧合之下做一个老项目翻新的项目,从cobol到java,我也学习了cobol的一些知识,记载一下我的cobol语言的学习。cobol语言简介cobol:common business oriented language(公用面向商业语言),这个语言目前使用面没有之前的广,也就需要了解对应cobol语言即可。不需要配置对应环境学习。语言格式如上图所示,在cobol程序中,1-6 列表示代码的序号区,代表当前序列,类似与行号。7列表示指示符区,如果是*,则表示此行为注释行。程序结构co..原创 2022-04-19 23:38:28 · 14458 阅读 · 1 评论