精通cobol－－9.4.3 PERFORM VARYING语句的一些灵活应用

最新推荐文章于 2025-05-30 09:34:16 发布
原创 最新推荐文章于 2025-05-30 09:34:16 发布 · 2.7k 阅读 · 1 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
文章标签：

#cobol

本文介绍了如何在COBOL编程中灵活使用PERFORM VARYING语句，通过三个实例展示了计算特定月份工资总和的不同方法，包括计算单号月份、第四季度和前半年的工资总和。

    在实际应用中，PERFORM VARYING语句不仅仅用于计算表中所有数据的总和。下面，仍然结合工资管理系统的模型，通过几个例子讲解PERFORM VARYING语句的灵活应用。

（1）计算单号月份的工资总和。这里实际上是要计算1、3、5

最低0.47元/天 解锁文章
COBOL_OS
关注
精通cobol－－9.4.4 PERFORM VARYING语句和PERFORM语句的比较
COBOL
04-20 4346
    在本小节最后，来比较一下PERFORM VARYING语句和之前学习过的PERFORM语句。通过比较，加深对于PERFORM VARYING语句的理解。同时，也可以此作为对于PERFORM语句的一个简单回顾。在上面用到的的工资管理系统模型中，使用PERFORM VARYING语句计算全年总工资的代码如下。PERFORM   200-ADD-TO-TOTAL         
精通cobol－－9.4 浏览表语句PERFORM VARYING
COBOL
04-20 1646
     上一小节中讲到的OCCURS语句是在表的定义中需要使用到的。本节将主要讲解在表的操作中经常用到的一个语句，即PERFORM VARYING语句。 
精通cobol－－9.4.1 PERFORM VARYING语句的使用方法
COBOL
04-20 6429
     PERFORM VARYING语句的基本格式如下所示。PERFORM …VARYING …FROM …BY…UNTIL  …其中，“…”部分则是相应的变量，根据具体的不同情况而有所不同。q      statement变量：指进行处理过程的名称。q      item-sub变量：通常为表中数据对应的下标。q      x1变量：通常指从表中的哪一个下标开
COBOL - PERFORM
zhu_fangyuan的博客
05-17 535
PERFORM VARYING语句和PERFORM语句都具有循环结构。但PERFORM VARYING语句在循环结构的基础上，还增加了一个步进的功能。该功能用于对表进行操作是十分方便的。PERFORM 就是调用程序中的函数，也就是执行，每个执行有且只有一个名字。该段代码实现的功能，实际上同样也可以使用PERFORM语句完成，代码如下。
cobol-PERFORM
大道至简
04-21 815
PERFORM就是调用程序中的函数，也就是处理，每个处理有且唯一的名字。 如上图所示，INIT-SYORI就是一个处理。
精通cobol－－9.4.2 如何使用PERFORM VARYING语句处理表中数据
COBOL
04-20 3578
   上面谈到了PERFORM VARYING语句的基本处理流程。那么，如何使用PERFORM VARYING语句处理表中数据呢？下面仍然结合具体实例进行讲解。以员工工资管理系统为例，首先进行简化模型提取。提取模型只包括一个员工一年12个月的工资，即只含有12个数据项。将这12个数据定义为下标表结构如下。01  ANNUAL-SALARY-TABLE.    05   SALARI
