PERFORM 过程名1 [THROUGH/THRU] 过程名2 [VARYING 参数1 FROM 初值1 BY 步长1 UNTIL 条件1][AFTER 参数2 FROM 初值2 BY 步长2 UNTIL 条件2][AFTER 参数3 FROM 初值3 BY 步长3 UNTIL 条件3]END-PERFORM.还有一个 IF ~ELSE ~END-IF....
在Cobol中,程序的控制流是通过使用PERFORM语句来实现的。PERFORM语句用于执行一个被称为“段”或“段落”的代码块。每个段落都有一个唯一的名称,并且可以通过使用PERFORM语句来调用。 ...
非數值關係名稱及條件名稱 選取的排序順序表會影響某些陳述式的結果,使用非數值的關係名稱及條件名稱: EVALUATE、if、PERFORM ...Until、SEARCH 和 START。 非數值比較的真值取決於所選排序順序表中字元的對應加權。 例如,如果您對法文 (拉丁文 1) 指定唯一加權表格 (LANGIDUNQ) ,則下列陳述式對於變數 ITEM-1,e...
OPEN INPUT INTERNET-LOG-FILE. PERFORM UNTIL EOF READ INTERNET-LOG-FILE AT END MOVE 'Y' TO EOF NOT AT END MOVE USER-ID TO WS-USER-ID MOVE URL TO WS-URL MOVE ACCESS-TIME TO WS-ACCESS-TIME DISPLAY 'USER: ' WS-USER-ID ' URL: ' WS-URL ' TIME: ' WS-ACCESS-TIME END-READ END-...
PERFORM FOREVER ... IF WS-FLAG = 'Y' GO TO FINISH-LOOP END-IF ... END-PERFORM FINISH-LOOP. ... 改进的循环语句 在COBOL 85中,引入了两种新的循环语句:PERFORM WITH TEST和PERFORM UNTIL WITH TEST。 PERFORM WITH TEST PERFORM WITH TEST语句在每次循环结束时测试一个条件,并确定是否继续执行。例如...
2.PERFORM: 3.ACCEPT 4.DISPLAY 5.REDEFINES 6.OPEN和CLOSE 7.READ 8.WRITE 四:基本数据类型 1.变量 2.常量 3.直接数 4.结构体 5.字符类型 6.整型数类型 7.浮点数类型 8.Signed Numbers符号类型 9.Numeric Edited Fields格式输出类型 9.1.货币格式 ...
-条件判断:使用IF语句进行条件判断,根据条件执行不同的操作。 -循环:使用PERFORM语句实现循环,如DO...UNTIL和DO...WHILE。 - 分支:使用EVALUATE语句进行多路分支,类似于其他编程语言中的switch语句。 -子程序调用:使用CALL语句调用其他子程序。 5.数据转换和处理: -数据转换:使用MOVE语句将数据从一个变量复制到另...
5.IF控制选择结构: 6.嵌套IF: 7.EVALUATE控制多分支选择结构流程: 8.ZERO简化选择结构编码: 9.PERFORM UNTIL控制循环结构 八:数据的排序和合并 1.SD定义排序中间文件 2.USING指定排序输入文件 3.GIVING指定排序输出文件 4.使用SORT进行排序 5.使用MERGE进行合并...
7.2.4 使用嵌套IF语句控制选择结构流程 7.2.5 使用EVALUATE语句控制多分支选择结构流程 7.2.6 使用ZERO简化选择结构编码 7.2.7 使用88层条件名简化选择结构编码 7.2.8 选择结构的综合应用 7.3 循环结构流程控制 7.3.1 循环结构的基本流程 7.3.2 使用PERFORM UNTIL语句控制循环结构流程 ...
您还可以使用 PERFORM UNTIL 循环将 PERFORM 动词设置为执行代码块,直到满足特定条件为止。 最后,PERFORM VARYING 循环会工作一定次数,并取决于我们使用的 FROM BY 值。 让我们从简单的 PERFORM 语句的语法开始。 简单的 PERFORM 语句: 如前所述,PERFORM 语句将以最简单的形式只执行一次代码块。对于此示例,我们使用...