Can anyone please give the example of Inline Perform.
PERFORM UNTIL I = 10 MOVE RATE(I) TO SPLIT-TOT(1) ADD 1 TO I END-PERFORM.