Perform - Control Data Corporation 3300 Reference Manual

4.7.17
PERFORM
4-44
The PERFORM statement is used to depart from the normal execution sequence
to execute one or more procedures either a specified number of times or until
a specified condition is satisfied and to return control
to
the normal sequence.
Format I (simple):
PERFORM procedure-name-I [THRU procedure-name-2]
Format 2 (TIMES):
PERFORM procedure-name-I [THRU procedure-name-2]
1
identifier-II TIMES
integer-I
Format 3 (UNTIL):
PERFORM procedure-name-I [THRU procedure-name-2]
UNTIL condition-I
Format 4 (VARYING):
PERFORM procedure-name-I [THRU procedure-name-2]
1
"
1
index-name-2}
VARYING
~ndex"-~am~-Il
FROM literal-2
Identifler- "d tif" 2
1
en ler-
1
literal-3
I " "
BY "d tif" 3 UNTIL condltlOn-1
- 1
en Ier- - - -
[
1
" {
index-name-5 }
AFTER
~ndex"-~ame-41
FROM literal-5
IdentifIer-4 "d tif" 5
1
en ler-
1
literal-6
I " "
BY "d tif" 6 UNTIL condItIon-2
- 1
en Ier-
1
"
lliteral-s }
[
AFTER
:ndex"-~ame-71
FROM identifier-8
IdentifIer-7 . d 8
III
ex-name-
1
,
literal-9
I " "
~J
BY "d t"f" 9 UNTIL condItlOn-3
- 1
en
1
Ier- - - -
60229400