次は、添え字を最適化して使用するコード例です。
01 a pic xx occurs 10. 01 b pic xx occurs 10. 01 c pic xx occurs 10. 01 d pic xx occurs 10. ... move a(i) to b(i) if c(i) = d(i) display "pass" end if
上記では、添え字 i が 2 つの文で 4 回使用されますが、1 回しか評価されません。各項目の大きさはいずれも 2 です。