PERFORM UNTIL I = 10 MOVE RATE(I) TO SPLIT-TOT(1) ADD 1 TO I END-P

Can anyone please give the example of Inline Perform.

Question Posted / shanuss

Answer Posted / shanuss

PERFORM UNTIL I = 10
MOVE RATE(I) TO SPLIT-TOT(1)
ADD 1 TO I
END-PERFORM.

Is This Answer Correct ?

4 Yes

0 No

Please Help Members By Posting Answers For Below Questions

I have a File that has duplicate records. I need only those records that occur more than thrice.?

9847

What are the various section in data division and briefly explain them.

1156

Is it possible that the redefines clause has different picture clauses compared to the one it redefined?

1138

What are literals?

1119

If you are current on the owner of a set, what is the difference between obtain next and obtain first?

1325

how do you reference the rrds file formats from cobol programs

1556

Give some examples of command terminators?

1240

What are the rules of the move verb?

1245

What are all the divisions of a COBOL program?

1200

What is redefines clause in COBOL?

1278

What is the difference between structured cobol programming and object alternativelyiented cobol?

1234

what happens if parmparameter passes zero bytes to the program

2117

What is the default value(s) for an initialize and what keyword allows for an override of the default?

1186

What is the difference between perform … with test after and perform … with test before?

1418

What is the difference between structured cobol programming and object alternativelyiented cobol programming?

1225