Perform With Test After 和 Perform With Test Before 之间有什么区别? 如果指定了 TEST BEFORE,则在指定 PERFORM 范围的每次重复执行开始时测试条件。 如果指定 TEST AFTER,则在每次重复执行 PERFORM 范围结束时测试条件。 该范围在 TEST AFTER 中至少执行一次。什么是本地存储部分? 本地存储在每次调用程序时...
PERFORM 指令會將控制明確地傳送至一或多個陳述式,並在完成執行指定的陳述式之後,隱含地將控制傳回至下一個可執行陳述式。 無法縮寫關鍵字。 簡式: PERFORMcommandEND-PERFORM; 指令 有效的 z/OS® Debugger 指令。 重複: PERFORMWITHTESTBEFOREAFTERVARYINGreferenceFROMreferenceBYreferenceUNTILconditioncommandEND-...
AFTER语句是一个嵌套的FOR 循环。VARYING是外循环,AFTER是内循环。A,B可以是索引。 过程也可以直接写入PERFORM中。但是THROUGH就不好用了。语法如下 : PERFORM 过程语句 END-PERFORM. PERFORM N TIMES 过程语句 END-PERFORM. PERFORM [WITH TEST BEFORE/AFTER] UNTIL CONDITION 过程语句 END-PERFORM. PERFORM [WITH...
WORKING-STORAGE SECTION. 01 WS-CNT PIC 9(1) VALUE 0. PROCEDURE DIVISION. A-PARA. PERFORM B-PARA WITH TEST AFTER UNTIL WS-CNT>3. STOP RUN. B-PARA. DISPLAY 'WS-CNT : 'WS-CNT. ADD 1 TO WS-CNT. END-PERFORM.Output: WS-CNT : 0 WS-CNT : 1 WS-CNT : 2 WS-CNT : 3 PERFORM ...
PERFORM PARA-1 10 TIMES Ex: PERFORM 10 TIMES ... END-PERFORM. PERFORM WITH TEST BEFORE/TEST AFTER: With the Test Before option, the program checks the condition first and if the condition is false then it executes the piece of code. So with Test-Before, there is a possibility of not...
PERFORM コマンドは、1 つ以上のステートメントに、制御を明示的に渡して、指定したステートメントによる実行が完了した後で、制御を次の実行可能ステートメントに暗黙的に渡します。 単純型 PERFORMcommandEND-PERFORM; 反復型 PERFORMWITHTESTBEFOREAFTERVARYINGreferenceFROMreferenceBYreferenceUNTIL ...
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必须是段中唯一的语句,前面必须有段名。
PERFORM [WITH TEST BEFORE/AFTER] VARYING A FROM B BY C UNTIL CONDITION1 过程语句 END-PERFORM. EXIT 指出了被调用过程的逻辑终点,一般用作perform语句序列的出口。EXIT必须是段中唯一的语句,前面必须有段名。 CONTINUE 指定一个空操作,即什么也不做,用来占位置。程序将顺序执行到CONTINUE的下一条语句。
您还可以使用 PERFORM UNTIL 循环将 PERFORM 动词设置为执行代码块,直到满足特定条件为止。 最后,PERFORM VARYING 循环会工作一定次数,并取决于我们使用的 FROM BY 值。 让我们从简单的 PERFORM 语句的语法开始。 简单的 PERFORM 语句: 如前所述,PERFORM 语句将以最简单的形式只执行一次代码块。对于此示例,我们使用...
在“Perform Until”中,执行一个段落,直到给定条件变为真。'With test before' 是默认条件,它表示在执行段落中的语句之前检查条件。 句法 以下是Perform Until的语法 - PERFORM A-PARA UNTIL COUNT=5 PERFORM A-PARA WITH TEST BEFORE UNTIL COUNT=5 PERFORM A-PARA WITH TEST AFTER UNTIL COUNT=5 复制 ...