IF 语句检查条件。 如果条件为 true,则执行 IF 块; 如果条件为 false,则执行 ELSE 块。END-IF 用于结束 IF 块。 要结束 IF 块,可以使用句点代替 END-IF。 但对于多个 IF 块,最好使用 END-IF。Nested-IF − IF 块出现在另一个 IF 块内。 嵌套 IF 语句的深度没有限制。
IF 条件语句 IF 语句检查条件。如果条件为真,则执行 IF 块;如果条件为假,则执行 ELSE 块。 END-IF用于结束 IF 块。要结束 IF 块,可以使用句点代替 END-IF。但是对于多个 IF 块总是最好使用 END-IF。 嵌套IF− 出现在另一个 IF 块内的 IF 块。嵌套 IF 语句的深度没有限制。 句法 以下是 IF ...
与COBOL 不同, z/OS Debugger 需要在命令之后终止标点符号 (;)。 END-IF 关键字是必需的。使用说明如果IF 子句导致 z/OS Debugger 获取更多输入,那么应始终包含 ELSE 子句(例如, IF 包含导致 z/OS Debugger 重新启动的 USE 或其他命令,因为发生了 AT-condition)。 不支持 COBOL NEXT SENTENCE 短语。 不...
當IF 指令為巢狀且 ELSE 子句存在時,給定的 ELSE 或END-IF 會與相同區塊內最接近之前的 IF 子句相關聯。與COBOL 不同, z/OS Debugger 需要在指令之後終止標點符號 (;)。 需要 END-IF 關鍵字。使用注意事項如果IF 子句導致 z/OS 除錯器 取得更多輸入 (例如, IF 包含USE 或其他指令,因為發生 AT-...
IF A IF B ELSE NEXT SENTENCE ELSE C END-IF. EVALUATE 相当于SWITCH CASE语句。 EVALUATE A WHEN B ... WHEN 0 THRU 100 ...(FROM 0 TO 100) WHEN OTHER ... [END-EVALUATE] 首先得到A的结果,和WHEN语句的参数比较,如果和B相等,就执行B后的操作,执行完了不再执行后面的WHEN语句。如果不等就执行...
IF Condition {Statement Block} [END-IF]. Example: IF GENDER = 'MALE' DISPLAY “HE IS A MALE” END-IF. IF ELSE: IF ELSE statement is used when a certain set of statements needed to be executed by two conditions. This statement is mainly used to execute the condition-specific code. ...
END-IF. STOP RUN. JCL执行上述COBOL程序 - //SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C //STEP1 EXEC PGM = HELLO 编译并执行上述程序时,会产生以下结果 - IN LOOP 1 - IF BLOCK IN LOOP 2 - ELSE BLOCK 关系条件 关系条件比较两个操作数,其中任何一个都可以是标识符,文字或算术表达式...
IF语句检查条件。如果条件为真(true),则执行IF块;如果条件为假(false),则执行ELSE块。 END-IF:用于结束IF块。也可以使用一个句号替代END-IF结束IF块。但是对于多个IF块,最好使用END-IF。 ***Nested-IF(嵌套)***:IF块出现在另一个IF块中。嵌套IF语句的深度没有限制。 语法 以下是IF条件语句的语法:IF ...
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...
IF语句检查条件。如果条件为真（true），则执⾏IF块；如果条件为假（false），则执⾏ELSE块。END-IF：⽤于结束IF块。也可以使⽤⼀个句号替代END-IF结束IF块。但是对于多个IF块，最好使⽤END-IF。***Nested-IF（嵌套）***：IF块出现在另⼀个IF块中。嵌套IF语句的深度没有限制。语法 以下是IF条...