将执行 PERFORM 内的语句,直到到达 END-PERFORM。语法以下是内联执行的语法 −PERFORM DISPLAY 'HELLO WORLD' END-PERFORM. 越线执行这里,在一个段落中执行一条语句,然后将控制权转移到其他段落或部分。语法以下是越线执行执行的语法 −PERFORM PARAGRAPH1 THRU PARAGRAPH2 ...
Perform Thru 用于通过给出序列中的第一个和最后一个段落名称来执行一系列段落。执行完最后一段后,控制权返回。 在线执行 PERFORM 中的语句将一直执行,直到到达 END-PERFORM。 句法 以下是内联执行的语法 - PERFORM DISPLAY 'HELLO WORLD' END-PERFORM. 复制 脱机演示 在这里,一个语句在一个段落中执行,然后...
PERFORM语句是COBOL中循环语句的主要构成部分。它类似于其他编程语言中的while或for循环,执行一个代码块一定的次数或者一定的条件下。PERFORM语句的语法如下: PERFORM{label1}VARYINGvariable1FROM[value1]BY[value2]UNTILcondition {statements}END-PERFORM.
COBOL - PERFORM PERFORM 就是调用程序中的函数,也就是执行,每个执行有且只有一个名字 000200 PERFORM INIT-SYORI. 000210* 000220 PERFORM MAIN-SYORI UNTIL WK-END-FLG = "ON " OR WK-ERR-FLG = "ON ". 000230* 000240 PERFORM END-SYORI.
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....
PERFORM语句允许您重复执行一组语句。循环可以通过以下几种方式控制: 通过计数器:使用PERFORM n TIMES来指定循环次数,n是一个数字,表示要执行循环的次数。例如: PERFORM 10 TIMES DISPLAY 'Hello World' END-PERFORM 通过条件语句:使用PERFORM UNTIL或PERFORM WHILE来指定循环条件。例如: ...
END-PERFORM这2个循环有什么不同, 相关知识点: 试题来源: 解析第一个是,循环执行1-SECTION,直到I 大于50或者FLG-ERR=CNS-ON第二个是,变量J从1开始,每次加1,直到J>50或者FLG-ERR=CNS-ON,循环执行内部的操作不同点是,第一个是先执行,后判断,后一个是先判断,后执行...
END-PERFORM. 关键字KEY 关键字有ASCENDING(升序,由低到高)和DESCENDING(降序,由高到低)。 03 TEXT PIC XXX OCCURS 7 TIMES ASCENDING KEY IS A,B. 05 A PIC XXX. 05 B PIC XXX. TEXT中的元素按A升序排序,A相同的元素按B升序排序。 关键字的作用是定义SEARCH语句带ALL短语时表格的排序。
END-PERFORM; 当z/OS Debugger最初显示程序时,请输入以下命令: USE USERID.DT.COMMANDS(COBCALC2) 执行USE 文件后,可以运行COBCALC,并在 "日志" 窗口中显示以下跟踪 (或类似): 42 ACCEPT-INPUT. 59 CALCULATE-LOAN. 42 ACCEPT-INPUT. 66 CALCULATE-VALUE. ...
PERFORM [WITH TEST BEFORE/AFTER] UNTIL CONDITION 过程语句 END-PERFORM. PERFORM [WITH TEST BEFORE/AFTER] VARYING A FROM B BY C UNTIL CONDITION1 过程语句 END-PERFORM. EXIT 指出了被调用过程的逻辑终点,一般用作perform语句序列的出口。EXIT必须是段中唯一的语句,前面必须有段名。