PERFORM 过程名1 [{THRU} 过程名2 ] UNTIL 条件 3。 PERFORM 过程名1 [{THRU} 过程名2 ] VARYING 标识符1 FROM 常数1 BY 常数2 UNTIL 条件 标识符2 标识符3 四。执行语句的多重循环形式:COBOL 允许三重循环,其一般格式可写为: PERFORM 过程名1 [{THRU} 过程名2 ] [VARYING 参数1 FROM 初值1 BY...
这时候就需要用到执行语句 (PERFORM )。执行语句的简单形式: PERFORM过程名 执行语句的一般形式: PERFORM过程名1 [THRU] 过程名2 使用PERFORM语句实现循环: 1. PERFORM过程名1 [{THRU}过程名2 ] 整数TIMES 标识符2. PERFORM过程名1 [{THRU}过程名2 ] UNTIL 条件 #先判断UNTIL后面的条件是否满足,若不满足...
PERFORM UNTIL EOF READ InputFile INTO InputRecord AT END SET EOF TO TRUE NOT AT END PERFORM FilterData. CLOSE InputFile. PERFORM SortData. PERFORM WRITEOutput. CLOSE OutputFile. STOP RUN. FilterData. IF InputRecord(1:1) = 'A' THEN ADD 1 TO RecordCount MOVE InputRecord TO TempData(Record...
PERFORM 1000-MAIN-PARA THRU 1000-MAIN-PARA-X VARYING WS-I FROM 1 BY 1 UNTIL WS-I > 50 AFTER WS-J FROM 1 BY 1 UNTIL WS-J > 10.In the above example the 1000-MAIN-PARA to 1000-MAIN-PARA-X will be executed 500 times. First with WS-I as 1 and WS-J varying from 1 to 10 ...
PROGRAM-ID. FilterAndSummarize. DATA DIVISION. WORKING-STORAGE SECTION. 01 WS-Input PIC X(80). 01 WS-TotalSales PIC 9(9)V99 VALUE 0. PROCEDURE DIVISION. PERFORM UNTIL EOF READ InputFile INTO WS-Input AT END SET EOF TO TRUE END-READ ...
2 .格式:PERFORM过程1THROUGH/THRU过程名2VARYING标识符1FROM常数1/标识符2BY常数2/标识符3UNTIL条件举仞PERFORMT1THRUT2VARYI 27、NGXFROMABYBUNTILX>5,是整型数据项。A为初值,B为步长,它们都是整数或其作用是执行T1到T2语句序列,X是“循环变量”整数数据项。六.执行语句的多重循环形式过程名2格式:PERFORM...
在条件语句中,可以使用比较运算符(如等于、大于、小于)和逻辑运算符(如AND、OR)进行条件的组合和判断。 五、循环语句 COBOL提供了多种循环语句,用于重复执行某个程序块。最常用的是PERFORM UNTIL和PERFORM VARYING语句。PERFORM UNTIL语句会在满足条件之前一直执行程序块,而PERFORM VARYING语句会在指定的范围内重复执行...
-逻辑运算：使用AND、OR和NOT运算符执行逻辑运算。-比较运算：使用IF、ELSE和PERFORM语句实现条件判断和循环。-字符串操作：使用STRING和INSPECT语句进行字符串操作，如连接、截断、替换等。4.控制流程：-条件判断：使用IF语句进行条件判断，根据条件执行不同的操作。-循环：使用PERFORM语句实现循环，如DO...UNTIL和DO....
2. Simple Perform. 3. PERFORM VARYING. 4. PERFORM VARYING…. UNTIL…. 5. PERFORM THRU 6. PERFORM TIMES Inline Perform: It performs a set of Cobol statements between Perform & END-Perform. Basically this is to keep a particular logic in a boundary and execute it in a loop or number of...
PERFORM 过程名1 [{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 ] 五。出口语句(EXIT):EXIT语句提供了一组过程的公共出口,即指出了被调用过程的逻辑终点。