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 times or execute depending upon a condit...
1cobol循环问题?PERFORM 1-SECTION UNTIL I > 50 OR FLG-ERR = CNS-ONPERFORM VARYING J FROM 1 BY 1 UNTIL J >50 OR FLG-ERR = CNS-ON.END-PERFORM这2个循环有什么不同, 2 cobol循环问题? PERFORM 1-SECTION UNTIL I > 50 OR FLG-ERR = CNS-ON PERFORM VARYING J FROM 1 BY 1 UNTIL J ...
Q23) How do you do in—line PERFORM? — GS A23) PERFORM …… END-PERFORM Q:怎么使用内嵌的PERFORM A:PERFORM…… END-PERFORM 所谓内嵌也就是PERFORM被嵌在某些比如循环语句中担当执行主体,同时通过UNTIL来指定结束判定 Q24) When would you use in-line perform? A24) When the body of the perform...
PERFORM VARYING session-var-1 FROM program-var-1 BY program-var-2 UNTIL program-var-3 = program-var-4 Examples Set a breakpoint at statement number 10 to move the value of variable a to the variable b and then list the value of x. AT 10 PERFORM MOVE a TO b; LIST (x); END-...
Give examples。 Q:什么是结束终止符 A:结束终止符是搭配一些范围指令的,也就是标识一些范围指令的结束.如:EVALUATE, END—EVALUATE; IF,END-IF如果没有该结束符,该条语句将终止不了 Q23)How do you do in—line PERFORM? - GS Q:怎么使用内嵌的PERFORM A:PERFORM ... <UNTIL>。.. 〈sentences> END—...
PERFORM语句 可以在PERFORM语句中包含GO TO语句,使 流程转到语句序列之外,但之后应转回到 PERFORM语句序列,以便能结束PERFORM 调用,让流程继续 PERFORM UNTIL … END-PERFORM FORMAT PERFORM UNTIL condition-1 statement-1 ... [END-PERFORM] Repeatedly executes statement(s) between PERFORM UNTIL … END- PERFORM...
3-过程部初步(COBOL常用语句)
Give examples。问:什么是终止符a:结束终止符与某些范围指令一起标识,即某些范围指令的结束。示例:EVALUATE,END-EVALUATE;IF,END-IF如果没有对应的终止符,则不能终止此条Q23)如何做?-GS问:如何使用嵌入式PERFORM答:perform.END 15、-PERFORM“内嵌”(PERFORM)嵌入在特定项目(如循环语句中的执行主体)中,并通过...
0 (cobcdb) Version 3.11 bt causes a CALL/PERFORM stack trace to be generated. The format for the stack trace display is : #() at Example: bt #0 hello () at C:/COBOL/CobolIT/samples/hello.cbl!21 #1 hello () at C:/COBOL/CobolIT/samples/hello.cbl!16 (cobcdb) frame-number 0...
PERFORM ABC VARYING X FROM 1 BY 1 UNTIL X > 3 AFTER Y FROM X BY 1 UNTIL Y > 3 In OS/VS COBOL, ABC is executed 8 times with the following values: X: 1 1 1 2 2 2 3 3 Y: 1 2 3 1 2 3 2 3 InEnterprise COBOL, ABC is executed 6 times with the following values: ...