proleap-cobol-parser:基于ProLeap ANTLR4的COBOL解析器
05-23
该解析器是受测试驱动开发的，通过了NIST测试套件，已成功应用于银行和保险业的许多COBOL文件。 :dizzy: 如果您喜欢我们的工作，请加星号。 例子 输入：COBOL代码 Identification Division. Program-ID. HELLO...
zosconnect-sample-cobol-apirequester：包含一个示例CICS COBOL应用程序，该应用程序使用zOS Connect EE的API Requester函数
03-04
该存储库包含一个示例CICS COBOL应用程序，该应用程序使用z / OS Connect EE的API Requester函数来调用IBM Cloud上托管的健康保险索赔规则API。 使用z / OS Connect EE将CICS应用程序作为REST API调用。 先决条件 已...
COBOL PERFORM verb
程序员码工的专栏
10-19 1216
PERFORM paragraph vs. PERFORM paragraph1 THRU paragraph2 PERFORM paragraph Transfer control to paragraph, and transfer back when paragraph has finished to instruction immediately after the P
COBOL PERFORM A THRU A EXIT笔误 COMPUTE +或- 笔误 结果分析
cuiyadll的博客
09-18 1361
1、COMPUTE A = + B，A = - B 一般为笔误，执行结果：A的值等于|B|。 测试: MOVE 5 TO WK-INPUT MOVE 5 TO WK-OUTPUT 或者 MOVE -5 TO WK-INPUT MOVE -5 TO WK-OUTPUT COMPUTE WK-OUTPUT = + WK-INPUT 执行结果：WK-OUTPUT结果为5. COMP...
cobol中PERFORM知识点
qq_34822461的博客
07-29 5773
执行语句（PERFORM） 一。执行语句的作用：在一个COBOL程序中，过程部中往往有一部分语句需要执行多次。为了让重复的部分在程序中只出现一次，可以把重复的部分单独写成一段或一节（有一个段名或节名），每次执行这部分语句时转去该段，执行完转回来。这时候就需要用到执行语句（PERFORM ）。 二。执行语句的一般形式： PERFORM 过程名1...
COBOL 过程部之三——执行语句（PERFORM）
cuiyadll的博客
09-18 3382
一。执行语句的作用：在一个COBOL程序中，过程部中往往有一部分语句需要执行多次。为了让重复的部分在程序中只出现一次，可以把重复的部分单独写成一段或一节（有一个段名或节名），每次执行这部分语句时转去该段，执行完转回来。这时候就需要用到执行语句（PERFORM ）。 二。执行语句的一般形式： PERFORM 过程名1 [THRU]...
6 COBOL 过程部之三——执行语句（PERFORM）
03-17 1121
 一。执行语句的作用：在一个COBOL程序中，过程部中往往有一部分语句需要执行多次。为了让重复的部分在程序中只出现一次，可以把重复的部分单独写成一段或一节（有一个段名或节名），每次执行这部分语句时转去该段，执行完转回来。这时候就需要用到执行语句（PERFORM ）。 二。执行语句的一般形式：             PERFORM           过程名1        [THRU]   
COBOL......5
技术的死亡
03-05 614
PERFORM 语句 使用PERFORM语句实现循环 语法： PERFORM 循环条件 。。。 END-PERFORM 条件语句(IF 语句) 关系运算符意义 IS GREATER THAN (>) 大于 IS LESS THAN () ...
46、使用 PERFORM... VARYING 实现高效的循环操作
最新发布
brown的博客
05-30 131
本文深入探讨了COBOL中PERFORM...VARYING语句的使用方法，包括基本语法、应用场景、高级用法及优化技巧。通过实例展示了如何在遍历数组、处理文件记录和复杂循环控制等场景中高效使用该语句，并提供了性能优化建议，帮助读者更好地掌握这一强大的循环工具。
COBOL语言概述
sunysl的专栏
04-25 3165
一．COBOL程序的结构 1．部 IDENTIFICATION DIVISION 标识部 ENVIRONMENT DIVISION 环境部 DATA DIVISION 数据部 PROCEDURE DIVISION 过程部 2．节（SECTION）和段（PARAGRAPH） （1）部-节-段 （2）标识部下面不设节，直接设段 （3）过程部可以设节，下面再设段，也可以直接设段 3．
13. COBOL的控制结构
Python老吕的博客
09-03 842
语句，COBOL程序员可以根据变量或表达式的值灵活地控制程序流程，实现复杂的决策逻辑。语句结合使用，提供了一种灵活的循环控制机制。语句是COBOL中实现循环逻辑的关键工具，它使得程序员可以根据特定条件重复执行代码块，从而实现复杂的程序逻辑。语句中的条件执行，COBOL程序员可以创建灵活的循环结构，以满足各种数据处理和逻辑控制的需求。选项，COBOL程序员可以根据程序的需要灵活地控制循环的执行，实现更复杂的逻辑和数据处理需求。语句，COBOL程序员可以根据程序的需要灵活地控制程序流程，实现复杂的逻辑决策。
COBOL......6
技术的死亡
03-06 768
COBOL语言之数组 数组子句(OCCURS 子句) OCCURS 子句指定数据项为固定项目数或可变项目数的数组。OCCURS 子句不能 用于01 和77 层的项目，但可以用于基本或组合数据项目。如： 01 TIME-WORKED. 03 WEEK PIC 9 OCCURS 7 （T...
关于varying的理解
11-15 1789
我一直很奇怪，varying变量在vertex shader中是每一个顶点定义一次，在fraagment中是怎么获得的，毕竟fragment shader是经过栅格化的，后来研究表明。varying是经过栅格化过程中，经过平均差值获得的，这是opengl  程序员无法控制的，所以在使用varying的时候需要注意。
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
表情包 代码片
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

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

抵扣说明：

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

余额充值