* (I = 5 in this test)
CASE I.
WHEN 1. PERFORM PV1.
WHEN 2. PERFORM PV2.
WHEN 3. PERFORM PV3.
WHEN 4. PERFORM PV4.
WHEN 5. PERFORM PV5.
WHEN 6. PERFORM PV6.
WHEN 7. PERFORM PV7.
WHEN 8. PERFORM PV8.
ENDCASE.
* (I = 5 in this test)
PERFORM I OF
PV1
PV2
PV3
PV4
PV5
PV6
PV7
PV8.
Documentation
A very fast way to call a certain routine using a given
index is the Perform i Of ... statement.